This commit is contained in:
Digital Data - Marlon Schreiber
2018-06-13 14:46:50 +02:00
parent 6a02439942
commit 8d9098fe8e
6 changed files with 42 additions and 18 deletions

View File

@@ -366,9 +366,13 @@ Public Class ClassControlCreator
If FilteredRows.Count = 1 Then
For Each row As DataRow In FilteredRows
CURRENT_CONTROL_ID = row("GUID")
CURR_CON_ID = row("CONNECTION_ID")
CURR_SELECT_CONTROL = row("SQL_UEBERPRUEFUNG")
CURR_CHOICE_LIST = row("CHOICE_LIST")
CURR_CON_ID = IIf(IsDBNull(row("CONNECTION_ID")), 0, row("CONNECTION_ID"))
If CURR_CON_ID = 0 Then
ClassLogger.Add(" >> CONNECTION NOT DEFINED - CTRL_GUID:" & CURRENT_CONTROL_ID, False)
End If
CURR_SELECT_CONTROL = IIf(IsDBNull(row("SQL_UEBERPRUEFUNG")), "", row("SQL_UEBERPRUEFUNG"))
CURR_CHOICE_LIST = IIf(IsDBNull(row("CHOICE_LIST")), "", row("CHOICE_LIST"))
Next
Return 1
Else