| 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...
|
| 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 |
|
| |
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM
|