SNAX/APC Application Programming Manual
COBOL Definitions for SNAX/APC
SNAX/APC Application Programming Manual—138786
A-16
COBOL Definitions
 02 RESERVED-1 PIC X(1).
 02 CMR-REQUEST-TO-SEND-IND PIC X(1).
 88 CMR-RECEIVED VALUE IS "Y".
 88 CMR-NOT-RECEIVED VALUE IS "N".
?SECTION CONFIRM-REP,TANDEM
 01 CONFIRM-REP.
 02 CMR-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 CMR-PARAMETERS.
 03 RESERVED-1 PIC X(1).
 03 CMR-REQUEST-TO-SEND-IND PIC X(1).
 88 CMR-RECEIVED VALUE IS "Y".
 88 CMR-NOT-RECEIVED VALUE IS "N".
?SECTION CONFIRMED-REQ,TANDEM
 01 CONFIRMED-REQ.
 02 CD-HEADER.
 03 REQ-UOW-ID PIC X(2).
 03 REQ-UOW-CODE PIC 9(4) COMP.
?SECTION CONFIRMED-REP,TANDEM
 01 CONFIRMED-REP.
 02 CDR-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 DEACTIVATE-SESS-REQ-PARMS,TANDEM
 01 DEACTIVATE-SESS-REQ-PARMS.
 02 DA-APC-LUNAME PIC X(8).
 02 DA-APC-SESS-ID REDEFINES DA-APC-LUNAME.
 03 DA-APC-SESSION-ID PIC X(4).
 03 PAD PIC X(4).
 02 DA-TYPE PIC X(2).
?SECTION DEACTIVATE-SESS-REQ,TANDEM
 01 DEACTIVATE-SESS-REQ.
 02 DA-HEADER.
 03 REQ-UOW-ID PIC X(2).
 03 REQ-UOW-CODE PIC 9(4) COMP.
 02 DA-PARAMETERS.
 03 DA-APC-LUNAME PIC X(8).
 03 DA-APC-SESS-ID REDEFINES DA-APC-LUNAME.
 04 DA-APC-SESSION-ID PIC X(4).
 04 PAD PIC X(4).
 03 DA-TYPE PIC X(2).
?SECTION DEACTIVATE-SESS-REP,TANDEM
 01 DEACTIVATE-SESS-REP.
 02 DAR-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 DEALLOCATE-REQ-PARMS,TANDEM
 01 DEALLOCATE-REQ-PARMS.










