IBM Support

PH22132: COPY REPLACING GENERATES INCORRECT LOC WCODE

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • A COPY book is brought into a COBOL program via COPY REPLACING
    statement, which replaces multiple lines of the COPY book with
    blanks.  The COBOL wcode calculates lines based on original
    length of COPY book, not modified length.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL 6.2 compiling and  *
    *                 debugging programs under the                 *
    *                 following conditions:                        *
    *                 1) The NONUMBER compiler option is in        *
    *                 effect.                                      *
    *                 2) The programs contain a REPLACE statement  *
    *                 or a COPY statement with the REPLACING       *
    *                 phrase and there is at least one case where  *
    *                 a group of COBOL source lines is replaced    *
    *                 with a smaller group of COBOL source lines.  *
    ****************************************************************
    * PROBLEM DESCRIPTION: The automonitoring of COBOL data items  *
    *                      in IBM Debug Tool does not work         *
    *                      properly for some data items.           *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    ****************************************************************
    The compiler was generating line mapping information for the
    debugger assuming an unbroken range of line numbers in the
    program whenever the NONUMBER compiler option is in effect.
    However, this is not always true when the program contains
    REPLACE statements or COPY statements with the REPLACING
    phrase.
    

Problem conclusion

  • The compiler was updated to ensure that line mapping
    information passed to the debugger does not assume an unbroken
    range of line numbers in the program when the NONUMBER compiler
    option is in effect.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH22132

  • 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

    2020-02-12

  • Closed date

    2020-02-13

  • Last modified date

    2020-03-02

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

    PI82174

  • 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 UI67889

       UP20/02/22 P F002

  • R621 PSY UI67890

       UP20/02/22 P F002

  • R622 PSY UI67891

       UP20/02/22 P F002

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