SNAX/APC Application Programming Manual

COBOL Definitions for SNAX/APC
SNAX/APC Application Programming Manual—138786
A-12
COBOL Definitions
Check".
03 FILLER PIC X(32)
VALUE "1027Backout No
Resync".
03 FILLER PIC X(32)
VALUE"1028Backout Resync".
03 FILLER PIC X(32)
VALUE "2001Activation Fail
No Retry".
03 FILLER PIC X(32)
VALUE "2002Activation Fail
Retry".
03 FILLER PIC X(32)
VALUE "2004Mode Session
Limit Exceeded".
03 FILLER PIC X(32)
VALUE "3001State
Violation".
03 FILLER PIC X(32)
VALUE "3002SNAX File
Error".
03 FILLER PIC X(32)
VALUE "9999Unknown Reply".
02 REPLY-RETURN-CODE-TABR REDEFINES REPLY-RETURN-CODE-TABLE.
03 REPLY-RETURN-CODE-INFO OCCURS 32 TIMES.
04 REPLY-MESSAGE-NUMBER PIC 9999.
04 REPLY-MESSAGE-TEXT PIC X(28).
?SECTION ALLOCATION-ERROR-DETAIL-TAB,TANDEM
01 ALLOCATION-ERROR-DETAIL-TAB.
02 ALLOCATION-ERROR-DETAIL-TABLE.
03 FILLER PIC X(22)
VALUE "0001No Retry".
03 FILLER PIC X(22)
VALUE "0002Retry".
03 FILLER PIC X(22)
VALUE "0003Conv Type
Mismatch".
03 FILLER PIC X(22)
VALUE "0004Sync Level Not
Sup".
03 FILLER PIC X(22)
VALUE "0005TP Name Not
Known ".
03 FILLER PIC X(22)
VALUE "0006TP Not Avail-
Fatal".
03 FILLER PIC X(22)
VALUE "0007TP Not Avail-
Retry".
03 FILLER PIC X(22)
VALUE "0008PIP Not
Correct".
03 FILLER PIC X(22)
VALUE "0009Security Not
Valid".