Verifying CA Tape Encryption › Dump Tape and File Labels › Sample JCL to Dump Tape and File Labels

Sample JCL to Dump Tape and File Labels

//*                                                               
//HEADER1  EXEC PGM=IDCAMS,REGION=4096K       
//SYSUT1   DD  DISP=OLD,DSN=BLP.HEADERS,      
//         RECFM=FB,LRECL=80,BLKSIZE=80,      
//         LABEL=(1,BLP,EXPDT=98000),         
//         UNIT=uuuuuuuu,VOL=(,RETAIN,SER=vvvvvv)  
//SYSPRINT DD   SYSOUT=*                      
//SYSIN    DD   *                             
  PRINT INFILE(SYSUT1)                        
/*                                            
//*                                           
//FILE1    EXEC PGM=IDCAMS,REGION=4096K       
//SYSUT1   DD  DISP=OLD,DSN=BLP.FILE1,        
//         RECFM=U,BLKSIZE=32760,                              
//         LABEL=(2,BLP,EXPDT=98000),UNIT=uuuuuuuu,
//         VOL=(,RETAIN,SER=vvvvvv)
//SYSPRINT DD   SYSOUT=*                                       
//SYSIN    DD   *                                              
  PRINT INFILE(SYSUT1) COUNT(nnn)                              
/*                                                             
//*                                                            
//TRAILER1 EXEC PGM=IDCAMS,REGION=4096K                        
//SYSUT1   DD  DISP=OLD,DSN=BLP.TRAILERS,                      
//         RECFM=FB,LRECL=80,BLKSIZE=80,                       
//         LABEL=(3,BLP,EXPDT=98000),UNIT=uuuuuuuu,
//         VOL=(,RETAIN,SER=vvvvvv)
//SYSPRINT DD   SYSOUT=*                                       
//SYSIN    DD   *                                              
  PRINT INFILE(SYSUT1)                                         
/*                                                             
//     

This JCL is provided in the CTAPJCL data set member BESPRTTP.

To dump tape and file labels

1. Replace uuuuuuuu with a valid unit address or generic unit name in use at your site.
2. Replace vvvvvv with the volser of the tape containing the encrypted file specified in HEADER1 in the first step of the sample JCL.

Note: You can use the COUNT parameter to control the number of data blocks printed in dump format. To do this, change nnn to an appropriate numeric value to limit excessive print output.