CLIST run every day at midnight

Products

• SYSVIEW Performance Management
• OPS/MVS Event Management & Automation

Issue/Introduction

Here is a CLIST to reset the count to zero in the CTHRESH panel: 

SET ASID your-cics-region                                              
SET CONFIRMDELET NO                                                    
CTHRESH NOADDLINE                                                       
SELECT COUNT GT 0000                                                   
FILL CMD RES 1-9999                                                    
SET CONFIRMDELET YES

It works well on all CICS regions.
But what is the trigger that activates the CLIST and what will make it work every day at midnight? 

Environment

 

Resolution

With OPS/MVS product, a TOD (Time of Day) rule can be created as below:

)TOD 00:00:00                 
)PROC                         
address OSF  'OI SYSVCLST'    

This rule will trigger every day at midnight. 

SYSVCLST would be the name of a REXX program that would contain:

address sysviewe         
'COMMAND(CLIST RESETCNT)'
'COMMAND(END)'           
say 'RC ' rc             
do queued()              
pull line                
say line                 
end  

 
Another option is to submit a job from the REXX program since the CLIST can be executed in batch.

A possible way to submit a job from an OPS/REXX program would be:

QUEUE  "//JOBCARD  JOB (001),CLASS=A,MSGCLASS=A   "
QUEUE  "//STEP1   EXEC PGM=IEFBR14                "
A = OPSUBMIT()                                     
RETURN          



With SYSVIEW product and the Event Capture, an event can be added to the SYSVIEW scheduler for midnight to run a CAPTURE function, captures run as CLISTs. 

In this case, a list of the commands can be defined in a CAPLIB member.

Since there is no intent to capture anything, there is no need to include any CAPTURE statements.