IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

want to delete uncatlog files.


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sachin_kaushik84

New User


Joined: 03 Oct 2008
Posts: 23
Location: noida

PostPosted: Thu Nov 20, 2008 5:54 pm
Reply with quote

Hi all,
There is a requirement for which i need the suggetions..
My requirement is there are 4000 files in a dataset which are in catalog and some are in uncatalog status,here my requirement is i want to delete the uncatalog files only from that particular dataset..
can any one help me out in this.....
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Thu Nov 20, 2008 6:00 pm
Reply with quote

What are you using to determine if a dataset is cataloged or not? LISTCAT? LISTDS?
Back to top
View user's profile Send private message
sachin_kaushik84

New User


Joined: 03 Oct 2008
Posts: 23
Location: noida

PostPosted: Thu Nov 20, 2008 6:15 pm
Reply with quote

i am using the LISTCAT to determine which files are catalog and which are uncatalog....
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Nov 20, 2008 6:42 pm
Reply with quote

Do you have the VOLSER for the datasets as you will need that to deal with the uncatalog'd datasets
Back to top
View user's profile Send private message
sachin_kaushik84

New User


Joined: 03 Oct 2008
Posts: 23
Location: noida

PostPosted: Thu Nov 20, 2008 7:24 pm
Reply with quote

oops!
that's the issue i m also facing i don't have the vol-ser number but i think i don't required it as i have to permanently delete the datasets..

The case where i need vol-serial is that when i first catalog that than after to delete those datasets.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Nov 20, 2008 7:41 pm
Reply with quote

You need to know the volser of the ubcatalog'd files, else you can not delete them !
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Thu Nov 20, 2008 8:16 pm
Reply with quote

looks like the quality of storage support is going down the sink nowadays icon_biggrin.gif

anyway here is a snippet that will help to find uncataloged

//*
Code:
//*                                                   
//*  LIST DATA SETS NOT CATALOGED ON A VOLUME         
//*                                                   
//NOCAT   EXEC  PGM=ADRDSSU,PARM='TYPRUN=NORUN'       
//SYSPRINT DD SYSOUT=*                               
//OUTPUT   DD DUMMY                                   
//SYSIN       DD *                                   
        DUMP DS (BY ((CATLG EQ NO))) -               
             INDYNAM(           -
                     (111111) , -     
                     (222222) , -                     
                     (333333) , -                     
                     (......) , -                     
                     (......) , -                     
                     (......) , -                               
                     (nnnnnn)   -
                    )  ODD(OUTPUT)           
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Nov 20, 2008 8:57 pm
Reply with quote

Enrico,

You must be in a good mood today, using the PARM='TYPRUN=NORUN' and not specifying DELETE PURGE in the control statements icon_lol.gif icon_lol.gif icon_lol.gif
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


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

PostPosted: Fri Nov 21, 2008 2:42 am
Reply with quote

Hi,

Are you not yet using SMS-managed volumes and forcing all non-system DASD datasets to be SMS-managed? If not, you should be.

Pre-SMS we used to worry about this kind of thing and run daily/weekly cleanup of uncataloged datasets, but the problem completely disappeared long back when we converted all application DASD datasets to SMS and enforced this restriction via naming conventions, ACS routines, and RACF.

SMS datasets are forced to be cataloged, even if the end-user out of ignorance doesn't specify it properly in his JCL, and if some rare system failure were to allow one to be uncataloged, running periodic DIAGNOSEs against catalogs and VVDSs will catch that as an inconsistency.

I haven't seen an uncataloged DASD dataset for years, except for ones Technical Support deliberately creates as part of system cloning on non-SMS volumes. Uncataloged datasets introduce a myriad of problems in dataset management, tracking, and cleanup, not to mention that 99.9% of the time when an end-user or application programmer creates one, they can't find it, just think it was deleted somehow, and try to create another copy somewhere else. Uncataloged DASD datasets should be disallowed by installation standards and enforcement mechanisms like SMS & RACF should be in place to prevent accidental creation in the first place.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Fri Nov 21, 2008 3:27 am
Reply with quote

Hello,

Quote:
looks like the quality of storage support is going down the sink nowadays
and many other disciplines as well. . .

Quote:
I haven't seen an uncataloged DASD dataset for years
Long time on that system which went to sms a while back. . .icon_wink.gif

Unfortunately, many (most?) do not have that same experience. There is an incredible amount of non-sms managed dasd still being used today.

I know one place that still uses manual tape/cart management. There are no tapes mounted as scratch - specific volsers are coded in all of the jcl at run-time. . . Nightmare. . .
Back to top
View user's profile Send private message
vini m

New User


Joined: 27 Nov 2008
Posts: 16
Location: singapore

PostPosted: Thu Nov 27, 2008 4:05 pm
Reply with quote

I am trying to get the uncataloged datasets using Dcollect . I require the size and last ref date of the uncataloged datasets.

As per idcams reference book Dcollect DCDFLAG2 will give the details of the dataset catalog status.

70(X'46') BITSTRING 1 DCDFLAG2
INFORMATION FLAG #2
1... .... DCDNOVVR NO VVR FOR THIS DATA SET
.1.. .... DCDINTCG DATA SET IS AN INTEGRATED CATALOG FACILITY CATALOG
..1. .... DCDINICF DATA SET IS CATALOGED IN INTEGRATED CATALOG FACILITY CATALOG


I ran the job and got different bit values...

00101010 , 00001111 , 00101010 ....

As per the doc if 3rd bit from left is "0" then that datset is uncataloged... But i see some datasets are having "0" as 3rd bit but they are cataloged..

Could some one explain what actually happening here ? and how to get the uncataloged datasets ?

Thanks in advance.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Thu Nov 27, 2008 4:21 pm
Reply with quote

it is happening that ....

Quote:
DCDINICF
This data set is cataloged in an integrated catalog facility catalog.
This indicator is valid only for VSAM data sets.
Back to top
View user's profile Send private message
vini m

New User


Joined: 27 Nov 2008
Posts: 16
Location: singapore

PostPosted: Thu Nov 27, 2008 4:33 pm
Reply with quote

Thank you for the quick reply ...

Then how to get the details for non vsam datasets ? Is there any bit which tells about this ?
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Thu Nov 27, 2008 4:42 pm
Reply with quote

NO... You can use a dfdss job like the one I showed,
or run a DCOLLECT and ...
for VSAM datasets use the DCDFLAG2 info
for NON VSAM interrogate the catalog to see if the catalof definition matches the volume

and produce the appropriate delete...

dfdss is faster because for non vsam the process is automated
Back to top
View user's profile Send private message
vini m

New User


Joined: 27 Nov 2008
Posts: 16
Location: singapore

PostPosted: Thu Nov 27, 2008 5:06 pm
Reply with quote

You are correct dfdss is faster. As of now I am using the dfdss ... But my requirement is to get all the uncataloged datsets from all the volumes in a lpar. this is for clean up activity..

How can i do this separation ? There are thousands of volumes and datasets ..


How many volumes we can put in INDYNAM parameter? is there any limit ?
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Thu Nov 27, 2008 5:11 pm
Reply with quote

regardless of the volume number I still would do it in batches...
and always in two steps
first step a NORUN to do some checking
to see if some orphan should be adopted
and second the true cleanup

so running it on all the volumes in one step seems a bit dangerous to me
and there could also be enqueue issues
Back to top
View user's profile Send private message
vini m

New User


Joined: 27 Nov 2008
Posts: 16
Location: singapore

PostPosted: Thu Nov 27, 2008 5:24 pm
Reply with quote

Actually the way i am following is ... Put all the volumes in one dataset.. Pass it to rexx so that it will build the jobs seperately for all the volumes in a PDS.. I used same output data for all the jobs in shr mode and all the jobnames are same.... So that only one job will run at a time due to dupilcate names and update the output dataset with details ... I have a rexx code to submit all the jobs in a PDS.

But the only problem here is after submittion it will hit back to you saying that " Job has been submitted" .. YOu need to keep on press enter until all the jobs got submitted... I am facing only problem with this as there are more than 20 thousand volumes we have in a lpar.
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia

PostPosted: Fri Nov 28, 2008 5:44 am
Reply with quote

Hi,

when you build the JCL, you can add another step to submit the next job.


This way, you only need to submit the first job.


Gerry
Back to top
View user's profile Send private message
vini m

New User


Joined: 27 Nov 2008
Posts: 16
Location: singapore

PostPosted: Fri Nov 28, 2008 12:15 pm
Reply with quote

i can just submit one job -- to build the jcl's and to submit the built jcl's ...

But the problem here is it hit's me back saying that job has been submitted , i have thousands of jobs so my screen fully occupied with this " job submitted messages" ... i need to keep on press the enter to clear my screen... icon_sad.gif
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Fri Nov 28, 2008 1:46 pm
Reply with quote

use outtrap before issuing the submit command
Back to top
View user's profile Send private message
vini m

New User


Joined: 27 Nov 2008
Posts: 16
Location: singapore

PostPosted: Fri Nov 28, 2008 2:58 pm
Reply with quote

Excellent.... Its working for me....

Thank you all for giving me the valuble suggestions...

I am good to work on my requirement now... icon_biggrin.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts DELETE SPUFI DB2 1
No new posts DSNTIAUL driven delete IBM Tools 0
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts Merge two VSAM KSDS files into third ... JCL & VSAM 6
Search our Forums:

Back to Top