VARY examples
All examples in this section are found in the JCL library installed with FDRPAS. The member names are PA31027x.
Example - Relabel and mount swap source volumes
Three volumes are swapped to new devices, leaving the old DASD devices as point-in-time backups of the volumes at the time of the swap completion but there is a need to access those backups. This job relabels the source volumes with new volume serials, fixes the volume label so they can be mounted, and varies them online.
//VARYON EXEC PGM=FDRPAS,REGION=0M//STEPLIB DD DISP=SHR,DSN=fdrpas.loadlib//SYSPRINT DD SYSOUT=*//SYSUDUMP DD SYSOUT=*//SYSIN DD * MONITOR TYPE=VARYONLINE MOUNT VARYUNIT=07C3,NVOL=OLD7C3 MOUNT VARYUNIT=07C4,NVOL=OLD7C4 MOUNT VARYUNIT=07C5,NVOL=OLD7C5/*
Example - Relabel and mount SWAPDUMP target volumes
SWAPDUMP was successfully executed against sixteen DASD volumes, creating offline point in time copies. These copies can be backed up with FDRINSTANT, but if you need to execute other utilities against the copies, this job relabels the copied volumes with new volume serials, fixes the volume label so they can be mounted, and varies them online. The original volumes had volsers of DB2xxx, so the new volumes have serials of DBCxxx.
//VARYON EXEC PGM=FDRPAS,REGION=0M//STEPLIB DD DISP=SHR,DSN=fdrpas.loadlib//SYSPRINT DD SYSOUT=*//SYSUDUMP DD SYSOUT=*//SYSIN DD * MONITOR TYPE=VARYONLINE MOUNT VARYUNIT=21C*,NVOL=**C***/*
Example - Relabel offline volume
This job re-labels an offline volume with a new volume serial and fixes the volume label so it can be mounted, but does not vary it online. It can be varied online to another system, if desired. This can be executed against a SWAP source volume or a SWAPDUMP target device. If you change the NVOL operand to NVOL=******, FDRPAS just changes the value of FDR3 in the label track of the volume to VOL1 so that the volume can be varied online.
//RESETVOL EXEC PGM=FDRPAS,REGION=0M//STEPLIB DD DISP=SHR,DSN=fdrpas.loadlib//SYSPRINT DD SYSOUT=*//SYSUDUMP DD SYSOUT=*//SYSIN DD * MONITOR TYPE=RESETVOL MOUNT VARYUNIT=7C12,NVOL=TMPVOL/*
Revert back to original volume after a completed SWAP
The SWAP job processed volume PROD01 with UCB address 21C7 and swapped this volume to UCB address 61C7. There is a need to go back to the original volume that has been placed offline by FDRPAS upon completion of the SWAP.
This job fixes the volume label of the original offline volume so that it can be mounted and varies the volume online. Specifying the NVOL=****** operand directs FDRPAS to keep the current volser. Ensure that the newly created volume is varied offline on all LPARs prior to running this job. Be aware that any changes made to the newly created volume after the SWAP completed were not made to this offline volume. Once this runs, this volume needs to be varied online to all the other affected LPARs since the VARYONLINE process only varies it online to the LPAR where the job runs.
//VARYON EXEC PGM=FDRPAS,REGION=0M//STEPLIB DD DISP=SHR,DSN=fdrpas.loadlib//SYSPRINT DD SYSOUT=*//SYSUDUMP DD SYSOUT=*//SYSIN DD * MONITOR TYPE=VARYONLINE MOUNT NVOL=******,VARYUNIT=21C7 MOUNT NVOL=******,VARYUNIT=uuuu <== See NOTE below
/*