Deleting series of datasets if migrated

Agni

All,

I have a requirement to delete the datasets in production. There are around 600 datasets to be deleted. Also before deleting we need to check whether it is migrated or not. We have to delete those datasets if they are migrated. Otherwise should not delete. I found a post in REXX to delete the series of datasets. Please find the link for the same below

http://ibmmainframes.com/viewtopic.php?t=9969&highlight=deleting+datasets

I checked that in test region by giving series of datasets as below and it worked fine.

XXX.YYYY1.ZZZ1
XXX.YYYY2.ZZZ2
XXX.YYYY3.ZZZ3
XXX.YYYY4.ZZZ4
XXX.YYYY5.ZZZ5

Now i need to add a check that the above datasets should be deleted only if they are migrated.

Agni

cpuhawg

See this link:

http://ibmmainframes.com/viewtopic.php?t=29228

There are instructions for putting all the datasets to be deleted into a file, running a REXX, and receiving information about whether the datasets are migrated or not.

Agni

Thanks cpuhawg. I think i misinterpreted my requirement. Let me repharase it. I want to delete the series of datasets if they are migrated. If the dataset is not migrated it should not be deleted. I don't need any other details of the dataset.

Thanks
Agni

cpuhawg

I understand your requirement. What the REXX program will do will analyze all 600 datasets. If it is not migrated, it will give you dataset information. If it is migrated, it will state the dataset is migrated. Once the REXX has run, you can view the SYSTSPRT file:

On the example below, you will see HLQ.PRIVILEG.JCLX dataset is not migrated and the HLQ.AUDIT.GROUP.DATASET dataset is migrated:

Aaru

Agni,

expat · Posted: Thu Apr 10, 2008 11:58 am Post subject:

Well, if you issue a HDELETE command for every dataset. the ones that are not migrated will not be HDELETE'd and will remain on DASD

Aaru

Expat,

Agni

Hi cpuhawg,

Should i need to copy all the 600 datasets and paste it in the flat file? If it is only 600 datasets i can manage some how and paste it in the flat file, in case if the number of file is more, how can we do this? Please advise.

Thanks
Agni.

cpuhawg

The 80 byte file input to the REXX can contain all 600 full dataset names including any GDG versions (don't use (0)). The number of datasets does not matter. It can be any number of datasets.

The REXX will go through each dataset and provide either dataset attributes (if not migrated) or state that it is migrated. The SYSTSPRT output DD statement will contain the messages about each dataset.

You can even remove the following lines from the REXX (if you don't really need any dataset information) which should cut down on your output.

Agni

Hi cpuhawg,

I got what you told in the previous post bu tmy question was like how can i copy and paste if number of dataset is more say for example 2000. Is there any way like using wild characters like as follows?

XXX.YYYY*.ZZZ*

Thanks
Agni

cpuhawg

The REXX setup cannot accept wild cards. I would suggest going to option 3.4 and put in your wild carded dataset. Verify it pulls up the datasets you would like to check. Now back out one screen (back to 3.4). Put a P (for print dataset set list), press enter, and you should see Data Set List Printed in the upper right corner of the screen.

Now enter LIST next to OPTION ===> and press enter. You should see:

Agni

Hi cpuhawg,

Agni

Hi cpuhawg

If you give any solution, i will work on that on Tuesday. Three days holiday for me:) Am in office still. I am leaving now. Thanks very much
for all your help.

Cheers
Agni

Aaru

Agni,

Aaru

Agni,

Check the below code. This code accepts the wildcard and then deletes all the migrated datasets.