Many thanks to all the responses!!!
David,
Thank you!!! This is exactly what we are looking for. I just
changed a sort to be "volume,a" and pretty much have the report we use
via fdr compaktor.
Someone asked did this really matter for raid... we use it to recall
data sets got deleted within the last month but are found to be needed
as we back up weekly all volumes to tape and run fdr map at that time.
We can then find the volume it's on so we know which tape to call for.
On 6/18/2020 10:13 AM, David Spiegel wrote:
Hi Brian,
Please discard all of those other weak-kneed potential solutions. This
one is the Cadillac!
Here is a JCL sample that will not only map 1 volume, but, will also
include maps of all volumes with a common prefix (think SMS Storage
Group):
//STEP001 EXEC PGM=IKJEFT01
//STEPLIB DD DISP=SHR,DSN=FILE135.PDS
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
VTOC STG0 -
CAT -
LIM(CAT NE C) -
PRINT(NEW (CAT ALLOC UNUSED PCT EX DSO RFM LRECL BLKSZ CDATE REFDT -
VOLUME DSNAME))
//STEP002 EXEC PGM=IKJEFT01
//STEPLIB DD DISP=SHR,DSN=FILE135.PDS
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
VTOC STG0 -
CAT -
/* LIM(CAT NE C) */ -
PRINT(NEW (CAT ALLOC UNUSED PCT EX DSO RFM LRECL BLKSZ CDATE REFDT -
VOLUME DSNAME))
//STEP003 EXEC PGM=IKJEFT01
//STEPLIB DD DISP=SHR,DSN=FILE135.PDS
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
VTOC STG0 -
CAT -
/* LIM(CAT NE C) */ -
SORT(ALLOC,D) -
PRINT(NEW (CAT ALLOC UNUSED PCT EX DSO RFM LRECL BLKSZ CDATE REFDT -
VOLUME DSNAME))
//STEP004 EXEC PGM=IKJEFT01
//STEPLIB DD DISP=SHR,DSN=FILE135.PDS
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
VTOC STG0 -
CAT -
/* LIM(CAT NE C) */ -
SORT(UNUSED,D) -
PRINT(NEW (CAT ALLOC UNUSED PCT EX DSO RFM LRECL BLKSZ CDATE REFDT -
VOLUME DSNAME))
STEP001 - Find all Datasets on all volumes whose VOLSER starts with
STG0 that are not Cataloged or are Catalog Entries with no actual Dataset
STEP002 - Find all Datasets on all volumes whose VOLSER starts with
STG0 that are Cataloged
STEP003 - Find all Datasets on all volumes whose VOLSER starts with
STG0 that are Cataloged. Print output by descending sort of Allocated
space
STEP004 - Find all Datasets on all volumes whose VOLSER starts with
STG0 that are Cataloged. Print output by descending sort of Unused space
Please also note that you can search a volume (or range of volumes)
for partial DSNAMEs, even when the partial DSNAME does not contain an
HLQ. (This may take a while and should be used with caution.)
VTOC runs in TSO interactively or batch.
Regards,
David
On 2020-06-18 09:46, Brian France wrote:
Howdy Dave,
I will have a look at it. Thanks...
On 6/18/2020 9:01 AM, David Spiegel wrote:
Hi Brian,
You may be interested in File 112 on the "CBT Tape" (cbttape.org) .
I've been using it for more than 35 years and it has many filtering
and print options.
Regards,
David
On 2020-06-18 08:53, Brian France wrote:
I can't find a dfdss equivalent to fdr's map. I see the print
command but can't seem to get a whole volume list of data sets as
we do with fdr's map. If it exists would someone please point me to
it... THANX!!!
----------------------------------------------------------------------
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
--
Brian W. France
Systems Administrator (Mainframe)
Pennsylvania State University
Penn State IT - Infrastructure/SYSARC
Rm 25 Shields Bldg., University Park, Pa. 16802
814-863-4739
b...@psu.edu
There's no such thing as The Cloud - it's just someone else's computer...
"To make an apple pie from scratch, you must first invent the universe."
Carl Sagan
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
