A fix is available
APAR status
Closed as program error.
Error description
When compiling with OFFSET and OPT(1/2), the offset table is currently built with a single entry for each line number, sorted by offset. But the compiler may generate more than one block of instructions per verb. As a result, the OFFSET output cannot reliably be used to find the verb at a given offset.
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: Users of IBM Enterprise COBOL 6.2 * * compiling with compiler options OFFSET and * * OPT(1|2) * **************************************************************** * PROBLEM DESCRIPTION: The OFFSET output in the listing * * contains a single entry for each COBOL * * verb, but the compiler may generate * * more than one block of instructions * * per verb. The OFFSET output cannot * * reliably be used to find the verb at a * * given offset. * **************************************************************** * RECOMMENDATION: Apply the provided PTF/ * **************************************************************** With OPT(1|2), the compiler may generate more than one block of instructions for a COBOL verb. This can happen if that verb is in a PERFORMed paragraph that is inlined more than once, or if the compiler chooses to interleave instructions from multiple statements. The compiler's behaviour is correct and leads to better performance, but before this change the OFFSET output was unreliable, as the offset of every instruction for a verb other than instructions in the first block will be nearest in the OFFSET output to the entry for some other verb.
Problem conclusion
The compiler was changed to put an entry into the OFFSET output every time an instruction is generated for a different COBOL verb pair than the previous instruction.
Temporary fix
Comments
APAR Information
APAR number
PH36690
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
2021-04-26
Closed date
2021-04-29
Last modified date
2021-06-01
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 IGYCOPT 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 UI75163
UP21/05/04 P F105
R621 PSY UI75164
UP21/05/04 P F105
R622 PSY UI75165
UP21/05/04 P F105
R62H PSY UI75166
UP21/05/04 P F105
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:
12 December 2023