Delete all the members in a PDS except few

bhagyac · New User Joined: 17 Apr 2008 Posts: 44 Location: bangalore

Hi all,

I want to delete all the members in a PDS except the partical member(4 members) using a job(JCL).

Can any one give some idea please?

Thank you.

expat · Posted: Tue Dec 28, 2010 7:07 pm

With the amount of information that you have given, NO

Try to think about what we need to know to help you before posting and save everyones time.

superk · Posted: Tue Dec 28, 2010 7:07 pm

Sure. Create the list of all members (TSO LISTDS), exclude those you want to keep and then build a series of DELETE statemements from the result (SORT). Then run the deletes (TSO DELETE).

expat · Posted: Tue Dec 28, 2010 7:10 pm

Or do it in one single REXX step

Kjeld · Posted: Wed Dec 29, 2010 8:01 pm

An alternative is to allocate a new PDS with the same DCB properties, copy the 4 members to be retained into that dataset, and discard or rename the old dataset.

If you delete a lot of members repetitively, you will soon run out of either directory space and/or data space, as deleted members will not physically be deleted, unless you compress the dataset afterwards.

Bill Dennis · Posted: Thu Dec 30, 2010 12:17 am

dick scherrer · Posted: Thu Dec 30, 2010 2:47 am

Hello,

If only a few were to be "saved", i'd use the new pds approach rather than deleting the majority.

Seems to me that this would be far less effort as well as there would be no space consideration (assuming the new pds is allocated at the same size as the original)

Kjeld · Posted: Thu Dec 30, 2010 2:17 pm