IBM Support

PH35652: IMPROVE COBOL OFFSET REPORT USABILITY

A fix is available

Subscribe

You can track all active APARs for this component.

 

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.3            *
    *                 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

    PH35652

  • 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

    2021-03-24

  • Closed date

    2021-03-24

  • Last modified date

    2021-04-26

  • APAR is sysrouted FROM one or more of the following:

  • APAR is sysrouted TO one or more of the following:

    PH36690

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 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  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6
    IGYZQJPN
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R630 PSY UI74566

       UP21/03/30 P F103

  • R631 PSY UI74567

       UP21/03/30 P F103

  • R632 PSY UI74568

       UP21/03/30 P F103

  • R63H PSY UI74569

       UP21/03/30 P F103

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":"630","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023