added PROC_QUEUE metric to MONA_MONITORS

LSL2/STPROC/MONA_MONITORS.txt

@@ -1,7 +1,5 @@
 Compile subroutine MONA_MONITORS(@Service, @Params)
 #pragma precomp SRP_PreCompiler
-
-
 /*****************************************************************************\
 	This is a utility function. It is a container for auditing general OI metrics
 	and then reporting them into MonA directly.
@@ -37,17 +35,23 @@ Service RunMonitors()
     Lock hSysLists, ServiceKeyID then
         
         Query      = 'SELECT SQL_BACKLOG'
-        Rlist(Query, Target_ActiveList$, '', '', '')
+        RList(Query, TARGET_ACTIVELIST$, '', '', '')
         QueueCount = @RecCount
         GoSub ClearCursors
         Mona_Services('SendMetric', 'SQL_BACKLOG', 'SQL_BACKLOG', QueueCount)
         
         Query      = 'SELECT SQL_PENDING'
-        Rlist(Query, Target_ActiveList$, '', '', '')
+        RList(Query, TARGET_ACTIVELIST$, '', '', '')
         QueueCount = @RecCount
         GoSub ClearCursors
         Mona_Services('SendMetric', 'SQL_PENDING', 'SQL_PENDING', QueueCount)
         
+        Query      = 'SELECT PROC_QUEUE'
+        RList(Query, TARGET_ACTIVELIST$, '', '', '')
+        QueueCount = @RecCount
+        GoSub ClearCursors
+        Mona_Services('SendMetric', 'GRP_OPENINSIGHT_MES_OP_FE_SERVICE_MANANGER', 'PROC_QUEUE', QueueCount)
+        
         GoSub SAPHeartbeat
 		GoSub MonitorMetrologyDirs
 		
@@ -61,6 +65,7 @@ end service
 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
 
 SAPHeartbeat:
+	
 	SAPHeartbeatDTM = Database_Services('ReadDataRow', 'APP_INFO', 'SAP_HEARTBEAT_DTM')
 	CurrDTM = SRP_Datetime('Now')
 	If SAPHeartbeatDTM NE '' then
@@ -75,7 +80,9 @@ SAPHeartbeat:
 
 return
 
+
 MonitorMetrologyDirs:
+	
 	CurrDTM = SRP_Datetime('Now')
 	//Tencor
 	TencorInstanceName = 'MET08DDUPSFS6420'
@@ -183,12 +190,12 @@ MonitorMetrologyDirs:
 
 return
 
+
 ClearCursors:
+	
 	For counter = 0 to 8
 		ClearSelect counter
 	Next counter
+	
 return
 
-
-
-