PM97725: DFS1058E AND ABENDU0845 RC30: RPLI ALREADY ACTIVE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• U0845 RC30 is issued when DFSDVSM0 is entered to process a GU
  call because the RPL is still active (RPLACTIV=FF).
  The U0845 RC30 error seems to be a VSAM flavor of the OSAM
  buffer hang following a termination of a stored procedures
  thread in the same region. The OSAM hang was fixed by OSAM
  APAR PM64610.
  Initial analysis of the VSAM case indicates the following:
  - An ODBA thread GU call was processing using a VSAM HDAM DB
  - The ODBA thread was cancelled while in this VSAM call
  - RPLACTIV=FF (RPL ACTIVE), PSTBHVSU (VSAM ACCESSED) left ON
  - PSTLRHLD (VSAM LRECL OWNED) was not ON because VSAM buffer
    not yet obtained. PSTBHACT(VSAM ACTIVE) was also ON
  Flags RPLACTIV, PSTBHVSU and PSTBHACT are set for the ODBA
  thread while processing the GU call. DFSFXC50 is called for
  dependent region termination and checks for flag PSTBHVSU in
  routine RELPSBPC. Since PSTBHVSU was ON, routine VBHRRELS in
  DFSDVBH0 was called to release any held VSAM buffer. However,
  PSTLRHLD was not ON because the GU call processing had not
  yet progressed to the point of acquiring a VSAM buffer.
  With PSTLRHLD OFF, logic in routine VBHR2000 wrote a DL/I
  trace record for the buffer release call (PSTFNCTN=DD) and
  returned to caller, leaving RPLACTIV=FF (RPL STILL ACTIVE).
  .
  The ODBA thread was restarted in the same region to process
  another GU call, using the same RPL addressed by PSTRPLI.
  RPLACTIV was still set to x'FF' (RPL ACTIVE) from the
  previously terminated ODBA thread GU call.  When DFSDVSM0
  was entered to process this GU call, RPLACTIV was found to
  contain a x'FF' value and ABENDU0845 RC30 was issued.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: IMS V12 users with VSAM databases may be     *
  *                 affected.                                    *
  ****************************************************************
  * PROBLEM DESCRIPTION: User received AbendU0845 and message    *
  *                      DFS1058E - REASON = 30 - RPLI ACTIVE ON *
  *                      ENTRY to DFSDVSM0.                      *
  *                      This occurred after an ODBA thread      *
  *                      was terminated and then restarted.      *
  ****************************************************************
  * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF      *
  ****************************************************************
  AbendU0845 reason code 30 is issued by IMS module DFSDVSM0 when
  the RPLACTIV flag contains xFF at the beginning of a VSAM
  request.  This is an error condition because xFF indicates
  VSAM RPL (Request Parameter List) is currently being used for
  another VSAM request.
  
  When an ODBA thread or a dependent region abnormally terminates
  in the middle of DL/I processing, module DFSFXC50 does some
  cleanup including zero'ing out the RPLDACB field.  But it does
  not terminate the VSAM request that was in progress.
  When DL/I processing resumes, RPLACTIV is still on (i.e. xFF),
  and causes abendU0845 and MSGDFS1058E reason code 30 to be
  issued.
  

Problem conclusion

• GEN:
  KEYWORDS:
  
  *** END IMS KEYWORDS ***
  Module DFSFXC50 has been changed to resolve the problem.
  An ENDREQ macro has been added to the cleanup logic to terminate
  a VSAM request if RPLACTIV is xFF and RPLDACB is non-zero.
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

  PM82384

• APAR is sysrouted TO one or more of the following:

  UI14738

Modules/Macros

• DFSFXC50
  

Fix information

• Fixed component name

  IMS V12

• Fixed component ID

  5635A0300

Applicable component levels

• R200 PSY UI14738

     UP14/02/05 P F402

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.