The Resolve In Doubt Module SQDAIRID processes the LogStreams used by the capture agent so that the appropriate Commit / Rollback operations are added to the LogStreams during the message region restart. Generate the required Resolve In-Doubt and Terminate Thread Modules using JCL similar to sample member GENIRID included in the distribution. This must be done after the ESS modules have been linked so the correct version is in the RESLIB when the Resolve In Doubt LPARM Module created in the previous step is added.
//GENIRID JOB 1,MSGLEVEL=(1,1),MSGCLASS=H,NOTIFY=&SYSUID
//*
//*--------------------------------------------------------------------
//* Generate IMS TM Exit CDCzLog Resolve-in-Doubt Module - SQDAIRID
//*--------------------------------------------------------------------
//* Note: 1) Terminate Thread module --> SQDAITTT is also generated
//*
//* 2) Run the GENLPRIR Job BEFORE running THIS Job to ensure
//* LPARM has been loaded to the ECSA
//*
//* Required DDNAME: SYSIN DD
//*
//* Required parameters:
//* EXIT - Resolve-in-Doubt Module - 'SQDAIRID'
//* Terminate Thread module - 'SQDAITTT'
//* EXITGEN - Macro to Gen Data Capture Agent - always 'EXITGEN'
//* TYPE - The type of exit being generated (ZLOG)
//* SYSNAME - Symbolic name of IMS system (ie. IMSPROD, IMSTEST)
//* **NOTE** MAX Length of SYSNAME is 7 characters
//* XPARM - The name of the SQDXPARM load module that this
//* instance Of the data capture agent will reference
//* **NOTE** Name cannot start with letters 'A thru I'
//*
//* Notes:
//* 1) Change the SET parms below for:
//* HLQ - high level qualifier of the CDC Libraries
//* VER - the 2nd level qualifier of the CDC PGMOBJ & LOADLIB
//* PROCVER - 2nd level qualifier of the CDC PROC & PARM Libs
//* IMSLOAD - the authorized load library where the load modules
//* will reside - typically a user reslib
//*--------------------------------------------------------------------
//*
// SET HLQ=SQDATA
// SET VER=V400
// SET PROCVER=V400
// SET IMSLOAD=DFSE10.USER.PGMLIB
//*
//*--------------------------------------------------------------------
//CDCPROCS JCLLIB ORDER=&HLQ..&PROCVER..PROCLIB
//*
//*--------------------------------------------------------------------
//* Resolve-in-Doubt Module
//*--------------------------------------------------------------------
//GENIRID EXEC GENCDC,EXIT=SQDAIRID,ACP=1
//SYSIN DD *
EXITGEN TYPE=ZLOG,XPARM=SQDLPRIR,SYSNAME=IVP1
//*
//L.SYSLMOD DD DISP=SHR,DSN=&IMSLOAD
//*
//*--------------------------------------------------------------------
//* Terminate Thread module
//*--------------------------------------------------------------------
//GENITTT EXEC GENCDC,EXIT=SQDAITTT,ACP=1
//SYSIN DD *
EXITGEN TYPE=ZLOG,XPARM=SQDLPRIR,SYSNAME=IVP1
//*
//L.SYSLMOD DD DISP=SHR,DSN=&IMSLOAD