Several Connect CDC SQData components must be defined to CICS before an Engine can apply changed data to a VSAM datastore. JCL similar to sample member DFHDEFA included in the distribution should be used to define the CICS/VSAM apply program, transaction, connection and session to CICS. The JCL should be edited to conform to the operating environment.
Note: If SQDV, the default transaction assigned to the Apply Engine program SQDACVSM is changed to accommodate the environment, it must be changed anywhere else it has been referenced such as the Engine script.
//DFHDEFA JOB 1,MSGLEVEL=(1,1),MSGCLASS=H,NOTIFY=&SYSUID
//*
//*--------------------------------------------------------------------
//* Define CICS/VSAM Apply PROG, TRAN, CONN, SESSION to CICS
//*--------------------------------------------------------------------
//* Note: 1) Modify the Name OF THE TRAN, CONN or SESSION
//* as required for your environment
//*
//* 2) if you already have a generic CONNECTION, you do not
//* need to define the CONNECTION and SESSION listed below
//*
//*********************************************************************
//*
//CSDUP EXEC PGM=DFHCSDUP,REGION=1M
//STEPLIB DD DSN=DFH420.CICS.SDFHLOAD,DISP=SHR
//DFHCSD DD DSN=DFH420.CICS.DFHCSD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSDUMP DD SYSOUT=*
//SYSIN DD *
*DELETE PROGRAM(SQDACVSM) GROUP(SQDATA)
DEFINE PROGRAM(SQDACVSM) GROUP(SQDATA)
LANGUAGE(ASSEMBLER)
DESCRIPTION(SQDATA CICS/VSAM: APPLY)
DATALOCATION(ANY)
CONCURRENCY(THREADSAFE)
DEFINE PROGRAM(SQDACVSW) GROUP(SQDATA)
LANGUAGE(ASSEMBLER)
DESCRIPTION(SQDATA CICS/VSAM: WRITEQ)
DATALOCATION(ANY)
CONCURRENCY(THREADSAFE)
DEFINE PROGRAM(SQDACVSR) GROUP(SQDATA)
LANGUAGE(ASSEMBLER)
DESCRIPTION(SQDATA CICS/VSAM: READQ)
DATALOCATION(ANY)
CONCURRENCY(THREADSAFE)
DELETE TRANSACTION(SQDV) GROUP(SQDATA)
DEFINE TRANSACTION(SQDV) GROUP(SQDATA)
PROGRAM(DFHMIRS) TWASIZE(0)
PROFILE(DFHCICSA) STATUS(ENABLED)
TASKDATALOC(ANY) DYNAMIC(NO) PRIORITY(1)
ISOLATE(YES) DTIMOUT(NO) RESTART(NO) SPURGE(YES)
TPURGE(YES) DUMP(YES) TRACE(YES) RESSEC(NO) CMDSEC(NO)
*DELETE CONNECTION(SQDC) GROUP(SQDATA)
*DEFINE CONNECTION(SQDC) GROUP(SQDATA)
* DESCRIPTION(EXCI CONNECTION FOR SQDATA VSAM APPLY)
* ACCESSMETHOD(IRC) SINGLESESS(NO)
* PROTOCOL(EXCI) CONNTYPE(GENERIC)
* DATASTREAM(USER) RECORDFORMAT(U)
* AUTOCONNECT(NO) INSERVICE(YES)
*DELETE SESSIONS(SQDC) GROUP(SQDATA)
*DEFINE SESSIONS(SQDC) GROUP(SQDATA)
* DESCRIPTION(GENERIC SESSION DEF FOR SQDATA CICS/VSAM APPLY)
* CONNECTION(SQDC) PROTOCOL(EXCI)
* MAXIMUM(0,0) RECEIVEPFX(SQ)
* RECEIVECOUNT(1) SESSPRIORITY(0)
* SENDSIZE(30720) RECEIVESIZE(30720)
* AUTOCONNECT(NO) BUILDCHAIN(YES)
* RELREQ(NO) IOAREALEN(4096,4096)
* DISCREQ(NO) RECOVOPTION(SYSDEFAULT)
* NEPCLASS(0)
/*