In this example, the VVDS is diagnosed and the BCS and VVDS are compared. The BCS and the VVDS are passed as data set names. The entries cataloged in CAT001 are not to be processed. The listing of valid entries is to be done, but error dumps are to be suppressed. The diagnosis is to be ended after one error is detected.

//DIAGEX5  JOB
//STEP1    EXEC  PGM=IDCAMS
//SYSPRINT DD    SYSOUT=A
//DD1      DD    UNIT=SYSDA, VOL=SER=PERM03,DISP=SHR,
//         DSN=SYS1.VVDS.VPERM03,AMP='AMORG'
//SYSIN    DD    *
     DIAGNOSE -
           VVDS -
           INFILE(DD1) -
           EXCLUDE (CATALOG (CAT001)) -
           COMPAREDS(CAT002) -
           LIST -
           NODUMP -
           ERRORLIMIT(1)
/*

The VVDS is diagnosed and the BCS, CAT002, is compared with the VVDS. The parameters are:

• VVDS identifies the input data set as a VVDS.
• INFILE(DD1) designates the DD statement containing the VVDS being diagnosed.
• COMPAREDS(CAT002) indicates that comparison checking be done and specifies the data set name of the BCS.
• EXCLUDE(CATALOG(CAT001)) indicates that VVDS entries cataloged in CAT001 not be processed.
• LIST requests that entries both with and without errors be listed.
• NODUMP specifies that entries with errors are not to be hex-dumped.
• ERRORLIMIT(1) changes the number of errors to be processed to one.