New parameter format

A sample COBOL exit is provided in ARSE2INP along with the COBOL copybook ARSIN2BK. A sample C exit is provided in ARSECINP along with the C header file ARSZ390H.

Parameters

The following example from the ARSIN2BK Cobol Copybook shows the parameters that are required by ARSE2INP.

01 PAGE-BUFFER.
   02 PAGE-BUFFER-AREA 	OCCURS 1048320 PIC X.
01 LINE-COUNT 									COMP PIC S9(8).
01 RECORD-STATUS 										PIC X(3).
   88 END-OF-FILE 									VALUE 'EOF'.
01 ARSE2INP-DDNAME 									PIC X(8).
01 ARSE2INP-FILE-NAME PIC X(1023).

01 ARSE2INP-OS-LEVEL-FLAG PIC X.
   88 ARSE2INP-OS-LEVEL-ZOS VALUE 'Z'.
   88 ARSE2INP-OS-LEVEL-MP VALUE 'M'.

PAGE-BUFFER: Set by Exit. One data page of the report input. The records are concatenated into this buffer area. Each record must be preceded by a two byte value representing the record length. This two byte value does not include the length of itself.
If the PAGE-BUFFER-AREA is not large enough to hold an entire page, consider using the ANYSTORE exit instead of the INPUT exit.
LINE-COUNT: Set by Exit. The number of lines in the Page Buffer.
RECORD-STATUS: Set by Exit. The end of file (EOF) indicator.
ARSE2INP-DDNAME: Set by calling routine. The DD Name of the input file. This is particularly useful when the load process is initiated by the Spool Capture process because the DD Name will be different each time.