Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

To delete 40 thousands flatfiles at a time

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
shannu

New User


Joined: 01 Jun 2005
Posts: 17
Location: bangalore

PostPosted: Wed Jun 01, 2005 11:02 am    Post subject: To delete 40 thousands flatfiles at a time
Reply with quote

Hi,

Is there any particular procedure or program or approach to delete 40 thousands flatfiles at a time

thanks,
shannu.
Back to top
View user's profile Send private message

MGIndaco

Active User


Joined: 10 Mar 2005
Posts: 432
Location: Milan, Italy

PostPosted: Wed Jun 01, 2005 1:51 pm    Post subject:
Reply with quote

I think that are at least three methods to do what you need!
First is a selection of storage group where files are stored; second is a common root in the name of your flat files; third is a manual selection throught distinctive feature (as creation date, referenced date, traks and so on).
When you will have a list of files then you can delete them with idcams utility or other.

I think that if you ask to your storage admin he can be easy answer with practical sample
Back to top
View user's profile Send private message
KP

New User


Joined: 27 May 2005
Posts: 1
Location: Warszawa

PostPosted: Wed Jun 01, 2005 7:01 pm    Post subject: Re: To delete 40 thousands flatfiles at a time
Reply with quote

You can use ADRDSSU - many options to filter datasets ( by name,type, recfm, creation date etc).
Use DUMP DATASET with option DELETE PURGE, with outfile referenced to DUMMY .

(but remember - it is fast but, doesn't work for HSM migrated datasets )

KP
Back to top
View user's profile Send private message
shannu

New User


Joined: 01 Jun 2005
Posts: 17
Location: bangalore

PostPosted: Thu Jun 02, 2005 9:36 am    Post subject: Re: To delete 40 thousands flatfiles at a time
Reply with quote

Hi,

Can anybody provide a sample on my query.

Thanks,
shannu.
Back to top
View user's profile Send private message
subhash gowda
Warnings : 1

New User


Joined: 02 Jun 2005
Posts: 12

PostPosted: Thu Jun 02, 2005 4:02 pm    Post subject: Re: To delete 40 thousands flatfiles at a time
Reply with quote

run a dummy progarm(i,e jcl utility),in that give first two qualifier and *,it will deletes all the files that belong to that two qualifier
Back to top
View user's profile Send private message
Rupesh.Kothari

Member of the Month


Joined: 27 Apr 2005
Posts: 464

PostPosted: Tue Jun 07, 2005 5:37 pm    Post subject: Re: To delete 40 thousands flatfiles at a time
Reply with quote

Hi
please find the sample JCL

//DeletDD JOB Rupesh,KOthari,MSGCLASS=X,CLASS=B,REGION=4M
//***************************************************
//STP01 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEL Dataset.to.br.deleted1
DEL Dataset.to.br.deleted2
/*
//
Back to top
View user's profile Send private message
balakrishna reddy

Active User


Joined: 13 Jul 2007
Posts: 130
Location: Guntur

PostPosted: Wed Aug 08, 2007 10:37 am    Post subject: Re: To delete 40 thousands flatfiles at a time
Reply with quote

hi rupesh,

as you gave an example jcl to delete files using idcams.

i have one query about the deletion,if one of the file which i have given in the jcl to delete does not exist then what will happen to the job.

if it abends then how to identify which dataset has caused that abend.
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Wed Aug 08, 2007 10:44 am    Post subject:
Reply with quote

balakrishna reddy,

Quote:
i have one query about the deletion,if one of the file which i have given in the jcl to delete does not exist then what will happen to the job.

Why dont you try it instead of waiting for reply.

Quote:
if it abends then how to identify which dataset has caused that abend.

Go through the sysprint message. You will come to know.
Back to top
View user's profile Send private message
agkshirsagar

Active Member


Joined: 27 Feb 2007
Posts: 685
Location: Earth

PostPosted: Wed Aug 08, 2007 10:45 am    Post subject:
Reply with quote

The thread you have opened has been inactive for more than 2 years. Still hope for the best!, maybe someone else will answer your query.
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1288
Location: Chennai, India

PostPosted: Wed Aug 08, 2007 10:48 am    Post subject: Re: To delete 40 thousands flatfiles at a time
Reply with quote

If there is a common root in the naming convention of your 40,000 flat files then u can code a REXX exec to delete all the files in one shot using the ISPEXEC LISTID followed by the TSO DEL command.

This will reduce u r manual effort in listing all the datasets to be deleted in a JCL.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts CICS transaction slow response time vasanthz All Other Mainframe Topics 1 Thu Jan 19, 2017 1:31 am
No new posts DD DUMMY & CPU TIME Nileshkul Testing & Performance analysis 16 Mon Dec 19, 2016 11:35 pm
No new posts JCL to delete component in a package sundaram.naveen Compuware & Other Tools 14 Tue Nov 29, 2016 6:21 pm
This topic is locked: you cannot edit posts or make replies. Get a job submitted itself every time... arunsoods JCL & VSAM 3 Tue Nov 22, 2016 4:05 pm
No new posts Check System time(Minute) Using TIME1... balaji81_k DFSORT/ICETOOL 5 Fri Nov 11, 2016 10:53 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us