How To List Uncatalog Datasets from an entire LPAR

GarciaRontani · New User Joined: 04 Dec 2007 Posts: 12 Location: Argentina

Hi Everyone,

The reason for this note is to discuss the possibilities of getting a list of uncatalog datasets using only IBM default products and utilities.

I'm in the need of creating a monthly report of datasets not catalogued on the system. For both SMS and Non-SMS volumes.

As everyone knows SMS will not let you have uncatalog datasets on SMS volumes but sometimes if someone deletes a dataset wrong (using UNCATLG, or the GDG base is coded wrong(using SCRATCH attribute) you end up having datasets you don't want on SMS volumes.

So I've been doing my research, I've been studying the possibilities .. I know some vendors products like TSF or FileAid have certain utilities that can help you get the desired results but what I want is a solution I can implement without having to buy a new license.

What I do have right is something quite rudimentary...essentialy a REXX code along with a DCOLLECT.

The REXX code uses the DCOLLECT as an input and for each dataset entry it executes a LISTCAT for that specific dsn.. If LISTCAT ends in error it means the dataset is not catalog so I keep that result on an output dataset.

It works but I don't like it. For a small set of data it's not a problem. But If you want to investigate your whole shop you end up having a process that takes several hours to complete.

I've also thought of using ADRDSSU Dump utility with a dummy output, on Test mode with the DELETE BY CATLG EQ NO but I think the result does not show where does the spotted dataset resides.

So I was wondering. Do you know if I can obtain this report using a different perspective?

NAVIQUEST along with an additional REXX?
RMM Report Utility?

Thanks everyone for taking your time reading this note!

dick scherrer · Posted: Wed Jun 13, 2012 3:21 am

Hello,

How many lpars?

Is all of the dasd shared?

vasanthz · Posted: Wed Jun 13, 2012 4:36 pm

Will this work?

1. Use IDCAMS + LISTCAT UCAT ALL to get the list of all user catalogs.
2. Use IDCAMS + LISTCAT NAME CAT("All user catalogs got from step1") to get the list of all cataloged datasets.
3. Compare datasets list got from step 1 and 2 with DCOLLECT datasets list using some program(maybe with SORT + JOINKEYS) to determine uncataloged datasets.
4. delete the uncataloged datasets.

Open to correction.

GarciaRontani · New User Joined: 04 Dec 2007 Posts: 12 Location: Argentina

Hi nope.. the DASD is not shared.

--

I will give a try to that suggestion

enrico-sorichetti · Posted: Wed Jun 13, 2012 6:39 pm

I tend to believe that a dcollect an a dfsort will provide what You asl for ...

google with "DCOLLECT RECORD LASYOUT" and in the manual
You will find a flag that tells if the dataset is cataloged into an ICF

allocate a few dataset datasets on a <yours to use> volume play around with them ( idcams delete noscratch )
run a dcollect and look at the outcome

should not take more than a couple of hours to check

muck longer for a real run depending on the number of dasd devices to be checked

IIRC You can try also from the ISMF ( intractive sms dialogs )

vasanthz · Posted: Wed Jun 13, 2012 6:51 pm

Hi Enrico,
I think you are saying about
DCDINICF - DATA SET IS CATALOGED IN INTEGRATED
CATALOG FACILITY CATALOG

But looks like its applicable for only VSAMs :S

www-304.ibm.com/support/docview.wss?uid=isg3S1000660
says,
DCDINICF - This data set is cataloged in an integrated catalog facility catalog. This indicator is valid only for VSAM data sets.

Regards,

GarciaRontani · New User Joined: 04 Dec 2007 Posts: 12 Location: Argentina

Found the layout and got the flag for the ICF catalogs.. I think that will be the faster way.. I will let them know once I have some results.

Thanks everyone for your help!

GarciaRontani · New User Joined: 04 Dec 2007 Posts: 12 Location: Argentina

hmmm yes you are right.. it's only applicable for VSAM

enrico-sorichetti · Posted: Wed Jun 13, 2012 7:00 pm

vasanthz is right ,

I was looking only at the macro expansion layout not at the more accurate field descriptions

and I had even expressed the same concern here
ibmmainframes.com/about36113.html

together with the dfdss snippet to use

vasanthz · Posted: Wed Jun 13, 2012 7:02 pm

Yup its blank, just verified it.

Pete Wilson · Posted: Thu Jun 14, 2012 1:59 am

What do you intend to do with the files once they're identified? If you're going to delete them then DFDSS (ADRDSSU) DUMP DELETE BY(CATLG,EQ,NO) with a dump to a backup file to keep for a while in case you need something back.

If you already have an FDR licence then FDREPORT will do it easily. Same probably for DMS.

An IDCAMS DIAGNOSE VVDS will do it but you'll probably end up with alot of other stuff in the reports as well. You also have to code volsers.

IEHLIST :¬( - have to code volsers.

GarciaRontani · New User Joined: 04 Dec 2007 Posts: 12 Location: Argentina

Hi Guys.. I will use DFDSS with a dump to a dummy to identify them.. It's just a report. Then the customer decides if they would like my team to take action.

Thanks everyone!!

enrico-sorichetti · Posted: Thu Jun 14, 2012 9:02 pm

Pete Wilson · Posted: Fri Jun 15, 2012 1:14 am

I think you have to do a Physical Dump with DFDSS to get the uncataloged files. That means you have to specify all the volsers in your INDYNAM statement.....

GarciaRontani · New User Joined: 04 Dec 2007 Posts: 12 Location: Argentina

I've just realized I never said thanks. So thanks everyone. I end up using the PARM='TYPRUN=NORUN' and with the help of a little bit of REXX I managed to get a pretty decent report.

Again, thank you all!

dick scherrer · Posted: Tue Jul 23, 2013 9:54 pm

Thanks for letting us know