A fix is available
APAR status
Closed as program error.
Error description
USERS AFFECTED: Users of Enterprise COBOL Vx.x compiling programs at OPT(1|2) and INITCHECK containing tables that have VALUE clauses PROBLEM DESCRIPTION: Compiler abend with message MSGIGYCB7104-U Internal error while compiling function 'XXXXX'. Failed assertion on../../trwcode/optimizer/analyses/COB O LUseBeforeSet.cpp:545. Compilation terminated. RECOMMENDATION TO CUSTOMER: Apply the provided PTF PROBLEM SUMMARY: The compiler was attempting to see if a group item was initialized due to all its component items being initialized, but it was not considering tables that were initialized through a VALUE clause, causing the compiler's internal state to become inaccurate. CONCLUSION: The compiler was fixed to consider tables initialized through a value clause and have a correct internal state.
Local fix
Compile at OPT(0) or with NOINITCHECK
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V6.1 compiling * * programs at OPT(1|2) and INITCHECK * * containing tables that have VALUE clauses. * **************************************************************** * PROBLEM DESCRIPTION: Compiler abend with message * * MSGIGYCB7104-U Internal error while * * compiling function 'XXXXX'. Failed * * assertion * * on../../trwcode/optimizer/analyses/COB * * OLUseBeforeSet.cpp:545. Compilation * * terminated. * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * **************************************************************** The compiler was attempting to see if a group item was initialized due to all its component items being initialized, but it was not considering tables that were initialized through a VALUE clause, causing the compiler's internal state to become inaccurate.
Problem conclusion
The compiler was fixed to consider tables initialized through a value clause and have a correct internal state.
Temporary fix
Comments
APAR Information
APAR number
PH08335
Reported component name
ENT COBOL FOR Z
Reported component ID
5655EC600
Reported release
610
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2019-02-08
Closed date
2019-02-20
Last modified date
2022-06-10
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGY8RWTU IGYCCBE IGYCCICS IGYCCSRV IGYCDGEN IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3 IGYCEN$4 IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN IGYCFREE IGYCINIT IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5 IGYCJA$8 IGYCJA$D IGYCJA$R IGYCLIBH IGYCLIBO IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOSCN IGYCPGEN IGYCRCTL IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT IGYCSCAN IGYCSIMD IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5 IGYCUE$8 IGYCUE$D IGYCUE$R IGYCXREF IGYDRV IGYEQCWI IGYMSGE IGYMSGK IGYMSGT IGYQCBE IGYZQDRV IGYZQENU IGYZQJPN
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655EC600
Applicable component levels
R610 PSY UI61391
UP19/02/23 P F902
R611 PSY UI61392
UP19/02/26 P F902
R612 PSY UI61393
UP19/02/26 P F902
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":"6.1","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
12 December 2023