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
 

 

How To List Uncatalog Datasets from an entire LPAR

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

New User


Joined: 04 Dec 2007
Posts: 12
Location: Argentina

PostPosted: Wed Jun 13, 2012 2:57 am    Post subject: How To List Uncatalog Datasets from an entire LPAR
Reply with quote

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!
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 Jun 13, 2012 3:21 am    Post subject:
Reply with quote

Hello,

How many lpars?

Is all of the dasd shared?
Back to top
View user's profile Send private message
vasanthz

Global Moderator


Joined: 28 Aug 2007
Posts: 1445
Location: Azeroth

PostPosted: Wed Jun 13, 2012 4:36 pm    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
GarciaRontani

New User


Joined: 04 Dec 2007
Posts: 12
Location: Argentina

PostPosted: Wed Jun 13, 2012 6:25 pm    Post subject:
Reply with quote

Hi nope.. the DASD is not shared.

--

I will give a try to that suggestion
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Wed Jun 13, 2012 6:39 pm    Post subject: Reply to: How To List Uncatalog Datasets from an entire LPAR
Reply with quote

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 )
Back to top
View user's profile Send private message
vasanthz

Global Moderator


Joined: 28 Aug 2007
Posts: 1445
Location: Azeroth

PostPosted: Wed Jun 13, 2012 6:51 pm    Post subject:
Reply with quote

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

http://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,
Back to top
View user's profile Send private message
GarciaRontani

New User


Joined: 04 Dec 2007
Posts: 12
Location: Argentina

PostPosted: Wed Jun 13, 2012 6:56 pm    Post subject:
Reply with quote

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!
Back to top
View user's profile Send private message
GarciaRontani

New User


Joined: 04 Dec 2007
Posts: 12
Location: Argentina

PostPosted: Wed Jun 13, 2012 6:57 pm    Post subject:
Reply with quote

hmmm yes you are right.. it's only applicable for VSAM
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Wed Jun 13, 2012 7:00 pm    Post subject: Reply to: How To List Uncatalog Datasets from an entire LPAR
Reply with quote

icon_redface.gif
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
http://ibmmainframes.com/about36113.html

together with the dfdss snippet to use
Back to top
View user's profile Send private message
vasanthz

Global Moderator


Joined: 28 Aug 2007
Posts: 1445
Location: Azeroth

PostPosted: Wed Jun 13, 2012 7:02 pm    Post subject:
Reply with quote

Yup its blank, just verified it.
Back to top
View user's profile Send private message
Pete Wilson

Active User


Joined: 31 Dec 2009
Posts: 437
Location: London

PostPosted: Thu Jun 14, 2012 1:59 am    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
GarciaRontani

New User


Joined: 04 Dec 2007
Posts: 12
Location: Argentina

PostPosted: Thu Jun 14, 2012 8:50 pm    Post subject: Reply to: How To List Uncatalog Datasets from an entire LPAR
Reply with quote

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!!
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Thu Jun 14, 2012 9:02 pm    Post subject: Reply to: How To List Uncatalog Datasets from an entire LPAR
Reply with quote

Quote:
I will use DFDSS with a dump to a dummy to identify them..


wiser to add also PARM='TYPRUN=NORUN'

dfdss will do all the selection/filtering telling the dataset it will process,
but without carrying on any further action.
Back to top
View user's profile Send private message
Pete Wilson

Active User


Joined: 31 Dec 2009
Posts: 437
Location: London

PostPosted: Fri Jun 15, 2012 1:14 am    Post subject:
Reply with quote

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.....
Back to top
View user's profile Send private message
GarciaRontani

New User


Joined: 04 Dec 2007
Posts: 12
Location: Argentina

PostPosted: Tue Jul 23, 2013 2:14 am    Post subject:
Reply with quote

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!
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: Tue Jul 23, 2013 9:54 pm    Post subject:
Reply with quote

Thanks for letting us know icon_smile.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 -> 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 Cobol list of programs being called biswajit.dattagupta COBOL Programming 5 Tue Nov 01, 2016 2:10 am
No new posts Single COPY CICS TS datasets and when... Kyle Carroll CICS 2 Tue Oct 11, 2016 9:47 pm
No new posts reorder screeNS using SWAP LIST? mrsidhu12 TSO/ISPF 5 Thu Sep 01, 2016 2:19 pm
No new posts Getting list of tables defined under ... kishpra DB2 2 Wed Aug 24, 2016 10:36 am
No new posts Finding unreferenced datasets without... Alan Playford JCL & VSAM 5 Tue Jul 12, 2016 9:07 pm


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