View previous topic :: View next topic |
Author |
Message |
james Beginner
Joined: 30 Jul 2004 Posts: 3 Topics: 1 Location: charleston
|
Posted: Fri Jul 30, 2004 3:31 am Post subject: Uncatalog Dataset |
|
|
Hai All,
Can someone give any cntl or any utility to list Un-catalog dataset or any guidance to do the same. We have lot of data sets lying in different volumes. How do I get the list of the datasets which is not cataloged in the Master catalog through a single utility? How do I customize the jcl to accomodate few volumes?. Then delete the same
James |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Fri Jul 30, 2004 5:09 am Post subject: |
|
|
James,
You can use the DFDSS ADRDSSU utility to get the desired results.
Code: |
//STEP0100 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//LIST DD DUMMY
//SYSIN DD *
DUMP DATASET(INCLUDE(**) -
BY((CATLG,EQ,NO))) -
SHARE OUTDD(LIST) -
LOGINDYNAM((VOLSER)) -
/*
|
Check this link for documentation of ADRDSSU
http://www.mvsforums.com/helpboards/viewtopic.php?t=2161&highlight=adrdssu
Hope this helps...
Cheers
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
taltyman JCL Forum Moderator
Joined: 02 Dec 2002 Posts: 310 Topics: 8 Location: Texas
|
Posted: Fri Jul 30, 2004 11:23 am Post subject: |
|
|
May want to skip the actual dump and still get the list by using the type norun option.
EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN' |
|
Back to top |
|
|
james Beginner
Joined: 30 Jul 2004 Posts: 3 Topics: 1 Location: charleston
|
Posted: Tue Aug 03, 2004 9:54 am Post subject: Uncatalog |
|
|
Hai kolusu,talyman
Thanks a lot it does work with very small minor adjustment. Now it is for me to delete the same. It would be of great help if you guide me for deleting the uncatalog dataset. As of now we are making a packtopack job moving the uncatalog dataset from one volume to other ,so it gets cataloged and then we delete them.
James |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Tue Aug 03, 2004 10:37 am Post subject: |
|
|
James,
If the output file for a DUMp is specified as DUMMY in the JCL, DFDSS can be used to scratch and uncatalog data sets by specifying the DELETE parameter.
Hope this helps...
Cheers
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
james Beginner
Joined: 30 Jul 2004 Posts: 3 Topics: 1 Location: charleston
|
Posted: Wed Aug 04, 2004 6:08 am Post subject: Uncataloged Dataset |
|
|
Kolusu,
I have generated the list of uncataloged datasets, When tried to do a pak to pak, I don't see any member in any of the PDS (empty PDS). How to delete / catalog the uncataloged datasets. If you can give me some JCL / REXX, it would be greatful.
Thanks,
James. |
|
Back to top |
|
|
taltyman JCL Forum Moderator
Joined: 02 Dec 2002 Posts: 310 Topics: 8 Location: Texas
|
Posted: Tue Sep 07, 2004 4:47 pm Post subject: |
|
|
What utility or method is your pak to pak copy using? Sounds like it doesn't want to copy a pds that has no members in it (if I understand what you are saying). I'm believe that if you use ADRDSSU and dump the datasets to a backup dataset that you could use ADRDSSU it to restore them from the backup dataset to your chosen volume and catalog them. If that works then you can go back and run the dump again with the delete option as proviously pointed out. Did you check the link Kolusu provided? |
|
Back to top |
|
|
ashwinkasi Beginner
Joined: 14 Jul 2017 Posts: 1 Topics: 0
|
Posted: Mon Jul 17, 2017 3:51 am Post subject: |
|
|
Hi Kolusu,
I tried the below snipped but its not working. Im getting a error as "Input stream End-of-file found before end of command".
Snippet: Code: |
//STEP0100 EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
//SYSPRINT DD SYSOUT=*
//LIST DD DSN=XXX.YYY.ZZZ,Disp=(,catlg,),space=(cyl,(10,10),rlse),unit=robot
//SYSIN DD *
DUMP DATASET(INCLUDE(xxx.**) -
BY((CATLG,EQ,NO))) -
SHARE OUTDD(LIST) -
LOGINDYNAM((VOLSER)) -
/* |
My requirement is to list all the uncatalogued files present under one LPAR and then need to be deleted automatically.
Can you please advise and correct me |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Mon Jul 17, 2017 10:24 am Post subject: |
|
|
ashwinkasi,
Since you are a new member you need to follow rules.
1. Use code tags to have your data retain spacing and readable. Check this link which explains in detail about code tags
http://www.mvsforums.com/helpboards/viewtopic.php?p=19031#19031
2. Post detailed error messages including the message ID instead of just posting the text.
Now coming to your problem, it is quite obvious that you had an extra continuation character hypen "-" on the last control card parm which is LOGINDYNAM((VOLSER)). Following that you simply have a termination character /* , so remove the extra "-" on the last line _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
sunitapr Beginner
Joined: 04 Oct 2019 Posts: 1 Topics: 0
|
Posted: Sat Oct 05, 2019 2:24 am Post subject: |
|
|
It is helpful post. |
|
Back to top |
|
|
|
|