Data Definition Language (DDL) Reference Manual

Sample Schemas
Data Definition Language (DDL) Reference Manual—529431-004
B-11
ASSNDDL Statements
! Token-map definition:
TOKEN-MAP assn-map-jobinfo VALUE IS assn-tnm-jobinfo
DEF IS assn-ddl-jobinfo.
VERSION "D00" FOR jnumber THRU location.
VERSION "D30" FOR jobclass-is-present.
NOVERSION FOR jobclass.
VERSION "D30" FOR jobusername.
END
! Subsystem-ID definition:
DEF assn-val-ssid TACL ssid.
02 z-filler TYPE CHARACTER 8
VALUE IS assn-val-yourco.
02 z-owner TYPE zspi-ddl-char8
REDEFINES z-filler.
02 z-number TYPE zspi-ddl-int
VALUE IS assn-ssn-assn.
02 z-version TYPE zspi-ddl-uint
VALUE IS assn-val-version.
END
? SECTION assn-buffer
! Buffer definition
DEF assn-ddl-msg-buffer.
02 z-msgcode TYPE zspi-ddl-int.
02 z-buflen TYPE zspi-ddl-uint.
02 z-occurs TYPE zspi-ddl-uint.
02 z-filler TYPE zspi-ddl-byte
OCCURS 0 TO assn-val-buflen TIMES
DEPENDING ON z-occurs.
END
Figure B-2. Sample DDL File ASSNDDL