|
Db2/z Engine Subtask |
Scroll |
Precisely recommends using either Started Tasks or the z/OS Master Controller for large numbers of Db2/z Apply Engines.
Example
Execute the SQDAEMON and one or more Db2/z Apply Engine under the Master Controller.
Note that the daemon runs as started task in separate address spaces, while the Apply Engine SQDATA runs as a subtask under the Master.
MASTERD Parmlib member included in the distribution
-------------------------------------------------------------
-- SAMPLE PARM FOR RUNNING DB2 CAPTURE, DAEMON & APPLY ENGINE
-------------------------------------------------------------
QMGR=N/A
CMDQUE=DUMMY
TASKDD=SQDFILE
WTOR=N
WTORMSG=SQDATA DB2 CAPTURE
FAILJOB=N
FAILMAX=1
----------------------
-- LISTENER DAEMON
----------------------
NAME=SQDAEMON -- NAME OF PROCLIB MEMBER
PGM=SQDAEMON -- NAME OF PGM TO EXECUTE
AUTOSTART=Y -- AUTO START WHEN MASTER STARTS (Y/N)
NEWADDRSP=Y -- EXECUTE IN SEPARATE ADDR SPACE (Y)
SCRIPT= -- SET TO SPACES
QUEUE=host_name -s port_number
----------------------
-- APPLY ENGINE
----------------------
NAME=DB2TODB2 -- JOBNAME (ENGINE) IN SCRIPT
PGM=SQDATA
AUTOSTART=Y
NEWADDRSP=N
SCRIPT=SQDATA.V400.SQDOBJ(DB2TODB2)
QUEUE=DB2TODB2@SHM -- JOBNAME (ENGINE) IN SCRIPT @SHM
Note, the program name of the Apply Engine is SQDATA, and it will be run as a subtask under the Master Controller's address space.
Master Controller JCL SQDAMAST sample included in the distribution
//*--------------------------------------------------------------------
//* Sample JCL to Run the SQData Master Controller SQDAMAST
//*
//* Add additional DD statements or Libraries as required
//*--------------------------------------------------------------------
//*********************************************************************
//*
//JOBLIB DD DISP=SHR,DSN=SQDATA.V400.LOADLIB
// DD DISP=SHR,DSN=DB2.SDSNLOAD
//*
//*
//SQDATA EXEC PGM=SQDAMAST
//SQDPARM DD DISP=SHR,DSN=SQDATA.V400.PARMLIB(MASTERD)
//SYSPRINT DD SYSOUT=*
//DB2CDC1 DD SYSOUT=*
//ENGINE1 DD SYSOUT=*
//*
//FAILJCLI DD DISP=SHR,DSN=SQDATA.V400.CNTL
//FAILJCLO DD SYSOUT=(H,INTRDR)
//*
//**** PARM WORK FILE - REQUIRED IF UPSTATE=Y
//SQDPWRK DD DISP=SHR,DSN=SQDATA.V400.PARMLIB(PARMWORK)
