Example: Generating DBD, PSB, ACB maps

The following figure shows example JCL for running the function of DBD/PSB/ACB Mapper inner single job step

Figure 1. Example of generating DBD, PSB, ACB maps

//MAPPER  EXEC PGM=FABMMAIN
//STEPLIB   DD DSN=HPS.SHPSLMD0,DISP=SHR
//DBDLIB    DD DSN=IMSVS.DBDLIB,DISP=SHR
//PSBLIB    DD DSN=IMSVS.PSBLIB,DISP=SHR
//ACBLIB    DD DSN=IMSVS.ACBLIB,DISP=SHR
//SYSOUT    DD SYSOUT=A
//SYSPRINT  DD SYSOUT=A
//SYSIN     DD *
    DBD=BE1PARTS,X
    PSB=PE1CPINV,X
    PSB=PE1PPINV
    ACB=PE1CPINV
    PSB=PE1PARTS
    ACB=PE1CPPUR
    DBD=BE2PCUST
    ACB=PE1PARTS
    ACB=PE1PPINV
    DBD=B00INP01,X
    DBD=B00OUT01
/*