Manualshelf

SNAX/APC Application Programming Manual

ManualsBrandsHP ManualsServerHP NonStop G-Series
261262263264265266267268269270
COBOL Definitions for SNAX/APC
SNAX/APC Application Programming Manual—138786
A-3
COBOL Definitions
01 APC-NOT-DISPATCHED PIC X(1), VALUE IS "N".
01 APC-SYNC2-SUPPORTED PIC X(1), VALUE IS "Y".
01 APC-SYNC2-NOT-SUPPORTED PIC X(1), VALUE IS "N".
01 APC-FILL-BUFFER PIC X(1), VALUE IS "B".
01 APC-FILL-LL PIC X(1), VALUE IS "L".
01 APC-MAP-NAME-PRESENT PIC X(1), VALUE IS "Y".
01 APC-MAP-NAME-NOT-PRESENT PIC X(1), VALUE IS "N".
01 APC-LOCAL-ATTACH PIC X(1), VALUE IS "Y".
01 APC-NOT-LOCAL PIC X(1), VALUE IS "N".
01 APC-PREP-TO-RCV-SYNC-LEVEL PIC X(2), VALUE IS "SL".
01 APC-PREP-TO-RCV-FLUSH PIC X(2), VALUE IS "FL".
01 APC-PREP-TO-RCV-CONFIRM PIC X(2), VALUE IS "CO".
01 APC-SOURCE-TP PIC X(1), VALUE IS "S".
01 APC-TARGET-TP PIC X(1), VALUE IS "T".
01 APC-TARGET-TP PIC X(1), VALUE IS "T".
01 APC-SYNC-LEVEL-SYNCPT PIC X(1), VALUE IS "S".
01 APC-SYNC-LEVEL-NO PIC X(1), VALUE IS "N".
?Section TP-VARIABLES,Tandem
?SECTION APC-TP-VARIABLES,TANDEM
01 APC-TP-VARIABLES.
02 APC-LOCAL-LUNAME PIC X(8).
02 APC-LOCAL-TPNAME PIC X(16).
02 APC-MODENAME PIC X(8).
02 APC-PARTNER-LUNAME PIC X(8).
02 APC-PARTNER-TPNAME PIC X(16).
02 APC-PROCESS-NAME PIC X(6).
02 APC-RESOURCE-ID PIC X(6).
02 APC-SAVE-RESOURCE-ID PIC X(6).
02 APC-SYNC-LEVEL PIC X(1).
88 SYNC-LEVEL-SYNCPT VALUE IS "S".
88 SYNC-LEVEL-CONFIRM VALUE IS "C".
88 SYNC-LEVEL-NO VALUE IS "N".
02 APC-DISPATCHED-INDICATOR PIC X(1).
88 TP-DISPATCHED VALUE IS "Y".
88 TP-NOT-DISPATCHED VALUE IS "N".
02 APC-SYNC-SUPPORT-INDICATOR PIC 9.
88 TP-SYNC2-SUPPORTED VALUE IS Y.
88 TP-SYNC2-NOT-SUPPORTED VALUE IS N.
02 APC-RESET-STATE-SWITCH PIC 9.
88 APC-RESET-STATE VALUE IS 0.
88 FIRST-TIME VALUE IS 1.
02 APC-TP-END-SWITCH PIC 9.
88 APC-TP-END VALUE IS 0.
88 TP-END-ON VALUE IS 1.
02 APC-TP-INITIAL-STATES PIC X(1).
88 SOURCE-TP VALUE IS "S".
88 TARGET-TP VALUE IS "T".
?SECTION APC-CONVERSATION-STATES,TANDEM
01 APC-CONVERSATION-STATES.
02 CURRENT-STATE PIC 9(4) COMP.
88 CS-RESET VALUE IS 1.
88 CS-SEND VALUE IS 2.
88 CS-RECEIVE VALUE IS 5.
88 CS-CONFIRM VALUE IS 6.
88 CS-CONFIRM-SEND VALUE IS 7.