Archive Restore Examples

All examples in this section are found in the JCL library installed with FDR. The member names are EX5122x.

Restore a data set group example

Restore a group of data sets with the high-level index of “USERxx”. The most recent copy of each such data set recorded in the standard Archive Control File is restored. DYNTAPE is used to allocate the backup tape or DASD. The data sets are restored to their original volumes; if any cannot be allocated on that volume, the ABR RESTORE ALLOCATION LIST, if enabled, is used to choose alternate volumes.

//RESTORE EXEC PGM=FDRABR,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSIN DD * RESTORE TYPE=ARC,DYNARC,DYNTAPE SELECT DSN=USER%%.** /*

Restore selected data sets example

Specified data sets are to be restored from Archive Backup. The operator is notified of the tape volumes required before a restore is attempted on each tape. All data sets with a group name of “MARK1.” are restored. In addition, data set “OLDFILE”, which was archived on 99.350 from DASD volume SYS002, is restored to data set “NEWFILE” on DASD volume SCR011. The third oldest archive version of data set “MYFILE” is restored to volume SYS001.

Although DYNTAPE is the preferred way of allocating the backup files to be read, this example uses the alternate method of providing a TAPEx DD Statement. It must allocate a device capable of mounting and reading all of the required backups (3480, 3490E, 3590, 9840, 3380, 3390). In this example, all of the archive backups are on 3590 cartridges, so a TAPE1 DD statement is provided pointing to a 3590 drive.

//RESTORE EXEC PGM=FDRABR,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //ARCHIVE DD DSN=FDRABR.ARCHIVE,DISP=SHR //TAPE1 DD DSN=FDRREST,VOL=SER=FDRVOL, // UNIT=(3590-1,,DEFER),DISP=(OLD,KEEP) //SYSIN DD * RESTORE TYPE=ARC,OPERATOR SELECT DSN=MARK1.** SELECT DSN=OLDFILE,VOL=SYS002,ADATE=99350, NEWN=NEWFILE,NVOL=SCR011 SELECT DSN=MYFILE,NVOL=SYS001,OLDBACKUP=2 /*

Remote queue restore example

A job similar to the following should be run several times a day if the ABR Archive restore remote queue data set is used. It processes any queued requests and empties the queue so that more requests can be added. The frequency of this job must be decided by the installation, based on how long users are willing to wait for their restore request to be completed (for example, 1 hour, 4 hours).

//REMOTEA EXEC PGM=FDRABR,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //ARCHIVE DD DSN=FDRABR.ARCHIVE,DISP=SHR //ABRARCH DD DSN=FDRABR.ABRARCH.USER,DISP=SHR //SYSIN DD * RESTORE TYPE=ARC,DYNTAPE /*

Restore by archive date example

Restore all of the data sets archived on the date 2020.123 from a 3390 volume named “PRODUC” to a new volume V33901. All but 10% of the unused space within PS and PO data sets is released. All data sets are recataloged to the new volume.

//UNLIKE EXEC PGM=FDRABR,REGION=0M //SYSPRINT DD SYSOUT=* //SYSPRIN1 DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSIN DD * RESTORE TYPE=ARC,%FREE=10,DYNTAPE,DYNARC,RECAT,VRECAT SELECT ALLDSN,NVOL=V33901,ADATE=20123,VOL=PRODUC /*