Neue Features, Optimierungen und Bugfixes
- Neues Projekt `EDMI.API` zur Solution hinzugefügt. - `App.config`: Abhängigkeiten und `bindingRedirect` aktualisiert. - Verbesserte Thread-Sicherheit mit `ReaderWriterLockSlim`. - SQL-Abfragen mit `WITH (NOLOCK)` für bessere Parallelität. - Robuste Verarbeitung von `DataRow`-Werten mit `IIf(IsDBNull(...))`. - Neue Sicherheitsprüfung für `JobListener` initialisiert. - `SaveDataTables` optimiert, Performance-Warnungen hinzugefügt. - Versionsnummer auf `2.5.0.0` aktualisiert, Copyright auf 2026. - Paket `NLog` aus `packages.config` entfernt.
This commit is contained in:
@@ -77,7 +77,7 @@ Public Class WindowsService
|
||||
GlobalState = New GlobalState(LogConfig, MSSQL_IDB, MSSQL_ECM)
|
||||
|
||||
Dim oMSSQLServer = GetMSSQL_Config(LogConfigScheduler)
|
||||
Scheduler = New Scheduler(LogConfigScheduler, oMSSQLServer, GlobalState.TableStore)
|
||||
Scheduler = New Scheduler(LogConfigScheduler, oMSSQLServer, GlobalState.TableStore, GlobalState)
|
||||
|
||||
Logger.Info("Loading Global Data")
|
||||
GlobalState.LoadObjectStores()
|
||||
@@ -94,7 +94,6 @@ Public Class WindowsService
|
||||
EDMIService.Firebird = Firebird
|
||||
EDMIService.LogConfig = LogConfig
|
||||
EDMIService.AppConfig = Config
|
||||
EDMIService.Filesystem = Filesystem
|
||||
EDMIService.GlobalState = GlobalState
|
||||
EDMIService.Scheduler = Scheduler
|
||||
|
||||
@@ -187,8 +186,13 @@ Public Class WindowsService
|
||||
Private Function GetMSSQL_Config(pLogConfig As LogConfig) As MSSQLServer
|
||||
Logger.Debug("Connecting to Config MSSQL")
|
||||
If Config.ConnectionString_Config = String.Empty Then
|
||||
Logger.Warn("Configuration for ConnectionString_Config is missing.")
|
||||
Throw New ArgumentNullException("ConnectionString_Config")
|
||||
If Config.ConnectionString_ECM <> String.Empty Then
|
||||
Logger.Info("Using ConnectionString_ECM for Config Database connection.")
|
||||
Return GetMSSQL_ECM(pLogConfig)
|
||||
Else
|
||||
Logger.Warn("Configuration for ConnectionString_Config is missing and ConnectionString_ECM is also missing.")
|
||||
Throw New ArgumentNullException("ConnectionString_Config")
|
||||
End If
|
||||
End If
|
||||
|
||||
Dim oMSSQL = New MSSQLServer(pLogConfig, Config.ConnectionString_Config)
|
||||
|
||||
Reference in New Issue
Block a user