How can I trigger a data set triggered event if my dataset creation/update does not create the necessary SMF records?
Article ID: 55520
Updated On:
Products
Issue/Introduction
Trigger an Event By Data Set Activity Without SMF Records.
Environment
Release: ESP Workload Automation
Cause
Explicit data set triggers, trigger ESP processing if a specified data set is created, closed, or renamed but no system SMF records are produced.
Resolution
Use Explicit data set trigger.
What you need to know to use Explicit data set triggers:
- Program CYBESDT1 writes an SMF record type 132 subtype 1.
- Is defined to ESP Workload Manager via the EXPLICIT parameter in the DSTRIG command or in the DSNAME statement.
- Programs CYBESDT1/ESPDST may execute in batch, TSO, started task, or run task environment(ex. Connect:Direct(NDM)).
Example1: Invoke ESPDST from Batch
In the following event, the DSTRIG command defines an explicit data set trigger for data set PDS.DATA.SET(MEMBER1):
EVENT ID(MYEVENT)
DSTRIG PDS.DATA.SET(MEMBER1) EXPLICIT
ENDDEF
If the trigger is activated, event MYEVENT is triggered.
The following example JCL shows how to activate the trigger defined in MYEVENT.
STEP1 creates or updates member MEMBER1 in the data set PDS.DATA.SET. If STEP1 completes successfully, STEP2 runs the ESPDST utility. ESPDST notifies ESP subsystem ESPS that data set PDS.DATA.SET(MEMBER1) was created or updated, which triggers MYEVENT.
//DSTRIG01 JOB ...
//*
//STEP1 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DISP=SHR,DSN=SEQ.DATA.SET
//SYSUT2 DD DISP=OLD,DSN=PDS.DATA.SET(MEMBER1)
//*
//STEP2 EXEC PGM=ESPDST,COND=(0,LT),
// PARM='DSNAME(PDS.DATA.SET(MEMBER1)) SUBSYSTEM(ESPS)'
//STEPLIB DD DISP=SHR,DSN=CYBER.CD7YLOAD
Example2: Invoke ESPDST from a Connect:Direct (NDM) Run Task
STEP1 copies the data set OLD.DATA.SET from Connect:Direct node NODE1 to the local Connect:Direct node as data set NEW.DATA.SET. Assume that STEP1 completes successfully.
Through an explicit data set trigger, STEP2 notifies ESP subsystem ESPS that the Connect:Direct copy operation created data set NEW.DATA.SET.
PROCESS1 PROCESS SNODE=NODE1
STEP1 COPY FROM(PNODE DSN=OLD.DATA.SET) -
TO(SNODE DSN=NEW.DATA.SET DISP=(NEW,CATLG,DELETE))
IF (STEP1 EQ 0) THEN
STEP2 RUN TASK (PGM=ESPDST -
PARM=(C'DSNAME(NEW.DATA.SET) SUBSYSTEM(ESPS)')) -
SNODE
EIF
Additional Information
Trigger an Event By Data Set Activity Without SMF Records
Feedback
