MS

2016-12-09 10:23:42 +01:00
parent 481e767a99
commit 30a6c6b9fb
35 changed files with 1449 additions and 3454 deletions
--- a/app/DD-Record-Organiser/frmConstructorDesigner.vb
+++ b/app/DD-Record-Organiser/frmConstructorDesigner.vb
@@ -755,7 +755,7 @@ Public Class frmConstructorDesigner
                Dim sql = String.Format("SELECT FORM_ID FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE GUID = {0}", SelectedNode.Tag)
                Dim FormId As Integer = ClassDatabase.Execute_Scalar(sql)
                If FormId > 0 Then
-                    CURRENT_FORM_ID = FormId
+                    CURRENT_ENTITY_ID = FormId
                    OpenFormLevelDesigner()
                End If
            End If