If you are only interested in which datasets are on which volumes, then DCOLLECT would surely do the job.
On Mon, 22 Jun 2020 at 15:45, Brian France <b...@psu.edu> wrote: > 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 > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
