PL28404: ABEND80A FOR CSA STORAGE WHEN PROGRAM IN AN INVALID PLAN CALLED FROM ANOTHER PROGRAM

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• USER RAN OUT OF CSA STORAGE WHEN A PROGRAM IN ONE PLAN CALLS
  ANOTHER PROGRAM IN AN INVALID PLAN. THE TABLES FOR THE INVALID
  PLAN WERE DROPPED AND CREATED AGAIN, THE USER FORGETTING TO
  REDEFINE A SYNONYM FOR THEM. THE BIND DID NOT WORK, BUT USER
  DID NOT CHECK. WHEN THE GOOD PLAN IS RUN AND CALLS THE PROGRAM
  IN THE INVALID PLAN, CSA (SP241 KEY 7) FILLS WITH RLPL WITH
  THE PLAN NAME IN THE EYECATCHER. WHEN THE SYNONYM WAS CREATED
  ALL WORKED WELL. THE USER DID NOT CATCH THE BIND FAILURE AND
  DID NOT CHECK FOR THE SQLCODE923. RC00E20022 WAS RECEIVED AFTER
  THE FACT AND USER WOULD HAVE RECEIVED RC00E30302 AND PROBABLY
  MSGDSN8047E, BUT DID NOT SEE IT. THIS WAS RUN THROUGH AN IMS
  TRANSACTION AND NO INDICATIONS THROUGH IMS WERE NOTED. THE KEY
  IS THE APPLICATION NEGLECTED TO CHECK THE SQLCODE AND DRIVING
  THE SQL STATEMENTS TO FORCE A AUTO-REBIND. THIS SCENARIO FORCED
  AN IPL OF THE MACHINE.
  

Local fix

• ENSURE THE APPLICATION CHECK THE SQLCODE.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: ALL                                          *
  ****************************************************************
  * PROBLEM DESCRIPTION: ABEND80A FOR CSA STORAGE AFTER          *
  *                      MULITIPLE AUTOBIND FAILURES.            *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  USER HAD AN INOPERATIVE PLAN THAT FAILS AUTOMATIC BIND WITH
  RC00E30302. THE APPLICATION PROGRAM DID NOT CHECK FOR
  SQLCODE923 AND REISSUED THE REQUEST. THIS CAUSED RECURSIVE
  AUTOBIND FAILURES. DSNTAAL GETS RLPL STORAGE AND LOCKS THE
  PLAN FOR AGENT ALLOCATION. IF ANY ERROR OCCURS DURING THE
  AUTOBIND PROCESS, THE RLPL STORAGE IS NEVER FREED. THIS CAUSED
  CSA TO FILL WITH RLPLS AND EVENTUALLY ABEND80A. ABEND04E
  RC00E20022 ALSO OCCURS.
  

Problem conclusion

• DSNTAAL IS CHANGED TO FREE THE RLPL STORAGE IF AN ERROR OCCURS
  DURING AUTOBIND.
  

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:

  UL33507 PL29178 PL29590

Modules/Macros

•    DSNTAAL
  

Fix information

• Fixed component name

  5740 IBM DATABA

• Fixed component ID

  5740XYR00

Applicable component levels

• R302 PSY UL33507

     UP88/07/15 P F806

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.