FDRABRP JCL Examples
All examples in this section are found in the JCL library installed with FDR. The member names are EX5310x.
The following examples illustrate the most common ways of executing ABR REPORT functions. Note that, for convenience, all STEPLIB/JOBLIB DD statements have been omitted in the examples; they may be required, depending on your installation's placement of ABR.
ISPF dialog support
Most of these reports are available under the ABR ISPF dialogs, on the FDRABR REPORT PANEL (ISPF option A.1).
ABR Catalog Report Example
Produce a report detailing all backup activity that has been recorded in the ABR catalog. The report consists of information pertaining to the DASD volume dumped, type, and date of backup and information pertaining to the tape used for the dump function.
//PRINT EXEC PGM=FDRABRP,REGION=0M
//SYSPRINT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSIN DD *
PRINT CATLG
/*
ABR scratch report example
Produce a report detailing all data sets that have been scratched or renamed and recorded in the ABR scratch catalog. The report consists of information pertaining to the DASD volume and type of device that the data set existed on, and the backup tape file and volumes where the data was stored. The current backup information and old backups, if any, is displayed.
//SYSPRINT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
PRINT SCRATCH,XREF,OLDBACKUP=ALL
/*
Summary by index example
Produce a report detailing the utilization of DASD space by USERID (highest-level index). The number of data sets owned by each ID, the tracks occupied and the types of data sets by organization are detailed. Aging statistics by last reference date are also printed.
//SYSPRINT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//ABRSUM DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
PRINT VTOC,SUMPFX=ALL,ONLINE,DETAIL=NO
/*
Tape VTOC report example
Produce a report detailing information from the control records at beginning of a backup data set. The report is displayed in ascending data set name sequence for each “TAPExxxx” DD statement. An IDCAMS LISTCAT format report is produced for all ICF VSAM clusters on the backup.
//SYSPRINT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//VSAMPRT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//TAPE0001 DD DISP=SHR,DSN=FDRABR.VMVSRS1.C1001000
//SYSIN DD *
PRINT TVTOC
/*
Archive report example
Produce a report detailing all data sets that have been archived by ABR. The report consists of information pertaining to the DASD volume from which the data sets were archived and the date they were archived. In addition, certain data set attributes and information pertaining to the tape used for the dump function are displayed. The ARCHIVE DD Statement points to the Archive Control File. Since SORT=YES is the default in batch, to display information in data set name order, SORT DD statements may be required.
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//ARCHIVE DD DSN=FDRABR.ARCHIVE,DISP=SHR
//SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR
//SORTWK01 DD SPACE=(TRK,50,,CONTIG),UNIT=SYSALLDA
//SORTWK02 DD SPACE=(TRK,50,,CONTIG),UNIT=SYSALLDA
//SORTWK03 DD SPACE=(TRK,50,,CONTIG),UNIT=SYSALLDA
//SYSIN DD *
PRINT ARCHIVE
/*
Archive report by date example
Produce a report detailing all data sets that have been archived by ABR on a given date. The Archive Control File whose name is in the FDR Global Options are dynamically allocated. SORT=NO is specified so that the data sets are not sorted by name; they are displayed in the order they were archived.
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
PRINT ARCHIVE,SORT=NO,ADATE=1995.140
/*
Archive expiration prediction example
Produce a report detailing all archived data sets that expire in the next 15 days. EXPIRE=YES limits the report to expired data sets but XDAYS=15 includes data sets that expire within 15 days as well.
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
PRINT ARCHIVE,SORT=NO,EXPIRE=YES,XDAYS=15
/*
VTOC report example
Produce a report detailing information of the volumes referenced by the VOL parameter. The report is displayed in ascending data set name sequence for each volume specified.
//SYSPRINT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
PRINT VTOC,VOL=(PACK01,PACK02)
/*
Backup report example
Produce a report detailing information for all data sets in the VTOCs of the volumes referenced by DISKxxxx DD Statement(s), in addition to information related to the most current backup tape on which the data was stored. The report is displayed in ascending data set name sequence for each volume specified.
//SYSPRINT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISK1 DD UNIT=SYSALLDA,VOL=SER=PACK01,DISP=SHR
//DISK2 DD UNIT=SYSALLDA,VOL=SER=PACK02,DISP=SHR
//SYSIN DD *
PRINT BACKUP
/*
Combined VTOC report example
Produce a report detailing information on all data sets in the VTOCs of all volumes referenced by the VOL parameter. The report is displayed in ascending data set name sequence for all volumes specified. Since COMBINE implies sorting, SORT DD statements may be required.
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR
//SORTWK01 DD SPACE=(TRK,50,,CONTIG),UNIT=SYSALLDA
//SORTWK02 DD SPACE=(TRK,50,,CONTIG),UNIT=SYSALLDA
//SORTWK03 DD SPACE=(TRK,50,,CONTIG),UNIT=SYSALLDA
//SYSIN DD *
PRINT VTOC,COMBINE,VOL=(PACK01,PACK02)
/*
ABR volume report example
Produce a report detailing the ABR status of all DASD volumes online to the system.
//SYSPRINT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
PRINT VOLSTAT
/*
Multiple reports example
Produce an Archive Report, a Catalog Report, and a Volume Status Report in a single job step. The Archive Report shows the archived data sets in the reverse order of archival (the most recently archived data sets appear first), and only include information for data sets that were archived from volumes PACK01 and PACK02. The Catalog Report only includes information for backups of volumes PACK01 and PACK02.
//SYSPRINT DD SYSOUT=*
//ABRMAP DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//ARCHIVE DD DSN=FDRABR.ARCHIVE,DISP=SHR
//SYSIN DD *
PRINT ARCHIVE,SORT=NO,VOL=(PACK01,PACK02)
PRINT CATLG,VOL=(PACK01,PACK02)
PRINT VOLSTAT,VOL=(PACK01,PACK02)
/*