actually respect sql suggestion setting for lookupgrid
This commit is contained in:
@@ -59,7 +59,7 @@ Public Class ClassControls
|
||||
PrepareDependingControl(sender)
|
||||
End Sub
|
||||
|
||||
Public Function AddVorschlag_ComboBox(indexname As String, y As Integer, conid As Integer, sql_Vorschlag As String, Multiselect As Boolean, DataType As String, Optional Vorgabe As String = "", Optional AddNewValues As Boolean = False, Optional PreventDuplicateValues As Boolean = False) As Control
|
||||
Public Function AddVorschlag_ComboBox(indexname As String, y As Integer, conid As Integer, sql_Vorschlag As String, Multiselect As Boolean, DataType As String, Optional Vorgabe As String = "", Optional AddNewValues As Boolean = False, Optional PreventDuplicateValues As Boolean = False, Optional SQLSuggestion As Boolean = False) As Control
|
||||
Try
|
||||
Dim oSql As String = sql_Vorschlag
|
||||
Dim oConnectionString As String
|
||||
@@ -97,7 +97,7 @@ Public Class ClassControls
|
||||
|
||||
oConnectionString = ClassFormFunctions.GetConnectionString(conid)
|
||||
|
||||
If oConnectionString IsNot Nothing And oSql.Length > 0 Then
|
||||
If oConnectionString IsNot Nothing And oSql.Length > 0 And SQLSu ggestion = True Then
|
||||
LOGGER.Debug("Connection String (redacted): [{0}]", oConnectionString.Substring(0, 30))
|
||||
|
||||
If ClassPatterns.HasComplexPatterns(oSql) Then
|
||||
|
||||
Reference in New Issue
Block a user