IBM Support

New function code 9 added to Vendor Interface Routine IGZXAPI to query the WORKING-STORAGE SECTION address of a running COBOL program.

News


Abstract

An enhancement has been made to IBM Enterprise COBOL for z/OS to add a new function code 9 to the Vendor Interface routine IGZXAPI.

Content

APAR PI82714 introduces an enhancement which adds a new function code 9 to the Vendor Interface routine IGZXAPI .

This is similar to the existing function code 8 in IGZXAPI. The original description of this Vendor Interface routine IGZXAPI can be found in "z/OS Language Environment Vendor Interface" manual, Chapter 17 "COBOL-Specific Vendor Interfaces", section "IGZXAPI -- COBOL file and runtime information query routine" and introduction of new function code 9 adds the following information to it:

On input to function code 9 the caller sets R13 to the address of a register save area, and clears R12 to zero. The routine will not use R12 to locate LE CAA; instead it will call LE services to locate it. The Language Environment must be active before the call.

Function code 8 requires R13 to points to a DSA, which must be chained correctly back to a Language Environment conforming DSA when function code 8 receives control. Function code 9 only requires R13 to points to a save area. It doesn't need to chain back to a Language Environment DSA.

DSECT XINFO8 is the information structure to communicate with the routine. The set up of XINFO8 and calling convention is the same as function code 8. If the callback function is used, by setting field XCBACK8 in XINFO8, the callback function cannot be an LE high level language or making calls to LE services."

[{"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Component":"Runtime","Platform":[{"code":"PF035","label":"z\/OS"}],"Version":"5.1;5.1.1;5.2;6.1;6.2","Edition":"Enterprise","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}}]

Document Information

Modified date:
08 August 2018

UID

swg22014384