Identifying all archived datasets on one or more Disk archive volumes
search cancel

Identifying all archived datasets on one or more Disk archive volumes

book

Article ID: 452493

calendar_today

Updated On:

Products

Disk Backup and Restore - MVS

Issue/Introduction

Trying to recall some archived datasets. The LISTD shows a copy of one and points to a tape volume and that it was archived. CA-1 however shows another job wrote to that tape. 

Resolution

1.Run LISTV and verify the second most significant bit (Second from left) in the first flag byte:

Please refer to Tech Doc for LISTV Flags:-

//LIST EXEC LISTD 
//SYSIN DD *      
LISTV VOLUME=(VOL1,VOL2,VOL3)        

2. Find the Primary Volume of the Copy volumes. The LISTV output only includes the downward chain, so the primary key must be found manually. Run LISTV as below         
 
//LIST EXEC LISTD 
//SYSIN DD *      
LISTV

In LISTV report, find the 12 copy volumes in 'Copy Key' column. Note down the Primary Archive Key and data set name.

3. Disable all corrupted Volumes from your list using IXUPDATE.

//IXUPDATE EXEC IXUPDATE
//SYSIN DD *            
RESET KEY=KEY1,DISABLE
RESET KEY=KEY2,DISABLE
RESET KEY=KEY3,DISABLE

4. Run MERGE to create new Primary and Copy volume. 

a) Add the following to the SYSPARMS DD in MERGE.
   RESCOPYTY & RESCOPYSP will result in Using Copy volumes if Primary is Disabled and vice versa; 
   UNCATARCN will bypass CA-DISK from taking any action on the Archvol Tape and removes the entry from FDS, i.e., DISK will no longer be aware of the Tape.

//MERGE.SYSPARMS DD *
SYSPARMSB            
RESCOPYTY             
RESCOPYSP            
UNCATARCN       

b) Verify your Merge is creating Copy volumes. In your Sysparms, MERC1NAM should have valid base name , MERC1TYP should specify one of the following TAPE, 3480, DISK, DYN1 through DY20

Refer to the Tech Doc MERCnNAMnnnnnnnnnnnnnnnnnnnnnn:

c) Use Primary Archvol name found in #2 in TDSNAMES=, Run MERGE in SIMULATE and verify the results:

//MERGE EXEC MERGE                                        
//MERGE.SYSIN DD  *                                       
MERGE TDSN=(HLQ1.HLQ2.HLQ3.DMSC.S2026226.T155651,         
            HLQ1.HLQ2.HLQ3.DMSC.S2026226.T155658),SIMULATE
//MERGE.SYSPARMS DD *                                     
SMSMCBYPY                                                 
SYSPARMSB                                                 
RESCOPYTY                                                 
RESCOPYSP                                                 
UNCATARCN  


Note: TDSN accepts up to 20 names or patterns. Including all TDSN consolidates all unexpired backups into one (or more) Archvols. 

d) If the Results look correct, remove SIMULATE from #4.c and rerun MERGE.

Additional Information

References :
https://techdocs.broadcom.com/us/en/ca-mainframe-software/performance-and-storage/ca-disk-backup-and-restore/14-0/systems/sysparms/system-parameter-definitions/r.html#rescopysn
https://techdocs.broadcom.com/us/en/ca-mainframe-software/performance-and-storage/ca-disk-backup-and-restore/14-0/systems/sysparms/system-parameter-definitions/r.html#rescopytn
https://techdocs.broadcom.com/us/en/ca-mainframe-software/performance-and-storage/ca-disk-backup-and-restore/14-0/systems/sysparms/system-parameter-definitions/u.html#uncatarcn