Hello again,
Mike, when I first answered a while ago, I forgot to thank you for your
suggestion but, at present, there is no overture to invest on vendor tools.
Thank you any way.
Kolosu,
I have tried DFDSS as you suggested. However, it is not working.
If I run it like this:
DUMP DATASET(INCLUDE(**) -
EXCLUDE(SYS1.**) -
BY((REFDT,LE,*,-90) -
(DSORG NE VSAM) -
(CATLG EQ NO))) -
LOGINDDNAME(DASD1) -
OUTDDNAME(WHOOOPS)
DASD1 being a DD for a volume, it works. But if I run it like this:
DUMP DATASET(INCLUDE(**) -
EXCLUDE(SYS1.**) -
BY((REFDT,LE,*,-90) -
(DSORG NE VSAM) -
(CATLG EQ NO))) -
OUTDDNAME(WHOOOPS)
it fails with ADR140E (001)-RI03 (05), INVALID 'BY' CRITERIA
Jack
On Fri, 22 Jul 2022 at 16:40, Mike Shaw <[email protected]> wrote:
> Michael,
>
> Look at member QWDSLIST in the MVS/QuickRef JCL library. Comments at top of
> member will provide guidance and sort criteria help. Volser masking is
> supported.
>
> Mike Shaw
> MVS/QuickRef Support Group
>
> On Fri, Jul 22, 2022, 11:19 AM Michael Watkins <
> [email protected]> wrote:
>
> > The installation where I'm employed has MVS/QuickRef installed, but we do
> > not currently use it to find uncataloged datasets.
> >
> > Can you provide a sample of the batch job using MVS/Quickref to find all
> > uncataloged datasets? Preferably one that would employ a mask for volumes
> > to exclude, since temporary datasets, restricted to one pool where I
> work,
> > are not cataloged by design.
> >
> > -----Original Message-----
> > From: IBM Mainframe Discussion List <[email protected]> On Behalf
> > Of Mike Shaw
> > Sent: Friday, July 22, 2022 10:11 AM
> > To: [email protected]
> > Subject: Re: Finding uncatalogued datasets
> >
> > CAUTION: This email originated from outside of the Texas Comptroller's
> > email system.
> > DO NOT click links or open attachments unless you expect them from the
> > sender and know the content is safe.
> >
> > Jack,
> >
> > MVS/QuickRef will give you a list of the uncataloged data sets across all
> > your online DASD volumes, with one batch job, and you don't need to code
> > any DD statements.
> >
> > Mike Shaw
> > MVS/QuickRef Support Group
> > Chicago-Soft, Ltd.
> >
> > On Fri, Jul 22, 2022, 10:00 AM Jack Zukt <[email protected]> wrote:
> >
> > > Hi all,
> > > As a byproduct of what I am working now, I have found out a few
> > > uncatalogued datasets. Now I would like to find out all the
> > > uncatalogued datasets that are forgotten on the hundred of volumes that
> > are out there.
> > > Using ADRDDSU and (CATLG EQ NO) is not an option as it would need a
> DD
> > > for each VOLSER. I could write a rexx that would read the DCOLLECT
> > > VOLUMES(*) NODATAINFO and generate a JOB for each VOLSER or group of
> > > VOLSERs but I really would like to use a more standard approach. I
> > > seem to remember, from another age, that FDRABR could do it. However
> > > Dr. Google has not been able to find me anything to that effect using
> > only IBM tools.
> > > Do you have any ideas how to go about this?
> > > Your help will be, as always, greatly appreciated.
> > > Regards,
> > > Jack
> > >
> > > ----------------------------------------------------------------------
> > > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > > email to [email protected] with the message: INFO IBM-MAIN
> > >
> >
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> email
> > to [email protected] with the message: INFO IBM-MAIN
> >
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to [email protected] with the message: INFO IBM-MAIN
> >
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
