If you have File Manager, there is a VTOC utility
File Manager Display VTOC Data Set List
Row 00137 of 00219
Command ===>
Scroll CSR
Unit * DSN '**'
DevType * VOLSTATE ALL SMS SG *
Volumes 1 Data sets 105 VSAM 12 non-VSAM 93
VOLSER CAT500 Trks used 23191 Free 127064 Utilized 15%
Data Set Name Seq Volume Begin CYL-HD
End CYL-HD Tracks Dsorg Recfm Lrecl Blksize Created
** CAT500 * *
* * *
SYS1.APPCTP.DATA 1 CAT500 1248 0
1249 8 24 VS U 0 4096 2003.065
SYS1.APPCTP.INDEX 1 CAT500 1238 1
1238 1 1 VS U 0 4096 2003.065
SYS1.DFSMS.ACDS.DATA 1 CAT500 321 0
325 14 75 VS U 0 4096 2002.355
SYS1.DFSMS.COMMDS.DATA 1 CAT500 326 0
330 14 75 VS U 0 4096 2002.355
SYS1.DFSMS.SCDS.DATA 1 CAT500 1129 0
1133 14 75 VS U 0 4096 2002.355
SYS1.EQQ.TWS1.CKPT 1 CAT500 131 0
131 14 15 PS U 8200 8200 2003.223
SYS1.EQQ.TWS1.EQQAUDIT.REPORT 1 CAT500 130 0
130 14 15 PS FBA 133 13300 2003.223
SYS1.EQQ.TWS1.TRACKLOG 1 CAT500 129 0
129 14 15 PS VB 32756 32760 2003.223
SYS1.IPLPARM 1 CAT500 552 0
561 14 150 PO FB 80 6160 2004.014
SYS1.PAGEDUMP.VCAT500 1 CAT500 38 0
44 1 92 PS F 4096 4096 2020.022
SYS1.PARMLIB 1 CAT500 733 2
749 7 246 PO FB 80 27920 2004.029
SYS1.PARMLIB 2 CAT500 187 0
188 14 30 PO FB 80 27920 2004.029
SYS1.PARMLIB 3 CAT500 189 0
190 14 30 PO FB 80 27920 2004.029
SYS1.PARMLIB 4 CAT500 210 6
212 5 30 PO FB 80 27920 2004.029
SYS1.PARMLIB 5 CAT500 215 0
216 14 30 PO FB 80 27920 2004.029
SYS1.PARMLIB 6 CAT500 217 0
218 14 30 PO FB 80 27920 2004.029
SYS1.PARMLIB 7 CAT500 119 12
121 11 30 PO FB 80 27920 2004.029
_____________________________________________________________________________________________________
Dave Jousma
AVP | Manager, Systems Engineering
Fifth Third Bank | 1830 East Paris Ave, SE | MD RSCB2H | Grand Rapids, MI
49546
616.653.8429 | fax: 616.653.2717
-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
Carmen Vitullo
Sent: Thursday, June 18, 2020 9:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: dfdss equivalent to fdr map
**CAUTION EXTERNAL EMAIL**
**DO NOT open attachments or click on links from unknown senders or unexpected
emails**
forget the PARM=PARM
will get you (a mess in email) but readable in your SYSOUT
8C
4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 *SYS1.NUCLEUS *
STH STH STH STH STH STH STH STH STH STH * *
F1E2 E8E2 D9E2 E900 0177 0056 0000 0001 0000 0000 * 1SYS*
MVO MVCIN MVCK PKA *RSZ.............*
0087 0000 0000 0200 C000 7FF8 0000 0000 0080 8800 *................*
LARL SU SRL *......"8........*
8E00 000F E000 0A00 0000 0000 0000 0000 0000 0000 *...M.%-.........*
SRDA SVC *................*
*............ *
8C
4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 *APK.SAPKMOD1 *
STH STH STH STH STH STH STH STH STH STH * *
F1E2 E8E2 D9E2 E900 0177 0056 0000 0001 0000 0000 * 1SYS*
MVO MVCIN MVCK PKA *RSZ.............*
0087 0000 0000 0200 C000 7FF8 0000 0000 0080 8000 *................*
LARL SU SSM *......"8........*
E000 0B0F E800 0400 0000 0000 0000 0000 0000 0000 *................*
BSM MVCIN SPM *Y...............*
*............ *
Carmen Vitullo
----- Original Message -----
From: "Carmen Vitullo" <cvitu...@hughes.net>
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Thursday, June 18, 2020 8:53:04 AM
Subject: Re: dfdss equivalent to fdr map
this may help
quick and dirty
JCL to dump the VTOC on a DASD volume:
//CC10 EXEC PGM=AMASPZAP,
// PARM=parm
//SYSPRINT DD SYSOUT=*
//SYSLIB DD DSN=FORMAT4.DSCB,DISP=OLD,UNIT=3390,
// VOL=SER=mypack,DCB=KEYLEN=44
//SYSIN DD *
ABSDUMPT ALL
Carmen Vitullo
----- Original Message -----
From: "Carmen Vitullo" <cvitu...@hughes.net>
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Thursday, June 18, 2020 8:48:14 AM
Subject: Re: dfdss equivalent to fdr map
ZAP ?
AMASPZAP I may have some jcl let me look
Carmen Vitullo
----- Original Message -----
From: "Brian France" <b...@psu.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Thursday, June 18, 2020 8:45:19 AM
Subject: Re: dfdss equivalent to fdr map
That's what we're looking for and DFDSS does not seem to have the
equivalent....
On 6/18/2020 9:42 AM, Vernooij, Kees (ITOP NM) - KLM wrote:
> FDR MAP produces a physical map of the volume, with from-to CCHHR for each
> dataset and their extents.
>
> Kees
>
>
> -----Original Message-----
> From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
> John McKown
> Sent: 18 June 2020 15:36
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: dfdss equivalent to fdr map
>
> On Thu, Jun 18, 2020 at 7:53 AM Brian France <b...@psu.edu> 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!!!
>>
> I don't know what an FDR MAP does. but if you need to know what datasets
> are on a DFDSS dump tape, then run a RESTORE with PARM='TYPRUN=NORUN'
>
> Something like:
>
> //JS010 EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN',
> // REGION=0M
> //SYSPRINT DD SYSOUT=*
> //TAPE1 DD DSN=JES2DISK.ADRDSSU,
> // DISP=OLD
> //SYSIN DD *
> RESTORE -
> DATASET( -
> INCL( -
> ** -
> ) -
> ) -
> IDD(TAPE1) -
> ADMINISTRATOR -
> TOL(ENQF) WAIT(0,0)
>
>
>
>
>> --
>> 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
>>
>
--
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
----------------------------------------------------------------------
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
**CAUTION EXTERNAL EMAIL**
**DO NOT open attachments or click on links from unknown senders or unexpected
emails**
This e-mail transmission contains information that is confidential and may be
privileged. It is intended only for the addressee(s) named above. If you
receive this e-mail in error, please do not read, copy or disseminate it in any
manner. If you are not the intended recipient, any disclosure, copying,
distribution or use of the contents of this information is prohibited. Please
reply to the message immediately by informing the sender that the message was
misdirected. After replying, please erase it from your computer system. Your
assistance in correcting this error is appreciated.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
