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
