Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
ADRSSU vs Rexx Tool to delete N number of datasets

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
santosh.ambaprasad

New User


Joined: 08 Mar 2009
Posts: 16
Location: London

PostPosted: Wed Feb 17, 2010 4:39 am    Post subject: ADRSSU vs Rexx Tool to delete N number of datasets
Reply with quote

As I saw in Rexx Tool Needed to delete N number of dataset Why don't you use ADRSSU?
Code:

//STEP01  EXEC PGM=ADRDSSU,REGION=4096K
//SYSPRINT DD SYSOUT=*
//DUMPD DD DSN=TEST.DUMP1,
// UNIT=DISK,DISP=(NEW,DELETE,DELETE),
// SPACE=(TRK,(10,10),RLSE)
//SYSIN DD *
DUMP DS(INCLUDE( -
abc122b.xyzt.* -
) -
OUTDD(DUMPD)
//*
Back to top
View user's profile Send private message

gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Wed Feb 17, 2010 4:50 am    Post subject:
Reply with quote

Hi,

I hope you haven't spent almost 4 years to come up with something that does NOT even address the issue.


Gerry
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Feb 17, 2010 7:48 am    Post subject:
Reply with quote

Hello,

When posting a suggestion/solution, the code posted should be test run to confirm that it does what was requested.

It is also best to reply to currently active topics that have not already been answered.
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Wed Feb 17, 2010 10:58 am    Post subject:
Reply with quote

Why to waste effort to write REXX?
Why not just use IEFBR14 step
Code:

//STEP0010 EXEC PGM=IEFBR14                               
//DD01   DD DSN=abc122b.xyzt.a765,DISP=(MOD,DELETE,DELETE)
//DD02   DD DSN=abc122b.xyzt.b765,DISP=(MOD,DELETE,DELETE)
//DD03   DD DSN=abc122b.xyzt.c765,DISP=(MOD,DELETE,DELETE)
//DD04   DD DSN=abc122b.xyzt.a785,DISP=(MOD,DELETE,DELETE)
//DD05   DD DSN=abc122b.xyzt.b785,DISP=(MOD,DELETE,DELETE)
//DD06   DD DSN=abc122b.xyzt.c785,DISP=(MOD,DELETE,DELETE)
//DD07   DD DSN=abc122b.xyzt.a795,DISP=(MOD,DELETE,DELETE)
//DD08   DD DSN=abc122b.xyzt.b795,DISP=(MOD,DELETE,DELETE)
//DD09   DD DSN=abc122b.xyzt.c795,DISP=(MOD,DELETE,DELETE)
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Wed Feb 17, 2010 12:42 pm    Post subject:
Reply with quote

Sambhaji wrote:
Why to waste effort to write REXX?
Why not just use IEFBR14 step

Because using REXX you can just have something like below to cover a vast number of datasets in a few, or less, control statements rather than one DD for every dataset.
Code:
//DELETES  DD *
ABC123.DEF.**
//EXCLUDES DD *
ABC123.DEF.H*

I did post a REXX code for this some many moons ago, and is probably still out lurking in the dark corridors of the forum. And unlike DFdss (ADRDSSU) will handle both tape and migrated datasets.

In fact, it can handle ONLY tape, or migrated, or DASD datasets, or any conbination thereof.

Also, using IEFBR14 for migrated datasets - why recall them before deleting them, why waste the time and resource. Almost the same with tapes, why mount them just to uncatalog them ?
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Feb 17, 2010 1:29 pm    Post subject:
Reply with quote

It's a recursive thread, link in first post links to this thread itself... icon_biggrin.gif
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Wed Feb 17, 2010 7:49 pm    Post subject:
Reply with quote

Anuj Dhawan wrote:
It's a recursive thread, link in first post links to this thread itself... icon_biggrin.gif
Sorry 'bout that, my bad, all fixed...... icon_redface.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
This topic is locked: you cannot edit posts or make replies. Rexx to execute spool commands upendrasri CLIST & REXX 5 Wed Oct 04, 2017 6:54 am
This topic is locked: you cannot edit posts or make replies. Rexx to execute spool commands upendrasri CLIST & REXX 47 Fri Sep 29, 2017 1:08 pm
No new posts Mainframe scheduling tool ddhar Compuware & Other Tools 2 Wed Sep 27, 2017 12:48 am
No new posts File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us