SNAX/APC Application Programming Manual

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