To determine how to invoke a CICS program, CICS provides the following 88-level flags to indicate the mode of program invocation.
TP-INVOCATION-MODE PIC X(01). 88 TP-TRANSID-INVOKED VALUE 'T'. 88 TP-PROGRAM-INVOKED VALUE 'P'. 88 TP-SCREEN-INVOKED VALUE 'S'. 88 TP-LINK-INVOKED VALUE 'L'.
TP-TRANSID-INVOKED |
A transaction code entered on a blank screen invokes the program. |
TP-PROGRAM-INVOKED |
An XCTL call from another program invokes the program. |
TP-SCREEN-INVOKED |
The SEND call sends the screen and a PF key or ENTER key invokes the program. |
TP-LINK-INVOKED |
A LINK call from another program invokes the program. |
To determine how to invoke an IMS DC program, AMB provides the following 88-level program support variable flags.
TP-INVOCATION-MODE PIC X(01). 88 TP-TRANSID-INVOKED VALUE 'T'. 88 TP-PROGRAM-INVOKED VALUE 'P'. 88 TP-SCREEN-INVOKED VALUE 'S'. 88 TP-LINK-INVOKED VALUE 'L'.
TP-TRANSID-INVOKED |
Provided for upward compatibility; has no function. |
TP-PROGRAM-INVOKED |
A LINK call from another program invokes the program. |
TP-SCREEN-INVOKED |
The SEND call sends the screen and a PF key or ENTER key invokes the program. |
TP-LINK-INVOKED |
Provided for upward compatibility; has no function. |
AMB tests for a TRUE value to determine which invocation paragraph to perform.
To determine how to invoke an DLG program, AMB provides the following 88-level flags.
TP-INVOCATION-MODE PIC X(01). 88 TP-TRANSID-INVOKED VALUE 'T'. 88 TP-PROGRAM-INVOKED VALUE 'P'. 88 TP-SCREEN-INVOKED VALUE 'S'. 88 TP-LINK-INVOKED VALUE 'L'.
TP-TRANSID-INVOKED |
Provided for upward compatibility; has no function. |
TP-PROGRAM-INVOKED |
A LINK call from another program invokes the program. |
TP-SCREEN-INVOKED |
The SEND call sends the screen and a PF key or ENTER key invokes the program. |
TP-LINK-INVOKED |
Provided for upward compatibility; has no function. |