refactored Mona_Services to queue requests and send them in bulk via the Service Manager
Added queue count to mona monitors. Added email notification on ProcessMonaQueue. Added hard limit of 2000 requests to be sent to MonInBufferedWorker at one time. Fixed outdated Shipment_Services in SharedTest environment.
This commit is contained in:
@ -58,6 +58,12 @@ Service RunMonitors()
|
||||
GoSub ClearCursors
|
||||
Mona_Services('SendMetric', 'GRP_OPENINSIGHT_MES_OP_FE_SERVICE_MANANGER', 'TRANSACTION_QUEUE', QueueCount)
|
||||
|
||||
Query = 'SELECT MONA_QUEUE'
|
||||
RList(Query, TARGET_ACTIVELIST$, '', '', '')
|
||||
QueueCount = @RecCount
|
||||
GoSub ClearCursors
|
||||
Mona_Services('SendMetric', 'GRP_OPENINSIGHT_MES_OP_FE_SERVICE_MANANGER', 'MONA_QUEUE', QueueCount)
|
||||
|
||||
GoSub SAPHeartbeat
|
||||
GoSub MonitorMetrologyDirs
|
||||
|
||||
|
Reference in New Issue
Block a user