IMS BMP Engine Subtask |
Scroll |
Precisely recommends using either Started Tasks or the z/OS Master Controller for large numbers of IMS BMP Apply Engines.
Example:
Execute an engine subtask, running under IMS (DFSRRC00) as a BMP process within the z/OS Master Controller using the startup parameter file, MASTIMSB, listed below.
MASTIMSB Parmlib member included in the distribution
---------------------------------------------------------------------
-- SAMPLE PARM THAT CAN BE USED FOR RUNNING AN APPLY ENGINE
-- AS A STARTED TASK UNDER IMS
---------------------------------------------------------------------
-- IMPORTANT: YOU CAN ONLY RUN 1 APPLY ENGINE UNDER A MASTER
-- CONTROLLER IF YOU ARE ACCESSING IMS
---------------------------------------------------------------------
QMGR=N/A
CMDQUE=SQDATA.CMDQUE
TASKDD=SQDFILE
WTOR=Y
WTORMSG=REPLICATION ENGINE IMSTOIMS
FAILJOB=N
FAILMAX=1
--------------
NAME=IMSTOIMS
PGM=DFSRRC00
AUTOSTART=Y
NEWADDRSP=N
SCRIPT=BMP,SQDATAI,APPLYPSB,,,,,,,,,IMSA,,Y
QUEUE=SQDATA.IMSCDC.QUEUE@MQS
Notes:
1.AUTOSTART=Y instructs the z/OS Master Controller to shutdown if the Apply Engine stops.
2.The program name of the subtask is DFSRRC00, which is the name of the IMS control module. The SQData program required to run under IMS only is SQDATAI.
3.The parm usually passed to IMS must be specified as the SCRIPT= value.
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=IMS.SDFSRESL
//*
//SQDATA EXEC PGM=SQDAMAST
//SQDPARM DD DISP=SHR,DSN=SQDATA.V400.PARMLIB(MASTIMS)
//SQDFILE DD DISP=SHR,DSN=SQDATA.V400.SQDOBJ(IMSTOIMS)
//SYSPRINT 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)
Note, the SQDFILE DD is required for execution against IMS and should reference the parsed script library member.