EDMIService: Add Quartz Scheduler, Add Caching for Datatables

Service.EDMIService/GlobalState.vb

@@ -4,21 +4,23 @@ Imports DigitalData.Modules.Logging
 Public Class GlobalState
     Private ReadOnly _LogConfig As LogConfig
     Private ReadOnly _Logger As Logger
-    Private ReadOnly _MSSQL As MSSQLServer
+    Private ReadOnly _MSSQL_IDB As MSSQLServer
+    Private ReadOnly _MSSQL_ECM As MSSQLServer
 
     Public Property ObjectStores As New List(Of ObjectStore)
 
-    Public Sub New(LogConfig As LogConfig, MSSQL_IDB As MSSQLServer)
+    Public Sub New(LogConfig As LogConfig, MSSQL_IDB As MSSQLServer, MSSQL_ECM As MSSQLServer)
         _LogConfig = LogConfig
         _Logger = LogConfig.GetLogger()
-        _MSSQL = MSSQL_IDB
+        _MSSQL_IDB = MSSQL_IDB
+        _MSSQL_ECM = MSSQL_ECM
     End Sub
 
     Public Sub LoadObjectStores()
         _Logger.Debug("Loading Object Stores")
         Try
             Dim oSQL As String = "SELECT * FROM VWIDB_OBJECTSTORE"
-            Dim oDatatable As DataTable = _MSSQL.GetDatatable(oSQL)
+            Dim oDatatable As DataTable = _MSSQL_IDB.GetDatatable(oSQL)
 
             ObjectStores.Clear()
 
@@ -36,7 +38,6 @@ Public Class GlobalState
             Next
         Catch ex As Exception
             _Logger.Error(ex)
-            Throw ex
         End Try
     End Sub