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

Reply via email to