A fix is available
APAR status
Closed as program error.
Error description
When a program is compiled with NUMCHECK, and has data items defined in the Local Storage Section, an incorrect address may be calculated, leading to a possible s0c4 exception.
Local fix
Compile with NONUMCHECK
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 6.4 compiling * * programs with NUMCHECK and have senders * * defined in LOCAL-STORAGE. * **************************************************************** * PROBLEM DESCRIPTION: Program abends at runtime with S0C4 or * * issues message MSGIGZ0279W The value * * X'XXXXXXXX' of data item XXXXXXXX at * * the time of reference by * * statement number X on line X in * * program XXXXXX failed the NUMERIC * * class test or contained a value larger * * than the PICTURE clause as detected by * * the NUMCHECK compiler option. * **************************************************************** * RECOMMENDATION: Apply the provided PTF * **************************************************************** The compiler is incorrectly calculating the memory address of LOCAL-STORAGE data items when generating instructions for runtime NUMCHECK tests.
Problem conclusion
The compiler was fixed to calculate the memory address of LOCAL-STORAGE data items when generating instructions for runtime NUMCHECK tests.
Temporary fix
Comments
APAR Information
APAR number
PH59594
Reported component name
ENT COBOL FOR Z
Reported component ID
5655EC600
Reported release
640
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2024-02-02
Closed date
2024-02-13
Last modified date
2024-03-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGY8RWRD IGY8RWTU IGYCASMB IGYCCBE IGYCCCRT 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 IGYCJBLD IGYCJGEN 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 IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655EC600
Applicable component levels
R640 PSY UI95661
UP24/02/27 P F402
R641 PSY UI95662
UP24/02/27 P F402
R642 PSY UI95663
UP24/02/27 P F402
R64H PSY UI95664
UP24/02/27 P F402
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":"BU048","label":"IBM Software"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"640","Line of Business":{"code":"LOB70","label":"Z TPS"}}]
Document Information
Modified date:
04 April 2024