A fix is available
APAR status
Closed as program error.
Error description
Problem can occur on the second or third invocation of the transaction. Failing instruction is a Load (5889 6004), due to an incorrect address in gpr6.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Enterprise COBOL V5+ users compiling and * * running subprograms that are loaded and * * called by assembler programs under CICS. * * * **************************************************************** * PROBLEM DESCRIPTION: The called subprogram may terminate * * with a S0C4 ABEND in IGZEINI. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** During LE COBOL Library initialization under CICS, the same control block storage used by previous transactions may be incorrectly reused, resulting in S0C4 ABEND in IGZEINI. This happens when the previous transaction contains an Enterprise COBOL pre-V5 program calling assembler subprogram, which in turn using EXEC CICS LOAD to load and call a COBOL V5+ subprogram. The ABEND is caused by residue data left behind by the previous transaction. COB0501T/K COB0502T/K COB0601T/K COB0602T/K
Problem conclusion
The Enterprise COBOL V5+ runtime was corrected to clear the storage used by COBOL Library control blocks at termination.
Temporary fix
Comments
APAR Information
APAR number
PI95268
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
2018-03-15
Closed date
2018-04-09
Last modified date
2018-05-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PI96398 UI55102 UI55103
Modules/Macros
IGZCEV4 IGZLLIBV IGZXAPI IGZXCDA IGZXDMR IGZXD24 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
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