Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Deleting series of datasets if migrated
Goto page Previous  1, 2
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SMS & VSAM
Author Message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 271
Location: Jacksonville, FL

PostPosted: Sat Apr 12, 2008 6:24 am    Post subject: Reply to: Deleting series of datasets if migrated
Reply with quote

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.
Back to top
View user's profile Send private message
References
PostPosted: Sat Apr 12, 2008 6:24 am    Post subject: Re: Reply to: Deleting series of datasets if migrated Reply with quote

Srinivasa Rao

Active User


Joined: 21 Jun 2005
Posts: 77

PostPosted: Mon Apr 14, 2008 4:02 pm    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 3207
Location: Brussels once more ...

PostPosted: Mon Apr 14, 2008 4:27 pm    Post subject:
Reply with quote

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

/* REXX */
"EXECIO * DISKR LISTIN ( STEM LST. FINIS"
DO A = 1 TO LST.0
   HDELETE "'"STRIP(LST.A)"'"
END
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1063
Location: Chennai - India

PostPosted: Mon Apr 14, 2008 8:12 pm    Post subject: Reply to: Deleting series of datasets if migrated
Reply with quote

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.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 3207
Location: Brussels once more ...

PostPosted: Tue Apr 15, 2008 9:23 am    Post subject:
Reply with quote

Yes, I saw, but wild cards can be dangerous - he says from bitter experience.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SMS & VSAM All times are GMT + 6 HoursGoto page Previous  1, 2
Page 2 of 2