PM16647: ELAX abend received running programs with sysLib check digit functions when the first parameter is a NUM field

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Rational COBOL Runtime for zSeries V6.0.1:
  
  An ELAX abend is received running programs with sysLib check
  digit functions when the first parameter is a NUM field.
  
  The following sysLib functions are effected by this:
  
  - calculateChkDigitMod10 (text, checkLength, result)
  - calculateChkDigitMod11 (text, checkLength, result)
  - verifyChkDigitMod10 (input, checkLength, result)
  - verifyChkDigitMod11 (input, checkLength, result)
  
  The following is an example of the error messages that are
  displayed or written to the ELAD queue:
  
  ELA00093I An error occurred in program ADD1AXA, function MAIN
  ELA09974P Unhandled exception occurred.  EGL line: 001361
  ELA09973I Condition code: 9980
  ELA09966P No such library function with specified signature
            exception
  ELA00001I An error occurred in program ADD1AXA on statement
            number 1361. - Caused by -An error occurred in
  ELA00001I program ELASYS, function ******************* An error
            occurred in program ELASYS on statement number
  ELA00001I 1097 Condition code: 09980 ERROR CODE=00000000 Runtime
            exception
  

Local fix

• A tempfix is available from support.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: USERS OF RATIONAL COBOL RUNTIME FOR ZSERIES  *
  ****************************************************************
  * PROBLEM DESCRIPTION: ELAX ABEND RECEIVED RUNNING PROGRAMS    *
  *                      WITH SYSLIB CHECK DIGIT FUNCTIONS WHEN  *
  *                      THE FIRST PARAMETER IS A NUM FIELD      *
  ****************************************************************
  * RECOMMENDATION: APPLY THIS MAINTENANCE                       *
  ****************************************************************
  ELAX ABEND RECEIVED RUNNING PROGRAMS WITH SYSLIB CHECK DIGIT
  FUNCTIONS WHEN THE FIRST PARAMETER IS A NUM FIELD.
  

Problem conclusion

• ELAX ABEND RECEIVED RUNNING PROGRAMS WITH SYSLIB CHECK DIGIT
  FUNCTIONS WHEN THE FIRST PARAMETER IS A NUM FIELD
  

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:

  PM16649 PM16824

Modules/Macros

• ELASYS
  

Fix information

• Fixed component name

  RATL COBOL RT Z

• Fixed component ID

  5655R2900

Applicable component levels

• R601 PSY UK60551

     UP10/10/07 P F010

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.