PI45804: D260 ABEND IN DL/I ENVIRONMENT WITH SEGMENTED CONVERSE CALLING PSB PROGRAM

Rational Business Developer 9.5.0.1
Rational Business Developer Fix Pack 1 (9.1.1.1) for 9.1.1
Rational Business Developer 9.5.1
Rational Business Developer Fix Pack 2 (9.0.1.2) for 9.0.1

APAR status

• Closed as program error.

Error description

• A D260 abend can occur in a DL/I environment, under CICS, if a
  segmented converse occurs that calls a called program that
  schedules the PSB. When the called program returns to the
  segmented program, the segmented program fails to set up the
  addressing for the DL/I work areas as it believes they were
  already set. This leads to an invalid parameter list being
  passed to the EGL runtime.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  * Users that use CICS and DL/1 with EGL that have segmented    *
  * converse programs.                                           *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  * I believe what was happening, was that after the segmented   *
  * converse came back, a callout to a called program was done   *
  * before the main program's psb got scheduled. This called     *
  * program must have done a psb schedule on its own. This set a *
  * EGL runtime flag with the pointer to the psb. However, once  *
  * back in the segmented converse program, the logic checked to *
  * see if the pointer was set or not and assumed that the       *
  * linkage section items were being addressed if it was set.    *
  * But since the pointer was not set by the main program, the   *
  * linkage section items never got mapped and this caused a set *
  * of bad addresses to be passes to DL/1.                       *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  

Problem conclusion

• A fixtest has been created that will do the linkage section
  addressing every time.
  

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