Example: Generating PSB maps
The following figure shows example JCL for running a job that generates maps of multiple PSBs.
Each psbname produces a PSB Summary report, a map, and
a report for a database PCB in the PSB. A psbname followed by ,X
produces
only a PSB Summary report for the PSB, and a map for each database
PCB in that PSB. The X can be replaced by any other character.
//PSBMAP EXEC PGM=FABMMAIN
//STEPLIB DD DSN=HPS.SHPSLMD0,DISP=SHR
//DBDLIB DD DSN=IMSVS.DBDLIB,DISP=SHR
//PSBLIB DD DSN=IMSVS.PSBLIB,DISP=SHR
//SYSOUT DD SYSOUT=A
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
PSB=PE1CPINV,X
PSB=PE1CPPUR
PSB=PE1PARTS,X
PSB=PE1PPINV
PSB=PE1PPPUR,X
PSB=PE2CORDR
PSB=PE2ORDER,X
PSB=PLIPROCS
/*