SNAX/APC Application Programming Manual

COBOL Definitions for SNAX/APC
SNAX/APC Application Programming Manual—138786
A-23
COBOL Definitions
?SECTION SEND-ERROR-REP-PARMS,TANDEM
01 SEND-ERROR-REP-PARMS.
02 RESERVED-1 PIC X(1).
02 SER-REQUEST-TO-SEND-IND PIC X(1).
88 SER-RECEIVED VALUE IS "Y".
88 SER-NOT-RECEIVED VALUE IS "N".
?SECTION SEND-ERROR-REP,TANDEM
01 SEND-ERROR-REP.
02 SER-HEADER.
03 REP-UOW-ID PIC X(2).
03 REP-VERB-CODE PIC 9(4) COMP.
03 REP-RETURN-CODE PIC S9(4) COMP.
03 REP-RETURN-CODE-DETAIL PIC S9(4) COMP.
02 SER-PARAMETERS.
03 RESERVED-1 PIC X(1).
03 SER-REQUEST-TO-SEND-IND PIC X(1).
88 SER-RECEIVED VALUE IS "Y".
88 SER-NOT-RECEIVED VALUE IS "N".
?SECTION TP-END-REQ,TANDEM
01 TP-END-REQ.
02 TE-HEADER.
03 REQ-UOW-ID PIC X(2).
03 REQ-UOW-CODE PIC 9(4) COMP.
?SECTION TP-END-REP,TANDEM
01 TP-END-REP.
02 TER-HEADER.
03 REP-UOW-ID PIC X(2).
03 REP-VERB-CODE PIC 9(4) COMP.
03 REP-RETURN-CODE PIC S9(4) COMP.
03 REP-RETURN-CODE-DETAIL PIC S9(4) COMP.
?SECTION TP-READY-REQ-PARMS,TANDEM
01 TP-READY-REQ-PARMS.
02 TR-LOCAL-ATTACH-INDICATOR PIC X(1).
02 TR-DISPATCHED-INDICATOR PIC X(1).
02 TR-APC-LUNAME PIC X(8).
02 TR-LOCAL-TPNAME PIC X(16).
?SECTION TP-READY-REQ,TANDEM
01 TP-READY-REQ.
02 TR-HEADER.
03 REQ-UOW-ID PIC X(2).
03 REQ-UOW-CODE PIC 9(4) COMP.
02 TR-PARAMETERS.
03 TR-LOCAL-ATTACH-INDICATOR PIC X(1).
03 TR-DISPATCHED-INDICATOR PIC X(1).
03 TR-APC-LUNAME PIC X(8).
03 TR-LOCAL-TPNAME PIC X(16).
?SECTION TP-READY-REP-PARMS,TANDEM
01 TP-READY-REP-PARMS.
02 RESERVED-2 PIC X(2).
?SECTION TP-READY-REP,TANDEM
01 TP-READY-REP.
02 TRR-HEADER.
03 REP-UOW-ID PIC X(2).
03 REP-VERB-CODE PIC 9(4) COMP.
03 REP-RETURN-CODE PIC S9(4) COMP.