In this example, the BCS is diagnosed and the BCS and certain VVDSs are compared. The BCS and the VVDSs are passed as ddnames. DIAGNOSE defaults to DUMP, NOLIST, and ERRORLIMIT(16).

//DIAGEX2  JOB
//STEP1    EXEC  PGM=IDCAMS
//SYSPRINT DD    SYSOUT=A
//DIAGDD   DD    DISP=SHR,DSN=DIAGCAT3
//DIAG01   DD    UNIT=SYSDA,VOL=SER=PERM03,DISP=SHR,
//         DSN=SYS1.VVDS.VPERM03,AMP='AMORG'
//DIAG02   DD    UNIT=SYSDA,VOL=SER=DIAG02,DISP=SHR,
//         DSN=SYS1.VVDS.VDIAG02,AMP='AMORG'
//DIAG03   DD    UNIT=SYSDA,VOL=SER=DIAG03,DISP=SHR,
//         DSN=SYS1.VVDS.VDIAG03,AMP='AMORG'
//SYSIN    DD    *
     DIAGNOSE -
           ICFCATALOG -
           INFILE(DIAGDD) -
           COMPAREDD(DIAG01 DIAG02 DIAG03)
/*

Job control language statements:

• DIAGDD DD identifies the BCS being scanned. This BCS must be cataloged in the master catalog.
• DIAG01 DD, DIAG02 DD, and DIAG03 DD identify VVDSs to be compared.

The DIAGNOSE command diagnoses the BCS, DIAGCAT3, and compares the BCS to certain VVDSs. The parameters are:

• ICFCATALOG denotes that the input data set is an integrated catalog facility BCS.
• INFILE(DIAGDD) identifies the DD statement containing the input data set name.
• COMPAREDD(DIAG01 DIAG02 DIAG03) indicates that any BCS entries using the specified VVDSs are to undergo comparison checking. The VVDS names are passed on DD statements.