PI86399: UNKNOWN RESULTS CAN OCCUR WHEN ADDING A NEW RECORD OBJECT TO A DYNAMIC ARRAY THAT ALSO CALLS AN EXTERNAL PROGRAM

Rational Business Developer Fix Pack 2 (9.1.1.2) for 9.1.1
Rational Business Developer Fix Pack 2 (9.5.1.1) for 9.5

APAR status

• Closed as program error.

Error description

• Unknown results can occur when adding a new record object to a
  dynamic array that also calls an external program
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  * For cobolGen users, unusual results can occur, even an       *
  * abend, if trying to use a "new" on a record that has a set   *
  * values block that calls a library function.                  *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  * If a "new" is done against a record and a set values         *
  * expression is present that calls a library function, then it *
  * is possible that problems can occur. This will only happen   *
  * if the library callout also causes a garbage collection to   *
  * occur. The problem is that the address of the new temporary  *
  * record is saved across the library call, but the address was *
  * never registered to the heap memory manager. When a garbage  *
  * collection occurs, it updates known pointers to the new      *
  * location of the moved memory. In this case however, the      *
  * address used was not from a pointer, but from an old linkage *
  * section reference. This caused the reference to be invalid   *
  * and hence the problem.                                       *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  

Problem conclusion

• The software was updated to restored the linkage section
  reference from a heap managed variable, which causes the
  reference to be valid.
  

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

• R901 PSY

     UP

• R911 PSY

     UP

• R950 PSY

     UP