Example: Generating a DBD map of the specified DBD

The following figure shows a JCL example for the map function.

The following example is for generating a map of the specified DBD with the INSTANCE_DBVER, INSTANCE_GENDATE, and INSTANCE_GENTIME keywords for an instance in the IMS catalog database without a DBD report.

Figure 1. Example of generating a DBD map

//CATMANJ    JOB .......
//STEP     EXEC PGM=FABXCATM
//STEPLIB  DD DSN=HPS.SHPSLMD0,DISP=SHR
//         DD DSN=IMS15.SDFSRESL,DISP=SHR
//         DD DSN=ITB.SGLXLOAD,DISP=SHR
//DFSRESLB DD DSN=IMS15.SDFSRESL,DISP=SHR
//IMS      DD DSN=PROD.PSBLIB,DISP=SHR
//         DD DSN=PROD.DBDLIB,DISP=SHR
//DFSVSAMP DD *
0512,9
1024,9
2048,9
4096,9
16384,9
32768,9
IOBF=(2048,4,N,N)
IOBF=(4096,4,N,N)
IOBF=(8192,4,N,N)
IOBF=(32000,4,N,N)
/*
//PROCLIB  DD DSN=IMS15.PROCLIB
//RECON1   DD DSN=PROD.RECON1,DISP=SHR
//RECON2   DD DSN=PROD.RECON2,DISP=SHR
//*
//FABXCRP0 DD SYSOUT=*
//FABXCRP1 DD SYSOUT=*
//FABXCRP2 DD SYSOUT=*
//FABXPPRM DD *
DLI,FABXCATM,DFSCPL00,,,,,,,,,,,Y,N,,,,,,,,,,,,,DFSDF=CAT
//FABXCIN DD *
  PROC   FUNC=MAP,INPUT=CATALOG_DB
  REPORT MAP_REPORT=NO
  DBD NAME=DBDHDAM,
      INSTANCE_DBVER=0,
      INSTANCE_GENDATE=03/24/2023,
      INSTANCE_GENTIME=21:04:22.15     
  END                     
/*