PI04750: RBD COBOL Generation leads to ABEND0C4

Rational Business Developer 9.0.1
Rational Business Developer Fix Pack 2 (8.5.1.2) for 8.5.1
Rational Business Developer Fix Pack 1 (9.0.1.1) for 9.0.1
Rational Business Developer Fix Pack 1 (9.1.1.1) for 9.1.1
Rational Business Developer Fix Pack 2 (9.0.1.2) for 9.0.1

APAR status

• Closed as program error.

Error description

• Local scope heap variables are not released on a return
  statement potentially causing an abend in heap memory garbage
  collection
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  It was possible for a return statement to be complex enough
  that the heap release was skipped when exiting the function.
  This would leave the registration of heap pointer variables
  active. If those variable were redefined in a different
  statement in the same function on a subsequent invocation,
  then the heap pointer variable would no longer point at
  correct values and could cause an abend in garbage
  collection.
  

Problem conclusion

• The software was updated to detect when a return statement
  also created heap pointer variables or was part of a local
  scope. In those events, the function is forced to issue a
  heap release on return, causing the proper deregistration of
  all of the function temporary variables.
  

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

• R850 PSN

     UP