SNAX/APC Application Programming Manual

COBOL Definitions for SNAX/APC
SNAX/APC Application Programming Manual—138786
A-22
COBOL Definitions
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 REQUEST-TO-SEND-REQ,TANDEM
01 REQUEST-TO-SEND-REQ.
02 RS-HEADER.
03 REQ-UOW-ID PIC X(2).
03 REQ-UOW-CODE PIC 9(4) COMP.
?SECTION REQUEST-TO-SEND-REP,TANDEM
01 REQUEST-TO-SEND-REP.
02 RSR-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 SEND-DATA-REQ,TANDEM
01 SEND-DATA-REQ.
02 SD-HEADER.
03 REQ-UOW-ID PIC X(2).
03 REQ-UOW-CODE PIC 9(4) COMP.
?SECTION SEND-DATA-REP-PARMS,TANDEM
01 SEND-DATA-REP-PARMS.
02 RESERVED-1 PIC X(1).
02 SDR-REQUEST-TO-SEND-IND PIC X(1).
88 SDR-RECEIVED VALUE IS "Y".
88 SDR-NOT-RECEIVED VALUE IS "N".
?SECTION SEND-DATA-REP,TANDEM
01 SEND-DATA-REP.
02 SDR-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 SDR-PARAMETERS.
03 RESERVED-1 PIC X(1).
03 SDR-REQUEST-TO-SEND-IND PIC X(1).
88 SDR-RECEIVED VALUE IS "Y".
88 SDR-NOT-RECEIVED VALUE IS "N".
?SECTION SEND-ERROR-REQ-PARMS,TANDEM
01 SEND-ERROR-REQ-PARMS.
02 SE-TYPE PIC S9(4) COMP.
?SECTION SEND-ERROR-REQ,TANDEM
01 SEND-ERROR-REQ.
02 SE-HEADER.
03 REQ-UOW-ID PIC X(2).
03 REQ-UOW-CODE PIC 9(4) COMP.
02 SE-PARAMETERS.
03 SE-TYPE PIC S9(4) COMP.