PH17290: BUILD ERROR IN DYNAMIC LENGTH RUN-TIME SUPPORT LEADS TO LOOP OR ABEND

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Due to a build error, call stubs for support modules for some
  DYNAMIC LENGTH data item features were included in the run-time
  library instead of the actual modules. This leads to a very
  tight loop if these modules are called.
  
  The modules involved are IGZXDEA, IGZXDED and IGZXDER. You can
  use the compiler LIST output to see if your DYNAMIC LENGTH item
  containing program calls these modules.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:  Users of Enterprise COBOL V6.3 and later    *
  *                 releases running programs which use          *
  *                 dynamic-length elementary items.             *
  *                 (Dynamic-length elementary items are those   *
  *                 defined with the DYNAMIC LENGTH clause.)     *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: The COBOL program ABENDs or enters into *
  *                      a tight loop in CSECTs IGZXDEA,IGZXDED  *
  *                      or IGZXDER.                             *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  The COBOL Runtime modules for handling dynamic-length elementary
  items,IGZXDEA, IGZXDED, and IGZXDER, were built incorrectly,
  causing errors for COBOL programs using dynamic-length
  elementary data items.
  

Problem conclusion

• The COBOL Runtime modules have been rebuilt to correct the
  errors.
  

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:

  UI65943

Modules/Macros

• IGZCER4  IGZCEV4  IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI  IGZXCDA
  IGZXD24  IGZXDMR  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

• R7A0 PSY UI66040

     UP19/10/30 P F910

• R7B0 PSY UI65941

     UP19/10/30 P F910

• R7C0 PSY UI65943

     UP19/10/30 P F910

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.