Data Definition Language (DDL) Reference Manual (G06.24+)
SPI Tokens
Data Definition Language (DDL) Reference Manual—426798-002
7-19
TOKEN-MAP Statement
•
The following shows the data structures DDL generates for token maps in each 
language.
•
For the C data structure, each element in the static integer array is the value of one 
word in the token map.
•
For the COBOL data structure, each FILLER element specifies the value of one 
word in the token map.
•
For the Pascal data structure, each element in the integer array is the value of one 
word in the token map.
•
For the TACL data structure, the first STRUCT variable is a double-word integer 
specifying the token code in the first 2 words of the token map. The rest of the 
STRUCT is an integer array containing one value for each remaining word in the 
token map.
•
For the pTAL or TAL data structure, each constant in the DEFINE list specifies the 
value of one word in the token map. The LITERAL map^name^WLN specifies the 
total number of words in the token map.
•
For a description of how to use these definitions in a subsystem that accepts SPI 
programmatic commands, see the Distributed Systems Management (DSM) 
Manual.
Standard SPI Definitions in Token-Map Definitions. The following guidelines apply 
to using standard SPI definitions when you define token maps:
•
SPI does not provide standard definitions for token maps; subsystems must define 
their own token maps. When you define a token map, do not prefix the map-name 
with the letter Z; this ensures that your token-map name will not be the same as a 
current or future name supplied by HP.
Language Data Structure
C static int map_name = {v1,v2,...,vn};
COBOL 01 map-name.
 02 FILLER NATIVE-2 VALUE v1.
 02 FILLER NATIVE-2 VALUE v2.
  •
  •
 02 FILLER NATIVE-2 VALUE vn.
END
Pascal VAR map_name : ARRAY [1..n] OF INT16 := [v1, v2, ..., vn];
TACL ?Section map^name Struct
 BEGIN
 INT2 CODE VALUE v1v2;
 INT  MAP (0:n-3) VALUE v3, ..., vn;
 END;
pTAL or TAL DEFINE map^name = [v1, v2, ..., vn]#;
 LITERAL map^name^WLN = n;










