PH46184: The base locator numbering in a CEEDUMP is inconsistent with the numbering in the compile listing

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The compile listing numbers base locators starting with 1 in the
  MAP option output and the "Data Division Map" report, but the
  CEEDUMP numbers them starting at zero.
  

Local fix

• None, other than keeping the difference in mind when using the
  CEEDUMP.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 5 and later        *
  *                 releases running programs which produce a    *
  *                 CEEDUMP with base locator (BL) cells listed  *
  *                 in the CEEDUMP.                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: The number ordering for base locator    *
  *                      (BL) cells in a generated CEEDUMP does  *
  *                      not start at the same index as listed   *
  *                      in the compiler listings.               *
  ****************************************************************
  * RECOMMENDATION: Install the provided PTF.                    *
  ****************************************************************
  Depending on the type of base locator (BL) cell, the number
  ordering in the CEEDUMP for some BL cells start at 0 while the
  numbering for the same BL cell starts at 1 in the compiler
  listing or vice-versa.
  
  COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K
  COB0604T/K
  

Problem conclusion

• The COBOL Runtime logic has been fixed to follow the same
  number ordering for base locator (BL) cells as listed in the
  compiler listings.
  

Temporary fix

Comments

APAR Information

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

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

Modules/Macros

• IGZCEV4  IGZCJNI2 IGZLLIBV IGZXAPI  IGZXCA31 IGZXCDA  IGZXD24
  IGZXDMR  IGZXJNI2 IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD
  IGZXLPKE IGZXLPKF IGZXLPKG IGZXPK2
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7B0 PSY UI81613

     UP22/07/29 P F207

• R7C0 PSY UI81614

     UP22/07/29 P F207

• R7D0 PSY UI81615

     UP22/07/29 P F207

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.