PH71341: COMPILER ABENDS WHEN USING "LENGTH OF" SPECIAL REGISTER WITH FIXED CHARACTER POSITION UTF-8 DATA ITEMS

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When "LENGTH OF" special register is used with fixed character
  position UTF-8 data items with not other reference to them,
  compiler abends with error code IGYPG5125-U and IGYPG5201-U
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.4 compiling a    *
  *                 COBOL program that contains usage of the     *
  *                 LENGTH OF special register with a fixed      *
  *                 character length UTF-8 data item.            *
  ****************************************************************
  * PROBLEM DESCRIPTION: Compiler aborts with messages:          *
  *                                                              *
  *                      1. IGYPG5125-U The compilation was      *
  *                      terminated due to a compiler error in   *
  *                      phase id: "IGYCPGEN".                   *
  *                                                              *
  *                      2. IGYPG5201-U Internal compiler error  *
  *                      code "TALIA-E7" occurred.               *
  ****************************************************************
  * RECOMMENDATION: Apply the IBM-provided PTF.                  *
  ****************************************************************
  The compiler failed to recognize the reference to a fixed
  character length UTF-8 data item when used with LENGTH OF
  special register which cause the compiler to abort with internal
  compiler error.
  

Problem conclusion

• The compiler was updated to ensure that LENGTH OF special
  register can be used correctly with fixed character length UTF-8
  data items.
  

Temporary fix

Comments

APAR Information

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

  PH70799

• 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 IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1
  IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOB2  IGYCOB2E IGYCOPI
  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  IGYMSGXT IGYQCBE  IGYQSPLT IGYZQEN6
  IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R650 PSY UO07832

     UP26/05/22 P F605

• R651 PSY UO07833

     UP26/05/22 P F605

• R652 PSY UO07834

     UP26/05/22 P F605

• R65H PSY UO07835

     UP26/05/22 P F605

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.