SNAX/APC Application Programming Manual

COBOL Definitions for SNAX/APC
SNAX/APC Application Programming Manual—138786
A-29
COBOL Definitions
?SECTION MC-RECEIVE-AND-WAIT-REQ,TANDEM
01 MC-RECEIVE-AND-WAIT-REQ.
02 MC-RW-HEADER.
03 REQ-UOW-ID PIC X(2).
03 REQ-UOW-CODE PIC 9(4) COMP.
02 MC-RW-PARAMETERS.
03 RESERVED-2 PIC X(2).
03 MC-RW-MAX-DATA-LENGTH PIC 9(4) COMP.
?SECTION MC-RECEIVE-WAIT-REP-PARMS,TANDEM
01 MC-RECEIVE-WAIT-REP-PARMS.
02 RESERVED-1 PIC X(1).
02 MC-RWR-REQUEST-TO-SEND-IND PIC X(1).
88 MC-RWR-RECEIVED VALUE IS "Y".
88 MC-RWR-NOT-RECEIVED VALUE IS "N".
02 MC-RWR-WHAT-RECEIVED PIC 9(4) COMP.
88 MC-WR-DATA VALUE IS 0.
88 MC-WR-DATA-COMPLETE VALUE IS 1.
88 MC-WR-DATA-INCOMPLETE VALUE IS 2.
88 MC-WR-SEND VALUE IS 3.
88 MC-WR-CONFIRM VALUE IS 4.
88 MC-WR-CONFIRM-SEND VALUE IS 5.
88 MC-WR-CONFIRM-DEALLOCATE VALUE IS 6.
02 MC-RWR-MAP-NAME PIC X(8).
?SECTION MC-RECEIVE-AND-WAIT-REP,TANDEM
01 MC-RECEIVE-AND-WAIT-REP.
02 MC-RWR-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 MC-RWR-PARAMETERS.
03 RESERVED-1 PIC X(1).
03 MC-RWR-REQUEST-TO-SEND-IND PIC X(1).
88 MC-RWR-RECEIVED VALUE IS "Y".
88 MC-RWR-NOT-RECEIVED VALUE IS "N".
03 MC-RWR-WHAT-RECEIVED PIC 9(4) COMP.
88 MC-WR-DATA VALUE IS 0.
88 MC-WR-DATA-COMPLETE VALUE IS 1.
88 MC-WR-DATA-INCOMPLETE VALUE IS 2.
88 MC-WR-SEND VALUE IS 3.
88 MC-WR-CONFIRM VALUE IS 4.
88 MC-WR-CONFIRM-SEND VALUE IS 5.
88 MC-WR-CONFIRM-DEALLOCATE VALUE IS 6.
03 MC-RWR-MAP-NAME PIC X(8).
?SECTION MC-RECEIVE-IMMED-REQ-PARMS,TANDEM
01 MC-RECEIVE-IMMED-REQ-PARMS.
02 RESERVED-2 PIC X(2).
02 MC-RI-MAX-DATA-LENGTH PIC 9(4) COMP.
?SECTION MC-RECEIVE-IMMEDIATE-REQ,TANDEM
01 MC-RECEIVE-IMMEDIATE-REQ.
02 MC-RI-HEADER.
03 REQ-UOW-ID PIC X(2).
03 REQ-UOW-CODE PIC 9(4) COMP.
02 MC-RI-PARAMETERS.
03 RESERVED-2 PIC X(2).