FDR DUMP Examples

The examples in:

illustrate usage of FDR and some of the FDR options. JOB statements are not shown. Add a JOBLIB or STEPLIB DD statement pointing to the FDR program library if FDR is not in the system link list (LNKLST).

Important

FDR

 determines the type of DASD being processed from the UCB for the DASD device, not from the UNIT= JCL parameter. Any UNIT= value that allocates the DASD volumes to be processed can be used.

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

Dump one volume example

Dump a 3390-54 DASD volume to a GDG on tape; tape management expires the backup when the generation is no longer cataloged.

//DUMP     EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//FDRSUMM  DD SYSOUT=*
//DISK1    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=123456
//TAPE1    DD UNIT=(TAPE,2),DSN=BACKUP.V123456(+1),
//            DISP=(,CATLG),EXPDT=99000
//SYSIN    DD *
 DUMP     TYPE=FDR,RTC=YES,DATA=USED
/*

Create duplicate backups example

Dump a 3390-A DASD volume to tape, making two backup copies. FDR attempts to enqueue all data sets being dumped; if the enqueue fails, a warning is issued but the data set is still backed up and the step ends normally if no other errors occur. Since the backup probably takes more than one cartridge, two tape drives are assigned via UNIT=(TAPE,2) so that the backup does not have to wait for a cartridge to be rewound and a new cartridge mounted. A volume count of 20 is provided since the backup may take more than the IBM default of five volumes.

Important

A 3390-A is an Extended Address Volume (EAV). At present, the size of EAV volumes is greater than 54GB and up to 1 TB.


//DUMP     EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISKA    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=D3390A
//TAPEA    DD DSN=BACKUP.COPY1,DISP=(,KEEP),
//            UNIT=(TAPE,2),VOL=(,,,20)
//TAPEAA   DD DSN=BACKUP.COPY2,DISP=(,KEEP),
//            UNIT=(TAPE,2),VOL=(,,,20)
//SYSIN    DD *
 DUMP     TYPE=FDR,DSNENQ=USE,ENQERR=NO,RTC=YES
/*

Dump multiple volumes serially to one tape example 1

Dump two DASD volumes sequentially to tape. Only one physical tape drive is used and the backups are piggy-backed as two consecutive files on one or more tape volumes. If your output is a high-capacity tape or VTS, this allows you to use each tape volume more efficiently, with less wasted tape. You can dump up to 39 DASD volumes, creating up to 39 tape files, in one step.

//DUMP     EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//FDRSUMM  DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISK3    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=TSO001
//TAPE3    DD UNIT=VTAPE,DSN=BACKUP.VTSO001,DISP=(,KEEP),
//            VOL=(,RETAIN),LABEL=1
//DISK7    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=TSO002
//TAPE7    DD DSN=BACKUP.VTSO002,DISP=(,KEEP),
//            VOL=REF=*.TAPE3,LABEL=2
//SYSIN    DD *
 DUMP     TYPE=FDR,DATA=USED,RTC=YES
/*

Dump multiple volumes serially to one tape example 2

If you require more than 39 backups to fill a high-capacity cartridge, you can do so with multiple steps. Note that with this JCL, the second and subsequent steps fail if the tape volume is filled and a new tape is mounted; this is an IBM restriction.

//DUMP1    EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//FDRSUMM  DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISK0    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=TSO001
//TAPE0    DD UNIT=VTAPE,DSN=BACKUP.VTSO001,DISP=(,CATLG),
//            VOL=(,RETAIN),LABEL=1
//DISK1    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=TSO002
//TAPE1    DD DSN=BACKUP.VTSO002,DISP=(,CATLG),
//            VOL=(,RETAIN,REF=*.TAPE0),LABEL=2
… 36 more TAPEx/DISKx pairs appear here
//DISK$    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=TSO039
//TAPE$    DD DSN=BACKUP.VTSO039,DISP=(,CATLG),
//            VOL=(,RETAIN,REF=*.TAPE#),LABEL=39
//SYSIN    DD * DUMP TYPE=FDR,DATA=USED,RTC=YES
/*
//DUMP2    EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//FDRSUMM  DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISK0    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=TSO040
//TAPE0    DD DSN=BACKUP.VTSO040,DISP=(,CATLG),
//            VOL=(,RETAIN,REF=*.DUMP1.TAPE$),LABEL=40
//DISK1    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=TSO041
//TAPE1    DD DSN=BACKUP.VTSO041,DISP=(,CATLG),
//            VOL=(,RETAIN,REF=*.TAPE0),LABEL=41
… additional TAPEx/DISKx pairs if required
//SYSIN    DD *
  DUMP     TYPE=FDR,DATA=USED,RTC=YES
/*


Tip

If you are licensed for FDRABR, ABR Volume Backups automatically stack backups on one or more output tape and does not require the complex JCL shown above. This automatically maximizes usage of high-capacity tapes.

Dump one volume that has zFS data sets example

Dump a 3390 DASD volume to an EMC DLM. FDR attempts to enqueue all data sets being dumped. If the enqueue fails, a warning is issued but the data set is still backed up and the step ends normally if no other errors occur. zFS data sets are quiesced if they cannot be enqueued.

//DUMP     EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISKA    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=D33909
//TAPEA    DD UNIT=DLM,DSN=BACKUP.VD33909,DISP=(,KEEP)
//SYSIN    DD *
 DUMP     TYPE=FDR,DSNENQ=USE,ENQERR=NO,ZFS=QUIESCE,RTC=YES
/*


Important

For more information, see zSeries File System (zFS).

Dump multiple volumes concurrently example

Backup three DASD volumes concurrently. For one volume (333333), a duplicate backup is created on another tape, so a total of four tape drives are required.

//DUMP     EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSPRIN1 DD SYSOUT=*
//SYSPRIN2 DD SYSOUT=*
//SYSPRIN3 DD SYSOUT=*
//FDRSUMM  DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISK1    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=111111
//DISK2    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=222222
//DISK3    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=333333
//TAPE1    DD UNIT=TAPE,DSN=BACKUP.V111111,DISP=(,CATLG),
//            VOL=(,,,99)
//TAPE2    DD UNIT=TAPE,DSN=BACKUP.V222222,DISP=(,CATLG),
//            VOL=(,,,99)
//TAPE3    DD UNIT=TAPE,DSN=BACKUP.V333333.COPY1,DISP=(,CATLG),
//            VOL=(,,,99)
//TAPE33   DD UNIT=TAPE,DSN=BACKUP.V333333.COPY2,DISP=(,CATLG),
//            VOL=(,,,99)
//SYSIN    DD *
 DUMP     TYPE=FDR,DSNENQ=USE,RTC=YES,MAXTASKS=3
/*

Dump a Linux CDL volume example

Dump a Linux volume in Compatible Disk Layout (CDL) format. CDL volumes have an OS-style VTOC and can be mounted on z/OS systems. FDR recognizes the Linux format and backup all data tracks on the volume.

//DUMP     EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//FDRSUMM  DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISK1    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=LINUX1
//TAPE1    DD UNIT=TAPE,DSN=BACKUP.LINUX1,DISP=(,CATLG)
//SYSIN    DD *
 DUMP     TYPE=FDR,RTC=YES
/*

Important

If you are licensed for ABR, use PGM=FDRABR to dump VM and Linux volumes.

Copy FDR backups example

Copy an FDR backup data set, creating an additional copy. FDR backups cannot be copied by standard copy utilities, such as IEBGENER; such a copy may appear to complete successfully but the copy is unusable. FDRTCOPY is the tape copy utility provided with FDR. Complete documentation on FDRTCOPY is in FDR-Tape-Copy-FDRTCOPY. In this example, the input backup (TAPEIN) could be any FDR or DSF backup on tape or DASD and the output (TAPEOUT) is on tape. You might want to use FDRTCOPY instead of using the duplication backup option of FDR to reduce the number of tape drives required by FDR backups. You also might use FDRTCOPY to create a third copy (or more).

//FDRTCOPY EXEC PGM=FDRTCOPY,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//TAPEIN   DD DSN=BACKUP.VMVS001.COPY1,DISP=OLD
//TAPEOUT  DD DSN=BACKUP.VMVS001.COPY2,UNIT=TAPE,
//            VOL=(,,,20),DISP=(,CATLG)
//SYSIN    DD *
 COPY
/*

Dump one volume using the zEDC hardware compression

Dump a 3390-54 DASD volume invoking the zEnterprise Data Compression feature, requiring z/OS 2.1 or higher.

//DUMP     EXEC PGM=FDR,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISK1    DD UNIT=SYSALLDA,DISP=OLD,VOL=SER=123456
//TAPE1    DD UNIT=(3590,2),DSN=BACKUP.V123456,DISP=(,CATLG)
//SYSIN    DD *
 DUMP     TYPE=FDR,COMPRESS=ALL,ZEDC=YES
/*

 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*