Data Definition Language (DDL) Reference Manual

SPI Tokens
Data Definition Language (DDL) Reference Manual—529431-004
7-8
TOKEN-CODE
The generated values in Example 7-6 on page 7-7 are identical to the values
generated for COBOL, TAL, or TACL source-code output from the same TOKEN-
TYPE statements.
The generated values in Example 7-7 on page 7-8 are identical to the values
generated for COBOL, pTAL, TAL, TACL, or C source-code output from the same
TOKEN-TYPE statements.
TOKEN-CODE
The TOKEN-CODE statement defines a token code for a particular simple token and
stores the definition in the open dictionary.
If the TOKEN-CODE statement identifies a token code that already exists in the open
dictionary, the DDL compiler replaces the existing token code with the new token code.
If the appropriate source code files are open, the DDL compiler generates C, COBOL,
Pascal (on D-series systems), pTAL, TACL, or TAL token-code structures when it
executes the TOKEN-CODE statement.
token-name
is the name of a simple token.
Example 7-7. Pascal Source Code Generated for Example 7-2 on page 7-6
?Section ZSPI_TYP_INT
CONST ZSPI_TYP_INT = 514;
?Section ASSN_TYP_STATUS
CONST ASSN_TYP_STATUS = 514;
?Section ASSN_TYP_VARIABLE_TOKEN
CONST ASSN_TYP_VARIABLE_TOKEN = 1023;
TOKEN-CODE token-name
VALUE [ IS ] token-number
TOKEN-TYPE [ IS ] type-name
[ SSID subsystem-id ]
[ HEADING label ]
[ DISPLAY display-format ]