Are you looking for the names of the datasets on the 3990 volumes that are being backed up? If you're taking 'volume level' backups with (for instance) ADRDSSU, the contents of the entire volume will be put into one output DUMP dataset and only the name of that full volume DUMP dataset will be in the tape label.
If you are looking for the dataset names on each 3390 volume being backed up, consider running an IDCAMS 'DCOLLECT' on those 3390 volumes immediately prior to the volume-level backups. Are you backing up the entire shop? Depending on the size of your shop, a DSCOLLECT might take 20-30 minutes to complete with a SYSIN control card along the lines of: DCOLLECT OUTFILE(DCOUT) VOLUMES(*) EXCLUDEVOLUMES(XX* FC* F2* Z1*) Perhaps keep the DCOLLECT output in a GDG with a LIMIT that matches the numer of backup tapes for each 3390 volume that you keep. -----Original Message----- From: IBM Mainframe Discussion List <[email protected]> On Behalf Of Mark Zelden Sent: Monday, March 20, 2023 10:05 AM To: [email protected] Subject: Re: DLM Tape reading CAUTION: This email originated from outside of the Texas Comptroller's email system. DO NOT click links or open attachments unless you expect them from the sender and know the content is safe. On Mon, 20 Mar 2023 17:10:20 +0400, Jake Anderson <[email protected]> wrote: >Hello > >I would like to understand how DLM users are able to read the contents >of the virtual tape and the print the dataset with in each label of it ? > >We are taking volume level backup to the virtual tape and is it >possible to list a particular tape dataset to see it's content? > >Regards >Jake I'm not sure I understand the question. Are you thinking there are stacked virtual volumes like Oracle/STK VSM? The virtual tapes are just like physical tapes and you can print them any number of utilities. Or are you asking from a DLm perspective? If so, research the "awsprint" command from DLm. It just asking about from z/OS, again... lots of utilities. From ISV (FATS/FATAR) to IBM DITTO, to IEBGENER to "print" the contents. If just interested in labels, I haven't used this PROC in probably 25 years, but here is something to just print the labels. //MPROC PROC HP=1 //PS10 EXEC PGM=IEBPTPCH //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=MZELDEN.TAPE, // DISP=(SHR,KEEP,KEEP), // UNIT=TAPE, // LABEL=(&HP,BLP,EXPDT=98000), // VOL=SER=vvvvvv, // DCB=(RECFM=F,LRECL=80,BLKSIZE=80) //SYSUT2 DD SYSOUT=* //SYSIN DD DDNAME=SYSIN1 //MPROC PEND //***************************** //* HP=1 FOR VOL1 HDR1 HDR2 * //* HP=3 FOR EOF1 EOF2 * //***************************** //JS10 EXEC PROC=MPROC,HP=1 //SYSPRINT DD SYSOUT=* //SYSIN1 DD * PRINT MAXFLDS=1 TITLE ITEM=('TAPE LABEL INFO',30) RECORD FIELD=(80,1) LABELS DATA=YES /* Best Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:[email protected] Mark's MVS Utilities: https://gcc02.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.mzelden.com%2Fmvsutil.html&data=05%7C01%7Cmichael.watkins%40CPA.TEXAS.GOV%7Cc18942d930434b8fb26808db29548e55%7C2055feba299d4d0daa5a73b8b42fef08%7C0%7C0%7C638149215366690623%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=oYfDMeAZjDdo9%2BRo8UVTwy0N2FhXhWVptjygw2YmXFw%3D&reserved=0 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
