SNAX/APC Application Programming Manual

COBOL Definitions for SNAX/APC
SNAX/APC Application Programming Manual—138786
A-5
COBOL Definitions
88 REQ-ERROR VALUE IS 3.
02 VERSION-CODE PIC X(2).
02 HEADER-RETURN-CODE PIC S9(4) COMP.
88 IPC-OK VALUE IS 0.
88 INVALID-VERSION-CODE VALUE IS 1.
88 INVALID-RESOURCE-ID VALUE IS 2.
88 SERVICE-DENIED VALUE IS 3.
88 INVALID-UOW-HEADER VALUE IS 4.
88 REQ-TOO-LONG VALUE IS 5.
88 REQ-TOO-SHORT VALUE IS 6.
88 REP-TOO-LONG VALUE IS 7.
88 INVALID-REQ-CODE VALUE IS 8.
88 SNAX-FILE-ERROR VALUE IS 9.
88 OUT-OF-RESOURCES VALUE IS 10.
02 HEADER-RETURN-CODE-DETAIL PIC S9(4) COMP.
88 INVALID-INDICATOR VALUE IS 302.
88 INVALID-TPNAME VALUE IS 303.
88 INVALID-LUNAME VALUE IS 304.
88 INVALID-SEND-LENGTH VALUE IS 305.
88 INVALID-TYPE VALUE IS 306.
88 INVALID-APC-VERB VALUE IS 307.
88 TOO-MANY-UOWS VALUE IS 308.
88 INVALID-RCVD-LENGTH VALUE IS 309.
88 INVALID-SESSION-ID VALUE IS 326.
88 SYNCPT-NOT-ENABLED VALUE IS 327.
88 CONFIG-ERROR VALUE IS 310.
88 PROCESS-RESET VALUE IS 401.
88 MULT-UOW-NOT-ALLOWED VALUE IS 402.
88 PREVIOUS-IPC-NOT-COMPLETED VALUE IS 403.
88 MULT-ALLOC-NOT-ALLOWED VALUE IS 404.
88 TP-RQ-NOT-SUPPORTED VALUE IS 405.
88 LU-STOPPED VALUE IS 406.
88 PTNR-LU-STOPPED VALUE IS 407.
88 PTNR-MODE-STOPPED VALUE IS 408.
88 TPN-STOPPED VALUE IS 409.
88 TPI-ABORTED VALUE IS 410.
88 IPC-VERSION-MISMATCH VALUE IS 411.
88 VERB-NOT-ALLOWED-FOR-PS-LU VALUE IS 412.
88 IPC-OUT-OF-BUFFER VALUE IS 413.
88 INVALID-SNAX-DEV-TYPE VALUE IS 414.
88 SYNC-LEVEL-NOT-SUPPTD-BY-LU VALUE IS 417.
02 RESOURCE-ID PIC X(6).
02 UOWS-IN PIC 9(4) COMP.
02 UOWS-OUT PIC 9(4) COMP.
02 LOG-LEVEL PIC 9(4) COMP.
?SECTION REQ-HEADER,TANDEM
01 REQ-HEADER.
02 REQ-UOW-ID PIC X(2).
02 REQ-UOW-CODE PIC 9(4) COMP.
?SECTION QUALIFIED-REQ-HEADER,TANDEM
01 QUALIFIED-REQ-HEADER.
02 REQ-UOW-ID PIC X(2).
02 REQ-UOW-CODE PIC 9(4) COMP.
88 ACTIVATE-SESS-REQ-CODE VALUE IS 2001.
88 ALLOCATE-REQ-CODE VALUE IS 1001.