Using ETT occurrence-related variables
About this task
To determine the type of event that has caused the automatic addition
of a new occurrence to the plan, use the variables provided by ETT.
For example, consider that a company is asked to produce customer-oriented
reports according to an external demand. The on-demand request is
created by a job name that identifies the customer and is contained
in a new generation of an input GDG data set. You can resolve the
on-demand process by using the ETT definition and ETT variables in
a single job, as follows:
- In the CREATING A SPECIAL RESOURCE panel (option 1.6.2 on the
main menu), define the special resource that identifies the input
GDG data set root.
Figure 1. EQQQDCRP - Creating a special resource EQQQDCRP ---------------- CREATING A SPECIAL RESOURCE ----------------------- Select one of the following: 1 INTERVALS - Specify intervals 2 WS - Modify default connected work stations SPECIAL RESOURCE ===> HWA.REQUESTS.GDG_____________________________ TEXT ===> _____________________________________________ SPECRES GROUP ID ===> ________ Hiperbatch ===> N DLF object Y or N USED FOR ===> B Planning and control C , P , B or N ON ERROR ===> _ On error action F , FS , FX , K or blank ON COMPLETE ===> _ On complete action Y , N , R or blank MAX USAGE LIMIT ===> _____ Max number of allocations before usage reset MAX USAGE TYPE ===> N Status change type Y, N or R Defaults QUANTITY ===> 1_____ Number available 1-999999 AVAILABLE ===> Y Available Y or N - In the MODIFYING ETT TRACKING CRITERIA panel, specify the ETT
criteria for the GDG data set root.
Figure 2. EQQJMTCL - Modifying ETT tracking criteria EQQJMTCL --------------- MODIFYING ETT TRACKING CRITERIA -------- Row 1 to 4 of 4 Command ===> Scroll ===> PAGE Change data in the rows, and/or enter any of the following row commands: I(nn) - Insert, R(nn), RR(nn) - repeat, D(nn), DD - Delete Row Name of triggering event ID of associated E J D A cmd application T R R S '''' SETT*___________________________________________ ETTAPPL1________ J N Y N '''' HWA.CWSA.CLIST__________________________________ ETTAPPL2________ R N Y N '''' HWA.CWSA.JCL*___________________________________ ETTAPPL3________ R N Y N '''' HWA.REQUESTS.GDG________________________________ ETTAPPL4________ R N Y N ******************************** Bottom of Data *********************************
- Update the selection table for the
tracker to identify the ETT criteria for the GDG data set root. The
file to be edited depends on which kind of selection table the tracker
uses:
- If the tracker uses EQQDSLST as selection table, update the EQQLSJCL member of the sample job JCL library as follows:
Figure 3. Updating EQQDSLST list EDIT HWA.CWSA.JOBLIB(EQQLSJCL) - 01.08 Columns 00001 000072 Command ===> Scroll ===> CSR ****** *************************** Top of Data ********************************** 000001 //ASMH EXEC PGM=ASMA90,PERM='NODECK,OBJECT,XREF,(SHORT),LIST' 000002 //SYSPRINT DD SYSOUT=* 000003 //SYSLIB DD DISP=SHR,DSN=HWA.SEQQMAC0 000004 //SYSLIN DD DISP=SHR,DSN=HWA.JCLIB(EQQDSLST) 000005 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(2,1)) 000020 //SYSIN DD * 000021 EQQLSENT STRING='HWA.CWSA.CLIST ',POS=1 000022 EQQLSENT STRING='HWA.REQUESTS.GDG ',POS=1 000023 EQQLSENT STRING=LASTENTRY 000024 END 000025 /* ****** ************************* Bottom of Data *********************************
If the tracker uses EQQEVLST as selection table, updated it as described in Data set triggering.
- Write a sample JCL that includes the ETT occurrence-related variables.
Figure 4. JCL written to use ETT occurrence-related variables EDIT HWA.CWSA.JOBLIB(TESTJCL) - 01.00 Columns 00001 000072 Command ===> Scroll ===> CSR ****** *************************** Top of Data ********************************** 000100 //TESTJCL JOB (876903,D07),'AAAAAAA',MSGLEVEL=(1,1), 000200 // MSGCLASS=A,CLASS=A 000210 //* 000211 //*%OPC SCAN 000220 //************************************************************** 000221 //* - READ AND ELABORATE THE NEW REQUEST 000222 //* - CREATE THE OUTPUT REPORT FOR CUSTOMER 000223 //************************************************************** 000224 //STEP1 EXEC PGM=READREQ 000225 //REQUEST DD DISP=SHR,DSN=&OETEVNM 000227 //REPORT DD DISP=(,CATLG),DSN=REPORT.&OETJOBN, 000228 // SPACE=(TRK,(1,1)),UNIT=SYSDA, 000229 // DCB=(RECFM=VBA,BLKSIZE=136,LRECL=1360) 000230 //* ****** ************************* Bottom of Data ********************************* - When you create a request, a new generation of HWA.REQUESTS.GDG is created. The ETT
criteria schedule a new occurrence and the variable is resolved.
Figure 5. JCL with variables resolved //TESTJCL JOB (876903,D07), 'AAAAAAA',MSGLEVEL=(1,1), // MSGCLASS=A,CLASS=A //* //*%OPC SCAN //********************************************************************* //* - READ AND ELABORATE THE NEW REQUEST //* - CREATE THE OUTPUT REPORT FOR CUSTOMER //********************************************************************* //STEP1 EXEC PGM=READREQ //REQUEST DD DISP=SHR,DSN=HWA.REQUEST.GDG.G0002V00 //REPORT DD DISP=(,CATLG),DSN=REPORT.USER1, // SPACE=(TRK,(1,1)),UNIT=SYSDA, // DCB=(RECFM=VBA,BLKSIZE=136,LRECL=1360) //*
For a detailed description of the ETT occurrence-related variables, see Occurrence-related supplied JCL variables.