PM76182: CMPL MSGIGYRC5108-U USING FUNCTION LENGTH DUE TO ABENDS0C4 PHASE IGYCPGEN MODULE IGYPXLDD.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• This APAR is to correct the problem documented in FIN APAR
  PK95916. This APAR will also address a problem USING FUNCTION
  LENGTH that results in IGYRC5108-U with last phase being
  IGYPMOVE.
  

Local fix

• Use LENGTH OF instead of FUNCTION LENGTH as a bypass.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V4 with programs   *
  *                 that have one or both of the following:      *
  *                 1. Arithmetic expressions involving a        *
  *                 numeric DISPLAY operand (zoned decimal) with *
  *                 multiply and FUNCTION LENGTH() following the *
  *                 multiplication operator.                     *
  *                 2. Intrinsic function used in reference      *
  *                 modification of operands of INITIALIZE,      *
  *                 XML PARSE and SEARCH verbs.                  *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: 1. Compiler abort or incorrect output.  *
  *                      IF the compiler aborts, the message is  *
  *                      IGYRC5108-U with a S0C7 or S0C4.        *
  *                      2. Run-time abend ABEND=S0C7 or         *
  *                      compiler abort IGYRC5108-U              *
  *                      IF the compiler aborts, the message is  *
  *                      IGYRC5108-U with a S0C1.                *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  1. The COBOL compiler tried to calculate the value of the
  expression at compile time because it incorrectly determined
  that both operands were constants.
  2. The Compiler was not properly saving information about
  intrinsic function and reference-modification in the statement,
  so the runtime tried to use nonexistent function information or
  the compiler backend aborted with missing information.
  

Problem conclusion

• 1. The COBOL compiler is changed to correctly check that both
  operands of a multiply operation are constants when the data
  types are external decimal.
  2. The compiler is changed to properly save information about
  both the intrinsic function and the reference-modification for
  INITIALIZE, XML PARSE and SEARCH statements.
  

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:

  UK90274 UK90275

Modules/Macros

•    IGYPTIII IGYPTISL IGYQPR14
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655S7100

Applicable component levels

• R400 PSY UK90274

     UP12/12/14 P F212

• R420 PSY UK90275

     UP12/12/14 P F212

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.