A fix is available
APAR status
Closed as program error.
Error description
Enterprise COBOL 6.x compiling programs at ARCH(13+) that contain INSPECT statement with REPLACING phrase with FIRST specified. Incorrect result: the program replaces all copies of the search string found in the inspected item.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 6.3 compiling * * programs at ARCH(13+) that contain INSPECT * * statement with REPLACING phrase with FIRST * * specified. * **************************************************************** * PROBLEM DESCRIPTION: Incorrect result: the program replaces * * all copies of the search string found * * in the inspected item. * **************************************************************** * RECOMMENDATION: Apply the provided PTF * **************************************************************** The compiler didn't generate code to stop replacing strings when a match was found when FIRST was specified
Problem conclusion
The compiler is fixed to generate code that stops replacing strings once a match was found when FIRST was specified.
Temporary fix
Comments
APAR Information
APAR number
PH62352
Reported component name
ENT COBOL FOR Z
Reported component ID
5655EC600
Reported release
630
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2024-07-18
Closed date
2024-07-18
Last modified date
2024-08-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI97684 UI97685 UI97686
Modules/Macros
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 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
R630 PSY UI97684
UP24/07/30 P F407
R631 PSY UI97685
UP24/07/30 P F407
R632 PSY UI97686
UP24/07/30 P F407
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":"630","Line of Business":{"code":"LOB70","label":"Z TPS"}}]
Document Information
Modified date:
01 August 2024