Would this be on cbttape.org If not would you mind sharing
Thanks > On Oct 1, 2020, at 2:46 PM, Lennie Dymoke-Bradshaw > <[email protected]> wrote: > > Long ago (actually 1989 I think) I wrote a CONCAT TSO command which can be > used to add or remove data sets from a concatenated list. It can also perform > a FREE. This loops round each entry in the concatenated set and frees each > data set. > > It still works a treat. > > I still have the code should anyone want it. > > Lennie Dymoke-Bradshaw > Consultant working on contract for BMC mainframe Services by RSM Partners > ‘Dance like no one is watching. Encrypt like everyone is.’ > > > -----Original Message----- > From: IBM Mainframe Discussion List <[email protected]> On Behalf Of > Joseph Reichman > Sent: 01 October 2020 18:25 > To: [email protected] > Subject: Re: SVC 99 unallocating a concatenated dataset > > I’m running the program under test > After I do decocatenate verb 04 > With the ddname text 01 > I get a rc 0 from SVC 99 > I then go to ISPF > Do a ISRDDN > > And I have a number of files actually 100 Each with a ddname > SYS00007,SYS00008 etc. This indicates to me that although they are > decocatenated they are still allocated > > Thanks > > > >> On Oct 1, 2020, at 12:35 PM, Binyamin Dissen <[email protected]> >> wrote: >> >> On Thu, 1 Oct 2020 07:58:56 -0400 Joseph Reichman >> <[email protected]> >> wrote: >> >> :>I allocate a number of datasets the last text unit being DALCLOSE >> :>(unallocated on close) In my second step I concatenate the datasets. At >> :>EOF I close them after wards I deconcatenate them My question is >> :>shouldn't the individual datasets be unallocated as well >> >> What happens when you, thru JCL, concat several datasets with FREE=CLOSE? >> >> -- >> Binyamin Dissen <[email protected]> >> http://www.dissensoftware.com >> >> Director, Dissen Software, Bar & Grill - Israel >> >> >> Should you use the mailblocks package and expect a response from me, >> you should preauthorize the dissensoftware.com domain. >> >> I very rarely bother responding to challenge/response systems, >> especially those from irresponsible companies. >> >> ---------------------------------------------------------------------- >> 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 > > ---------------------------------------------------------------------- > 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
