Deleting series of datasets if migrated

Agni · New User Joined: 22 Nov 2007 Posts: 83 Location: Chennai

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

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 · Posted: Wed Apr 09, 2008 5:54 pm

See this link:

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 · New User Joined: 22 Nov 2007 Posts: 83 Location: Chennai

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 · Posted: Wed Apr 09, 2008 7:05 pm

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 · Posted: Wed Apr 09, 2008 8:30 pm

Agni,

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

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 · Posted: Thu Apr 10, 2008 2:37 pm

Expat,

Agni · New User Joined: 22 Nov 2007 Posts: 83 Location: Chennai

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 · Posted: Sat Apr 12, 2008 1:12 am

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 · New User Joined: 22 Nov 2007 Posts: 83 Location: Chennai

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 · Posted: Sat Apr 12, 2008 2:25 am

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 · New User Joined: 22 Nov 2007 Posts: 83 Location: Chennai

Hi cpuhawg,

Agni · New User Joined: 22 Nov 2007 Posts: 83 Location: Chennai

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 · Posted: Sat Apr 12, 2008 5:42 am

Agni,

Aaru · Posted: Sat Apr 12, 2008 5:51 am

Agni,

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

cpuhawg · Posted: Sat Apr 12, 2008 6:24 am

If you printed the datasets in your 3.4 display with your "P" command, you should be able to just type LIST on the command line to get the display for
3. Keep existing data set and continue with new data set

You can then go to 3.4 to edit the USERID.SPF?.LIST dataset.

Srinivasa Rao · New User Joined: 21 Jun 2005 Posts: 75

Hi,

A simple way as I feel it can be done through ISPF instead of rexx

1) Go to ISPF 3.4
2) Specify the Higher qualifier which lists all the datasets related to the higher qualifer.
3) sort with volume
4) issue SAVE MYDSN which saves all datasets to your personal one workfile
5) exclude and delete all master catalog and non migerated datasets using exclude and delete ispf commands
6) Move the datasets and specify HDELETE before all dataset using override ISPF command.
7) Run the dataset using batch job.
8) You will find all migerated datasets are deleted.

I feel this as simple way instead of writing REXX and doing it.

If any one is confused please let me know.

expat · Posted: Mon Apr 14, 2008 4:27 pm

A simple REXX to delete all the migrated datasets from a list and leave the non migrated / tape datasets untouched.

Aaru · Posted: Mon Apr 14, 2008 8:12 pm

expat,

In the code you had posted, If am not wrong the user has to have a LIST dataset which would have the list of all the dataset that needs to be HDeleted.

In my earlier post on this topic i have posted a code whcih accepts wildcards and removes the hassle of creating the LIST dataset if the no is huge.

I have not tested that and hope it works. Please correct me if am wrong.

expat · Posted: Tue Apr 15, 2008 9:23 am

Yes, I saw, but wild cards can be dangerous - he says from bitter experience.