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: http://www.mzelden.com/mvsutil.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to