A fix is available
APAR status
Closed as program error.
Error description
INSPECT CONVERTING statement, result is not correct with COBOL v6.4/v6.2 but correct with v6.3 ADDITIONAL SYMPTOMS: Instead of converting single characters from literal1 to the corresponding characters in literal2, the compiled program searched for literal1 and replaced the entire string with identifier2.
Local fix
BYPASS/CIRCUMVENTION: None RECOVERY ACTION: Apply PTF
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 6.2 compiling * * programs with INPSECT A CONVERTING B TO C * * where B is either a literal or is * * determined to be a constant value by the * * optimizer, C is a data item that is not * * determined to be a constant value by the * * optimizer, and the lengths of B and C are * * greater than 1 if the program is compiled * * at ARCH(10) or greater than 8 if the * * program is compiled at ARCH(11+). * **************************************************************** * PROBLEM DESCRIPTION: Instead of converting single * * characters in A that are found in B to * * the corresponding characters in C, the * * compiled program searched for * * occurrences of the entire contents of * * B in A and replaced them with C. * **************************************************************** * RECOMMENDATION: Apply the provided PTF * **************************************************************** The compiler incorrectly determined it was safe to generate instructions for the INSPECT CONVERTING statement, rather than call the COBOL Runtime to do the work.
Problem conclusion
The compiler was fixed to correctly determine it is unsafe to generate instructions for this particular INSPECT CONVERTING statement, and it now correctly calls the COBOL Runtime instead.
Temporary fix
Comments
APAR Information
APAR number
PH56952
Reported component name
ENT COBOL FOR Z
Reported component ID
5655EC600
Reported release
620
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2023-09-14
Closed date
2023-09-15
Last modified date
2023-11-17
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
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 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
R620 PSY UI93578
UP23/09/23 P F309
R621 PSY UI93579
UP23/09/23 P F309
R622 PSY UI93580
UP23/09/23 P F309
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":"620","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
17 November 2023