Call function codes

In the application program, identify the function codes the program will use in the IMS compatible calls to AR/CTL. The program uses a variable to identify each function code; the value of the variable is the actual function code. If the program already contains these structures for IMS, no changes are necessary.

You can use any name for the function variables, including the value of the function itself, within the conventions of the programming language. The value must be 4 bytes long. For function codes less than 4 bytes (such as GU and GN), pad the value with trailing blanks.

Define call function codes in the working storage section. Use level 77 or level 01-49 entries. You can use a COBOL COPY statement to include these standard descriptions in the application program:

77 XRST  PIC X(4) VALUE 'XRST'.
77 CHKP  PIC X(4) VALUE 'CHKP'.

This version of the documentation is no longer supported. However, the documentation is available for your convenience. You will not be able to leave comments.

Comments