And a potential solution is just as old. Allocate a zero space "dummy" dataset. 
Pdsname.ENQUEUE. Add a DISP=OLD DD against this to the jobs. This only works it 
the updating job/step is fairly fast, but it will prevent simultaneous 
accesses. 

> -----Original Message-----
> From: IBM Mainframe Discussion List <[email protected]> On
> Behalf Of Don Poitras
> Sent: Tuesday, October 08, 2019 10:55 AM
> To: [email protected]
> Subject: Re: PDS Member updating via COBOL Program
> 
> In article <[email protected]>
> you wrote:
> > On Tue, 8 Oct 2019 16:28:30 +0000, Jesse 1 Robinson wrote:
> > >This is a classic problem endemic to traditional PDS since the dawn of
> MVS. IBM's solution to this problem is PDSE. If you convert the data set to
> Library (PDSE) you may reduce problem occurrence to negligible. OTOH PDSE
> may introduce its own set of problems, chief of which is the inability to 
> share
> the data set across sysplex boundaries. If that restriction is unacceptable, 
> you
> might try adding in your RYO enqueue program as you suggest. Be aware,
> however, that DISP=SHR is unlikely to provide much if any protection against
> concurrent update.
> > >
> > I have used ISPF LM services for this purpose.  But that requires a
> > TSO environment.  Otherwise, you may simulate the ISPF technique, as in:
> >
> > https://urldefense.proofpoint.com/v2/url?u=https-
> 3A__www.ibm.com_suppo
> > rt_knowledgecenter_en_SSLTBW-
> 5F2.4.0_com.ibm.zos.v2r4.f54pc00_isppcmmn
> > amen.htm&d=DwIBAg&c=C3yme8gMkxg_ihJNXS06ZyWk4EJm8LdrrvxQb-
> Je7sw&r=u9g8
> > rUevBoyCPAdo5sWE9w&m=-
> UJtuL7ygnoO_jSZKwoqXZkKxYZabHfW2DHliI3IKU8&s=St_
> > eOtwpm5WRFX6EOtYceBdAAOXHTO-FbL_MpcX4_mQ&e=
> > Whatever you do, all players must follow the same rules.  Any
> > nonconformists must be re-coded.
> > I have tested using LMPUT to write multiple members concurrently.
> > It works, but only within a single job because ISPF LMPUT reqiuires
> > ENQ EXC on the DSN.
> > -- gil
> 
> If you do the ENQ as shown in the link above, be sure to also issue the
> RESERVE which is documented just before this. (ISPF Data set integrity
> enqueue).
> 
> --
> Don Poitras - SAS Development  -  SAS Institute Inc. - SAS Campus Drive
> [email protected]           (919) 531-5637                Cary, NC 27513
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to
> [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to