AppStd/ResulHandlerMSSQL
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MSChanges

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber
2019-02-15 10:21:11 +01:00
parent d8a4759106
commit 3c2092ca34
11 changed files with 157 additions and 136 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
app/DDWDResultHandler/clsPMRefresh.vb
View File

@@ -21,6 +21,10 @@ Public Class clsPMRefresh
_windream = New clsWindream_allgemein(MyLogger)
Logger.Debug("..in CheckRun..classes initialized")
If _windream.Init() = True Then
If My.Settings.SQLSERVER_CS_PMRefresh = "" Then
Logger.Info("SQLSERVER_CS_PMRefresh is empty!")
Return False
End If
If _database.Init(My.Settings.SQLSERVER_CS_PMRefresh, False) = True Then
Dim oDTPM_CONFIG As DataTable = _database.Return_Datatable("select * from TBPM_KONFIGURATION where GUID = 1", My.Settings.SQLSERVER_CS_PMRefresh)
If oDTPM_CONFIG.Rows.Count = 1 Then
@@ -79,7 +83,7 @@ Public Class clsPMRefresh
Logger.Warn("oDTPM_CONFIG.Rows.Count <> 1")
End If
Else
Logger.Warn($"Could not initialize the database of PMRefresh ({My.Settings.SQLSERVER_CS_PMRefresh})")
Logger.Warn($"Could not initialize the database of PMRefresh ConString: '{My.Settings.SQLSERVER_CS_PMRefresh}'")
End If
Else
Logger.Warn("Could not initialize windream in PMRefresh.")