Running the Online Pointer Checking function (for full-function databases)

To run the Online Pointer Checking function, you prepare a cataloged procedure, and specify DD statements and ICEIN control statement keywords in FABJMAIN JCL.

1. Prepare a cataloged procedure for the Online Pointer Checking function. The following figure shows an example.

   //FABJONPC PROC HPICLIB='HPIC.SHPSLMD0',        HP IMAGE COPY LOAD LIBRARY
   //             HPPCLIB='HPPC.SHPSLMD0',         HP POINTER CHECKER LOAD LIBRARY
   //             GLXLIB='TOSI.SGLXLOAD',          TOOLS GENERIC EXIT LOAD LIBRARY
   //             TOSILIB='TOSI.SFOILOAD',         TOSI LOAD LIBRARY  
   //             RESLIB='IMSVS.SDFSRESL',         IMS RESLIB
   //             DBDLIB='IMSVS.DBDLIB',           IMS DBD LIBRARY
   //             HPSSRC='HPS.SHPSSAMP(FABPVSAM)', HPS SAMPLE JCL LIBRARY
   //             PRTBLK=6118   (133*46)       BLKSIZE OF PRINT DATA SETS
   //*-------------------------------------------------------------------*
   //HDPCPRO EXEC PGM=FABJMAIN
   //STEPLIB   DD DISP=SHR,DSN=&HPICLIB 
   //          DD DISP=SHR,DSN=&HPPCLIB 
   //          DD DISP=SHR,DSN=&GLXLIB 
   //          DD DISP=SHR,DSN=&TOSILIB, 
   //          DD DISP=SHR,DSN=&RESLIB 
   //*-------------------------------------------------------------------* 
   //* FOR IMS DATA SETS 
   //*-------------------------------------------------------------------* 
   //DFSRESLB  DD DISP=SHR,DSN=&RESLIB 
   //IMS       DD DISP=SHR,DSN=&DBDLIB 
   //DFSPRINT  DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //SYSPRINT  DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //*-------------------------------------------------------------------* 
   //* REPORTS 
   //*-------------------------------------------------------------------* 
   //ICEPRINT  DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //PRIMAPRT  DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //STATIPRT  DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //VALIDPRT  DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //EVALUPRT  DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //SNAPPIT   DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //SUMMARY   DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0 
   //SYSUDUMP  DD SYSOUT=A,DCB=BLKSIZE=&PRTBLK,OUTLIM=0

2. If you need to start IMSplex, code the EXEC statement as follows:

   //      EXEC PGM=FABJMAIN,REGION=nM,IMSPLEX=plex-name,DBRCGRP=dbrcgrp

   Where:

   IMSPLEX

   If you need to start IMSplex through the IMS HP Image Copy job, specify the IMSPLEX parameter.

   DBRCGRP

   If you use the DBRCGRP keyword of IMS, you must specify the DBRCGRP parameter.

3. Code the corresponding control statement in the ICEIN data set.

   To invoke the Online Pointer Checking function, the following statements and keywords must be specified in the ICEIN data set:

   • IC, AIC, CIC, or ACIC statement, or the GROUP statement with the FUNC keyword
   • HDPC=Y
   • If IC or AIC statement, the TOIAUTO keyword or the TOIAUTO_Q keyword
   • FASTIC keyword

   Tip: You can specify HDPC=Y, TOIAUTO, TOIAUTO_Q, FASTIC keywords in the site default table.

   For ICEIN control statements, see ICEIN control statements. Examples are provided in Examples for running Online Pointer Checking for full-function databases.

   Restrictions:

   • If you use the CIC or the ACIC statement, the TOIAUTO or the TOIAUTO_Q keyword is ignored.
   • You must not specify DBDEFCTL or SORTEX in the JCL. The Online Pointer Checking function must be run with single-step HASH Check; when these DD statements are specified, IMS HP Image Copy attempts to run the job with multiple-step HASH Check.
4. Code the appropriate DD statements.

   Ensure you supply the DD statements that are required for HASH Check. For a list of DD statements, see DD statements for the Online Pointer Checking function (for full-function databases).

5. Submit the JCL.