PH22130: COPY REPLACING GENERATES INCORRECT LOC WCODE

Obtain the fix for this APAR.

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.1 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 is sysrouted FROM one or more of the following:

  PI82174

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

Modules/Macros

• IGY8RWTU IGYCCBE  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

• R610 PSY UI67886

     UP20/02/22 P F002

• R611 PSY UI67887

     UP20/02/25 P F002

• R612 PSY UI67888

     UP20/02/25 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.