Is there any function to monitor the system status?
Release : 14.0
Component : OPS/MVS
The OPSTATUS function can be used to return the number of address spaces currently present in the system or in LOGON state, as well as the number of unresponsive processes (WTOR) and IMS/DC systems, etc.
<For example>
Displaying the number of TSO users
SAY 'There are 'OPSTATUS('T', 'A', '*'),
'TSO user signed on.'
List of TSO users and display of session times
Cnt = OPSTATUS('S', 'I', 'TSO')
IF Cnt > 0 THEN
DO
PULL Line
Time = WORD(Line, 11)
SAY 'TSO has been up 'Time 'seconds.'
END
For more information, see OPSTATUS Function