EMS Manual

ManualsBrandsHP ManualsServerHP NonStop G-Series

801

802

803

804

805

806

807

808

809

810

Standard Event Sample Files

EMS Manual—426909-005

C-26

DDL Definitions Sample File

! Provide "89 enumeration clause" if token has "89" (see

! above)

!***************************************************************

! Private enumerations of this subsystem's tokens *

! *

! Naming convention: ZSAM-VAL-enumname *

! ZSAM-ENM-enumname for 89 enumeration *

! clause *

!***************************************************************

CONSTANT ZSAM-VAL-appl-remote-rej VALUE IS 1.

CONSTANT ZSAM-VAL-net-unavail VALUE IS 2.

CONSTANT ZSAM-VAL-tp-remote-rej VALUE IS 3.

CONSTANT ZSAM-VAL-tp-local-abort VALUE IS 4.

!***************************************************************

! Private token definitions -- common building blocks *

! *

! 1) Token-number definitions *

! *

! Naming convention: ZSAM-TNM-tokenname *

! Valid range: 1 through 9998 *

! *

! "tokenname" corresponds to the token ZSAM-TKN-tokenname *

! or ZSAM-MAP-tokenname defined below *

! *

! 2) Common DDL structure definitions *

! *

! Naming convention: ZSAM-DDL-structname *

! *

! This section defines the common DDL structures for *

! tokens below *

! 3) Private token-type definitions *

! *

! Naming convention: ZSAM-TYP-tokentypename *

! *

! ZSPI-TYP-??? are standard SPI token-type definitions *

! ZSPI-TDT-??? are standard SPI token-data-type *

! definitions *

! This section defines the private token-types for *

! tokens below *

!***************************************************************

! ------------------------

! Token-number definitions

! ------------------------

! Every token you define under TOKEN-CODE and TOKEN-MAP later

! must have a token number. The token numbers for the private

! tokens defined are:

CONSTANT ZSAM-TNM-subj-tp VALUE IS 1.

CONSTANT ZSAM-TNM-subj-netx25 VALUE IS 2.

CONSTANT ZSAM-TNM-subj-tape VALUE IS 3.