II06620: PERMANENT RESTRICTION USING LSR FROM A CLIST VSAMINFO : LOCAL SHARED RESOURCE (LSR) PROCESSING

APAR status

• Closed as canceled.

Error description

• A TSO user executes a CLIST which calls a program that issues a
  BLDVRP Macro to build an LSR bufferpool. The CLIST then calls
  another program which also issues a BLDVRP for the same
  sharepool.  VSAM returns a return code 4 ( RC4 ) saying the
  sharepool already exists. The program then issues a DLVRP for
  that sharepool. This results in an ABEND0C4 PIC11 in IDA0192Y
  trying to access the WSHD.
  -------------------------------------------------------------
  .
  TSO is designed so that a TCB is built for each CALL.  When
  the subtack completes, all non-shared subpools are freed.  If
  another subtask susequently attempts to access storage, as in
  the above user's example, a storage exception will occur.
  .
  The VSRT, which describes the LSR pool, is built in protected
  storage by BLDVRP processing.  Other LSR pool control blocks
  are built in non-shared / non-protected storage. Therefore
  when the subtask TCB completes all VSAM control blocks except
  the VSRT are freed. Any subsequent BLDVRP on that sharepool
  will result in a RC4 because VSAM, having found the VSRT,
  believes the LSR pool exists.
  .
  Likewise when a DLVRP is issued, VSAM uses the VSRT to access
  control blocks for the sharepool.  Because these control blocks
  resided in subpools that have been freed by the previously
  completed subtask, VSAM abends trying to access them.
  .
  Another variation of this problem occurs if, after getting
  a RC4 from the BLDVRP, the program tries to open a dataset to
  use the LSR pool.  Again, VSAM will use the VSRT to access
  the LSR control blocks and abend because they have been freed
  (ABEND0C4 in IDA0192Z when accessing the BSPH).  This problem
  will show up when trying to use BLSR ( Batch LSR ) with a CLIST
  that executes multiple programs that use the BLSR dataset.
  
  ABEND0C4 S0C4 ida0192a ida0192z r110 r1b0 bsph multi multiple
  clist batch
  .
  .
  

Local fix

• .
  To avoid this problem a DLVRP must be issued for the sharepool
  after the datasets are closed and before the end of the CLIST.
  By doing this, VSAM will be the one that frees the VSAM control
  blocks and will correctly remove the VSRT from the table.
  

Problem summary

Problem conclusion

Temporary fix

Comments

• INFO APAR CAN FOR RETENTION / PIN
  

APAR Information

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

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

Fix information

Applicable component levels