|
|
| Author |
Message |
raveendra_ibm
Currently Banned
New User
Joined: 07 Jan 2006
Posts: 45
|
|
|
|
Hi All,
Is there a way out to delete multiple PDS or PS using a single command. Something similar to this :
I want to delete following PDSs' (along with the members in it)
MYPDS.TEST.COB
MYPDS.TEST.JCL
MYPDS.TEST.TST
MYPDS.TEST.LOAD
MYPDS.TEST.OBJ
using MYPDS.TEST.* with a single command, instead of deleting each one of them individually.
Please help.
Thanks and Regards,
Raveendra. |
|
| Back to top |
|
 |
References
|
|
 |
superk
Moderator Team Head
Joined: 26 Apr 2004
Posts: 3314
Location: Charlotte,NC USA
|
|
|
|
| Code: |
//STEP0010 EXEC PGM=ADRDSSU,REGION=0M,PARM='TYPRUN=NORUN'
//SYSPRINT DD SYSOUT=*
//DELETE DD DUMMY
//SYSIN DD *
DUMP DATASET(INCLUDE(MYPDS.TEST.*)) -
OUTDD(DELETE) DELETE
//*
|
With the PARM='TYPRUN=NORUN' specified, nothing will actually be deleted, so you can review what will actually be processed. When you are sure it will do what you need, remove the PARM statement and run it again. |
|
| Back to top |
|
|
raveendra_ibm
Currently Banned
New User
Joined: 07 Jan 2006
Posts: 45
|
|
|
|
Hi Superk !!!
Thanks for your reply. I'll try it out.
Regards,
Raveendra. |
|
| Back to top |
|
|
superk
Moderator Team Head
Joined: 26 Apr 2004
Posts: 3314
Location: Charlotte,NC USA
|
|
|
|
| Just a warning - you have to have the proper authorization to use that utility. |
|
| Back to top |
|
|
martin9
Active User
Joined: 01 Mar 2006
Posts: 278
Location: Basel, Switzerland
|
|
|
|
hy raveendra_ibm,
just use IDCAMS
give in dd-SYSIN
DELETE MYPDS.TEST.* SCRATCH
all the files with these first two qualifiers will be deleted.
but note: you can do this on full qualifiers only!
you cannot use the wildcard like MYPDS.TES* ...
for ADRDSSU you really need high rights...
IDCAMS is always available.
martin9 |
|
| Back to top |
|
|
|
|
