MS_12052016

app/DD-Record-Organiser/frmConstructor_Main.vb

@@ -2356,10 +2356,10 @@ Public Class frmConstructor_Main
                     Exit Sub
                 End Try
 
-                End If
-                CtrlCommandUI.IsInsert = False
-                RECORD_CHANGED = False
             End If
+            CtrlCommandUI.IsInsert = False
+            RECORD_CHANGED = False
+        End If
     End Sub
     Private Function GET_GROUP_OR_SINGLE_RECORD(PARENT_RECORD_ID As Integer, Entityload As Boolean)
         'Dim sqlRecord As String = String.Format("SELECT T.RECORD2_ID FROM TBPMO_RECORD_CONNECT T, TBPMO_RECORD T1 WHERE T.RECORD2_ID = T1.GUID AND T.RECORD1_ID = {0} AND T1.ENTITY_ID = (SELECT PARENT_ID FROM TBPMO_FORM WHERE GUID = {1})", LINKED_RECORD, ENTITY_ID)
@@ -2477,7 +2477,7 @@ Public Class frmConstructor_Main
                 'Databinding Neu
                 BindingSource_Entity.DataSource = DT_SELECTION
                 GridControlMain.DataSource = BindingSource_Entity
-              
+
                 ' Den Editor Initialisieren und Optionen setzen
                 Dim CheckBoxEditorForDisplay = New RepositoryItemCheckEdit()
                 CheckBoxEditorForDisplay.ValueChecked = 1