MS
This commit is contained in:
@@ -21,9 +21,6 @@
|
||||
Dim CONNID = ClassDatabase.Execute_Scalar(String.Format("SELECT CONNECTION_ID_1 FROM TBPMO_CONTROL WHERE GUID = {0}", ControlId))
|
||||
Dim SQL As String = ClassDatabase.Execute_Scalar(String.Format("SELECT SQL_COMMAND_1 FROM TBPMO_CONTROL WHERE GUID = {0}", ControlId))
|
||||
SQL = ClassControlValues.ReplaceSqlCommandPlaceholders(SQL, RecordId, ParentRecordId, entity_ID)
|
||||
If ControlId = 272 Then
|
||||
Console.WriteLine("272")
|
||||
End If
|
||||
|
||||
If SQL = "" Or IsDBNull(SQL) Then
|
||||
Return Nothing
|
||||
@@ -454,7 +451,7 @@
|
||||
End If
|
||||
End While
|
||||
Next
|
||||
If CtrlCommandUI.IsEdit Then
|
||||
If CtrlCommandUI.IsEdit Or CtrlCommandUI.IsInsert Then
|
||||
CURRENT_RECORD_ENABLED = True
|
||||
End If
|
||||
|
||||
|
||||
Reference in New Issue
Block a user