Hi Lennie,
I'm interested....Please it as well....

Thanks,

Tom

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
David Spiegel
Sent: Thursday, October 1, 2020 3:26 PM
To: [email protected]
Subject: EXTERNAL: Re: SVC 99 unallocating a concatenated dataset

Hi Lennie,
I am interested. Please send it.

Thanks and regards,
David

On 2020-10-01 14:46, Lennie Dymoke-Bradshaw 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]>
>> https://eur02.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.
>> dissensoftware.com%2F&amp;data=02%7C01%7Cthomas.savor%40fisglobal.com
>> %7C2be776a89a074b19153308d8663ff064%7Ce3ff91d834c84b15a0b418910a6ac57
>> 5%7C0%7C1%7C637371772099783416&amp;sdata=%2BhW4%2FI8Wgm6vUy%2Blzujep3
>> gz5fY67iWVbSqjkJuLYNA%3D&amp;reserved=0
>>
>> 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
The information contained in this message is proprietary and/or confidential. 
If you are not the intended recipient, please: (i) delete the message and all 
copies; (ii) do not disclose, distribute or use the message in any manner; and 
(iii) notify the sender immediately. In addition, please be aware that any 
message addressed to our domain is subject to archiving and review by persons 
other than the intended recipient. Thank you.

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

Reply via email to