PM41944: Cobol Compiler error if using 18 digit arithmetic

Rational Business Developer Fix Pack 2 (8.0.1.2) for 8.0.1
Rational Business Developer Fix Pack 8 (7.5.1.8) for 7.5.1

APAR status

• Closed as program error.

Error description

• User has a this EGL plrogram:
  ACCNO num(17);
  RAC   char(34);
  ACCNO = RAC;
  
  The generated cobol (using maxNumericDigits=18) in RBD V7 and V8
  fails to compile with the following message:
  
  IGZ0151S Argument-1 for function NUMVAL-C in program EI50600 at
  
  displacement X'042354' contained more than 18
  
  
  This worked correctly in V6.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  The numvalc COBOL runtime routine was not properly handling
  ?16 digits and was producing erroneous results. This was
  only failing when maxNumericDigits was set to 18. When set
  to 31, which is the normal case, the values are correct.
  

Problem conclusion

• The software now calls the EGL runtime instead to convert
  the text, for all assignment cases, when maxnumericdigits
  has been set to 18.
  

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:

Fix information

• Fixed component name

  RATL BUS DEV

• Fixed component ID

  5724S5000

Applicable component levels

• R751 PSN

     UP