"Mainframe outage affecting W.Va. state agencies could take 48, 72 hours to resolve"

[Steve Horein]

Spotted on reddit:
https://wchstv.com/news/local/mainframe-outage-affecting-wva-state-agencies-could-take-48-72-hours-to-resolv

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: [EXTERNAL] HSM Recycle command

[Pommier, Rex]

Yes, it would then (if you change the DISPLAY to EXECUTE :-) ) migrate any 
still-valid datasets off tapes at 5% or lower utilization to different tapes, 
thus emptying the targeted tape and then scratch/recycle them.  

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter
Sent: Monday, July 25, 2022 12:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] HSM Recycle command

Yes with percentage 0 it means to delete the empty tapes (virtual in my
case)

So to execute (delete) with percentage 5 is fine I believe?

On Mon, Jul 25, 2022, 8:58 PM Pommier, Rex  wrote:

> Hi Peter,
>
> Does this command even do anything?  I'm not an HSM guru but
> PERCENTVALID(0) says only process if the tape is empty.  Doesn't HSM 
> automatically recycle empty tapes?  If you want to recycle tapes that 
> are getting close to empty you need to increase the 0.  I would try 
> running it with 5 or 10 with the DISPLAY on to see what quantity of 
> tapes will get recycled if you actually execute it.
>
> You have DISPLAY - which I believe tells HSM to only report eligible 
> tapes, but not do anything with them.  I believe you would need to 
> change that to EXECUTE to have HSM actually do anything with the tapes.
>
> We have our HSM recycling tapes at 30%.  This is a holdover from when 
> we had a physical library with a limited number of tapes in it.  We 
> could probably lower that number since our VTS is using virtual 3490s 
> instead of high capacity TS11xx tapes so burning a few virtual tapes 
> to lower the churn would probably be OK.
>
> Rex
>
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Peter
> Sent: Monday, July 25, 2022 11:37 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [EXTERNAL] HSM Recycle command
>
> Hello
>
> Just trying to understand the best practices of using HSEND RECYCLE 
> ML2 DISPLAY PERCENTVALID(0)
>
> What percentage valid is appropriate or what is best to execute?
>
> Right now I do with zero but is it ok to do with with little higher 
> percentage 5 ?
>
> Peter
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> The information contained in this message is confidential, protected 
> from disclosure and may be legally privileged. If the reader of this 
> message is not the intended recipient or an employee or agent 
> responsible for delivering this message to the intended recipient, you 
> are hereby notified that any disclosure, distribution, copying, or any 
> action taken or action omitted in reliance on it, is strictly 
> prohibited and may be unlawful. If you have received this 
> communication in error, please notify us immediately by replying to 
> this message and destroy the material in its entirety, whether in electronic 
> or hard copy format. Thank you.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
The information contained in this message is confidential, protected from 
disclosure and may be legally privileged. If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful. If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format. Thank you.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: [EXTERNAL] HSM Recycle command

[Peter]

Yes with percentage 0 it means to delete the empty tapes (virtual in my
case)

So to execute (delete) with percentage 5 is fine I believe?

On Mon, Jul 25, 2022, 8:58 PM Pommier, Rex  wrote:

> Hi Peter,
>
> Does this command even do anything?  I'm not an HSM guru but
> PERCENTVALID(0) says only process if the tape is empty.  Doesn't HSM
> automatically recycle empty tapes?  If you want to recycle tapes that are
> getting close to empty you need to increase the 0.  I would try running it
> with 5 or 10 with the DISPLAY on to see what quantity of tapes will get
> recycled if you actually execute it.
>
> You have DISPLAY - which I believe tells HSM to only report eligible
> tapes, but not do anything with them.  I believe you would need to change
> that to EXECUTE to have HSM actually do anything with the tapes.
>
> We have our HSM recycling tapes at 30%.  This is a holdover from when we
> had a physical library with a limited number of tapes in it.  We could
> probably lower that number since our VTS is using virtual 3490s instead of
> high capacity TS11xx tapes so burning a few virtual tapes to lower the
> churn would probably be OK.
>
> Rex
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Peter
> Sent: Monday, July 25, 2022 11:37 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [EXTERNAL] HSM Recycle command
>
> Hello
>
> Just trying to understand the best practices of using HSEND RECYCLE ML2
> DISPLAY PERCENTVALID(0)
>
> What percentage valid is appropriate or what is best to execute?
>
> Right now I do with zero but is it ok to do with with little higher
> percentage 5 ?
>
> Peter
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> The information contained in this message is confidential, protected from
> disclosure and may be legally privileged. If the reader of this message is
> not the intended recipient or an employee or agent responsible for
> delivering this message to the intended recipient, you are hereby notified
> that any disclosure, distribution, copying, or any action taken or action
> omitted in reliance on it, is strictly prohibited and may be unlawful. If
> you have received this communication in error, please notify us immediately
> by replying to this message and destroy the material in its entirety,
> whether in electronic or hard copy format. Thank you.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: [EXTERNAL] HSM Recycle command

[Pommier, Rex]

Hi Peter,

Does this command even do anything?  I'm not an HSM guru but PERCENTVALID(0) 
says only process if the tape is empty.  Doesn't HSM automatically recycle 
empty tapes?  If you want to recycle tapes that are getting close to empty you 
need to increase the 0.  I would try running it with 5 or 10 with the DISPLAY 
on to see what quantity of tapes will get recycled if you actually execute it.  

You have DISPLAY - which I believe tells HSM to only report eligible tapes, but 
not do anything with them.  I believe you would need to change that to EXECUTE 
to have HSM actually do anything with the tapes.

We have our HSM recycling tapes at 30%.  This is a holdover from when we had a 
physical library with a limited number of tapes in it.  We could probably lower 
that number since our VTS is using virtual 3490s instead of high capacity 
TS11xx tapes so burning a few virtual tapes to lower the churn would probably 
be OK.  

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter
Sent: Monday, July 25, 2022 11:37 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] HSM Recycle command

Hello

Just trying to understand the best practices of using HSEND RECYCLE ML2 DISPLAY 
PERCENTVALID(0)

What percentage valid is appropriate or what is best to execute?

Right now I do with zero but is it ok to do with with little higher percentage 
5 ?

Peter

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
The information contained in this message is confidential, protected from 
disclosure and may be legally privileged. If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful. If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format. Thank you.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

HSM Recycle command

[Peter]

Hello

Just trying to understand the best practices of using
HSEND RECYCLE ML2 DISPLAY PERCENTVALID(0)

What percentage valid is appropriate or what is best to execute?

Right now I do with zero but is it ok to do with with little higher
percentage 5 ?

Peter

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: OS DITTO MLC Cost

[Farley, Peter x23353]

However, shops who do NOT have IBM File Manager or an ISV's equivalent 
available may need DITTO as the most convenient (perhaps only) way to 
browse/edit VSAM files.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter Van Dyke
Sent: Monday, July 25, 2022 3:34 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: OS DITTO MLC Cost

Hi David,
Sorry, I don't know the MLC for DITTO. However, in case you and others are not 
aware, IBM File Manager was developed on top of DITTO and includes most of the 
functions provided by DITTO. So if you have File Manager you may not need to 
continue paying for DITTO.

Regards,
Peter Van Dyke
HCL Software


On Mon, 25 Jul 2022 at 14:05,wrote:

> Anyone know the MLC Cost for OS DITTO?  Last I heard is that it is 
> very expensive and probably not needed at most sites.
>
--


This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Visara DASD and Tape

[Shaffer, Terri]

So I am just curious, are there any customers running VISARA   VI8810 (dasd) or 
VTA5990 Tape solutions?

If you do,  any issues, compatibility?

For the 5990, do you have 3490x or 3590 type tapes defined?

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com


 [https://go.aciworldwide.com/rs/030-ROK-804/images/aci-footer.jpg] 

This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Finding uncatalogued datasets

[Wendell Lovewell]

Hi Jack. 

I'm going thru a similar process, although with a much smaller number of 
volumes.  ADRDSSU also allows you to specify STORGRP instead of the volser:

  DUMP OUTDD(BUFILE) STORGRP(MACS)-
   DATASET(INCLUDE(**,-
   USERCAT.MACK01 -
   )  -
   EXCLUDE(SYS1.V*.**)-
   BY(DSCHA,EQ,YES)   -
   ) -
   OPTIMIZE(4) SHARE TOL(IOER,ENQF) COMPRESS

With TYPRUN=NORUN, or with my "BUFILE" set to DD DUMMY, an error will be 
generated and RC set to 8 for each dataset that is not cataloged.  Some of the 
parms are only of use when I do actually do the DUMP.   

This will run a long time though, so with 8000 volumes you might want something 
less resource instead.  

Wendell

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Finding uncatalogued datasets

[Lionel B. Dyck]

Since you have the VTOC command - use that instead of IEHLIST 

It will still run for a long time depending on the number of volumes and number 
of datasets.


Lionel B. Dyck <><
Website: https://www.lbdsoftware.com
Github: https://github.com/lbdyck

“Worry more about your character than your reputation. Character is what you 
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jack Zukt
Sent: Monday, July 25, 2022 8:33 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Finding uncatalogued datasets

Thank you Lionel,
It will definitely take some time.
I tried going through the DCOLLECT output with IGGCSIRX ant it took almost six 
hours.
But using listdsi may be an interesting approach.
Regards
Jack

On Mon, 25 Jul 2022 at 14:21, Lionel B. Dyck  wrote:

> A possible RYO would be to write a rexx exec to:
>
> 1. issue operator command using sdsf rexx d u,dasd,online,, 2. 
> parse the results for each volser 3. invoke iehlist - listvtoc for 
> each and capture the results 4. issue listdsi for each dataset
>   - if not cataloged then you have them
>   - if the sysvolume is not the same as the iehlist volser then you 
> have a mismatch
>
> This will take awhile so run it in batch.
>
> Lionel B. Dyck <><
> Website: https://www.lbdsoftware.com
> Github: https://github.com/lbdyck
>
> “Worry more about your character than your reputation. Character is what
> you are, reputation merely what others think you are.”   - - - John Wooden
>
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Jack Zukt
> Sent: Monday, July 25, 2022 8:14 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Finding uncatalogued datasets
>
> Hi,
> In this SYSPLEX all user catalog and all its aliases are shared. There 
> is a daily process that emits an alert for any ALIAS that is not 
> defined on all systems.
>
> On Mon, 25 Jul 2022 at 13:59, Seymour J Metz  wrote:
>
> > How does it deal with user catalogs? If FOO is a catalog alias in 
> > one master catalog but not in another, could FOO.** datasets be 
> > incorrectly treated as uncataloged?
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on 
> > behalf of John McKown [john.archie.mck...@gmail.com]
> > Sent: Sunday, July 24, 2022 5:03 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Finding uncatalogued datasets
> >
> > ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the 
> > to a sequential dataset, or just DD DUMMY. It doesn't care what the 
> > DSN is, even if it has abnormal byte values in the name.
> >
> > On Sat, Jul 23, 2022, 14:29 David Staudacher 
> > 
> > wrote:
> >
> > > Jack Zukt wrote: "I would prefer a more standard approach if I 
> > > could find one".
> > >
> > > What you need is something that can dig out all the DSCBs from 
> > > every VTOC of every online DASD device and sum these into a Data Set list.
> > > I happen to have an Assembler program which does just that, if 
> > > you'd like to try it out.
> > > Assuming you have the required MACLIBs (SYS1.MACLIB and 
> > > SYS1.MODGEN or
> > > SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
> > > Use a Catalog Search to find uncataloged data sets is of course 
> > > useless for obvious reasons.
> > > My program outputs a record for each DSCB. These are then summed 
> > > to
> > create
> > > a report listing every Data Set on every online DASD device.
> > > The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of 
> > > Tracks, % Used, # of Extents, Create Date and Date Last Referenced.
> > > It rivals DCOLLECT in what it can do but requires no special 
> > > Authorization.
> > > A recent enhancement to calculate space utilization for PDSEs 
> > > slowed it down quite a bit, but otherwise it's *very* fast.
> > > The report is also handy for contractors who want to quickly learn 
> > > the "filescape" of any new site to which they're assigned.
> > > Next enhancement I have in mind is to calculate total *available* 
> > > DASD space, which *could* be very easy (or not). Just haven't 
> > > gotten around to figuring it out yet.
> > > Let me know if you'd like a copy of the source I have so far, and 
> > > JCL to run it, and I'll send it to you.
> > > So far, it's worked everywhere it's been tried.
> > > If there are any cases where it *doesn't* work, that would be nice 
> > > to
> > know
> > > too.
> > > David Staudacher
> > > LinkedIn Mainframe Groups Manager
> > > => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋,
> 퐞퐭퐜)
> > > 퐄퐱퐩퐞퐫퐭퐬
> > > => linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬
> > 퐚퐧퐝
> > > 퐒퐞퐫퐯퐢퐜퐞퐬
> > > => linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
> > > 퐂퐚퐫퐞퐞퐫퐬
> > > => linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞 
> > > 퐀퐬퐬퐞퐦퐛퐥퐞퐫
> > > 퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
> > > => linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
> > > => 

Re: Finding uncatalogued datasets

[Jack Zukt]

Thank you Lionel,
It will definitely take some time.
I tried going through the DCOLLECT output with IGGCSIRX ant it took almost
six hours.
But using listdsi may be an interesting approach.
Regards
Jack

On Mon, 25 Jul 2022 at 14:21, Lionel B. Dyck  wrote:

> A possible RYO would be to write a rexx exec to:
>
> 1. issue operator command using sdsf rexx d u,dasd,online,,
> 2. parse the results for each volser
> 3. invoke iehlist - listvtoc for each and capture the results
> 4. issue listdsi for each dataset
>   - if not cataloged then you have them
>   - if the sysvolume is not the same as the iehlist volser then you have a
> mismatch
>
> This will take awhile so run it in batch.
>
> Lionel B. Dyck <><
> Website: https://www.lbdsoftware.com
> Github: https://github.com/lbdyck
>
> “Worry more about your character than your reputation. Character is what
> you are, reputation merely what others think you are.”   - - - John Wooden
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Jack Zukt
> Sent: Monday, July 25, 2022 8:14 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Finding uncatalogued datasets
>
> Hi,
> In this SYSPLEX all user catalog and all its aliases are shared. There is
> a daily process that emits an alert for any ALIAS that is not defined on
> all systems.
>
> On Mon, 25 Jul 2022 at 13:59, Seymour J Metz  wrote:
>
> > How does it deal with user catalogs? If FOO is a catalog alias in one
> > master catalog but not in another, could FOO.** datasets be
> > incorrectly treated as uncataloged?
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on
> > behalf of John McKown [john.archie.mck...@gmail.com]
> > Sent: Sunday, July 24, 2022 5:03 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Finding uncatalogued datasets
> >
> > ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the
> > to a sequential dataset, or just DD DUMMY. It doesn't care what the
> > DSN is, even if it has abnormal byte values in the name.
> >
> > On Sat, Jul 23, 2022, 14:29 David Staudacher 
> > wrote:
> >
> > > Jack Zukt wrote: "I would prefer a more standard approach if I could
> > > find one".
> > >
> > > What you need is something that can dig out all the DSCBs from every
> > > VTOC of every online DASD device and sum these into a Data Set list.
> > > I happen to have an Assembler program which does just that, if you'd
> > > like to try it out.
> > > Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN
> > > or
> > > SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
> > > Use a Catalog Search to find uncataloged data sets is of course
> > > useless for obvious reasons.
> > > My program outputs a record for each DSCB. These are then summed to
> > create
> > > a report listing every Data Set on every online DASD device.
> > > The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks,
> > > % Used, # of Extents, Create Date and Date Last Referenced.
> > > It rivals DCOLLECT in what it can do but requires no special
> > > Authorization.
> > > A recent enhancement to calculate space utilization for PDSEs slowed
> > > it down quite a bit, but otherwise it's *very* fast.
> > > The report is also handy for contractors who want to quickly learn
> > > the "filescape" of any new site to which they're assigned.
> > > Next enhancement I have in mind is to calculate total *available*
> > > DASD space, which *could* be very easy (or not). Just haven't gotten
> > > around to figuring it out yet.
> > > Let me know if you'd like a copy of the source I have so far, and
> > > JCL to run it, and I'll send it to you.
> > > So far, it's worked everywhere it's been tried.
> > > If there are any cases where it *doesn't* work, that would be nice
> > > to
> > know
> > > too.
> > > David Staudacher
> > > LinkedIn Mainframe Groups Manager
> > > => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋,
> 퐞퐭퐜)
> > > 퐄퐱퐩퐞퐫퐭퐬
> > > => linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬
> > 퐚퐧퐝
> > > 퐒퐞퐫퐯퐢퐜퐞퐬
> > > => linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
> > > 퐂퐚퐫퐞퐞퐫퐬
> > > => linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐀퐬퐬퐞퐦퐛퐥퐞퐫
> > > 퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
> > > => linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
> > > => linkedin.com/groups/2085030 퐳/퐕퐒퐄
> > >
> > > 
> > > -- For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO
> > > IBM-MAIN
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access 

Re: Finding uncatalogued datasets

[Lionel B. Dyck]

A possible RYO would be to write a rexx exec to:

1. issue operator command using sdsf rexx d u,dasd,online,,
2. parse the results for each volser
3. invoke iehlist - listvtoc for each and capture the results
4. issue listdsi for each dataset
  - if not cataloged then you have them
  - if the sysvolume is not the same as the iehlist volser then you have a 
mismatch

This will take awhile so run it in batch.

Lionel B. Dyck <><
Website: https://www.lbdsoftware.com
Github: https://github.com/lbdyck

“Worry more about your character than your reputation. Character is what you 
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jack Zukt
Sent: Monday, July 25, 2022 8:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Finding uncatalogued datasets

Hi,
In this SYSPLEX all user catalog and all its aliases are shared. There is a 
daily process that emits an alert for any ALIAS that is not defined on all 
systems.

On Mon, 25 Jul 2022 at 13:59, Seymour J Metz  wrote:

> How does it deal with user catalogs? If FOO is a catalog alias in one 
> master catalog but not in another, could FOO.** datasets be 
> incorrectly treated as uncataloged?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on 
> behalf of John McKown [john.archie.mck...@gmail.com]
> Sent: Sunday, July 24, 2022 5:03 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Finding uncatalogued datasets
>
> ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the 
> to a sequential dataset, or just DD DUMMY. It doesn't care what the 
> DSN is, even if it has abnormal byte values in the name.
>
> On Sat, Jul 23, 2022, 14:29 David Staudacher 
> wrote:
>
> > Jack Zukt wrote: "I would prefer a more standard approach if I could 
> > find one".
> >
> > What you need is something that can dig out all the DSCBs from every 
> > VTOC of every online DASD device and sum these into a Data Set list.
> > I happen to have an Assembler program which does just that, if you'd 
> > like to try it out.
> > Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN 
> > or
> > SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
> > Use a Catalog Search to find uncataloged data sets is of course 
> > useless for obvious reasons.
> > My program outputs a record for each DSCB. These are then summed to
> create
> > a report listing every Data Set on every online DASD device.
> > The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks, 
> > % Used, # of Extents, Create Date and Date Last Referenced.
> > It rivals DCOLLECT in what it can do but requires no special 
> > Authorization.
> > A recent enhancement to calculate space utilization for PDSEs slowed 
> > it down quite a bit, but otherwise it's *very* fast.
> > The report is also handy for contractors who want to quickly learn 
> > the "filescape" of any new site to which they're assigned.
> > Next enhancement I have in mind is to calculate total *available* 
> > DASD space, which *could* be very easy (or not). Just haven't gotten 
> > around to figuring it out yet.
> > Let me know if you'd like a copy of the source I have so far, and 
> > JCL to run it, and I'll send it to you.
> > So far, it's worked everywhere it's been tried.
> > If there are any cases where it *doesn't* work, that would be nice 
> > to
> know
> > too.
> > David Staudacher
> > LinkedIn Mainframe Groups Manager
> > => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋, 퐞퐭퐜)
> > 퐄퐱퐩퐞퐫퐭퐬
> > => linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬
> 퐚퐧퐝
> > 퐒퐞퐫퐯퐢퐜퐞퐬
> > => linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
> > 퐂퐚퐫퐞퐞퐫퐬
> > => linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐀퐬퐬퐞퐦퐛퐥퐞퐫
> > 퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
> > => linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
> > => linkedin.com/groups/2085030 퐳/퐕퐒퐄
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to 

Re: Finding uncatalogued datasets

[Jack Zukt]

Hi David,
Thank you for the alert.
I still have not ruled out the CBT112 VTOC command. As a matter of fact, I
already have downloaded it but  am still going through the notes.
Regards
Jack

On Mon, 25 Jul 2022 at 14:09, David Spiegel  wrote:

> Hi Jack,
> What will happen (with your proposed solution) if you have Dataset A.B
> Cataloged to ABC123 and also present on ABC124, or, Dataset ABC
> Cataloged to ABC123, but, present only on ABC124?
> I do not want to sound like a broken record, but,. the VTOC Command
> Processor (CBT File 112) can deal with both of these situations.
>
> Regards,
> David
>
> On 2022-07-25 07:23, Jack Zukt wrote:
> > Hi all,
> > Thank you all for all of your suggestions so far.
> > After one weekend with everything working in the background I came up
> with
> > an idea for a new approach.
> > I have the DCOLLECT output with all the formatted data records or the
> file
> > treated by DFSORT with only the dataset names and a few extra tidbits.
> Now
> > I also have a file that is a result of a SORT over a  LISTCAT of all the
> > user catalogs on the system, with all (and only) the cataloged dataset
> > names.
> > Now, can I use DFSORT with those two files as input to create a file with
> > only the dataset names that exist on the DCOLLECT file but do not exist
> on
> > the LISTCAT output?
> > Regards,
> > Jack
> >
> >
> > On Mon, 25 Jul 2022 at 09:23, Jack Zukt  wrote:
> >
> >> Hi,
> >>
> >> Thank you for the suggestion.
> >> At this point in time, I only have access to IBM software
> >> Regards
> >> Jack
> >>
> >> On Mon, 25 Jul 2022 at 09:17, Alain Benvéniste 
> >> wrote:
> >>
> >>> If I remember well RSVP from Broadcom did that. If you have it ?
> >>>
> >>> Resiliency Services on Z Mainframe
> >>> alain.benveni...@kyndryl.com
> >>>
>  Le 25 juil. 2022 à 10:13, Jack Zukt  a écrit :
> 
>  Hi,
>  Thank you for your input. Using DFDSS like that would be an option.
>  However, there are over eight thousand volumes in this system and that
>  would be a lot of JOBs. I thought about submitting one JOB for each
> >>> Storage
>  Group but that would mean too many DD for most of the JOBs.
>  Regards
>  Jack
> 
> > On Sun, 24 Jul 2022 at 22:48, Nigel Morton 
> >>> wrote:
> > This is what I'd use, shown for a single volume:
> >
> > //UNCAT EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
> > //SYSPRINT DD SYSOUT=*
> > //SYSINDD *
> > COPY -
> >DATASET( INCLUDE (**)) -
> >LOGINDYNAM(volser) -
> >BY (CATLG,EQ,NO) -
> >DELETE
> > /*
> > The parm setting lets you see what it would do if you unleash it.
> One
> > tool, standard, no need for own code.
> >
> > DCOLLECT won't cut it because it doesn't look at catalogs.
> >
> > On Sun, 24 Jul 2022 at 22:24, John McKown <
> >>> john.archie.mck...@gmail.com>
> > wrote:
> >
> >> Sorry, I should have double checked. It's been years since I've had
> >>> to do
> >> it. And it's Sunday. Yes COPY DELETE is correct.
> >>
> >> On Sun, Jul 24, 2022 at 4:18 PM David Spiegel <
> >>> dspiegel...@hotmail.com>
> >> wrote:
> >>
> >>> Hi John,
> >>> "...ADRDSSU MOVE..." There is no such verb.
> >>> Maybe you mean COPY ... DELETE?
> >>>
> >>> Regards,
> >>> David
> >>>
> >>> On 2022-07-24 17:03, John McKown wrote:
>  ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE
> the
> >> to a
>  sequential dataset, or just DD DUMMY. It doesn't care what the DSN
> > is,
> >>> even
>  if it has abnormal byte values in the name.
> 
>  On Sat, Jul 23, 2022, 14:29 David Staudacher <
> >>> dlstaudac...@gmail.com
> >>> wrote:
> > Jack Zukt wrote: "I would prefer a more standard approach if I
> >>> could
> >>> find
> > one".
> >
> > What you need is something that can dig out all the DSCBs from
> >>> every
> >>> VTOC
> > of every online DASD device and sum these into a Data Set list.
> > I happen to have an Assembler program which does just that, if
> >>> you'd
> >>> like
> > to try it out.
> > Assuming you have the required MACLIBs (SYS1.MACLIB and
> SYS1.MODGEN
> > or
> > SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
> > Use a Catalog Search to find uncataloged data sets is of course
> >> useless
> > for obvious reasons.
> > My program outputs a record for each DSCB. These are then summed
> to
> >>> create
> > a report listing every Data Set on every online DASD device.
> > The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of
> Tracks,
> > %
> > Used, # of Extents, Create Date and Date Last Referenced.
> > It rivals DCOLLECT in what it can do but requires no special
> > Authorization.
> > A recent enhancement to calculate space utilization for 

Re: Finding uncatalogued datasets

[Jack Zukt]

Hi,
In this SYSPLEX all user catalog and all its aliases are shared. There is a
daily process that emits an alert for any ALIAS that is not defined on all
systems.

On Mon, 25 Jul 2022 at 13:59, Seymour J Metz  wrote:

> How does it deal with user catalogs? If FOO is a catalog alias in one
> master catalog but not in another, could FOO.** datasets be incorrectly
> treated as uncataloged?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of John McKown [john.archie.mck...@gmail.com]
> Sent: Sunday, July 24, 2022 5:03 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Finding uncatalogued datasets
>
> ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the to a
> sequential dataset, or just DD DUMMY. It doesn't care what the DSN is, even
> if it has abnormal byte values in the name.
>
> On Sat, Jul 23, 2022, 14:29 David Staudacher 
> wrote:
>
> > Jack Zukt wrote: "I would prefer a more standard approach if I could find
> > one".
> >
> > What you need is something that can dig out all the DSCBs from every VTOC
> > of every online DASD device and sum these into a Data Set list.
> > I happen to have an Assembler program which does just that, if you'd like
> > to try it out.
> > Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN or
> > SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
> > Use a Catalog Search to find uncataloged data sets is of course useless
> > for obvious reasons.
> > My program outputs a record for each DSCB. These are then summed to
> create
> > a report listing every Data Set on every online DASD device.
> > The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks, %
> > Used, # of Extents, Create Date and Date Last Referenced.
> > It rivals DCOLLECT in what it can do but requires no special
> > Authorization.
> > A recent enhancement to calculate space utilization for PDSEs slowed it
> > down quite a bit, but otherwise it's *very* fast.
> > The report is also handy for contractors who want to quickly learn the
> > "filescape" of any new site to which they're assigned.
> > Next enhancement I have in mind is to calculate total *available* DASD
> > space, which *could* be very easy (or not). Just haven't gotten around to
> > figuring it out yet.
> > Let me know if you'd like a copy of the source I have so far, and JCL to
> > run it, and I'll send it to you.
> > So far, it's worked everywhere it's been tried.
> > If there are any cases where it *doesn't* work, that would be nice to
> know
> > too.
> > David Staudacher
> > LinkedIn Mainframe Groups Manager
> > => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋, 퐞퐭퐜)
> > 퐄퐱퐩퐞퐫퐭퐬
> > => linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬
> 퐚퐧퐝
> > 퐒퐞퐫퐯퐢퐜퐞퐬
> > => linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
> > 퐂퐚퐫퐞퐞퐫퐬
> > => linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐀퐬퐬퐞퐦퐛퐥퐞퐫
> > 퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
> > => linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
> > => linkedin.com/groups/2085030 퐳/퐕퐒퐄
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Finding uncatalogued datasets

[David Spiegel]

Hi Jack,
What will happen (with your proposed solution) if you have Dataset A.B 
Cataloged to ABC123 and also present on ABC124, or, Dataset ABC 
Cataloged to ABC123, but, present only on ABC124?
I do not want to sound like a broken record, but,. the VTOC Command 
Processor (CBT File 112) can deal with both of these situations.


Regards,
David

On 2022-07-25 07:23, Jack Zukt wrote:

Hi all,
Thank you all for all of your suggestions so far.
After one weekend with everything working in the background I came up with
an idea for a new approach.
I have the DCOLLECT output with all the formatted data records or the file
treated by DFSORT with only the dataset names and a few extra tidbits. Now
I also have a file that is a result of a SORT over a  LISTCAT of all the
user catalogs on the system, with all (and only) the cataloged dataset
names.
Now, can I use DFSORT with those two files as input to create a file with
only the dataset names that exist on the DCOLLECT file but do not exist on
the LISTCAT output?
Regards,
Jack


On Mon, 25 Jul 2022 at 09:23, Jack Zukt  wrote:


Hi,

Thank you for the suggestion.
At this point in time, I only have access to IBM software
Regards
Jack

On Mon, 25 Jul 2022 at 09:17, Alain Benvéniste 
wrote:


If I remember well RSVP from Broadcom did that. If you have it ?

Resiliency Services on Z Mainframe
alain.benveni...@kyndryl.com


Le 25 juil. 2022 à 10:13, Jack Zukt  a écrit :

Hi,
Thank you for your input. Using DFDSS like that would be an option.
However, there are over eight thousand volumes in this system and that
would be a lot of JOBs. I thought about submitting one JOB for each

Storage

Group but that would mean too many DD for most of the JOBs.
Regards
Jack


On Sun, 24 Jul 2022 at 22:48, Nigel Morton 

wrote:

This is what I'd use, shown for a single volume:

//UNCAT EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
//SYSPRINT DD SYSOUT=*
//SYSINDD *
COPY -
   DATASET( INCLUDE (**)) -
   LOGINDYNAM(volser) -
   BY (CATLG,EQ,NO) -
   DELETE
/*
The parm setting lets you see what it would do if you unleash it.  One
tool, standard, no need for own code.

DCOLLECT won't cut it because it doesn't look at catalogs.

On Sun, 24 Jul 2022 at 22:24, John McKown <

john.archie.mck...@gmail.com>

wrote:


Sorry, I should have double checked. It's been years since I've had

to do

it. And it's Sunday. Yes COPY DELETE is correct.

On Sun, Jul 24, 2022 at 4:18 PM David Spiegel <

dspiegel...@hotmail.com>

wrote:


Hi John,
"...ADRDSSU MOVE..." There is no such verb.
Maybe you mean COPY ... DELETE?

Regards,
David

On 2022-07-24 17:03, John McKown wrote:

ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the

to a

sequential dataset, or just DD DUMMY. It doesn't care what the DSN

is,

even

if it has abnormal byte values in the name.

On Sat, Jul 23, 2022, 14:29 David Staudacher <

dlstaudac...@gmail.com

wrote:

Jack Zukt wrote: "I would prefer a more standard approach if I

could

find

one".

What you need is something that can dig out all the DSCBs from

every

VTOC

of every online DASD device and sum these into a Data Set list.
I happen to have an Assembler program which does just that, if

you'd

like

to try it out.
Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN

or

SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
Use a Catalog Search to find uncataloged data sets is of course

useless

for obvious reasons.
My program outputs a record for each DSCB. These are then summed to

create

a report listing every Data Set on every online DASD device.
The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks,

%

Used, # of Extents, Create Date and Date Last Referenced.
It rivals DCOLLECT in what it can do but requires no special
Authorization.
A recent enhancement to calculate space utilization for PDSEs

slowed

it

down quite a bit, but otherwise it's *very* fast.
The report is also handy for contractors who want to quickly learn

the

"filescape" of any new site to which they're assigned.
Next enhancement I have in mind is to calculate total *available*

DASD

space, which *could* be very easy (or not). Just haven't gotten

around

to

figuring it out yet.
Let me know if you'd like a copy of the source I have so far, and

JCL

to

run it, and I'll send it to you.
So far, it's worked everywhere it's been tried.
If there are any cases where it *doesn't* work, that would be nice

to

know

too.
David Staudacher
LinkedIn Mainframe Groups Manager
=> linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋,

퐞퐭퐜)

퐄퐱퐩퐞퐫퐭퐬
=> linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬

퐚퐧퐝

퐒퐞퐫퐯퐢퐜퐞퐬
=> linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
퐂퐚퐫퐞퐞퐫퐬
=> linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞

퐀퐬퐬퐞퐦퐛퐥퐞퐫

퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
=> linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
=> linkedin.com/groups/2085030 퐳/퐕퐒퐄



--

For IBM-MAIN subscribe / signoff / archive access instructions,
send email to 

Re: Finding uncatalogued datasets

[Seymour J Metz]

How does it deal with user catalogs? If FOO is a catalog alias in one master 
catalog but not in another, could FOO.** datasets be incorrectly treated as 
uncataloged?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
John McKown [john.archie.mck...@gmail.com]
Sent: Sunday, July 24, 2022 5:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Finding uncatalogued datasets

ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the to a
sequential dataset, or just DD DUMMY. It doesn't care what the DSN is, even
if it has abnormal byte values in the name.

On Sat, Jul 23, 2022, 14:29 David Staudacher  wrote:

> Jack Zukt wrote: "I would prefer a more standard approach if I could find
> one".
>
> What you need is something that can dig out all the DSCBs from every VTOC
> of every online DASD device and sum these into a Data Set list.
> I happen to have an Assembler program which does just that, if you'd like
> to try it out.
> Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN or
> SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
> Use a Catalog Search to find uncataloged data sets is of course useless
> for obvious reasons.
> My program outputs a record for each DSCB. These are then summed to create
> a report listing every Data Set on every online DASD device.
> The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks, %
> Used, # of Extents, Create Date and Date Last Referenced.
> It rivals DCOLLECT in what it can do but requires no special
> Authorization.
> A recent enhancement to calculate space utilization for PDSEs slowed it
> down quite a bit, but otherwise it's *very* fast.
> The report is also handy for contractors who want to quickly learn the
> "filescape" of any new site to which they're assigned.
> Next enhancement I have in mind is to calculate total *available* DASD
> space, which *could* be very easy (or not). Just haven't gotten around to
> figuring it out yet.
> Let me know if you'd like a copy of the source I have so far, and JCL to
> run it, and I'll send it to you.
> So far, it's worked everywhere it's been tried.
> If there are any cases where it *doesn't* work, that would be nice to know
> too.
> David Staudacher
> LinkedIn Mainframe Groups Manager
> => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋, 퐞퐭퐜)
> 퐄퐱퐩퐞퐫퐭퐬
> => linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬 퐚퐧퐝
> 퐒퐞퐫퐯퐢퐜퐞퐬
> => linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
> 퐂퐚퐫퐞퐞퐫퐬
> => linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐀퐬퐬퐞퐦퐛퐥퐞퐫
> 퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
> => linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
> => linkedin.com/groups/2085030 퐳/퐕퐒퐄
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Finding uncatalogued datasets

[Allan Staller]

Classification: Confidential

If you have dfHSM (and/or I presume CA-DISK (formerly DMS/OS))) merely add them 
to the processing.
I am sure dfHSM will tell you everything needed via error messages in the 
migration and backup logs.
I presume CA-DISK will  do the same.

HTH,

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jack Zukt
Sent: Sunday, July 24, 2022 3:00 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Finding uncatalogued datasets

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don't click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

Hi,
Thank you for the suggestion
The why I am going through DCOLLECT records at this point it is precisely 
because of the wasted space due to datasets that have not been used for over a 
year (at least). It was going through this records that I became aware of the 
existence of uncatalogued datasets. That is why I am trying to come up with a 
process that can find them, so I can dispose of them. And I want it to be as 
simple and standard as possible.
Regards
Jack

On Sun, Jul 24, 2022, 03:55wrote:

> What ever tool you use to find all the Datasets you are looking for,
> be aware that there is a field called LADAT - Last Access Date for
> GDG's. This can reveal datasets that are older than 1 year.  There can
> be 1000's of these.  Reasons are Jobs become obsolete or are Replaced,
> so all their GDG's remain.  Secondly, tape datasets could have been
> changed to disk with no update to the NOSCRATCH  Setting or a GDG
> could have been mistakenly set to NOSCRATCH during initial setup.
> Finding and deleting these can free lots of disk.
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Jack Zukt
> Sent: Saturday, July 23, 2022 5:18 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Finding uncatalogued datasets
>
> Thank you all for your input.
> Regarding the last comments, my problem is that I have found multiple "SMS"
> uncatalogued datasets. A few are rolled out GDG versions, but most are not.
> And yes, the environment in a parallel sysplex with two master
> catalogs, but those files are all (were) in user catalogs visible on
> all lpars with shared alias. I am excluding from this search the
> master catalogue aliases, such as SYS1.
> Prior to looking for help I was considering a rexx using the catalog
> search interface to validate the files, but I would prefer a more
> standard approach if I could find one.
> Regards
> Jack
>
> On Sat, Jul 23, 2022, 01:00 Lennie Dymoke-Bradshaw <
> 032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote:
>
> > Be careful to pay attention to your configuration. If you are
> > running a sysplex with multiple Master Catalogs then you will likely
> > find data sets which are catalogued on the other system from the one
> > where you are
> running.
> >
> > Lennie Dymoke-Bradshaw
> > https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Frs
> > clweb.com%2Fdata=05%7C01%7Callan.staller%40HCL.COM%7C9a99e58bc0
> > a54b02225708da6d4a9185%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C
> > 637942464302060573%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQI
> > joiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7Csdata=
> > CsY%2BoPzHJhlKJk1aPeOoEPhC%2BhiTDwNb5HbARlp81g0%3Dreserved=0
> > 'Dance like no one is watching. Encrypt like everyone is.'
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of Gibney, Dave
> > Sent: 23 July 2022 00:24
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Finding uncatalogued datasets
> >
> > SMS shouldn't have uncataloged datasets. In reality, there are ways...
> > All of which should be considered an error.
> >
> > Of course, in my opinion. Most, if not all, uncataloged datasets are
> > likely in error. And the reason(s) for looking for them is to
> > correct these errors.
> >
> > So, I wouldn't exclude my SMS volumes from such a search.
> >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List  On
> > > Behalf Of Mike Schwab
> > > Sent: Friday, July 22, 2022 4:08 PM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: Finding uncatalogued datasets
> > >
> > >
> > >
> > > SMS storage groups can't have uncataloged data sets, so you can
> > > eliminate those volumes.
> > >
> > > On Fri, Jul 22, 2022 at 9:01 AM Jack Zukt  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
> > > > 

Re: Finding uncatalogued datasets

[Jack Zukt]

Hi all,
Thank you all for all of your suggestions so far.
After one weekend with everything working in the background I came up with
an idea for a new approach.
I have the DCOLLECT output with all the formatted data records or the file
treated by DFSORT with only the dataset names and a few extra tidbits. Now
I also have a file that is a result of a SORT over a  LISTCAT of all the
user catalogs on the system, with all (and only) the cataloged dataset
names.
Now, can I use DFSORT with those two files as input to create a file with
only the dataset names that exist on the DCOLLECT file but do not exist on
the LISTCAT output?
Regards,
Jack


On Mon, 25 Jul 2022 at 09:23, Jack Zukt  wrote:

> Hi,
>
> Thank you for the suggestion.
> At this point in time, I only have access to IBM software
> Regards
> Jack
>
> On Mon, 25 Jul 2022 at 09:17, Alain Benvéniste 
> wrote:
>
>> If I remember well RSVP from Broadcom did that. If you have it ?
>>
>> Resiliency Services on Z Mainframe
>> alain.benveni...@kyndryl.com
>>
>> > Le 25 juil. 2022 à 10:13, Jack Zukt  a écrit :
>> >
>> > Hi,
>> > Thank you for your input. Using DFDSS like that would be an option.
>> > However, there are over eight thousand volumes in this system and that
>> > would be a lot of JOBs. I thought about submitting one JOB for each
>> Storage
>> > Group but that would mean too many DD for most of the JOBs.
>> > Regards
>> > Jack
>> >
>> >> On Sun, 24 Jul 2022 at 22:48, Nigel Morton 
>> wrote:
>> >>
>> >> This is what I'd use, shown for a single volume:
>> >>
>> >> //UNCAT EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
>> >> //SYSPRINT DD SYSOUT=*
>> >> //SYSINDD *
>> >> COPY -
>> >>   DATASET( INCLUDE (**)) -
>> >>   LOGINDYNAM(volser) -
>> >>   BY (CATLG,EQ,NO) -
>> >>   DELETE
>> >> /*
>> >> The parm setting lets you see what it would do if you unleash it.  One
>> >> tool, standard, no need for own code.
>> >>
>> >> DCOLLECT won't cut it because it doesn't look at catalogs.
>> >>
>> >> On Sun, 24 Jul 2022 at 22:24, John McKown <
>> john.archie.mck...@gmail.com>
>> >> wrote:
>> >>
>> >>> Sorry, I should have double checked. It's been years since I've had
>> to do
>> >>> it. And it's Sunday. Yes COPY DELETE is correct.
>> >>>
>> >>> On Sun, Jul 24, 2022 at 4:18 PM David Spiegel <
>> dspiegel...@hotmail.com>
>> >>> wrote:
>> >>>
>>  Hi John,
>>  "...ADRDSSU MOVE..." There is no such verb.
>>  Maybe you mean COPY ... DELETE?
>> 
>>  Regards,
>>  David
>> 
>>  On 2022-07-24 17:03, John McKown wrote:
>> > ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the
>> >>> to a
>> > sequential dataset, or just DD DUMMY. It doesn't care what the DSN
>> >> is,
>>  even
>> > if it has abnormal byte values in the name.
>> >
>> > On Sat, Jul 23, 2022, 14:29 David Staudacher <
>> dlstaudac...@gmail.com
>> >>>
>>  wrote:
>> >
>> >> Jack Zukt wrote: "I would prefer a more standard approach if I
>> could
>>  find
>> >> one".
>> >>
>> >> What you need is something that can dig out all the DSCBs from
>> every
>>  VTOC
>> >> of every online DASD device and sum these into a Data Set list.
>> >> I happen to have an Assembler program which does just that, if
>> you'd
>>  like
>> >> to try it out.
>> >> Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN
>> >> or
>> >> SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
>> >> Use a Catalog Search to find uncataloged data sets is of course
>> >>> useless
>> >> for obvious reasons.
>> >> My program outputs a record for each DSCB. These are then summed to
>>  create
>> >> a report listing every Data Set on every online DASD device.
>> >> The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks,
>> >> %
>> >> Used, # of Extents, Create Date and Date Last Referenced.
>> >> It rivals DCOLLECT in what it can do but requires no special
>> >> Authorization.
>> >> A recent enhancement to calculate space utilization for PDSEs
>> slowed
>> >>> it
>> >> down quite a bit, but otherwise it's *very* fast.
>> >> The report is also handy for contractors who want to quickly learn
>> >> the
>> >> "filescape" of any new site to which they're assigned.
>> >> Next enhancement I have in mind is to calculate total *available*
>> >> DASD
>> >> space, which *could* be very easy (or not). Just haven't gotten
>> >> around
>>  to
>> >> figuring it out yet.
>> >> Let me know if you'd like a copy of the source I have so far, and
>> >> JCL
>> >>> to
>> >> run it, and I'll send it to you.
>> >> So far, it's worked everywhere it's been tried.
>> >> If there are any cases where it *doesn't* work, that would be nice
>> >> to
>>  know
>> >> too.
>> >> David Staudacher
>> >> LinkedIn Mainframe Groups Manager
>> >> => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋,
>> >>> 퐞퐭퐜)
>> >> 퐄퐱퐩퐞퐫퐭퐬
>> >> => 

Re: Finding uncatalogued datasets

[Jack Zukt]

Hi,

Thank you for the suggestion.
At this point in time, I only have access to IBM software
Regards
Jack

On Mon, 25 Jul 2022 at 09:17, Alain Benvéniste  wrote:

> If I remember well RSVP from Broadcom did that. If you have it ?
>
> Resiliency Services on Z Mainframe
> alain.benveni...@kyndryl.com
>
> > Le 25 juil. 2022 à 10:13, Jack Zukt  a écrit :
> >
> > Hi,
> > Thank you for your input. Using DFDSS like that would be an option.
> > However, there are over eight thousand volumes in this system and that
> > would be a lot of JOBs. I thought about submitting one JOB for each
> Storage
> > Group but that would mean too many DD for most of the JOBs.
> > Regards
> > Jack
> >
> >> On Sun, 24 Jul 2022 at 22:48, Nigel Morton 
> wrote:
> >>
> >> This is what I'd use, shown for a single volume:
> >>
> >> //UNCAT EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
> >> //SYSPRINT DD SYSOUT=*
> >> //SYSINDD *
> >> COPY -
> >>   DATASET( INCLUDE (**)) -
> >>   LOGINDYNAM(volser) -
> >>   BY (CATLG,EQ,NO) -
> >>   DELETE
> >> /*
> >> The parm setting lets you see what it would do if you unleash it.  One
> >> tool, standard, no need for own code.
> >>
> >> DCOLLECT won't cut it because it doesn't look at catalogs.
> >>
> >> On Sun, 24 Jul 2022 at 22:24, John McKown  >
> >> wrote:
> >>
> >>> Sorry, I should have double checked. It's been years since I've had to
> do
> >>> it. And it's Sunday. Yes COPY DELETE is correct.
> >>>
> >>> On Sun, Jul 24, 2022 at 4:18 PM David Spiegel  >
> >>> wrote:
> >>>
>  Hi John,
>  "...ADRDSSU MOVE..." There is no such verb.
>  Maybe you mean COPY ... DELETE?
> 
>  Regards,
>  David
> 
>  On 2022-07-24 17:03, John McKown wrote:
> > ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the
> >>> to a
> > sequential dataset, or just DD DUMMY. It doesn't care what the DSN
> >> is,
>  even
> > if it has abnormal byte values in the name.
> >
> > On Sat, Jul 23, 2022, 14:29 David Staudacher  >>>
>  wrote:
> >
> >> Jack Zukt wrote: "I would prefer a more standard approach if I could
>  find
> >> one".
> >>
> >> What you need is something that can dig out all the DSCBs from every
>  VTOC
> >> of every online DASD device and sum these into a Data Set list.
> >> I happen to have an Assembler program which does just that, if you'd
>  like
> >> to try it out.
> >> Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN
> >> or
> >> SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
> >> Use a Catalog Search to find uncataloged data sets is of course
> >>> useless
> >> for obvious reasons.
> >> My program outputs a record for each DSCB. These are then summed to
>  create
> >> a report listing every Data Set on every online DASD device.
> >> The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks,
> >> %
> >> Used, # of Extents, Create Date and Date Last Referenced.
> >> It rivals DCOLLECT in what it can do but requires no special
> >> Authorization.
> >> A recent enhancement to calculate space utilization for PDSEs slowed
> >>> it
> >> down quite a bit, but otherwise it's *very* fast.
> >> The report is also handy for contractors who want to quickly learn
> >> the
> >> "filescape" of any new site to which they're assigned.
> >> Next enhancement I have in mind is to calculate total *available*
> >> DASD
> >> space, which *could* be very easy (or not). Just haven't gotten
> >> around
>  to
> >> figuring it out yet.
> >> Let me know if you'd like a copy of the source I have so far, and
> >> JCL
> >>> to
> >> run it, and I'll send it to you.
> >> So far, it's worked everywhere it's been tried.
> >> If there are any cases where it *doesn't* work, that would be nice
> >> to
>  know
> >> too.
> >> David Staudacher
> >> LinkedIn Mainframe Groups Manager
> >> => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋,
> >>> 퐞퐭퐜)
> >> 퐄퐱퐩퐞퐫퐭퐬
> >> => linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬
>  퐚퐧퐝
> >> 퐒퐞퐫퐯퐢퐜퐞퐬
> >> => linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
> >> 퐂퐚퐫퐞퐞퐫퐬
> >> => linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞
> >> 퐀퐬퐬퐞퐦퐛퐥퐞퐫
> >> 퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
> >> => linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
> >> => linkedin.com/groups/2085030 퐳/퐕퐒퐄
> >>
> >>
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to lists...@listserv.ua.edu with the message: INFO
> >>> IBM-MAIN
> >>
> >
> >> --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO
> >> IBM-MAIN
> 
>  --
> 

Re: Finding uncatalogued datasets

[Alain Benvéniste]

If I remember well RSVP from Broadcom did that. If you have it ?

Resiliency Services on Z Mainframe
alain.benveni...@kyndryl.com 

> Le 25 juil. 2022 à 10:13, Jack Zukt  a écrit :
> 
> Hi,
> Thank you for your input. Using DFDSS like that would be an option.
> However, there are over eight thousand volumes in this system and that
> would be a lot of JOBs. I thought about submitting one JOB for each Storage
> Group but that would mean too many DD for most of the JOBs.
> Regards
> Jack
> 
>> On Sun, 24 Jul 2022 at 22:48, Nigel Morton  wrote:
>> 
>> This is what I'd use, shown for a single volume:
>> 
>> //UNCAT EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
>> //SYSPRINT DD SYSOUT=*
>> //SYSINDD *
>> COPY -
>>   DATASET( INCLUDE (**)) -
>>   LOGINDYNAM(volser) -
>>   BY (CATLG,EQ,NO) -
>>   DELETE
>> /*
>> The parm setting lets you see what it would do if you unleash it.  One
>> tool, standard, no need for own code.
>> 
>> DCOLLECT won't cut it because it doesn't look at catalogs.
>> 
>> On Sun, 24 Jul 2022 at 22:24, John McKown 
>> wrote:
>> 
>>> Sorry, I should have double checked. It's been years since I've had to do
>>> it. And it's Sunday. Yes COPY DELETE is correct.
>>> 
>>> On Sun, Jul 24, 2022 at 4:18 PM David Spiegel 
>>> wrote:
>>> 
 Hi John,
 "...ADRDSSU MOVE..." There is no such verb.
 Maybe you mean COPY ... DELETE?
 
 Regards,
 David
 
 On 2022-07-24 17:03, John McKown wrote:
> ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the
>>> to a
> sequential dataset, or just DD DUMMY. It doesn't care what the DSN
>> is,
 even
> if it has abnormal byte values in the name.
> 
> On Sat, Jul 23, 2022, 14:29 David Staudacher >> 
 wrote:
> 
>> Jack Zukt wrote: "I would prefer a more standard approach if I could
 find
>> one".
>> 
>> What you need is something that can dig out all the DSCBs from every
 VTOC
>> of every online DASD device and sum these into a Data Set list.
>> I happen to have an Assembler program which does just that, if you'd
 like
>> to try it out.
>> Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN
>> or
>> SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
>> Use a Catalog Search to find uncataloged data sets is of course
>>> useless
>> for obvious reasons.
>> My program outputs a record for each DSCB. These are then summed to
 create
>> a report listing every Data Set on every online DASD device.
>> The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks,
>> %
>> Used, # of Extents, Create Date and Date Last Referenced.
>> It rivals DCOLLECT in what it can do but requires no special
>> Authorization.
>> A recent enhancement to calculate space utilization for PDSEs slowed
>>> it
>> down quite a bit, but otherwise it's *very* fast.
>> The report is also handy for contractors who want to quickly learn
>> the
>> "filescape" of any new site to which they're assigned.
>> Next enhancement I have in mind is to calculate total *available*
>> DASD
>> space, which *could* be very easy (or not). Just haven't gotten
>> around
 to
>> figuring it out yet.
>> Let me know if you'd like a copy of the source I have so far, and
>> JCL
>>> to
>> run it, and I'll send it to you.
>> So far, it's worked everywhere it's been tried.
>> If there are any cases where it *doesn't* work, that would be nice
>> to
 know
>> too.
>> David Staudacher
>> LinkedIn Mainframe Groups Manager
>> => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋,
>>> 퐞퐭퐜)
>> 퐄퐱퐩퐞퐫퐭퐬
>> => linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬
 퐚퐧퐝
>> 퐒퐞퐫퐯퐢퐜퐞퐬
>> => linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
>> 퐂퐚퐫퐞퐞퐫퐬
>> => linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞
>> 퐀퐬퐬퐞퐦퐛퐥퐞퐫
>> 퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
>> => linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
>> => linkedin.com/groups/2085030 퐳/퐕퐒퐄
>> 
>> 
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO
>>> IBM-MAIN
>> 
> 
>> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO
>> IBM-MAIN
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 
>>> 
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>> 
>> 
>> 

Re: Finding uncatalogued datasets

[Jack Zukt]

Hi,
Thank you for your input. Using DFDSS like that would be an option.
However, there are over eight thousand volumes in this system and that
would be a lot of JOBs. I thought about submitting one JOB for each Storage
Group but that would mean too many DD for most of the JOBs.
Regards
Jack

On Sun, 24 Jul 2022 at 22:48, Nigel Morton  wrote:

> This is what I'd use, shown for a single volume:
>
> //UNCAT EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
> //SYSPRINT DD SYSOUT=*
> //SYSINDD *
> COPY -
>DATASET( INCLUDE (**)) -
>LOGINDYNAM(volser) -
>BY (CATLG,EQ,NO) -
>DELETE
> /*
>  The parm setting lets you see what it would do if you unleash it.  One
> tool, standard, no need for own code.
>
> DCOLLECT won't cut it because it doesn't look at catalogs.
>
> On Sun, 24 Jul 2022 at 22:24, John McKown 
> wrote:
>
> > Sorry, I should have double checked. It's been years since I've had to do
> > it. And it's Sunday. Yes COPY DELETE is correct.
> >
> > On Sun, Jul 24, 2022 at 4:18 PM David Spiegel 
> > wrote:
> >
> > > Hi John,
> > > "...ADRDSSU MOVE..." There is no such verb.
> > > Maybe you mean COPY ... DELETE?
> > >
> > > Regards,
> > > David
> > >
> > > On 2022-07-24 17:03, John McKown wrote:
> > > > ADRDSSU MOVE can scan volumes for uncatalogued datasets and MOVE the
> > to a
> > > > sequential dataset, or just DD DUMMY. It doesn't care what the DSN
> is,
> > > even
> > > > if it has abnormal byte values in the name.
> > > >
> > > > On Sat, Jul 23, 2022, 14:29 David Staudacher  >
> > > wrote:
> > > >
> > > >> Jack Zukt wrote: "I would prefer a more standard approach if I could
> > > find
> > > >> one".
> > > >>
> > > >> What you need is something that can dig out all the DSCBs from every
> > > VTOC
> > > >> of every online DASD device and sum these into a Data Set list.
> > > >> I happen to have an Assembler program which does just that, if you'd
> > > like
> > > >> to try it out.
> > > >> Assuming you have the required MACLIBs (SYS1.MACLIB and SYS1.MODGEN
> or
> > > >> SYS1.AMODGEN) it's very easy to Assemble and run it yourself.
> > > >> Use a Catalog Search to find uncataloged data sets is of course
> > useless
> > > >> for obvious reasons.
> > > >> My program outputs a record for each DSCB. These are then summed to
> > > create
> > > >> a report listing every Data Set on every online DASD device.
> > > >> The report gives VOLSER, DSORG, RECFM, LRECL, BLKSIZE, # of Tracks,
> %
> > > >> Used, # of Extents, Create Date and Date Last Referenced.
> > > >> It rivals DCOLLECT in what it can do but requires no special
> > > >> Authorization.
> > > >> A recent enhancement to calculate space utilization for PDSEs slowed
> > it
> > > >> down quite a bit, but otherwise it's *very* fast.
> > > >> The report is also handy for contractors who want to quickly learn
> the
> > > >> "filescape" of any new site to which they're assigned.
> > > >> Next enhancement I have in mind is to calculate total *available*
> DASD
> > > >> space, which *could* be very easy (or not). Just haven't gotten
> around
> > > to
> > > >> figuring it out yet.
> > > >> Let me know if you'd like a copy of the source I have so far, and
> JCL
> > to
> > > >> run it, and I'll send it to you.
> > > >> So far, it's worked everywhere it's been tried.
> > > >> If there are any cases where it *doesn't* work, that would be nice
> to
> > > know
> > > >> too.
> > > >> David Staudacher
> > > >> LinkedIn Mainframe Groups Manager
> > > >> => linkedin.com/groups/910927   퐌퐚퐢퐧퐟퐫퐚퐦퐞 (퐂퐎퐁퐎퐋,
> > 퐞퐭퐜)
> > > >> 퐄퐱퐩퐞퐫퐭퐬
> > > >> => linkedin.com/groups/2915689 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐏퐫퐨퐝퐮퐜퐭퐬
> > > 퐚퐧퐝
> > > >> 퐒퐞퐫퐯퐢퐜퐞퐬
> > > >> => linkedin.com/groups/12307358 퐌퐚퐢퐧퐟퐫퐚퐦퐞 퐉퐨퐛퐬 /
> > > >> 퐂퐚퐫퐞퐞퐫퐬
> > > >> => linkedin.com/groups/8979270 퐌퐚퐢퐧퐟퐫퐚퐦퐞
> 퐀퐬퐬퐞퐦퐛퐥퐞퐫
> > > >> 퐃퐞퐯퐞퐥퐨퐩퐞퐫퐬
> > > >> => linkedin.com/groups/155723   퐒퐲퐬퐭퐞퐦 퐳 퐀퐝퐯퐨퐜퐚퐭퐞퐬
> > > >> => linkedin.com/groups/2085030 퐳/퐕퐒퐄
> > > >>
> > > >>
> --
> > > >> For IBM-MAIN subscribe / signoff / archive access instructions,
> > > >> send email to lists...@listserv.ua.edu with the message: INFO
> > IBM-MAIN
> > > >>
> > > >
> --
> > > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to 

Re: OS DITTO MLC Cost

[Peter Van Dyke]

Hi David,
Sorry, I don't know the MLC for DITTO. However, in case you and others are
not aware, IBM File Manager was developed on top of DITTO and includes most
of the functions provided by DITTO. So if you have File Manager you may not
need to continue paying for DITTO.

Regards,
Peter Van Dyke
HCL Software


On Mon, 25 Jul 2022 at 14:05,wrote:

> Anyone know the MLC Cost for OS DITTO?  Last I heard is that it is very
> expensive and probably not needed at most sites.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

OS DITTO MLC Cost

Anyone know the MLC Cost for OS DITTO?  Last I heard is that it is very
expensive and probably not needed at most sites.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN