IMS HP Image Copy JCL examples for monitoring and tuning DEDBs

Use these JCL examples to monitor and tune DEDBs by using the IMS HP Image Copy with the DEDB HASH Check option.

JCL template for running IMS HP Image Copy with the DEDB HASH Check option

The following figure shows a JCL template for running IMS HP Image Copy with the DEDB HASH Check option.

In this example:
  • Fast scan of database integrity verification is performed for the DEDB areas.
  • The input area data sets (ADSs) to be validated are dynamically allocated. The allocation information (DD name and DS name of the ADSs) is obtained from DBRC.
Figure 1. JCL template for IMS HP Image Copy with the DEDB HASH Check option
//HPICHASH EXEC PGM=FABJMAIN
//STEPLIB  DD DISP=SHR,DSN=HPFP.SHFPLMD0
//         DD DISP=SHR,DSN=HPS.SHPSLMD0
//         DD DISP=SHR,DSN=IMSVS.SDFSRESL
//DFSRESLB DD DISP=SHR,DSN=IMSVS.SDFSRESL
//DFSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//ICEPRINT DD SYSOUT=*
//MSGOUT   DD SYSOUT=*
//REPORTS  DD SYSOUT=*
//IMS      DD DISP=SHR,DSN=IMSVS.DBDLIB
//IMSDALIB DD DISP=SHR,DSN=IMSVS.MDALIB
//ICEIN DD *
  GLOBAL DBRC=Y,
         DEDBPC=Y,
         ICHLQ=ICOUT.HFP,
         UNIT=SYSDA,
         SPACE=(CYL,100,100)
  AIC    DBD=DEDBJN22,AREA=DB22AR0
  AIC    DBD=DEDBJN22,AREA=DB22AR1
/*

Example 1: Storing statistics in the Sensor Data repository

The following figure shows example JCL for storing the statistical information of an entire area that is registered in DBRC into the Sensor Data repository.

Prerequisite: To run this JCL, an IMS Tools Knowledge Base server and its repositories must be configured.
In this example:
  • The IMS Tools Base library (ITBVS.SHKTLOAD) is concatenated to the STEPLIB DD.
  • ITKBSRVR= for the GLOBAL command specifies the IMS Tools KB server XCF group.
  • SENSOR=YES for the GLOBAL command specifies that the statistics are stored in the Sensor Data repository.
  • The HFPSPRT DD statement specifies the output data set for the Sensor Data Statistics report.
Figure 2. IMS HP Image Copy example 1: Storing statistics in the Sensor Data repository
//HPICHASH EXEC PGM=FABJMAIN
//STEPLIB  DD DISP=SHR,DSN=HPFP.SHFPLMD0
//         DD DISP=SHR,DSN=HPS.SHPSLMD0
//         DD DISP=SHR,DSN=IMSVS.SDFSRESL
//         DD DISP=SHR,DSN=ITBVS.SHKTLOAD
//DFSRESLB DD DISP=SHR,DSN=IMSVS.SDFSRESL
//DFSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//ICEPRINT DD SYSOUT=*
//MSGOUT   DD SYSOUT=*
//REPORTS  DD SYSOUT=*
//HFPSPRT  DD SYSOUT=*
//IMS      DD DISP=SHR,DSN=IMSVS.DBDLIB
//IMSDALIB DD DISP=SHR,DSN=IMSVS.MDALIB
//ICEIN DD *
  GLOBAL DBRC=Y,
         DEDBPC=Y,
         ICHLQ=ICOUT.HFP,
         UNIT=SYSDA,
         SPACE=(CYL,100,100),
         ITKBSRVR=FPQSRVFP,
         SENSOR=YES
  AIC    DBD=DEDBJN23,AREA=DB23AR1
  AIC    DBD=DEDBJN23,AREA=DB23AR2
/*

Example 2: Generating free space analysis reports

You can use the JCL template to generate the Freespace Analysis report that can be used for free space analysis. See JCL template for running IMS HP Image Copy with the DEDB HASH Check option.

Example 3: Generating the Segment Length Distribution report

The following figure shows example JCL for generating the Segment Length Distribution report.

In this example, DEDBPC=(Y,SEGLDIST) for the GLOBAL command specifies that the Segment Length Distribution report is generated.

Figure 3. IMS HP Image Copy example 3: Generating the Segment Length Distribution report
//HPICHASH EXEC PGM=FABJMAIN
//STEPLIB  DD DISP=SHR,DSN=HPFP.SHFPLMD0
//         DD DISP=SHR,DSN=HPS.SHPSLMD0
//         DD DISP=SHR,DSN=IMSVS.SDFSRESL
//DFSRESLB DD DISP=SHR,DSN=IMSVS.SDFSRESL
//DFSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//ICEPRINT DD SYSOUT=*
//MSGOUT   DD SYSOUT=*
//REPORTS  DD SYSOUT=*
//IMS      DD DISP=SHR,DSN=IMSVS.DBDLIB
//IMSDALIB DD DISP=SHR,DSN=IMSVS.MDALIB
//ICEIN DD *
  GLOBAL DBRC=Y,
         DEDBPC=(Y,SEGLDIST),
         ICHLQ=ICOUT.HFP,
         UNIT=SYSDA,
         SPACE=(CYL,100,100)
  AIC    DBD=DEDBJN23,AREA=DB23AR1
  AIC    DBD=DEDBJN23,AREA=DB23AR2
/*