A fix is available
APAR status
Closed as program error.
Error description
A COPY book is brought into a COBOL program via COPY REPLACING statement, which replaces multiple lines of the COPY book with blanks. The COBOL wcode calculates lines based on original length of COPY book, not modified length.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 6.1 compiling and * * debugging programs under the * * following conditions: * * 1) The NONUMBER compiler option is in * * effect. * * 2) The programs contain a REPLACE statement * * or a COPY statement with the REPLACING * * phrase and there is at least one case where * * a group of COBOL source lines is replaced * * with a smaller group of COBOL source lines. * **************************************************************** * PROBLEM DESCRIPTION: The automonitoring of COBOL data items * * in IBM Debug Tool does not work * * properly for some data items. * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * **************************************************************** The compiler was generating line mapping information for the debugger assuming an unbroken range of line numbers in the program whenever the NONUMBER compiler option is in effect. However, this is not always true when the program contains REPLACE statements or COPY statements with the REPLACING phrase.
Problem conclusion
The compiler was updated to ensure that line mapping information passed to the debugger does not assume an unbroken range of line numbers in the program when the NONUMBER compiler option is in effect.
Temporary fix
Comments
APAR Information
APAR number
PH22130
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
2020-02-12
Closed date
2020-02-13
Last modified date
2020-03-02
APAR is sysrouted FROM one or more of the following:
PI82174
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 UI67886
UP20/02/22 P F002
R611 PSY UI67887
UP20/02/25 P F002
R612 PSY UI67888
UP20/02/25 P F002
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"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"6.1","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
12 December 2023