A fix is available
APAR status
Closed as program error.
Error description
IGZXAPI et al are designed to use a private stack so they can be called in various unusual contexts. A reference to that private stack is found in the stack frame of an active COBOL application module. However, the stack frame (DSA) word 0 of the COBOL I/O library routine (in this case QSAMOPEF via IGZXQOPN) was that of an application module, although the library routine had an abbreviated prolog that did not set up the pointer to the private stack. When the vendor routine called IGZXFLI, it used the invalid private stack pointer, leading to the 0C4. As R13 was invalid, LE was unable navigate the stack, and so surfaced the 0C4 as a CEE0374C CONDITION=CEE3204S followed by a U4083-3.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V5 running * * programs that call the COBOL library query * * routine IGZXAPI. * * * **************************************************************** * PROBLEM DESCRIPTION: Runtime ABEND: S0C4 abend in IGZXAPI * * * **************************************************************** * RECOMMENDATION: Apply provided service. * **************************************************************** There was an error in IGZXAPI when obtaining stack storage, which subsequently could cause an S0C4 abend. This affects function codes 1, 2 and 4 that provide information about files in the COBOL program.
Problem conclusion
The COBOL runtime library routine IGZXAPI has been fixed to correct the error.
Temporary fix
Comments
APAR Information
APAR number
PI48561
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
790
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2015-09-11
Closed date
2015-09-23
Last modified date
2015-10-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGZXLPKA
Fix information
Fixed component name
LE ENT COBOL LI
Fixed component ID
568819812
Applicable component levels
R7A0 PSY UI31472
UP15/09/30 P F509
R780 PSY UI31473
UP15/09/30 P F509
R790 PSY UI31474
UP15/09/30 P F509
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSCVR7X","label":"Runtime"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
14 December 2020