A fix is available
APAR status
Closed as program error.
Error description
Normally, a basic program overlay can result in the error message: IGZ0099C Internal error CLLE-GPCB was detected in module IGZCEV19. which then requires the programmer to fix the program code. However, when CEEPIPI ADD_ENTRY is used to add a COBOL program, using an entry point previously obtained by an assembler ASM LOAD, an unexpected IGZ0099C error message may be emitted. This APAR corrects that specific problem.
Local fix
Do not use ASM LOAD to obtain the COBOL program entry point for CEEPIPI ADD_ENTRY. Instead, load the COBOL program using CEEPIPI ADD_ENTRY with a program name.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 5 and later * * releases running programs which use * * ASM LOAD and CEEPIPI interface. * **************************************************************** * PROBLEM DESCRIPTION: The following IGZ0099C message * * may unexpectedly be emitted * * during an application termination. * * * * IGZ0099C Internal error CLLE-GPCB was * * detected in module IGZCEV19. * * * * This problem does not occur when * * the same COBOL programs are compiled * * with COBOL 4.2 or prior releases. * * * * When a dump is taken, the following * * call trace is found: * * * * CEEPIPI E+853C * * CEEZDSEX E+41E * * IGZCEV19 E+5C4 * * IGZXCMSG E+10D0 * * ... * * * * CEEZDSEX originates a call to IGZCEV19 * * which triggers the IGZ0099C at IGZXCMSG * **************************************************************** * RECOMMENDATION: Install the provided PTF. * **************************************************************** The following scenario may result in the IGZ0099C message during an environment termination at 6). 1. A COBOL program is loaded and its entry point(EP) address is obtained by ASM LOAD 2. A new run-time environment is created (CEEPIPI init_sub) 3. A new CEEPIPI entry is added to the PreInit table using the EP obtained by the ASM LOAD (CEEPIPI add_entry) 4. The COBOL program are called (CEEPIPI call_sub) 5. The COBOL entry is deleted (CEEPIPI delete_entry) 6. The run-time environment is terminated (CEEPIPI term) COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K COB0604T/K
Problem conclusion
The COBOL Runtime logic has been fixed. During CEEPIPI delete_entry, COBOL Runtime nulls out addresses pointing to writable static area (WSA) which is to be freed.
Temporary fix
Comments
APAR Information
APAR number
PH57918
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
7E0
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2023-10-31
Closed date
2023-11-15
Last modified date
2023-12-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI94484 UI94486 UI94487
Modules/Macros
IGZCEV4 IGZCJNI2 IGZLLIBV IGZXAPI IGZXCA31 IGZXCDA IGZXD24 IGZXDMR IGZXJNI2 IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD IGZXLPKE IGZXLPKF IGZXLPKG IGZXPK2
Fix information
Fixed component name
LE ENT COBOL LI
Fixed component ID
568819812
Applicable component levels
R7C0 PSY UI94484
UP23/11/22 P F311
R7D0 PSY UI94486
UP23/11/22 P F311
R7E0 PSY UI94487
UP23/11/22 P F311
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":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7E0","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
04 December 2023