IBM MAINFRAME HELP & SUPPORT FORUMS
Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
 

Delete a member in Multiple PDSs

THIS IS AN ARCHIVE FORUM: CLICK HERE TO GO TO THE ORIGINAL TOPIC

 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> SMS & VSAM
View previous topic :: View next topic  
Author Message
sekhar redy



Joined: 22 Aug 2008
Posts: 9
Location: Bangalore

Posted: Tue Aug 26, 2008 10:51 am    Post subject: Delete a member in Multiple PDSs  

Hi ,

I have a member present in 100 PDSs all with the same high level qualifier X.Y.Z.*. I want to delete the member from all the 100PDSs , by using some JCL utilities. Can any one please suggest me some solutions?
Back to top  
dick scherrer



Joined: 23 Nov 2006
Posts: 8733
Location: 221 B Baker St

Posted: Tue Aug 26, 2008 11:03 am    Post subject:  

Hello,

Create one idcams delete statement and clone it 100 times.
Back to top  
sekhar redy



Joined: 22 Aug 2008
Posts: 9
Location: Bangalore

Posted: Tue Aug 26, 2008 11:15 am    Post subject: Reply to: Delete a member in Multiple PDSs  

hi dick,

thnks for the response. But i dont want to clone it 100 times, and give the name of the 100PDS names manually. my datasets are like x.y.z.n1(abc),
x.y.x.n2(abc), x.y.z.n3(abc) etc..so if i clone it 100 times, i need to specify n1, n2, n3 manually.. is there is any other way to solve this?
Back to top  
dick scherrer



Joined: 23 Nov 2006
Posts: 8733
Location: 221 B Baker St

Posted: Tue Aug 26, 2008 11:29 am    Post subject:  

Hello,

You probably realize that you have spent more time trying to get around building the statements than it would have taken to build them.

Quote: and give the name of the 100PDS names manually. I believe this is not completely accurate. If all of your dsn's are in sequence you can do this very quickly editing. Create the first one and repeat it 8 times - these become n1 thr n9. Repeat these and add a n0 at the beginning of the second set. Insert a 1 after n and before the digit (0-9). Copy these 10 and change 1x to 2x. And so on.

For giggles, i did it in well under 2 minutes. . . It took longer to type those "directions" than to create the series :wink:
Back to top  
 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> SMS & VSAM
Page 1 of 1
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM