Example: Comparing DBDs, PSBs, and ACBs

The following figure shows example JCL for running the DBD/PSB/ACB Compare utility to compare several DBDs, PSBs, and ACBs.

Figure 1. Example of creating a DBD, PSB, and ACB Compare report

//stepname EXEC PGM=FABLCOMP
//STEPLIB    DD DSN=HPS.SHPSLMD0,DISP=SHR
//DBDLIB     DD DSN=IMSVS.DBDLIB,DISP=SHR
//DBDLIB2    DD DSN=IMSVS.TEST.DBDLIB,DISP=SHR
//PSBLIB     DD DSN=IMSVS.PSBLIB,DISP=SHR
//PSBLIB2    DD DSN=IMSVS.TEST.PSBLIB,DISP=SHR
//ACBLIB     DD DSN=IMSVS.ACBLIB,DISP=SHR
//ACBLIB2    DD DSN=IMSVS.TEST.ACBLIB,DISP=SHR
//SYSOUT     DD SYSOUT=A
//SYSPRINT   DD SYSOUT=A
//SYSIN      DD *
    REPORT=SOURCE
    DBD=BE1PARTS
    PSB=PE1CPINV
    ACB=PE1CPINV
    DBD=BE2LORDR
    PSB=PE1CPPUR
    ACB=PE1CPPUR
    DBD=BE2PARTS
    PSB=PE1PPINV
    PSB=PE2CORDR
    ACB=PE1PPINV
    ACB=PE2CORDR
/*