SPI Reference Summary
SPI Procedures and Functions
SPI Reference Summary—427507-006
2-16
Token Map Definition
Token Map Definition
TAL programs require an additional step to initialize token maps (unlike the other
supported languages). In TAL, use DDL LITERAL and DEFINE names produced by
DDL:
Passing token-id by Value or Reference
token-id can be passed by value or reference:
Calling SPI Procedures
SPI procedure calls differ, depending on the language:
COBOL (Not applicable; the SSID record in the COPY file is already initialized.)
C
subsys_val_ssid_def subsys_val_ssid=
{ ZSPI_VAL_TANDEM,
ZSPI_SSN_subsys,
subsys_VAL_VERSION };
TACL
#SET subsys^VAL^SSID &
[ZSPI^VAL^TANDEM].[ZSPI^SSN^subsys].
[subsys^VAL^VERSION]
TAL
?SOURCE \sys.$vol.ZSPIDEF.subsysTAL
INT .user^chosen [0:subsys^MAP^name^WLN-1] :=
subsys^MAP^name ;
DEFINE subsys^MAP^name= initialization-list-for-TAL array
#;
LITERAL subsys^MAP^name^WLN = n ;
where n is the size of the TAL array to be initialized.
TAL SSGET, SSMOVE, and SSPUT pass token-id by reference
SSGETTKN, SSMOVETKN, and SSPUTTKN pass token-id by value.
COBOL COBOL programs pass tokens only by reference. They do not need and
should not use SSGETTKN, SSMOVETKN, and SSPUTTKN.
C SSGET, SSMOVE, and SSPUT pass pointers to token maps.
SSGETTKN, SSMOVETKN, and SSPUTTKN pass token codes.
TAL
status := spiproc (param^1 , param^2 ..., param^n )