Start of change

Function Code 16 (64-bit only)

Query WORKING STORAGE information for all COBOL programs within the Language Environment enclave

This function only applies to COBOL programs compiled with the LP(64) option. (That is, programs that are running in AMODE 64.)

Use this function code to query WORKING-STORAGE information for all COBOL programs within the Language Environment enclave. The parameter structure is XINFO8 (the same as function code 8). The caller of IGZXAPI must be running in the same Language Environment enclave.

On the first call to this function code, clear the whole XINFO8 to binary zero, except for the following:
XFNCODE8
This is the function code. Set to 16 by the caller. XLEN8
XLEN8
Length of the XINFO data structure. The caller should set this field to the length of 208 (parameter structure length)
XWKAREA8
The address of a 2048-byte work area provided by the caller.
XCAA8
The CAA for the COBOL program in the enclave

Requirements for registers R1 and R13 are the same as other IGZXAPI function codes.

On return, information of the first COBOL program is set in the parameter structure. The information that is returned is the same as the corresponding call to function code 8.

Then call IGZXAPI again using the same XINFO8 without changing any fields returned from the previous call. Information of the next COBOL program would be returned. Repeat this step to retrieve the rest of the COBOL programs. The last COBOL program has been returned (in the previous call) if the entry point field, XEP8, returned is zero.

End of change