SNAX/APC Application Programming Manual

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