SNAX/APC Application Programming Manual

COBOL Definitions for SNAX/APC
SNAX/APC Application Programming Manual—138786
A-10
COBOL Definitions
03 FILLER PIC X(34)
VALUE "0405TP Request Not
Supported".
03 FILLER PIC X(34)
VALUE "0406LU Stopped".
03 FILLER PIC X(34)
VALUE "0407Partner LU
Stopped".
03 FILLER PIC X(34)
VALUE "0408Partner Mode
Stopped".
03 FILLER PIC X(34)
VALUE "0409TPN Stopped".
03 FILLER PIC X(34)
VALUE "0410TPI Aborted".
03 FILLER PIC X(34)
VALUE "0411IPC Version
Mismatch".
03 FILLER PIC X(34)
VALUE "0412Verb Not Allowed
For PS LU".
03 FILLER PIC X(34)
VALUE "0413IPC Out Of
Buffer".
03 FILLER PIC X(34)
VALUE "0414Invalid SNAX
Device Type".
03 FILLER PIC X(34)
VALUE "0417Sync Level Not
Supptd By LU".
03 FILLER PIC X(34)
VALUE "9999Unknown Reply".
02 IPC-RETURN-CODE-DETAIL-TABR REDEFINES IPC-RETURN-CODE-
DETAIL-TABLE.
03 IPC-RETURN-CODE-DETAIL-INFO OCCURS 26 TIMES.
04 IPC-DETAIL-MESSAGE-NUMBER PIC 9999.
04 IPC-DETAIL-MESSAGE-TEXT PIC X(30).
?SECTION REPLY-RETURN-CODE-TAB,TANDEM
01 REPLY-RETURN-CODE-TAB.
02 REPLY-RETURN-CODE-TABLE.
03 FILLER PIC X(32)
VALUE "0000RC Ok".
03 FILLER PIC X(32)
VALUE "1001Allocation
Error".
03 FILLER PIC X(32)
VALUE "1002Deallocate Abend
Prog".
03 FILLER PIC X(32)
VALUE "1003Deallocate Abend
Svc".
03 FILLER PIC X(32)
VALUE "1004Not Defined".
03 FILLER PIC X(32)
VALUE "1005Deallocate