How to respond to WTORs still outstanding at 15 minutes

Products

• OPS/MVS Event Management & Automation

Issue/Introduction

We would like to notice when there is an outstanding WTORs waiting for a reply for more than 15 minutes to rise an alert.

Is there any specific function to know the time when the WTOR was created or since when it is waiting?

Environment

OPS/MVS

Resolution

OPS/MVS provides the OPSTATUS function, which enables customers to easily identify outstanding WTORs.  As documented in the "Command and Function Reference" section of the manual, the following would be to identify and reply to a WTOR that is outstanding for 15 minutes: 

ThisSys = OPSINFO("SYSNAME")

 

temp = OPSTATUS("R","S","*")

 

Do While QUEUED() > 0

 

   Parse Pull ReplyID Text

 

   Parse Pull jbnm jbid asid syna uid secs .

 

   If (syna = ThisSys) & (secs > 900) Then

 

      Say jbnm jbid asid uid secs ReplyID Text

 

End

 

This code may be modified to send an alert rather than replying to the WTOR.