A fix is available
APAR status
Closed as program error.
Error description
ERROR DESCRIPTION:Ø CBL V6.2 compound IF stmt I/O incorrect at OPT(2)
Local fix
Compile using option: OPT(0)
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V6.2 compiling * * programs at OPT(1|2) that move an * * alphanumeric or group data item A to * * another data item B, change the value of A, * * and use B in a subsequent statement as a * * sender. * **************************************************************** * PROBLEM DESCRIPTION: The subsequent statement may use an * * incorrect value for B. * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * **************************************************************** When moving from A to B and then using B in a subsequent statement, the optimizer will often be able to use A rather than B, producing the same result without converting B to some other data type. This often gives a performance increase. However, this can only be done when either A is unchanged before B is used as a sender, or if the old value of A is used. If A is changed by an intermediate statement, it is incorrect to use the new value of A in place of B.
Problem conclusion
The compiler was fixed to either use the old value of A or to load B when B was used in a subsequent statement.
Temporary fix
Comments
APAR Information
APAR number
PI99718
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
2018-06-28
Closed date
2018-07-18
Last modified date
2018-10-02
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 IGYCOB2E IGYCOPI 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 IGYWIVP1 IGYWIVP2 IGYZQDRV IGYZQENU IGYZQJPN
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655EC600
Applicable component levels
R620 PSY UI57342
UP18/08/02 P F807
R621 PSY UI58271
UP18/10/02 P F809
R622 PSY UI57344
UP18/07/31 P F807
R62H PSY UI58273
UP18/09/06 P F809
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":"620","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
12 December 2023