MS Anpassungen Structure Nodes etc

app/DD-Record-Organizer/ClassControlBuilder.vb

@@ -250,12 +250,22 @@ Public Class ClassControlBuilder
     End Sub
 
     Public Sub OnComboBoxFocus(sender As Object, ByVal e As EventArgs)
-        Dim combo As CustomComboBox = sender
-        combo.BackColor = Color.LemonChiffon
+        Try
+            Dim combo As CustomComboBox = sender
+            combo.BackColor = Color.LemonChiffon
+        Catch ex As Exception
+            ClassLogger.Add("Unexpected error in OnComboBoxFocus: " & ex.Message, True)
+        End Try
+
     End Sub
     Public Sub OnComboBoxLostFocus(sender As Object, ByVal e As EventArgs)
-        Dim combo As CustomComboBox = sender
-        combo.BackColor = Color.White
+        Try
+            Dim combo As CustomComboBox = sender
+            combo.BackColor = Color.White
+        Catch ex As Exception
+            ClassLogger.Add("Unexpected error in OnComboBoxLostFocus: " & ex.Message, True)
+        End Try
+
     End Sub
     Dim CONTROL_ID
     Public Sub Enable_Controls(control As Control, TableResult As DataTable, value As Object)
@@ -1872,53 +1882,64 @@ Public Class ClassControlBuilder
 
     End Sub
     Public Sub AutoCompleteCombo_KeyUp(ByVal cbo As CustomComboBox, ByVal e As KeyEventArgs)
-        ''Allow select keys without Autocompleting
-        Select Case e.KeyCode
-            Case Keys.Back, Keys.Left, Keys.Right, Keys.Up, Keys.Delete, Keys.Down
-                Return
-        End Select
+        Try
+            ''Allow select keys without Autocompleting
+            Select Case e.KeyCode
+                Case Keys.Back, Keys.Left, Keys.Right, Keys.Up, Keys.Delete, Keys.Down
+                    Return
+            End Select
 
-        Dim iFoundIndex As Integer
-        iFoundIndex = cbo.FindStringExact(cbo.Text)
-        'cbo.SelectedIndex = iFoundIndex
-        'Dim sTypedText As String
-        'Dim iFoundIndex As Integer
-        'Dim oFoundItem As Object
-        'Dim sFoundText As String
-        'Dim sAppendText As String
+            Dim iFoundIndex As Integer
+            iFoundIndex = cbo.FindStringExact(cbo.Text)
+            'cbo.SelectedIndex = iFoundIndex
+            'Dim sTypedText As String
+            'Dim iFoundIndex As Integer
+            'Dim oFoundItem As Object
+            'Dim sFoundText As String
+            'Dim sAppendText As String
 
 
 
-        ''Get the Typed Text and Find it in the list
-        'sTypedText = cbo.Text
-        'iFoundIndex = cbo.FindString(sTypedText)
+            ''Get the Typed Text and Find it in the list
+            'sTypedText = cbo.Text
+            'iFoundIndex = cbo.FindString(sTypedText)
 
-        ''If we found the Typed Text in the list then Autocomplete
-        'If iFoundIndex >= 0 Then
+            ''If we found the Typed Text in the list then Autocomplete
+            'If iFoundIndex >= 0 Then
 
-        '    'Get the Item from the list (Return Type depends if Datasource was bound 
-        '    ' or List Created)
-        '    oFoundItem = cbo.Items(iFoundIndex)
+            '    'Get the Item from the list (Return Type depends if Datasource was bound 
+            '    ' or List Created)
+            '    oFoundItem = cbo.Items(iFoundIndex)
 
-        '    'Use the ListControl.GetItemText to resolve the Name in case the Combo 
-        '    ' was Data bound
-        '    sFoundText = cbo.GetItemText(oFoundItem)
+            '    'Use the ListControl.GetItemText to resolve the Name in case the Combo 
+            '    ' was Data bound
+            '    sFoundText = cbo.GetItemText(oFoundItem)
 
-        '    'Append then found text to the typed text to preserve case
-        '    sAppendText = sFoundText.Substring(sTypedText.Length)
-        '    cbo.Text = sTypedText & sAppendText
+            '    'Append then found text to the typed text to preserve case
+            '    sAppendText = sFoundText.Substring(sTypedText.Length)
+            '    cbo.Text = sTypedText & sAppendText
 
-        '    'Select the Appended Text
-        '    cbo.SelectionStart = sTypedText.Length
-        '    cbo.SelectionLength = sAppendText.Length
+            '    'Select the Appended Text
+            '    cbo.SelectionStart = sTypedText.Length
+            '    cbo.SelectionLength = sAppendText.Length
+
+            'End If
+        Catch ex As Exception
+            ClassLogger.Add("Unexpected error in AutoCompleteComboKEyUp: " & ex.Message, True)
+
+        End Try
 
-        'End If
 
     End Sub
     Public Sub AutoCompleteCombo_Leave(ByVal cbo As CustomComboBox)
-        Dim iFoundIndex As Integer
-        iFoundIndex = cbo.FindStringExact(cbo.Text)
-        cbo.SelectedIndex = iFoundIndex
+        Try
+            Dim iFoundIndex As Integer
+            iFoundIndex = cbo.FindStringExact(cbo.Text)
+            cbo.SelectedIndex = iFoundIndex
+        Catch ex As Exception
+
+        End Try
+
     End Sub
     Public Sub AddDateTimePicker(id As Integer,
                                 name As String,

app/DD-Record-Organizer/ClassCustomComboBox.vb

@@ -28,15 +28,20 @@
             If (Me.Items(e.Index).GetType() = GetType(String)) Then
                 label = Me.Items(e.Index).ToString()
             Else
-                'Wenn die Items aus einer Datatable kommen, wird der DisplayMember ausgelesen
-                Dim rowView As DataRowView = Me.Items(e.Index)
-                Dim rowCount As Integer = rowView.Row.ItemArray.Count
+                Try
+                    'Wenn die Items aus einer Datatable kommen, wird der DisplayMember ausgelesen
+                    Dim rowView As DataRowView = Me.Items(e.Index)
+                    Dim rowCount As Integer = rowView.Row.ItemArray.Count
+
+                    If rowCount = 1 Then
+                        label = rowView.Item(0)
+                    ElseIf rowCount = 2 Then
+                        label = rowView.Item(1)
+                    End If
+                Catch ex As Exception
+                    ClassLogger.Add("Unexpected error in OnDrawItem (datatable): " & ex.Message, True)
+                End Try
 
-                If rowCount = 1 Then
-                    label = rowView.Item(0)
-                ElseIf rowCount = 2 Then
-                    label = rowView.Item(1)
-                End If
             End If
 
             If e.State = (DrawItemState.Disabled Or DrawItemState.NoAccelerator Or DrawItemState.NoFocusRect Or DrawItemState.ComboBoxEdit) Then

app/DD-Record-Organizer/ClassDOC_SEARCH.vb

@@ -241,6 +241,7 @@ Public Class ClassDOC_SEARCH
         Return GET_DOCSEARCH_DATATABLE(BG)
     End Function
     Public Shared Function Get_DOC_RESULTTABLE(vDT_RESULTLIST_OPTIONS As DataTable, vDT_RESULTLIST_SELVALUES As DataTable, DT_WINDREAM_RESULTLIST As DataTable, ENT_ID As Integer, REC_ID As Integer, Optional BG As Boolean = False, Optional Preload As Boolean = False)
+        Dim _step As String
         Dim COL_ARRAY_RESULTLIST As List(Of String)
         ENTITY_ID = ENT_ID
         DT_RESULTLIST_OPTIONS = vDT_RESULTLIST_OPTIONS
@@ -256,7 +257,7 @@ Public Class ClassDOC_SEARCH
                 Return Nothing
             End If
             sw.Done()
-
+            _step = "1"
             If Preload = True Then
                 Return Nothing
             End If
@@ -271,12 +272,14 @@ Public Class ClassDOC_SEARCH
                     listcheck.Add(COLNAME)
                 End If
             Next
+            _step = "2"
             For Each col1 As String In listcheck
                 Dim collist As DataColumn = DT_FILE_RESULT.Columns(col1)
                 If Not IsNothing(collist) Then
                     collist.DataType = GetType(Boolean)
                 End If
             Next
+            _step = "3"
             Try
                 'Die Icon Colum erstellen und konfigurieren
                 Dim colIcon As New System.Data.DataColumn()
@@ -284,24 +287,25 @@ Public Class ClassDOC_SEARCH
                 colIcon.ColumnName = "ICON"
                 colIcon.Caption = ""
                 DTGrid.Columns.Add(colIcon)
-                '
+                _step = "4"
                 Dim colPath As New System.Data.DataColumn()
                 colPath.DataType = GetType(String)
                 colPath.ColumnName = "FULLPATH"
                 colPath.Caption = "Fullpath"
                 DTGrid.Columns.Add(colPath)
-
+                _step = "5"
                 Dim colOtype As New System.Data.DataColumn()
                 colOtype.DataType = GetType(String)
                 colOtype.ColumnName = "OBJECTTYPE"
                 colOtype.Caption = "Objecttype"
                 DTGrid.Columns.Add(colOtype)
+                _step = "6"
                 Dim colDocID As New System.Data.DataColumn()
                 colDocID.DataType = GetType(Int32)
                 colDocID.ColumnName = "DocID"
                 colDocID.Caption = "DocID"
                 DTGrid.Columns.Add(colDocID)
-
+                _step = "7"
 
                 If Not DT_WINDREAM_RESULTLIST Is Nothing And DT_WINDREAM_RESULTLIST.Rows.Count >= 1 Then
                     Dim ColCount As Integer = 1
@@ -319,11 +323,13 @@ Public Class ClassDOC_SEARCH
                             ClassLogger.Add(String.Format("Unexpected Error in DTGrid.Columns.Add({0}) - CONSTR_DET_ID: {1} ", ColumnName, CURRENT_CONSTRUCTOR_DETAIL_ID) & ex.Message)
                         End Try
                     Next
+                    _step = "7.1"
                     'Jetzt das Array zusammenbauen um die Spaltenwerte zu erhalten
                     For Each rw As DataRow In DT_WINDREAM_RESULTLIST.Rows
                         Dim colname = rw.Item("COLUMN_VIEW")
                         ColArrayDEFINITION.Add(rw.Item("COLUMN_VIEW"))
                     Next
+                    _step = "7.2"
                 End If
             Catch ex As Exception
                 ClassLogger.Add("Unexpected Error in Construct Datatable: " & ex.Message)
@@ -333,16 +339,18 @@ Public Class ClassDOC_SEARCH
 
             sw = New SW("Run Get_DOC_RESULTTABLE")
             COL_ARRAY_RESULTLIST = ColArrayDEFINITION
-
+            _step = "8"
             For Each col1 As String In listcheck
                 Dim collist As DataColumn = DTGrid.Columns(col1)
                 If Not IsNothing(collist) Then
                     collist.DataType = GetType(Boolean)
                 End If
             Next
-
-
+            _step = "9"
+            Dim _i As Integer
             For Each FILE_ROW As DataRow In DT_FILE_RESULT.Rows
+                _i += 1
+                _step = "9 FileCount(" & _i.ToString
                 Dim fullpath = FILE_ROW.Item("FULL_FILENAME")
                 Dim objecttype = FILE_ROW.Item("OBJECTTYPE")
                 Dim DocID = FILE_ROW.Item("DocID")
@@ -417,14 +425,14 @@ Public Class ClassDOC_SEARCH
                 '                    ClassLogger.Add("Unexpected Error in CreateRow for doc '" & filename & "- Error: " & ex.Message)
                 '                End Try
             Next
-
+            _step = "10"
 
             Return DTGrid
 
             sw.Done()
         Catch ex As Exception
-            MsgBox("Unexpected Error in Get_DOC_RESULTTABLE: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-            ClassLogger.Add("Unexpected Error in Get_DOC_RESULTTABLE: " & ex.Message)
+            MsgBox("Unexpected Error in Get_DOC_RESULTTABLE (Step " & _step & "): " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+            ClassLogger.Add("Unexpected Error in Get_DOC_RESULTTABLE (Step " & _step & "): " & ex.Message)
             Return Nothing
         End Try
     End Function

app/DD-Record-Organizer/ClassHelper.vb

@@ -203,9 +203,13 @@ Public Class ClassHelper
                     Process.Start(RESULT_DOC_PATH)
                 Else
                     If clsWD_GET.WDFile_exists(RESULT_DOC_PATH, clsDatabase.DB_PROXY_INITIALIZED, ClassProxy.MyLinkedServer, True) = False Then
-                        MSGBOX_Handler("ERROR", "", "File '" & RESULT_DOC_PATH & "' not existing!")
+                        MSGBOX_Handler("ERROR", "File not found (1):", "File '" & RESULT_DOC_PATH & "' not existing or Windream-Malfunction...." & vbNewLine &
+                                       " - Maybe You are not provided with reading rights?!" & vbNewLine &
+                                       " - Check Your windream-drive: is W accessible? Can You navigate to the filepath?" & vbNewLine & "Please inform Your admin!")
                     Else
-                        MSGBOX_Handler("ERROR", "", "File '" & RESULT_DOC_PATH & "' is existing but You are not provided with reading rights! Please inform Your admin!")
+                        MSGBOX_Handler("ERROR", "File not found (2):", "File '" & RESULT_DOC_PATH & "' exists in windream BUT is not accessible!" & vbNewLine &
+                                       " - Maybe You are not provided with reading rights?!" & vbNewLine &
+                                       " - Check Your windream-drive: is W accessible? Can You navigate to the filepath?" & vbNewLine & "Please inform Your admin!")
                     End If
                 End If
             End If

app/DD-Record-Organizer/ClassNodeNavigation.vb

@@ -19,7 +19,7 @@
             ' Node erstellen..
             Dim NEW_NODE As TreeNode
             NEW_NODE = New TreeNode(nodetext9)
-            ClassNodeNavigation.Check_NODE_CONFIG_ID(LevelEntity9)
+            ClassNodeNavigation.Check_NODE_CONFIG_ID(LevelEntity9, NEW_NODE)
             NEW_NODE.Tag = ClassNodeNavigation.CreateNODE_TAG(LevelEntity9, ID9, RECORD_ID, NODE_CONFIG_ID)
 
             Dim index = 0
@@ -35,18 +35,44 @@
             ParentNode.Nodes.Add(NEW_NODE)
         Next '
     End Function
-    Public Shared Sub Check_NODE_CONFIG_ID(ENTITY_ID As Integer)
+    Public Shared Sub Check_NODE_CONFIG_ID(ENTITY_ID As Integer, myTreeNode As TreeNode)
         Try
-            If CURRENT_DT_NODE_CONFIGURABLE_NODES.Rows.Count > 0 Then
-                'Prüfen ob es für dieses Level einen konfigurierbaren Knoten gibt
-                Dim result = (From form In CURRENT_DT_NODE_CONFIGURABLE_NODES.AsEnumerable()
-                              Select form
-                              Where form.Item("ENTITY_ID") = ENTITY_ID).Single()
+            If myTreeNode Is Nothing Then
+                Exit Sub
+            End If
+            Dim NODE_ID
+            Dim staticListItems = myTreeNode.Tag.Split("#")
+            If staticListItems(0).Contains("NODE-TYPE") Then
+                NODE_ID = staticListItems(0).ToString.Replace("NODE-TYPE-", "")
+
+
+            End If
+            If CURRENT_DT_NODE_CONFIGURABLE_NODES.Rows.Count > 0 And IsNumeric(NODE_ID) Then
+                'Prüfen ob es für dieses Level einen konfigurierbaren Knoten gibt
+                Dim table As DataTable = CURRENT_DT_NODE_CONFIGURABLE_NODES
+                ' Get rows with PARENT_ID = NODE_ID
+                Dim result() As DataRow = table.Select("PARENT_NODE = " & NODE_ID)
+                Dim count As Integer
+                Dim ID
+                ' Loop.
+                For Each row As DataRow In result
+                    count += 1
+                    ID = row.Item("GUID")
+                    CURRENT_NODE_IMAGE = row.Item("NODE_IMAGE")
+                    If count = 2 Then Exit For
+                    Console.WriteLine(row(0))
+                Next
+
+                'Dim result = (From form In CURRENT_DT_NODE_CONFIGURABLE_NODES.AsEnumerable()
+                '              Select form
+                '              Where form.Item("PARENT_NODE") = NODE_ID).Single()
+
 
-                Dim ID = result.Item("GUID")
                 If Not IsNothing(ID) Then
                     ClassNodeNavigation.NODE_CONFIGURABLE_ID = ID
                     CURRENT_NODE_CONFIGURABLE_ID = ID
+                Else
+                    CURRENT_NODE_CONFIGURABLE_ID = 0
                 End If
             Else
                 If LogErrorsOnly = False Then ClassLogger.Add("NO CURRENT_DT_NODE_CONFIGURABLE_NODES", False)
@@ -92,14 +118,16 @@
             For i = 0 To MAIN_NODES.GetUpperBound(0)
                 If ENTITY_ID <> MAIN_NODES(i)("ENTITY_ID") Then
                     ENTITY_ID = MAIN_NODES(i)("ENTITY_ID")
-                    ClassNodeNavigation.Check_NODE_CONFIG_ID(MAIN_NODES(i)("ENTITY_ID"))
+                    ClassNodeNavigation.Check_NODE_CONFIG_ID(MAIN_NODES(i)("ENTITY_ID"), Nothing)
                 End If
+
                 Dim NODE_Tag = CreateNODE_TAG(MAIN_NODES(i)("ENTITY_ID"), MAIN_NODES(i)("GUID"), MAIN_NODES(i)("RECORD_ID"), MAIN_NODES(i)("NODE_CONFIG_ID"))
                 Dim MAIN_NODE = New TreeNode(MAIN_NODES(i)("NODE_CAPTION")) '"NODE_CAPTION"
                 MAIN_NODE.Tag = NODE_Tag
                 Dim index As Integer = 0
                 For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
-                    If img = MAIN_NODES(i)("NODE_CONFIG_ID") & "#" & MAIN_NODES(i)("ENTITY_ID") Then
+
+                    If img = MAIN_NODES(i)("NODE_CONFIG_ID") Then ' & "#" & MAIN_NODES(i)("ENTITY_ID")
                         Exit For
                     End If
                     index += 1
@@ -139,14 +167,24 @@
         For i = 0 To SUB_NODE_ROW.GetUpperBound(0)
             If ENTITY_ID <> SUB_NODE_ROW(i)("ENTITY_ID") Then
                 ENTITY_ID = SUB_NODE_ROW(i)("ENTITY_ID")
-                ClassNodeNavigation.Check_NODE_CONFIG_ID(SUB_NODE_ROW(i)("ENTITY_ID"))
+                ClassNodeNavigation.Check_NODE_CONFIG_ID(SUB_NODE_ROW(i)("ENTITY_ID"), MY_NODE)
             End If
             Dim NODE_Tag = CreateNODE_TAG(SUB_NODE_ROW(i)("ENTITY_ID"), SUB_NODE_ROW(i)("GUID"), SUB_NODE_ROW(i)("RECORD_ID"), SUB_NODE_ROW(i)("NODE_CONFIG_ID"))
+            If SUB_NODE_ROW(i)("NODE_CAPTION").ToString.Contains("Neuer") Then
+                Console.WriteLine(SUB_NODE_ROW(i)("NODE_CAPTION"))
+            End If
             Dim SUB_NODE = New TreeNode(SUB_NODE_ROW(i)("NODE_CAPTION"))
             SUB_NODE.Tag = NODE_Tag
             Dim index As Integer = 0
-            For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
-                If img = SUB_NODE_ROW(i)("NODE_CONFIG_ID") & "#" & SUB_NODE_ROW(i)("ENTITY_ID") Then
+            For Each imgkey As String In TREEVIEW_IMAGELIST.Images.Keys
+                If SUB_NODE_ROW(i)("NODE_CONFIG_ID") = "34" Then
+                    Console.WriteLine(SUB_NODE_ROW(i)("NODE_CONFIG_ID"))
+
+                End If
+                Dim NODE_CONFIG_ID = SUB_NODE_ROW(i)("NODE_CONFIG_ID")
+
+                If imgkey = SUB_NODE_ROW(i)("NODE_CONFIG_ID") Then '& "#" & SUB_NODE_ROW(i)("ENTITY_ID")
+                    'found the key for this node
                     Exit For
                 End If
                 index += 1

app/DD-Record-Organizer/DD-Record-Organizer.vbproj

@@ -298,6 +298,12 @@
     <Compile Include="frmDiagrams.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmDocRecordLink.Designer.vb">
+      <DependentUpon>frmDocRecordLink.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmDocRecordLink.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="frmFileInWork.Designer.vb">
       <DependentUpon>frmFileInWork.vb</DependentUpon>
     </Compile>
@@ -425,10 +431,10 @@
     <Compile Include="frmRecordView.vb">
       <SubType>Form</SubType>
     </Compile>
-    <Compile Include="frmDocLink_to_Record.Designer.vb">
-      <DependentUpon>frmDocLink_to_Record.vb</DependentUpon>
+    <Compile Include="frmDocLink_Record_Entities.Designer.vb">
+      <DependentUpon>frmDocLink_Record_Entities.vb</DependentUpon>
     </Compile>
-    <Compile Include="frmDocLink_to_Record.vb">
+    <Compile Include="frmDocLink_Record_Entities.vb">
       <SubType>Form</SubType>
     </Compile>
     <Compile Include="frmWM_Resultlist_Config.Designer.vb">
@@ -756,12 +762,21 @@
     <EmbeddedResource Include="frmConstructorDesigner.en.resx">
       <DependentUpon>frmConstructorDesigner.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmConstructor_Main.aa.resx">
+      <DependentUpon>frmConstructor_Main.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmDiagrams.en-US.resx">
       <DependentUpon>frmDiagrams.vb</DependentUpon>
     </EmbeddedResource>
     <EmbeddedResource Include="frmDiagrams.resx">
       <DependentUpon>frmDiagrams.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmDocRecordLink.en-US.resx">
+      <DependentUpon>frmDocRecordLink.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmDocRecordLink.resx">
+      <DependentUpon>frmDocRecordLink.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmFileInWork.en-US.resx">
       <DependentUpon>frmFileInWork.vb</DependentUpon>
     </EmbeddedResource>
@@ -864,11 +879,11 @@
     <EmbeddedResource Include="frmRecordView.resx">
       <DependentUpon>frmRecordView.vb</DependentUpon>
     </EmbeddedResource>
-    <EmbeddedResource Include="frmDocLink_to_Record.en-US.resx">
-      <DependentUpon>frmDocLink_to_Record.vb</DependentUpon>
+    <EmbeddedResource Include="frmDocLink_Record_Entities.en-US.resx">
+      <DependentUpon>frmDocLink_Record_Entities.vb</DependentUpon>
     </EmbeddedResource>
-    <EmbeddedResource Include="frmDocLink_to_Record.resx">
-      <DependentUpon>frmDocLink_to_Record.vb</DependentUpon>
+    <EmbeddedResource Include="frmDocLink_Record_Entities.resx">
+      <DependentUpon>frmDocLink_Record_Entities.vb</DependentUpon>
     </EmbeddedResource>
     <EmbeddedResource Include="frmWM_Resultlist_Config.en-US.resx">
       <DependentUpon>frmWM_Resultlist_Config.vb</DependentUpon>
@@ -944,6 +959,7 @@
     </EmbeddedResource>
     <EmbeddedResource Include="frmConstructor_Main.en-US.resx">
       <DependentUpon>frmConstructor_Main.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="frmConstructor_Main.resx">
       <DependentUpon>frmConstructor_Main.vb</DependentUpon>

app/DD-Record-Organizer/ModuleRuntimeVariables.vb

@@ -30,7 +30,9 @@
 
     Public CURRENT_ENTITYSTRING As String = ""
     Public CURRENT_ENTITYSQL As String
+    Public CURRENT_ENTITY_DT As DataTable
     Public CURRENT_VIEWNAME As String = ""
+
     Public CURRENT_ENTITY_REDUNDANT_ID As Integer
     'Public CURRENT_ENTITYSQL As String
 
@@ -136,6 +138,7 @@
     Public CURRENT_DOCVIEW
 
     Public CURRENT_NODE_CONFIGURABLE_ID As Integer
+    Public CURRENT_NODE_IMAGE
 
     Public CURRENT_CHECK_SUBFOLDER As Boolean = False
     Public CURRENT_SUBFOLDER As String = ""

app/DD-Record-Organizer/frmConstructorDesigner.Designer.vb

@@ -47,8 +47,8 @@ Partial Class frmConstructorDesigner
         Dim Label19 As System.Windows.Forms.Label
         Dim SQL_RIGHT_READ_AND_VIEW_ONLYLabel As System.Windows.Forms.Label
         Dim SQL_RIGHT_WINDREAM_VIEWLabel As System.Windows.Forms.Label
-        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
         Me.DD_ECMAdmin = New DD_Record_Organizer.DD_ECMAdmin()
         Me.TBPMO_FORM_CONSTRUCTORBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.TBPMO_FORM_CONSTRUCTORTableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.TBPMO_FORM_CONSTRUCTORTableAdapter()
@@ -1250,8 +1250,8 @@ Partial Class frmConstructorDesigner
         '
         Me.dgvResult.AllowUserToAddRows = False
         Me.dgvResult.AllowUserToDeleteRows = False
-        DataGridViewCellStyle3.BackColor = System.Drawing.Color.Cyan
-        Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
+        DataGridViewCellStyle5.BackColor = System.Drawing.Color.Cyan
+        Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
         resources.ApplyResources(Me.dgvResult, "dgvResult")
         Me.dgvResult.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
         Me.dgvResult.Name = "dgvResult"
@@ -1261,8 +1261,8 @@ Partial Class frmConstructorDesigner
         '
         Me.dgvPlaceholders.AllowUserToAddRows = False
         Me.dgvPlaceholders.AllowUserToDeleteRows = False
-        DataGridViewCellStyle4.BackColor = System.Drawing.Color.Cyan
-        Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4
+        DataGridViewCellStyle6.BackColor = System.Drawing.Color.Cyan
+        Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6
         Me.dgvPlaceholders.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
         Me.dgvPlaceholders.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.colPlaceholder, Me.colReplace})
         resources.ApplyResources(Me.dgvPlaceholders, "dgvPlaceholders")

app/DD-Record-Organizer/frmConstructorDesigner.resx

@@ -1093,7 +1093,7 @@
         AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
         LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
         ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABS
-        CQAAAk1TRnQBSQFMAgEBAgEAATQBDQE0AQ0BEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+        CQAAAk1TRnQBSQFMAgEBAgEAATwBDQE8AQ0BEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
         AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
         AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
         AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@@ -1910,7 +1910,7 @@
     <value>13</value>
   </data>
   <data name="XtraTabPage5.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1086, 274</value>
+    <value>1090, 277</value>
   </data>
   <data name="XtraTabPage5.Text" xml:space="preserve">
     <value>Quick-View Konfiguration</value>
@@ -2596,7 +2596,7 @@
     <value>4</value>
   </data>
   <data name="XtraTabPage4.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1086, 274</value>
+    <value>1090, 277</value>
   </data>
   <data name="XtraTabPage4.Text" xml:space="preserve">
     <value>Datei-Suche/Rechte (Supervisor)</value>
@@ -2626,7 +2626,7 @@
     <value>0</value>
   </data>
   <data name="XtraTabPage2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1086, 274</value>
+    <value>1090, 277</value>
   </data>
   <data name="XtraTabPage2.Text" xml:space="preserve">
     <value>Einschränkungen Datensätze User</value>
@@ -2716,7 +2716,7 @@
     <value>5</value>
   </data>
   <data name="XtraTabPage6.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1086, 274</value>
+    <value>1090, 277</value>
   </data>
   <data name="XtraTabPage6.Text" xml:space="preserve">
     <value>Zuordnung Entität-Client</value>
@@ -3562,7 +3562,7 @@
     <value>0, 0</value>
   </data>
   <data name="TabControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1086, 274</value>
+    <value>1090, 277</value>
   </data>
   <data name="TabControl1.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>

app/DD-Record-Organizer/frmConstructor_Main.aa.resx

@@ -0,0 +1,985 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="FormDesignerToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        xAAADsQBlSsOGwAAAMpJREFUSEu9lUEOwyAMBHlS38Dj+GafkPbC1WWRRY1qEhtCV1opCngmJIcEIgo5
+        Z9IaHNHm0SaIMXati44MGVLwOt61bdGRIeOvAlmroOx7cHXGykcuewA+uDoDgpmU4QpPKRFarp+4x8vf
+        zAgkHK+CBTjFusAFRzwCNxyxCqbgiEUwDUeuBEtw5EywDEdGglvgiCa4DY5cCZbgCARlGBCtAJvgYqZr
+        E+BVyPIGnMT05CNGJ9j+P9gukJ0V/DDOPjLPmqLNo1WwrxQ+GCNWVrb1cMEAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="tsmiFulltext.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGOfPtRkwAAACBjSFJNAACH
+        DwAAjA8AAP1SAACBQAAAfXkAAOmLAAA85QAAGcxzPIV3AAAKOWlDQ1BQaG90b3Nob3AgSUNDIHByb2Zp
+        bGUAAEjHnZZ3VFTXFofPvXd6oc0wAlKG3rvAANJ7k15FYZgZYCgDDjM0sSGiAhFFRJoiSFDEgNFQJFZE
+        sRAUVLAHJAgoMRhFVCxvRtaLrqy89/Ly++Osb+2z97n77L3PWhcAkqcvl5cGSwGQyhPwgzyc6RGRUXTs
+        AIABHmCAKQBMVka6X7B7CBDJy82FniFyAl8EAfB6WLwCcNPQM4BOB/+fpFnpfIHomAARm7M5GSwRF4g4
+        JUuQLrbPipgalyxmGCVmvihBEcuJOWGRDT77LLKjmNmpPLaIxTmns1PZYu4V8bZMIUfEiK+ICzO5nCwR
+        3xKxRoowlSviN+LYVA4zAwAUSWwXcFiJIjYRMYkfEuQi4uUA4EgJX3HcVyzgZAvEl3JJS8/hcxMSBXQd
+        li7d1NqaQffkZKVwBALDACYrmcln013SUtOZvBwAFu/8WTLi2tJFRbY0tba0NDQzMv2qUP91829K3NtF
+        ehn4uWcQrf+L7a/80hoAYMyJarPziy2uCoDOLQDI3fti0zgAgKSobx3Xv7oPTTwviQJBuo2xcVZWlhGX
+        wzISF/QP/U+Hv6GvvmckPu6P8tBdOfFMYYqALq4bKy0lTcinZ6QzWRy64Z+H+B8H/nUeBkGceA6fwxNF
+        hImmjMtLELWbx+YKuGk8Opf3n5r4D8P+pMW5FonS+BFQY4yA1HUqQH7tBygKESDR+8Vd/6NvvvgwIH55
+        4SqTi3P/7zf9Z8Gl4iWDm/A5ziUohM4S8jMX98TPEqABAUgCKpAHykAd6ABDYAasgC1wBG7AG/iDEBAJ
+        VgMWSASpgA+yQB7YBApBMdgJ9oBqUAcaQTNoBcdBJzgFzoNL4Bq4AW6D+2AUTIBnYBa8BgsQBGEhMkSB
+        5CEVSBPSh8wgBmQPuUG+UBAUCcVCCRAPEkJ50GaoGCqDqqF6qBn6HjoJnYeuQIPQXWgMmoZ+h97BCEyC
+        qbASrAUbwwzYCfaBQ+BVcAK8Bs6FC+AdcCXcAB+FO+Dz8DX4NjwKP4PnEIAQERqiihgiDMQF8UeikHiE
+        j6xHipAKpAFpRbqRPuQmMorMIG9RGBQFRUcZomxRnqhQFAu1BrUeVYKqRh1GdaB6UTdRY6hZ1Ec0Ga2I
+        1kfboL3QEegEdBa6EF2BbkK3oy+ib6Mn0K8xGAwNo42xwnhiIjFJmLWYEsw+TBvmHGYQM46Zw2Kx8lh9
+        rB3WH8vECrCF2CrsUexZ7BB2AvsGR8Sp4Mxw7rgoHA+Xj6vAHcGdwQ3hJnELeCm8Jt4G749n43PwpfhG
+        fDf+On4Cv0CQJmgT7AghhCTCJkIloZVwkfCA8JJIJKoRrYmBRC5xI7GSeIx4mThGfEuSIemRXEjRJCFp
+        B+kQ6RzpLuklmUzWIjuSo8gC8g5yM/kC+RH5jQRFwkjCS4ItsUGiRqJDYkjiuSReUlPSSXK1ZK5kheQJ
+        yeuSM1J4KS0pFymm1HqpGqmTUiNSc9IUaVNpf+lU6RLpI9JXpKdksDJaMm4ybJkCmYMyF2TGKQhFneJC
+        YVE2UxopFykTVAxVm+pFTaIWU7+jDlBnZWVkl8mGyWbL1sielh2lITQtmhcthVZKO04bpr1borTEaQln
+        yfYlrUuGlszLLZVzlOPIFcm1yd2WeydPl3eTT5bfJd8p/1ABpaCnEKiQpbBf4aLCzFLqUtulrKVFS48v
+        vacIK+opBimuVTyo2K84p6Ss5KGUrlSldEFpRpmm7KicpFyufEZ5WoWiYq/CVSlXOavylC5Ld6Kn0Cvp
+        vfRZVUVVT1Whar3qgOqCmrZaqFq+WpvaQ3WCOkM9Xr1cvUd9VkNFw08jT6NF454mXpOhmai5V7NPc15L
+        Wytca6tWp9aUtpy2l3audov2Ax2yjoPOGp0GnVu6GF2GbrLuPt0berCehV6iXo3edX1Y31Kfq79Pf9AA
+        bWBtwDNoMBgxJBk6GWYathiOGdGMfI3yjTqNnhtrGEcZ7zLuM/5oYmGSYtJoct9UxtTbNN+02/R3Mz0z
+        llmN2S1zsrm7+QbzLvMXy/SXcZbtX3bHgmLhZ7HVosfig6WVJd+y1XLaSsMq1qrWaoRBZQQwShiXrdHW
+        ztYbrE9Zv7WxtBHYHLf5zdbQNtn2iO3Ucu3lnOWNy8ft1OyYdvV2o/Z0+1j7A/ajDqoOTIcGh8eO6o5s
+        xybHSSddpySno07PnU2c+c7tzvMuNi7rXM65Iq4erkWuA24ybqFu1W6P3NXcE9xb3Gc9LDzWepzzRHv6
+        eO7yHPFS8mJ5NXvNelt5r/Pu9SH5BPtU+zz21fPl+3b7wX7efrv9HqzQXMFb0ekP/L38d/s/DNAOWBPw
+        YyAmMCCwJvBJkGlQXlBfMCU4JvhI8OsQ55DSkPuhOqHC0J4wybDosOaw+XDX8LLw0QjjiHUR1yIVIrmR
+        XVHYqLCopqi5lW4r96yciLaILoweXqW9KnvVldUKq1NWn46RjGHGnIhFx4bHHol9z/RnNjDn4rziauNm
+        WS6svaxnbEd2OXuaY8cp40zG28WXxU8l2CXsTphOdEisSJzhunCruS+SPJPqkuaT/ZMPJX9KCU9pS8Wl
+        xqae5Mnwknm9acpp2WmD6frphemja2zW7Fkzy/fhN2VAGasyugRU0c9Uv1BHuEU4lmmfWZP5Jiss60S2
+        dDYvuz9HL2d7zmSue+63a1FrWWt78lTzNuWNrXNaV78eWh+3vmeD+oaCDRMbPTYe3kTYlLzpp3yT/LL8
+        V5vDN3cXKBVsLBjf4rGlpVCikF84stV2a9021DbutoHt5turtn8sYhddLTYprih+X8IqufqN6TeV33za
+        Eb9joNSydP9OzE7ezuFdDrsOl0mX5ZaN7/bb3VFOLy8qf7UnZs+VimUVdXsJe4V7Ryt9K7uqNKp2Vr2v
+        Tqy+XeNc01arWLu9dn4fe9/Qfsf9rXVKdcV17w5wD9yp96jvaNBqqDiIOZh58EljWGPft4xvm5sUmoqb
+        PhziHRo9HHS4t9mqufmI4pHSFrhF2DJ9NProje9cv+tqNWytb6O1FR8Dx4THnn4f+/3wcZ/jPScYJ1p/
+        0Pyhtp3SXtQBdeR0zHYmdo52RXYNnvQ+2dNt293+o9GPh06pnqo5LXu69AzhTMGZT2dzz86dSz83cz7h
+        /HhPTM/9CxEXbvUG9g5c9Ll4+ZL7pQt9Tn1nL9tdPnXF5srJq4yrndcsr3X0W/S3/2TxU/uA5UDHdavr
+        XTesb3QPLh88M+QwdP6m681Lt7xuXbu94vbgcOjwnZHokdE77DtTd1PuvriXeW/h/sYH6AdFD6UeVjxS
+        fNTws+7PbaOWo6fHXMf6Hwc/vj/OGn/2S8Yv7ycKnpCfVEyqTDZPmU2dmnafvvF05dOJZ+nPFmYKf5X+
+        tfa5zvMffnP8rX82YnbiBf/Fp99LXsq/PPRq2aueuYC5R69TXy/MF72Rf3P4LeNt37vwd5MLWe+x7ys/
+        6H7o/ujz8cGn1E+f/gUDmPP8usTo0wAAAAlwSFlzAAALEwAACxMBAJqcGAAAAvJJREFUWEfFk71y2kAQ
+        gD15gAxFmrQ2fw4YCYTAEkgIDAZhfgRIYIwBAZ7UnvSZcZMuPTOuXGVSunTpyjVFHoAHcEFFu9mTLQ3g
+        S5HmXHwzd9+tbnfvTnsA8K5QJUuokiVUyRKqZAlVsoQqWUKVLKFKllAlS6iSJVRJmM1mD4i+66+uZovZ
+        bArT6QQmE3tl2/bSHo8Xo9Hwfnh5yW/G9npdwbKspdnpAMFoNVfNRiNSq9d/uTFe8C6YfI0sd/1kMvHZ
+        Extsewzj0ahN3PByYA0Gfej3z714y+qo7U4bWi1j1TSaBnG12pmvWtXv9UoZpy9xW5u7YOI5Aq9Udtex
+        W8BuYTAYOAUQer0eYLcrMm63W76W4XQL9Xrtxo1xKZVKj+54a8EFN37CxL9JAdPp9OHt+gXpFs573a9k
+        blqm/Nqtk6zRqP/EbqFarYKuV7TNbwmapn1wx1sLhGKxWDk5OZkPh0PZHtswHI3WWNDnzRi8W+h2LTDN
+        zgq7hZZhQLPZuK3Xaj6yXtX120q5DKflUygVS4eb3+7yRuTz+Qc8ojgZX/T7f87xaE3TnG/GYIfgdHhW
+        da6gXC7r+A1g4c7Ravn8bS6XA0VVIJvJ/F8BiqKsG3h3lmVCp40vF7vDe3zejCmVipisAPm85r0BRcmC
+        nMmAqqo36XT6e0oUIZkUICEknAf4L7YmsizPs9nsj01XKVeeSXeFQuGb6/AOIaeqgMV6BRxLx5BOp7AI
+        +U4QBF88Hl/xHAexWOzOjXEJhULeu/AkVu0TRfE5mUx+ch0Bj/MJE4EkS84vpirKR9JtJiODLEnOI0yl
+        xMZLt/HHGBeTiTs6OjKikQh8iXyBw/DhNXHBYJAPBAI3fn9gQeYEL1EikVjyPA+4AUSjUefXy2Yza0mS
+        QBRTIAgJ4DhuqWk5oMHx3LWb3CUcDvOhYPA+GAysMDH4/f7FwcHB9f7+vvNYCV7we0GVLKFKllAlS6iS
+        JVTJEqpkCVWyhCpZQpUsoUp2wN5fDbb8rJwXp9gAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="tsmiFilesearch.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAIISURBVDhPY/jx4wdFGKsgFDMBsQMQpwFxAhBbAjGG
+        OgwBKHb5+v3HtkW3X5+vPPv0fv35Z3dW3X1zFijeBMTmSOqwGuB0/dWn/aFbbr03W37lPzJO3Hnn1dMP
+        X3YB1RjD1KNrZvr67fu2yKVX3llOOfs/etnVd4tPP70w58Tjy0ELL38CiaWtuf4CqK4OpgfdALvlp56c
+        s+w5+T9y3sV3IMOAYk5A7P3649cd3tPOfgXJnbn/9hBQTAGkB92AlPp1N+5Zthz9P+/gg0tAvhuSXFzr
+        ppu30eWQNYNwQvOaa3csaw78n7L99lUgPxxJLq1mxZX7ILnFB+9fAPJBLsMwQHf3uafHLUt3//eoP/D9
+        0cuPu4Fi+UBcfPHumwMOVXv/2JTv+Xv32fu9QDFhkB50A+JOXnt+2LZg2x/L3C3/HYu3/y6ZcfJRwdQT
+        T2Bik9ZduQZUB0obYD2omq88PeyUs/6XRerq/8FV2z6CaBi2zVj7Z9Kq8yDNWUDMBtMH13z8wsPDtvHz
+        fhmHz/yf1rjp+dev37fdf/xmz6b9105tP3zzxIvXH3YC1aUAMVwzCIMIpaNnbx82Der4pe3Z9D+hbCFQ
+        8zdQ9OkDsSAQgxINiM0NxHCNMAwiQhv7VtxQssr4H5ndi6wZQzE2DCJAJmdNmbnw3JcvX0nSDMLIHDsg
+        BuVAZDEC+AcDADVk7WUUiqKZAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="OberhalbToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        xAAADsQBlSsOGwAAAG1JREFUOE+1kdEJgDAMRDtbhssa3TK/0ZSIxV5Co3jwUI7LA7Gp6idgWQGWFWBZ
+        4X7xiEg/UUD3yUgosNjYjphZiWg8n5JF4IOFSAIFNsyYJf8IENufMMdG2bElFFzHgPw3vgWWFWBZAZb7
+        aDsAn1PBeUq8SBsAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="UnterhalbToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        xAAADsQBlSsOGwAAAJVJREFUOE+lkdEJxDAMQztbhssat2V+fZWxD1vKR8IZBLX8JEr7mNlf2po3UiNm
+        rWVVYSsvRgxCYwzXVcELfwDuCnBjvi0QYIBckB7zbYECdlGBi/m2QIDmnFKQHvNtgTKIQBbk83FBDdeS
+        0wL/WPwG8HBjvi1uxO/KkhrGTXgxYrKkhjHCi1EmSn5hjPBs3GprnsueLz0XwXnZAqB7AAAAAElFTkSu
+        QmCC
+</value>
+  </data>
+  <data name="tsmi_NewNode.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        xAAADsQBlSsOGwAAAFxJREFUOE/NjFEKgDAMQ3e23v88/Y1YOslqhE1hGHgfS5fXAHxCliuMD4q7o5Kn
+        yJTAzC72CM5PTBUwfXMT8OiJnwuYOmL6ZhBwlCBPkT2CSp4iUvAGWa4gy3nQDiNEflNl/3oXAAAAAElF
+        TkSuQmCC
+</value>
+  </data>
+  <data name="tsmiNodeDelete.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6
+        JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAAACXBIWXMAAAsTAAALEwEAmpwYAAACLUlE
+        QVQ4T52TvY/ScBjHuVIRKHA9JAgnL+VoC7TX0kLLS6EvFBTa0uj5J7gYF+PsfpOTMrg4ORgHY+LCYJwc
+        TYyJiYuDLu7GxHgxd/Hnr5fA8TZcrsmnzfN9nufTNPnVBwDw2ZYljGzr3ciyTNu2EC87L75eb+DvD67f
+        hU9g9vt/HNs5cMaOf9Owohro7YNbe8PhjfuzzBOgkDuabk6bbRXoxuBkNLIeus6yhKyIwY5umo5tHxmG
+        +Wwu8G5QkIa0jN5gqnR1oOkGuOk6b1x3jHl9uaWGhpb1UtXNY1luPmJ4KbIkmAElAcgD3egfa5oJxq77
+        oq3ovKJoE7XbBbwoTWhG2F7cWRJ4dFR1S9fNCvykT41mB9TqjSOxXvtJM9zrYokLrc4vFYtUBcngq9Lf
+        tqICvlr7RhQr8U1za4FHXZIIurT/mePFf1AEJLkFGJb7uml2LRBrcp4us1+g4KRcYV8lkmkplyenglgH
+        VIm9tzq/VJRZLpUlih9yBQrAt79Pp3bjkVgM244nsPwe/VQQ6r8pRsgu7pwtC61grkA/T10r/NrnxB8s
+        V2VmvQiOB0MhLMZVxY/pDPEkU6DnZ2Qu2M0STjJFAIpmAUmXD0NY9PQMzEBRPwJzkiSp71F8J1/ipNMj
+        f9rE8XggkUgexq9cBXmi+DYYjtCRGL72T+D4jr/RaE+waFgu8c0zgUcmT9UuBS4/9m0hmh9Fo7N8FXih
+        CIKE5/Vi8yJsDM8P8P0HLGwR4Wl3ICYAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="GridControlMain.Size" type="System.Drawing.Size, System.Drawing">
+    <value>988, 212</value>
+  </data>
+  <data name="CopyRecordtsmi.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        wwAADsMBx2+oZAAAAFhJREFUOE9jwAa+ffv2nxgMVY4JQJJOTk54Mf0M+PD+IwrGagCIQwzGawBMAhem
+        nwEwv8IwsoZhYACMDeNDtdPRAHQM1Y5qAC6MogEdUMUAYjBUORJgYAAAnlgvt6X+ezUAAAAASUVORK5C
+        YII=
+</value>
+  </data>
+  <data name="ToolStripRecords.Size" type="System.Drawing.Size, System.Drawing">
+    <value>988, 25</value>
+  </data>
+  <data name="pnlDetails.Size" type="System.Drawing.Size, System.Drawing">
+    <value>699, 383</value>
+  </data>
+  <data name="pnlDocFill.Size" type="System.Drawing.Size, System.Drawing">
+    <value>562, 333</value>
+  </data>
+  <data name="tslblDocViewLocked.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAGwSURBVDhPlZO7S8NwFIULioMPBEEcHH3sdpD6QEUo
+        KPhHCK7t3EFQCwGrVbrUQukgCIKg+Bi6FAylpoUabW3AB9SqFBcFH7U6KRzvDUmatB10+Pgl5577JUNi
+        A6ASiUTMdBILhEJAO+eJDsLSNQTBYFBnLhQKIZlMolgsolQqqackSeCc5rOmbkVwvNho8/v93YFAAIVC
+        AalUCuFwGJTxGyCdTiOfz4Pn3OM+YxF4vV4hFotBFEXQ9Q4xquVOYj8ej4Pn3Ksr8Hg8d7lcDoIggK7H
+        9ZI2c/p8PvCce3puEbhcrnI2mwWfekGHsga32w1FUXj+o+dmQYjAP+C+RYDv14M/o0msgq+bmT9TT/BT
+        vprC5/W0we1uL+T1FvU054y41MSCBrPg8eVsHOVLp4G83mxgzt8yE7z8XP0Gm/dRO8rKpAV1uSp7iA6w
+        YKtaMJjwteH1dBgfF2MG8lozCns9xv372Qik1XYWDFULGEHe6CSJA6XsSA1vsgOZcBcvr2r9GgGznFim
+        px724Slhx/v5EJ5O7Lg76oe00mpZZuoJmEFik8gTvMSf7jah/hsVGm2/4uVvpN0vK3IAAAAASUVORK5C
+        YII=
+</value>
+  </data>
+  <data name="statStripDoc.Location" type="System.Drawing.Point, System.Drawing">
+    <value>0, 359</value>
+  </data>
+  <data name="statStripDoc.Size" type="System.Drawing.Size, System.Drawing">
+    <value>562, 24</value>
+  </data>
+  <data name="pnlDocToolStrip.Size" type="System.Drawing.Size, System.Drawing">
+    <value>562, 26</value>
+  </data>
+  <data name="SplitContainerDetails.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 387</value>
+  </data>
+  <data name="tsButtonSave.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAABWSURBVDhPY6AK+Pbt238S8PsvX74YQLVCAEjCyckJjj+8
+        /wjHyGIguq2tDdMQUgwAYZghUO2kGwDCID1Q7fgNQMbIamhrADF41IBBaQA5GKqdEsDAAADtDPd9n5qK
+        lQAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="TabDetails.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 412</value>
+  </data>
+  <data name="TCDetails.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1276, 443</value>
+  </data>
+  <data name="GridControlPos.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 387</value>
+  </data>
+  <data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        xAAADsQBlSsOGwAAAFxJREFUOE/NjFEKgDAMQ3e23v88/Y1YOslqhE1hGHgfS5fXAHxCliuMD4q7o5Kn
+        yJTAzC72CM5PTBUwfXMT8OiJnwuYOmL6ZhBwlCBPkT2CSp4iUvAGWa4gy3nQDiNEflNl/3oXAAAAAElF
+        TkSuQmCC
+</value>
+  </data>
+  <data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
+        wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
+        v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
+        UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
+        Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu
+        lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
+        5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
+        Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
+        08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
+        n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
+        N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
+        oAc0QjgAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
+        h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
+        twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
+        kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
+        WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9
+        8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        xAAADsQBlSsOGwAAAUlJREFUOE+lU6GOg1AQ5BP6Cf2E+4QLnqQWV4EHjUJhGzxJJbICDxpFQvCHg4DA
+        Yd/tLPvK4wJ34iaZ9GVndxh4WwtYluVCfBIVcSYGLPwA1SPp0bxpIaiqSjmOw2zbdhMJdL4S6yzLlG3b
+        qigK6JHI3FCmacoi6HmeGscRSZAswDmOY9bQR7WXjK5AExJoAzBJEjTOXdexIWowoVpNvMjoChQg5Hm+
+        M8HT8Eo4G6muMrbHmQkIk2ma8PRPaT8G3Ikc1TSAKdWf0nYMGT5M4Lrun/E/iDM+nDlofgPf9/kDysgG
+        PXwSuzZvQW7mIaMrEC0Mw90wFoYa+a7p944eJDCM30tm6e3SPLprOiPlFzS8UtM0vGQsmgani0JAjVii
+        H6/U933JwjAMvOMSe3M+AekP/BewuXSOtHMg/HVYg/ruxBK0lFL/oLK+AaMj/dL+UYA6AAAAAElFTkSu
+        QmCC
+</value>
+  </data>
+  <data name="tsbtnWork.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAD5SURBVDhPlZK9EYMwDIUZITPRMwBdCgZITZWKNTJCCnpm
+        oadwBZSOP2MRW8Z3ybt7pz9LlmRX67o+t22zQuzqH5DUNI2t69pL7BD6DSSQLIwLGGNu2DHxhfABfQCG
+        ULXv+32aprM4Or4QPkBCqQOnv4dhOGPo+EL4QKmAtC/7gbKjZIxSAd2+MBujVMDJs/2+7z3RszGuCuj2
+        x3H0RM/GwNDU7S/L4il2MoZLMF3X+QAS2zHZvmYyBpXmebZt21qk+8oPuoi3r5mN4ZJeOJC6ffwxxZ+9
+        BslIdyjZPrY/4IBefA1wtf34FnT9GiF0gAM4Y8a/Ti74crMf2hAgpCi8t0QAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="tslblPoslocked.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAGwSURBVDhPlZO7S8NwFIULioMPBEEcHH3sdpD6QEUo
+        KPhHCK7t3EFQCwGrVbrUQukgCIKg+Bi6FAylpoUabW3AB9SqFBcFH7U6KRzvDUmatB10+Pgl5577JUNi
+        A6ASiUTMdBILhEJAO+eJDsLSNQTBYFBnLhQKIZlMolgsolQqqackSeCc5rOmbkVwvNho8/v93YFAAIVC
+        AalUCuFwGJTxGyCdTiOfz4Pn3OM+YxF4vV4hFotBFEXQ9Q4xquVOYj8ej4Pn3Ksr8Hg8d7lcDoIggK7H
+        9ZI2c/p8PvCce3puEbhcrnI2mwWfekGHsga32w1FUXj+o+dmQYjAP+C+RYDv14M/o0msgq+bmT9TT/BT
+        vprC5/W0we1uL+T1FvU054y41MSCBrPg8eVsHOVLp4G83mxgzt8yE7z8XP0Gm/dRO8rKpAV1uSp7iA6w
+        YKtaMJjwteH1dBgfF2MG8lozCns9xv372Qik1XYWDFULGEHe6CSJA6XsSA1vsgOZcBcvr2r9GgGznFim
+        px724Slhx/v5EJ5O7Lg76oe00mpZZuoJmEFik8gTvMSf7jah/hsVGm2/4uVvpN0vK3IAAAAASUVORK5C
+        YII=
+</value>
+  </data>
+  <data name="TabPos.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAASdEVYdFRpdGxlAExpc3Q7QnVsbGV0O1FzfzkAAABa
+        SURBVDhPY/j//z9FGEPAxsaGEYhBNF4MUw/TVADED0A0kkHMQMyCBbOCaHQDQJr/g2gkA0B8nBimDqYY
+        wwXEYqyCpGCsgqRgMEGxF6CaQYEzGogjMRD/MwAARTWKOO3Nn7MAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="TabPos.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 412</value>
+  </data>
+  <data name="cmDoc1FileProperties.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        wwAADsMBx2+oZAAAAHlJREFUOE+VkUEKwDAIBH1b/v+XtpdcWxbcoBKrEaYi6iSksos559tFV3ygMcYo
+        KQX39aS0BTzNciTIaAuQCesjQcYS4NPFSp2ARZV/b2Cbkd2ME6CwzUj7BhTFzBnUliXgYAaHdxy9gf5l
+        H2jwhCrrig80uuiKCZEPDBGoa/9+56EAAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="GridControlDocSearch.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 387</value>
+  </data>
+  <data name="tsbtnStartFulltext.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAKrSURBVFhH7ZO/b9pAFMdR/4AqQ5dOkRIRUiDgQMABY0P4
+        EZsfNmBjHGxsDESdo+5VsnTrjpQpU9UxY8ZMmTP0D+APyMDE+vrudLFSJZHSLYM/0pPv3r3z9713d5GQ
+        kJCQkHfLbDa7mU6nTTYNOD2d38/nM5jNpuC67srzvCXavec51xPb5lgYxTTNLNpyYBhArNPprFRVTbTb
+        7V8s5HXm8/kabcmmAZPJZMOf+uD7E/BdVyc+17VNxxnBcDgM4odDXdINnYp2u90e8eF3Q1GU66YiAw16
+        DRReoAEzhbkDPM8FdzwG27ZpAgTLsgCrXZExEaLCmgaq2r6gAU9oNBq3bPgyjuPc4RH8JgmQo2DuAMex
+        YTQ6Acsyv5K5YRhFUm2/36Vimtb52em0odVqgSzLFeJ7yvn5+Qc2fE6tVlPQFuPxuOhPfHA9b40JfWbL
+        FMsaYrtN2l5d70O/14NuV70klZP1lixfKrIMx/Ix1Ov1L3TTWzk6OrrBBPbJ2B6N/pxgaweDwYIuMjRN
+        RXFaIT0CbGkTDarVKm1tpVK5LJfLIEoiSDz/fwmIorjW8OxMcwCGbkAPq2s2mw9smdJo1KFWqwImG9wB
+        USxBURAA91/wPP89n8vBwUEWstksvYBvolAoLARB+MGmFEVWHkh12JVvzEUqhLIkgSRJQQKHhUPg+Tzg
+        P67S6fRGPB5fcek0pFKpKxYSEIvFnt2LCNmEwQ+Y8SfmoqDYHVYFuWKOPrF8Pv+RVCsIRSJGLyHPH2ik
+        2kxm/zbBJYrEl0wme8lEAuKJOOzu7p4RXzQa5dAutre378n8HzKZzJLjOEilU4DZ06dXKglrFIFcLo+t
+        zMDe3t6yUinDS4YFnD2KP4L/4WLR6PXOTnSFwkCEt7a2zjY3N+llDQkJCQl5B0QifwHOFwaCeJJHzwAA
+        AABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="TabWindream.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 412</value>
+  </data>
+  <data name="btnRemoveUser_FollowUp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAAK/INwWK6QAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAJpSURBVDhPpZP7S1NhGMf9W/SHKEGiGyFhFBTmvMyd
+        tTa3eTvL9LjFIpam7AzTDGoYuvCHcJbaVSt/yTSxUV4ycnYdWh4rL+3URq3pObumfNsmbS5HEL3weeE8
+        PJ/vy3nOeZMA/BcbCgsaTco8Van/QJUzsyqSm1GVcO9JJTNFyvW2UmnKn/1xD4tqDfGJotjvpib4RywI
+        vLUiMDEK/n43FrRleF1IsC+UQmK9EyfPVVD88t1urM6+Q3DwHoJdzQiaL+Dn7TasjA/CUauFVZ7NP5dm
+        RkMi27xanRyS7dzNLqwyNgQvn4O72YClphr4LxkQaKHhN56C/8EtLB4nMX7kgH1Msi85GhCSaWe9Hiu2
+        yciJPhMN13kdvA3qOLjTJPy91/AqLwPD4gw6GvCROsZ4eq8j2GOG21iFb0XihCxXkeCb6uAwVOMxkc5E
+        A5gKlTfwsBdBkwHus9pQKfFyyHLgogqxZG6FJW+XN1RaC5ghi7y+ng74G7XwnimPNCda4QBnmQJLba0Y
+        Em6LBUyXKhiXsQ6+ZhrcSWWkMSHyPLjra7FQq8OgIC32CrZiKc1IBPD2dMKtksBVJtogs9JssAUieLqu
+        YFS4AwNZW2JDfFMkTn5ZQtgXK0vgudMRGZhTIVwTZblgJSFZIgTf2Y6pYnFYtvcJNsc+Y5jJghxiQnaI
+        nzuqgOdGB3400nCQcnxRyuBq0IO/2o5pZT76s1L5kBz/I/3mmfQg8fTwftYq2oOvNTq4Wi5G+Fx9Ak9y
+        todldr0cJi4gzIh4b8qwMF1vIXYzj/J3ckOCrdxAbhrTn52q78vc9PfL9O8g6Rcd0s65aUjWSwAAAABJ
+        RU5ErkJggg==
+</value>
+  </data>
+  <data name="TabFollowUp.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 412</value>
+  </data>
+  <data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 387</value>
+  </data>
+  <data name="TabPageVariant.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1270, 412</value>
+  </data>
+  <data name="docCMEntityWideSearch.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAIISURBVDhPY/jx4wdFGKsgFDMBsQMQpwFxAhBbAjGG
+        OgwBKHb5+v3HtkW3X5+vPPv0fv35Z3dW3X1zFijeBMTmSOqwGuB0/dWn/aFbbr03W37lPzJO3Hnn1dMP
+        X3YB1RjD1KNrZvr67fu2yKVX3llOOfs/etnVd4tPP70w58Tjy0ELL38CiaWtuf4CqK4OpgfdALvlp56c
+        s+w5+T9y3sV3IMOAYk5A7P3649cd3tPOfgXJnbn/9hBQTAGkB92AlPp1N+5Zthz9P+/gg0tAvhuSXFzr
+        ppu30eWQNYNwQvOaa3csaw78n7L99lUgPxxJLq1mxZX7ILnFB+9fAPJBLsMwQHf3uafHLUt3//eoP/D9
+        0cuPu4Fi+UBcfPHumwMOVXv/2JTv+Xv32fu9QDFhkB50A+JOXnt+2LZg2x/L3C3/HYu3/y6ZcfJRwdQT
+        T2Bik9ZduQZUB0obYD2omq88PeyUs/6XRerq/8FV2z6CaBi2zVj7Z9Kq8yDNWUDMBtMH13z8wsPDtvHz
+        fhmHz/yf1rjp+dev37fdf/xmz6b9105tP3zzxIvXH3YC1aUAMVwzCIMIpaNnbx82Der4pe3Z9D+hbCFQ
+        8zdQ9OkDsSAQgxINiM0NxHCNMAwiQhv7VtxQssr4H5ndi6wZQzE2DCJAJmdNmbnw3JcvX0nSDMLIHDsg
+        BuVAZDEC+AcDADVk7WUUiqKZAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="DateiVersionierenToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAAAwAAAAMCAYAAABWdVznAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        wwAADsMBx2+oZAAAAFFJREFUKFOdj0EKACAIBH2b/3+P16JwRTQzWphD0dhKIjI81GU9YuZNlE/YD17A
+        gEgp3EiCNq0DAeh1nS/BL9VxXBoDIibg8EKqpE3reLsXiCYgi0Ps3hQ2TwAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="docCM_GetRights.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        Qk02BAAAAAAAADYAAAAoAAAAEAAAABAAAAABACAAAAAAAAAAAADEDgAAxA4AAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAPb29v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2/wAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD29vb/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC//b2
+        9v8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA9vb2/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
+        Qv/29vb/AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPb29v/29vb/9vb2//b29v/29vb/9vb2//b2
+        9v/29vb/9vb2/wAAAAAAAAAA9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b2
+        9v/29vb/9vb2//b29v8AAAAAAAAAAPb29v9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
+        Qv9CQkL/QkJC/0JCQv/29vb/AAAAAAAAAAD29vb/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
+        Qv9CQkL/QkJC/0JCQv9CQkL/9vb2/wAAAAAAAAAA9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b2
+        9v/29vb/9vb2//b29v/29vb/9vb2//b29v8AAAAAAAAAAAAAAAAAAAAA9vb2//b29v/29vb/9vb2//b2
+        9v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/AAAAAAAAAAAAAAAAAAAAAPb29v9CQkL/QkJC/0JC
+        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/9vb2/wAAAAAAAAAAAAAAAAAAAAD29vb/QkJC/0JC
+        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC//b29v8AAAAAAAAAAAAAAAAAAAAA9vb2//b2
+        9v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b2
+        9v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v9CQkL/QkJC/0JC
+        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC//b29v/29vb/QkJC/0JC
+        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv/29vb/9vb2//b2
+        9v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2/w==
+</value>
+  </data>
+  <data name="docCM_showGridSearch.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6
+        JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAAACXBIWXMAAAsTAAALEwEAmpwYAAAC+klE
+        QVQ4T42S+0+TZxiG+V/MYkycidHpNP7gIaTooAbQDwsC4qilHMqhYC1yKNKPOhmjtANKELSVTSbBMVo/
+        goeI4AFD0GWZAw8YNZxMLZiJqQf0sq/LPlyyLPvhfvIm73tfb57nuaMAVaX1yvqIZGtdYKjcpczbm/uf
+        H6rzX805csZmtHWu/fTt31IPZQ19eRVu5YFvcIgLD0ZRJvvwTVRRoBiQ5BNklvrG9WWnDJ+ahT6Ww04l
+        V/YqL7vvnOPWn78z9mqakp4anPfLyf5Fy1ZHLSnyMMnW9oUMS9s/IFGWusC6cndgomXERd+sl4G5EUYX
+        7jAWDtI15cfgcaDx/MEGdw8bm/RIhfXje4ua1XYEoLrap+C5XUvThAXvEze+SQfNv/nI+bELY0uIlLpH
+        rDqdyIofYtlsz2dPXoNNBRQf6x1sCTxGVpzk3txJ4UgcZq+Vkg4F+fjPyK52rLX1pLuyWdmoYeWxBBKN
+        tQMqoMDRE2o9/wpbayva0xq+UpLRN7toPOXn4uBVZoLPeDIbpONsL2llJpbVxKDNlEMqwGTvDrkCYQ53
+        BEm36olt/RpzRzX9lwcj9/B2EV6E3zE9t4i7/QybTInsSK9cAuQe6RoobHqI6fhrjK4JEkpNVLi/Zepp
+        UDXPPn/L3ak3+IfGSUxLJTrZutRCdtVPtpyjV8j8/iUZzjmS7dc4dFRm8mnoL/P8YsT8muG7YVq6h4mX
+        ktgimZeGKBImQrK/5ha6b2bRVI0g2c309l9mZj7y8/QbbtwLc250gTxLJXHSvvnq8uI2FSCKSFiaxbew
+        p+Iaq4odrDankmUuoq0zQM/QGJ6zw+QdrCRJt5tOZyq9nvz3DXKJXQUIiYTp8hvHtxe4iNbnoDU6kLJs
+        SHv3kyDpSEmKx23exsxJDe+uZ+D9rkhAtCpASCRMhETsWaxKTFsMTPScoo22ZMWt5dfKL5j0bCHkT+Kg
+        YeeS+f8oAthliF3DJcuXHIj5HF3s+vh/ffhfEpBNq5cTs/GzXUDUB9hlsqaYQE4mAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <assembly alias="DevExpress.Utils.v15.2" name="DevExpress.Utils.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="ImageCollection1.ImageStream" type="DevExpress.Utils.ImageCollectionStreamer, DevExpress.Utils.v15.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFtEZXZFeHByZXNzLlV0aWxzLnYxNS4yLCBWZXJzaW9uPTE1LjIu
+        MTYuMCwgQ3VsdHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iODhkMTc1NGQ3MDBlNDlhBQEAAAAo
+        RGV2RXhwcmVzcy5VdGlscy5JbWFnZUNvbGxlY3Rpb25TdHJlYW1lcgAAAAACAAAACw==
+</value>
+  </data>
+  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAABAAgAEBAAAAEACABoBQAAhgAAABAQAAABACAAaAQAAO4FAAAYGAAAAQAIAMgGAABWCgAAGBgAAAEA
+        IACICQAAHhEAACAgAAABAAgAqAgAAKYaAAAgIAAAAQAgAKgQAABOIwAAMDAAAAEACACoDgAA9jMAADAw
+        AAABACAAqCUAAJ5CAAAoAAAAEAAAACAAAAABAAgAAAAAAEABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP//
+        /wAlWv8AmqK9AAAFvgBNUKsAZ5j/ALbH+QAcN9AAcXjAAMXGwwBOZNgAABzoAJGv+ABHef4ALDSqAIOV
+        2QBnfd8ANUvKABdB7gAIIMkAh4u6AMzU6wCtsMgAOVvkABoltABeYLEAPEK2AIae7gALL+MATVq/ADhl
+        /QApS+cAWIn/AAsYtgAAEdMAX3PSACo+xQDM2fwA9fX1ABpN/gCOotkAJTG4AAAUwwC/y+0AcHKyALa7
+        zQCRmcQAWGLEAHWZ/AAAH9oAHz/bAGx90gBDR6wAQFvZAKqtvAAtPLkAFDTZAHiCwQCjpMUAPm//AAIo
+        5QAgSu4AUIH/AGOI/wAvX/8ASlO1AAAbzwAfRuMAmqPJACZG3AAADroARlO+AA8jwwAACMcAABTcADxq
+        9gCxwfQAND2zAFB4/ABvkvwAcH/KABcovABJWccAMUG/AIqv/QCGjsIAO1XcADtArgAZRvQAIz/UAAAR
+        ywAwRcsAlZ2/AAAh4QAADMEAABjWACxN4QAMMukABSjfAERy/wAzYvoApKjAACBW/wBudbcAGkDpAAAX
+        4QAqL7YAABfLADJk/wCmqMcAND+4ACIutQAuO74AABzgAAEf1QBcjP8AOmz/AAkexQAjSOIAABXRAAIb
+        ywAAIOoAK13/AC05tgDDw8UAhYi4AAASugCmq78AaIDdAEJ1/gBqfNUATlKuAAAUyQAAFdgAABvVABM0
+        3AA1Zf8AxcbGAAAV1QAAF84ALj6+ACxK4QAAFsUAACHcAC1h/wAgQNkAPVbbAAAGxgAADcMAABnQAAAc
+        0QAAHt8ALV7/ADxr/wAABcAAABHJAAQn4AAADcAAABXKAAAW1AAAH9YAACLgAAou4wAaRvMAO23/ADRm
+        /wAuYP8AMWP/ADRl/gCjqMAAAAzDAAAZ1gAAG9AAABzVACte/wAsXf8AAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAcBmEAAAAAAAAAAAAAABxiAJzrSsiGy0AAAAAAABvpqd7opChQ49HD2sa
+        AAAAjaWvT3d6cqxsXwOcfwUAACUxFiwVN0U0CJRdaq01AABcTR9njEpCL1aqCoEzWAAAWqiwbZ1gHoNL
+        i3kwfk4AAJJ1mVAYPVMRDJiHn558AACOJicHOheKLhA2OXiVKgAAIEAokWOGIxRUCX1mgDgAABOJQTxi
+        XjKXhQRulqtSAABZZJohTD4doFubO6OuSQAApKmCDj90BlUNHCllaXYAAAAAAFEkC5NXYURGEkhoAAAA
+        AAAAAAAAAAAAAAAAAAD//wAA8f8AAMAfAACAAwAAgAEAAIABAACAAQAAgAEAAIABAACAAQAAgAEAAIAB
+        AACAAQAAgAEAAPABAAD//wAAKAAAABAAAAAgAAAAAQAgAAAAAABABAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAACL1IAhG4zwANttkACbCNAAeyQAAAzgQAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAALxCsAEsa7FDXe/iVa//8BH9X/ABvQ/wAUw/8AD7nuAAq8pwAIulsAAMISAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAEb6yNGb//y5g//8rXf//ACLg/wAh3P8AH9b/ABvP/wAWxf8ADrr/KzSs+wAH
+        usEABrd1AACzFwAAAAAAAAAAARbGuztt//8rXv//UHj8/yNI4v8AIOr/ABzg/wAZ1v8AF8v/AAzB/5qi
+        vf8AEcn/ABK6/wAHqo4AAAAAAAAAAAEbzsF1mfz/zNTr/7/L7f+Hi7r/qq28/5qjyf9sfdL/HDfQ/wAG
+        xv+Vnb//ABfh/wAb0P8ACKydAAAAAAAAAAAPKdXIscH0/zhl/f8gVv//ABfO/wAIx/9KU7X/kZnE/4aO
+        wv+jqMD/xcbD/2iA3f8fP9v/AAmwqAAAAAAAAAAAAybfzjFj//8sXf//MmT//wQn4P8AGNb/TVq//2p8
+        1f8AFNz/ABXV/wIby/9YYsT/hYi4/wANuLIAAAAAAAAAAAYs5NU6bP//LV7//2+S/P85W+T/Aijl/0lZ
+        x/9nfd//ABzo/wAe3/8AG9X/ABXK/wANwP8BEbq9AAAAAAAAAAAYO+zbzNn8//X19f+2x/n/eILB/62w
+        yP/Fxsb/trvN/4OV2f9AW9n/FDTZ/wAV0f8ADcP/ABC9yAAAAAAAAAAAGUDx4mOI//8aTf7/LWH//wUo
+        3/8AFdj/ABHT/wggyf8xQb//cXjA/8PDxf+kqMD/pqu//xMlvdMAAAAAAAAAAAk49+g1Zf//L1///z5v
+        //8MMun/ACHh/wAf2v8AHNH/ABTJ/wAFvv+mqMf/ABnQ/wAMw/8CFcDeAAAAAAAAAAAQQPvuRHL//zxr
+        //9Yif//PGr2/yBK7v8LL+P/ABbU/wARy/8ABcD/o6TF/wou4/8AHNX/ARbG6QAAAAAAAAAACTv95DRl
+        /v9Cdf7/R3n+/1CB//9cjP//Z5j//4qv/f+Rr/j/hp7u/46i2f8zYvr/GkDp/wIYyPMAAAAAAAAAAAAu
+        /wsAL/8pAC//QgAt/1sALf90ACn7jQAn9KYWOe3AFj3r2RhB6PEWOuTiDCnWvQAWy5gAFcheAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAD//wAA8f8AAMAfAACAAwAAgAEAAIABAACAAQAAgAEAAIABAACAAQAAgAEAAIABAACAAQAAgAEAAPAB
+        AAD//wAAKAAAABgAAAAwAAAAAQAIAAAAAACgAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8AJ1j/AJub
+        pQAACq4AcKH+AE9UrQDd2MUAABvxALTC9wBvfsgAJzjMAE18+ADAvKYA1eH8AD1Z2QCfq8gAEjrqAJGt
+        9wDu7OUAABrNABofsQA4Pq0Ah4u4AHiS5QBeaL0AWXPVAERi8QBpiPgAcHOuAM3KtwASSP8AESvQACRF
+        3wBCT8QAJjO2ALKxsQA9bf8Aob37AJeiuAAABMEA4+HVAEtfyQAAId4ACh27ACFN8QCCn/oAMUPCAAAs
+        7gAvWvAAFyXBAAst3wDAvLUAYZP/AHh9twBWhvwADhauAFJ07AAzYv8AABDYAAASwQBaXbQANU3WAKWr
+        sABHY9oAIDrYAHKG0wDk5OkACzn1AERv8gBJVrwAiLH/AB1P/wBpdcIAMTi4ADRb5gBpbLUA9/PnALi1
+        qADO2P0ALlHpAIqLrQAHItEAd4bIACIktwDJxa4AAA/MAI2k8gA9R7EAjZS3AAkZxQAEEbUAEjXgAHGP
+        9wCYm68AHEXwAAAj6QCDkb8APWrzAP//9gATQfgANGH1AGFktAAAB7cAHkPmAEBf4ABRWrUAAB3VAF1u
+        zgDEw7gALlz6AEpd0gARHbUAaJr/ABs93wBwfb8AABroABAv2ADU3PUABzHtAOfq7gARIMQAXIH5ABwq
+        xQAlLLoAmZ2+AEJy/wCgqrYAkpu0AFB+/gAnUOwAAAvEAMLArwC6uaIAOGf5ABc/7ABHdfUAABvdAB4l
+        vQAAFdMAFiW6ACYusQAsOLMAurqyADs/swClu/YAABbGACtd/wAOMuMAAA68AAQVugALJc0ANUfFACY1
+        vAAWKc0AOGf/AF50zwAZSf4AY2y1AENq7wAFHMgALDO2AG2D0wAAFdkAdKX+AKPC/ACZmaoADzHdABFD
+        /QBSg/8AdojNAHaEwwBucrMAAB/lABIq2AAWRfoADircAHV+vgC5t64AAAO5AAARyAAAFM0ABBa/AAAd
+        0gCXo70Ah47AAGqL/AAlOtcAJ0vtAAAe6wAAINoAACPiACRW/wB0ercARlbAAJWetgAfSvQAs7WvAJui
+        uwCIj64AMmT7AFF8+gAAAb0AEDbqABIv1ABgkf8AMzi0AC9g/wBqcLMAKTC3AMXDrwBbZrwAAA+4AAAN
+        xwAAEcQAAA/UAAESvAACGMMAABrRABMo0gAPQfkAGk7/ACMxuAAAC8AAQHH/AKKsxgACGccACivcAGaY
+        /gBzh88AwL2vAAAGuwACDrUAABTWAAAb7QAAGMoAABnXADFe+gAXKLsAEzDZABM75wAADa8AAA/AAAAS
+        ygAAFcIAdX27AFB/+gApW/8AJ1f8ADBj/wA6a/8AOEzWALCyrwAABr4AABLSAAAWzwAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAGOBYdAAAAAAAAAAAAAAAAAAAAAAAArHBcEes8W0pMAAAAAAAAAAAA
+        AAAAAACNzALAh2trtxQ86NFmAAAAAAAAAAAAAHtu+ZP3Xyu+vmsU6/TU8VQ9AAAAAAAAAJr6Os+TxL+/
+        K763FJI8jsdnBBUAAAAAANvgm8+TOTC9rStr2us8I4BWktiQAAAAAK7g+lcTBw24nCGJi7XW3sOj2uLO
+        AAAAALCRTUNdaIxqUU7FYSog7id0K7ehAAAAAEF4HN3dgvO0KNBZ014N/D9Ld4l8AAAAAOOT9/cCMWva
+        88GrO+naL54DhX+KAAAAADP6Os+TZSu+i/VTib5r2rXVtlgyAAAAAJTgm8/AyOqto7Gqrb8ra9rr9JV5
+        AAAAAMslJS52KRBCD7miCGCtK2sUkjxaAAAAALwOY2MJGEl9bR5t4eVAcon+tPKWAAAAABtPukgfYunp
+        15eYGRckVY/Gc8IsAAAAAET3AvfAiIm+vrf/84P9Z4RG0KaZAAAAAGSbOs/3DK2/K763FJI8s9JS1d/0
+        AAAAAK8lmzr39r1gv75rFOv05+anaxTZAAAAAJ1++n6ppAxigpTs//PWyrLwK2viAAAAAJ2B5AXkNTXN
+        NXFxN0VLPjQtYL7rAAAAABppUF/cqEj47YZ6EialR83JnyGgAAAAAAAAAAAAAAAACmxv+7vvdQsi0zYA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8A/D//APAH/wDgAP8AwAAfAMAABwDAAAMAwAADAMAA
+        AwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMA/8AHAP//
+        /wAoAAAAGAAAADAAAAABACAAAAAAAGAJAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMMOAAquiwAJsOoACq6tAAuwWwAA
+        uxAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAD/AQANvF8ADrfmEjXg/xI66v8AGMr/ABPA/wAOt/gAC723AAq/ZgALwhgAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEM8yAAu0xxIv1P8mV///JFf//xc/
+        7P8AHdb/AB7V/wAd0/8AGcv/ABK//wANtvwACrvDAAm+cQAHySAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAEszVLlz6/zBj//8sXP//KFr//xxF7/8AH93/ACDa/wAg1/8AHNT/ABvP/wAY
+        yf8AFcL/AA+4/wEOsf4AA7vNAAi6fAAFvSsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADGdPhO2z//zNj
+        //8wYP//LF3//x9K9P8AIuT/ACPi/wAh3v8AH9j/ABzS/wAZzP8AFsb/ABLB/yw4s/+Ij67/AAi4/wAL
+        sP4AB7PYAAe+TQAAAAAAAAAAAAAAAAAAAAAEG9fnP3L//zlo//8uYP//LF7//1J07P8ALO7/AB3r/wAf
+        5P8AH93/AB7W/wAb0P8AGMn/ABLC/yYztv+Sm7T/AA/M/wAWxv8BErz/AAe3qQAAAAAAAAAAAAAAAAAA
+        AAAHId3tQHH//zpr//+NpPL/7uzl/93Yxf+/u6b/l6O9/150z/8kRt//ABze/wAU0/8AFcz/ABHE/yMx
+        uP+Vnrb/ABbZ/wAb0v8BGcf/AAi4tAAAAAAAAAAAAAAAAAAAAAAHJOHypbv2//fz5//k5On/cY/3/x5D
+        5v8WJbr/UVq1/4qLrf+4taj/s7Wv/4ORv/9LX8n/ESvQ/xcou/+Xorj/ABro/wAg3f8BHdH/AAq7vgAA
+        AAAAAAAAAAAAAAAAfQIdN9v35+ru/2mI+P8ZTv//G07//ydP6/8AE8n/ABHH/wAEwf9qcLP/jZS3/1pn
+        vP+Ym6//wL2l/7Cyr/+lq7D/NFrn/wcx7f8AG9v/AAq/yAAAAAAAAAAAAAAAAAAAvwQJKt/7Kl7//ylb
+        //8rW///J1j//y9a8P8AG9b/ABvS/wARyv90erf/doTD/wAQ2P8AFNb/ABnR/zFDwv9jbLX/m5ul/7q5
+        ov+gqrb/AAnC0wAAAAAAAAAAAAAAAAAn2gcLLeH9OWr//zNj//8wYP//K1z//zRh9f8AIOD/ACDb/wAV
+        0v91fbv/d4bI/wAa3/8AINr/AB7W/wAZ0/8AE83/AAzI/wQWv/89R7H/ARHF3QAAAAAAAAAAAAAAAAAS
+        6gwOM+X+QHD//zlo//8vYf//JFf//zJk+/8AG+3/AB7l/wAU2f91fr7/dojN/wAe5v8AJOH/ACHd/wAf
+        1/8AG9H/ABjK/wAVw/8ADrz/AhLI5wAAAAAAAAAAAAAAAAAb4hIQNur/PG7//zxs//+Cn/r/1Nz1/+Ph
+        1f+fq8j/cobT/z1Z2f+HjsD/bYPT/wAb8f8AIev/ACHj/wAg3f8AHdX/ABrN/wAWxv8AEr//ARLI8QAA
+        AAAAAAAAAAAAAAAc6RgnS+3/1eH8////9/////X/tML3/3iS5f9pdcL/mZ2+/8TCuP/Nyrf/xMS4/6Ks
+        xv9zh8//R2Pa/xs93/8AGt3/ABLS/wAQyf8AD8D/ARK8+AAA/wIAAAAAAAAAAAAe7h5EYvH/ztj9/2qL
+        /P8cT///Ekj//z1q8/8AE9f/ABXW/wAP1P8LJc3/NUfF/15ovf+Hi7j/srGx/8nFrv+6urL/m6K7/3B9
+        v/9GVsD/Ch29/QAAvQgAAAAAAAAAAAAq8CQLOfX/KVz//yda//8pWv//I1X//0d19f8AHd3/ACHb/wAf
+        2f8AHNP/ABfP/wARyv8AC8T/AAa+/wAGtv/CwK//SVa8/2lvsv+Zmar/JjW8/wAOsxEAAAAAAAAAAAAp
+        8ioTQfj/OGf//zJi//8uXv//KVn//0189/8AIOX/ACTj/wAi3f8AH9j/ABzS/wAZzP8AFsb/ABPA/wAD
+        uf/Fw6//ByLR/wAOxv8AC8D/ARXB/wASvBsAAAAAAAAAAAAt9DEWRfr/Pm3//zdn//8zYv//KVn//1B/
+        +v8AHuv/ACTn/wAi4v8AINz/AB7W/wAbz/8AF8n/ABTC/wAGu//Ava//DzHd/wAb1P8AGcv/AhjD/wAN
+        wCUAAAAAAAAAAAAu/zYaSv3/Q3L//ztq//9Bcf//UoP//3Sl/v9Me/j/PGnz/ydQ7P8OMuL/ABnX/wAV
+        z/8AEsr/ABDD/wABvf+5t67/Ezvn/wAh3/8AHdb/AxjH/wAPvzAAAAAAAAAAAAAw/zoYSP7/UH7+/2aX
+        /v9wof7/Zpj+/2GS//9gkv//X5D//2GU//9nmv//aJr//1aG/P9Eb/L/NFvl/zVN1v/AvLX/IU3x/wAj
+        6f8AINz/ARnK/wARwToAAAAAAAAAAAAs/wYANv99ADL/oQAw/7wAMf/WBjv/8BJE//4dTv7/J1f8/zFe
+        +v84Z/n/XIH5/5Gt9/+hvfv/o8L8/4ix//9gkf//UXz6/0Nq7/8kRN//BRzK/QAQ0C4AAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAn/w0ALP8nACz7QgAr9l0AJvR3ACPvkgAe6q0AG+TIACHh4gQm
+        3usAF9bGABXSnwAUzXgAE8xQABbRIwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAA////APw//wDwB/8A4AD/AMAAHwDAAAcAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAMAA
+        AwDAAAMAwAADAMAAAwDAAAMAwAADAMAAAwDAAAMAwAADAP/ABwD///8AKAAAACAAAABAAAAAAQAIAAAA
+        AACABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8AJ1j/AKKgpAABCqsAcqT+AFxjswC3xO0AAB7uACk4
+        vgDOyrYAVHLrAHiKzACWqNwA1d75AEFZzAAFHskAFDroAKy1wAC9uJ8An7T5AHZ5sQBai/8A9/PkAI6a
+        vQAWHq8APm3/ACtO4wBKT64AY3LKAIme8gAAAcMAP2bnAOrs9QAIOPwAFi3OAJCRqAAAC9cAOUfEADI5
+        rQCkuOcATGbWACA+2AAZTP8An6e7AAAh3ADG0O8AhIayAE5avwABErwAtLWwAK/A/AAxWe0AVIH0AEx1
+        /gAxR9MAGyy+ALCungBpbrMAAC7yAG5/xgBFcfIAwsCzAKCsygCEi8IAs7jjAA4w3gAiSu0AWHfdAJOi
+        yQBmlv4APUO2APb19gAAEsoAqa2yADJi/wD///IAX3vvABA/8wAqMbIADReyAFppxwCJqvcAdn26ACVD
+        4AANIcAAJDbOADdRzwAAJ+cAFjbXAAAX0wBPbuEAmZ26AJ2u8ABGUsQAVmC7AFKB/gCuve0AAAe7AMG/
+        pwDRzsAAJVHzAJOVsgBRV7QAW3PTABsotAALKdgANFbkAH6SxwDFxrsAkqfzAAAc5gBFTLYALEHYAEdg
+        0gBQYc4ADijMAGFmqwBIZd0ABiHSADxp+ABznP8AiY6xADRDuQAuXPcAtbOoAKqooQClrsEA+fXrAO/x
+        +wABDrMAHT7fAC1T6gAkMrcALkLMALS1uQCOqeAAqrz2ABhB7AB8g7QAmaXEAD5PyAAUJsEAABXDAHB0
+        sgAAFtkAHlH/AB5L+ACkpKsAMDy7AA436wBCa+0AVn79AK7H+AAACsIAACXuACIzvwAAGMsARXX+AGNp
+        sgAAEdIAuLapACJH5gAsXf8AnLv9ABM24gAUILYAdIHCAK6wvAAxM7QAE0L5ABgv1gA0YPgAOWf+AAAB
+        vQAAJ/UAR3T3ACM5xwAFJdkApKu4AJ6htgBqm/8AYZL/AAAe1gApPdwAPmTtAP335gAcP+cAJkvoAEpa
+        wwB4frEAPU/RABcrxAA3PrgAvrqmAMC9rQAAHNAAEjDYABQ78AA1S9AAACDoAG2AzABaZL4AR2TXAAAb
+        2gCao74A///4AAYRrwBJbvQAxsOwALe1owAAI+IAqaesAJaZtQAiVf8AVob/AEJUxwASG7QAurmvAAQZ
+        xwCnsMcAIULkACNC2wAnVPcAxsW3AAALvQCyuL0AABngAClX+wCDksUATFS1AEpUwQBSWrsAAAqzAAAQ
+        xQAYPO0AjZGwACZG3AA2Z/8AOWr/AC9R5ABHcfwAaGqxAGBltgAEErgAABTQAAAf4QCdsvMAEDv1AJ6q
+        xgA5Tc0AWmK2AMzItQAAELkAqbHAADxGuQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJxkcAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAZ/QRao8xUHAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAkNnF1tZCt7fEjzFQRxUAAAAAAAAA
+        AAAAAAAAAAAAAE905KMCAqW3t7e3xJ2P/c/BkAAAAAAAAAAAAAAAAACfg+6jowICES0tLbe3xJ2dj/2C
+        z6nyAAAAAAAAAAAAAAai7ktLo6OK09MtLbe3nZ2Pj2I5e+kET/IAAAAAAAAA+7wa7kujAk7IyNMtLbfE
+        nY+PYn7Y6o8xBAAAAAAAAABfhBrvo/Fh3Gi8m2/2t7ednY+afg/1nY+CAAAAAAAAAOg075gHFxeowsIy
+        5SmlkfWdj5p+csy3xPQAAAAAAAAAMAsuuhddo1kx/5DUoaGzPFd3HwPLyC23MQAAAAAAAADnQYBuoyuS
+        7UmPmq7sSot9wqEYfkSvyMyPFQAAAAAAAF5No9YCAtYbWp2dmmbNJfWxX3p90kpsKcCQAAAAAAAA2N9L
+        S6OjAoTMt8RJ1c2Rt8xaoPUJBiQTdfIAAAAAAACNfO5LS6OjNNMtt6DVjOMtLbe3xJ3qmjFpnwAAAAAA
+        APqsGq1LowJ8yNMtWlyMb9PTLS23nZ2PMfQGAAAAAAAAx3ga7qOYiQ1bvFglXEUIWNPTLbfEnY+PMWcA
+        AAAAAAA3rZgUIUxMZPwKbT+H+UM7CMj2zLednY8x5gAAAAAAAHEOzs5IFDYghlFAqODg/OB/DCneLfVJ
+        6jFwAAAAAAAAuIEzmCsr1iCRzFqgnbEwU7Q+0cPaLKe9nP8AAAAAAABUAtYCAgKjl8wtt7fEnUnqmuGm
+        L0q+1GOUwQAAAAAAAN1LS6OjAqM99tMtLbfEnZ2PMWI6zR+aMYWVAAAAAAAAu+/uS0uj7j3I09MtLbfE
+        nY+P4Z9/9Z2PjwkAAAAAAADrGhruS6PusAhYWNMtt8SdnY/h8/6Rt1rbnAAAAAAAAMaeGu9L7xYFeGWW
+        9szMWp1Jj+H7Em8tt8Q4AAAAAAAA+GDXtgUFRha2tQUFRjWXayoQrmfiCFgtt44AAAAAAABDKwJL755g
+        Fra2FhbX12DXeaSZKIhLZRGyVQAAAAAAAAAAAMlodmtD+CKqk9/QHvdSebYWsLnwKiMmAAAAAAAAAAAA
+        AAAAAAAAAAAApx1zv3GralaNylMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////////////j////gH///gAH//wAAP/4AAAf+AA
+        AA/gAAAP4AAAD+AAAA/gAAAP4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AA
+        AAfgAAAH4AAAB+AAAAfgAAAH4AAAB/wAAAf//gA///////////8oAAAAIAAAAEAAAAABACAAAAAAAIAQ
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAa7JwAKr7UACrDfAAqvkwAHs0EAAIAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAADIDQALv4oCD7n4Ezrn/wkp2f8AFcX/ABC7/wALtOoAC7ucAAu8SgAA0QcAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAD/AQAOv1sAC7bkEjDY/yNV//8iVf//DjDe/wAd0/8AHdT/ABvR/wAXxv8AEbv/AAuz7wAK
+        vaUACr1TAADCDAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAJyRsADLXCDynO/ilX+/8qXf//Jlf//yRX//8RNeP/AB7Y/wAe1/8AHdb/ABzT/wAb
+        0P8AGc3/ABXB/wAPuP8AC7L0AAu7rgAJvFwAALsRAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAA+6bh0+3/80Z///L1///yxc//8pWv//J1n//xQ75/8AId7/ACHc/wAg
+        2v8AHtb/AB3T/wAcz/8AGMz/ABfH/wAVwv8AELr/AA2z/wINsPgABLi3AAe5ZQAAvhcAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADr11Ikfm/zVn//8zYv//MGD//y1d//8qXP//GEHs/wAj
+        4/8AI+H/ACLe/wAg2/8AHtf/ABzT/wAazv8AGMn/ABXE/wATv/8ACbz/sK6e/zRDuf8ACrP/AAmt+wAG
+        tcAABLxnAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARw3snTOj/O2v//zdm//80Y///L1///yZZ
+        //8QP/P/ACDq/wAk5/8AJOL/ACLe/wAg2v8AHtb/ABvR/wAZzP8AFsf/ABTC/wAGvf+rqZ7/QVbH/wAS
+        xf8AFcL/ABG6/wAKrf4AB7MmAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABHFgS1S6/8+bv//OWn//y1f
+        //9Hcfz/rr3t/6ewx/9bdNH/J0zn/wAl7v8AHeX/AB7e/wAe2P8AHNP/ABrO/wAXyf8AFcP/AAjA/6qn
+        oP9BWcz/ABbQ/wAYzP8AF8b/AQ+y/wAEqDUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEciHMVfs/zhr
+        //9Xfvv/t8Tt//jz4v/38+P/rq+8/725pv+/u6b/tLWw/4OSxf9LZNX/FDfh/wAX2f8AFND/ABXK/wAU
+        xP8AB8D/pqah/0dg0v8AG9r/AB3U/wAbz/8DEbf/AAiqPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAT
+        zY1Ucuv/xtDv//335v/38ub/na7w/y1c//8WNtf/AhS+/zpGuP9wdrH/qaer/7i2qP+4taj/pKu4/25/
+        xv83Uc//BiHS/wAAwv+ioKT/R2TX/wAf5P8AId7/AB3X/wITvP8ACq5JAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAABLQk7O44//59ev/kqfz/yta/v8YTf//HlH//yZG3P8AE8j/ABPG/wANwv8AAL3/jZGw/6mr
+        sP98g7T/trOp/7+6pv+4uKr/jpq9/6uppP9Yd93/ACf1/wAe5/8AHN3/AxXA/wAJslMAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAFdSZX3vv/y5f//8iV///KFr//yZX//8jVP//K07j/wAY0f8AGs3/ABfK/wAM
+        xP+TlbL/maO9/wAK1f8AFNP/ITjI/1VhvP+JjrH/s7Km/7e1o/+qr7L/fpLH/0to1/8XK8T/AAiyXQAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAa158nVPf/MWH//zBg//8tXf//Klv//ydZ//8tVOn/AB3Z/wAf
+        1f8AG9D/AA/K/5WYtP+Zo7//ABba/wAe2P8AG9b/ABfT/wAR0v8AFM3/KTnA/1xks/+Qkaj/vbif/2Fm
+        q/8ACLJoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB3apS5a9/83Zv//NGP//zFh//8tXv//K1v//zFa
+        7v8AIeL/ACHe/wAe1v8AEdH/lpm1/5mkw/8AGeD/ACHd/wAg2v8AH9f/AB3T/wAbz/8AFcz/ABHH/wAK
+        w/8CErv/Gyi0/wAMt3EAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHt6rNGD4/ztr//84Z///NGT//y5e
+        //8mWf//Ll32/wAg6/8AI+T/ACHb/wAU1f+Znbn/mKXF/wAc5/8AJOL/ACPh/wAh3P8AH9n/AB3T/wAa
+        zv8AF8n/ABXD/wASvv8EE7n/AA65fAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAg4bE8Z/n/PW3//zRl
+        //8qXv//Vn78/6q89v+WqNz/T27h/yVK6f8AKOb/AAvZ/5icuv+Tosn/AB3u/wAn6f8AJeT/ACPg/wAh
+        2/8AHtb/ABzR/wAZy/8AFsb/ABPA/wQTu/8AD7qGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB/ktzln
+        /P9Vf/7/nbT6/+rs9f////L////x/9HOwP/MyLb/zsq2/8XGu/+grMr/tLW5/56qxv8gSu3/AC7y/wAf
+        7f8AHuf/AB7g/wAd2v8AHdP/ABrO/wAXyP8AFML/ARO9/wAPu5AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAHOm91d75////+f////f/9vX2/6Cz+P9Mdf7/P2Xl/y5CzP9aacf/hIvC/66wvP/Hxbj/x8W3/8vH
+        tP/FxLb/pq7C/3iKzP9NZ9X/I0Lb/wAh3P8AEtD/ABDK/wAPw/8AEr7/ABC8mgAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAb7MPv8fv/r8D8/1d9/f8YS/7/GEv//yBU//8/Zun/ABXX/wAZ1/8AFtT/ABDT/wAZ
+        zf8lOcb/TlvA/3Z9u/+eobb/wsCz/8bDsP/Ava3/urmv/5+nu/9zgcD/SlrD/yI1wP8ADsCkAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAACfvySZa//8kVv//J1j//ylZ//8mVv//K1z//0Fq7P8AHNz/ACDb/wAf
+        2P8AHtX/ABzS/wAYzv8AE8v/AA/F/wAJwP8ACr3/FCC2/4SGsv+prLT/eH6x/6inrP/Bv6f/pKSr/wAL
+        v68AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKfLPM2T//zFh//8vX///LV3//yla//8vYP//RXDw/wAg
+        4v8AI+H/ACHd/wAg2f8AHtX/ABzR/wAZzf8AF8j/ABXD/wASvv8AB7n/aW6z/5ykv/8AAsT/AAjC/wER
+        vf8kMrf/ABHBuQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAr9dU5av//Nmf//zRj//8wYP//LV3//zRl
+        //9FcvP/ACHn/wAl5P8AJOH/ACLd/wAf2f8AHdT/ABvQ/wAYy/8AFsb/ABPA/wALu/9ma7P/o62//wAR
+        zv8AGMz/ABbH/wIXwP8AE8HDAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACv520Bv/v88a///N2f//zRj
+        //8uX///N2j//0Vz9v8AIOz/ACbp/wAl5f8AI+H/ACHc/wAe1/8AHNL/ABnN/wAXx/8AFML/AAu+/2Bl
+        tv+pscD/ABXb/wAd1P8AGtD/BBnH/wATw80AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALfvhRnT+/z9t
+        //86af//M2P//zho//9Zi///c6X7/zxq9v8mUvL/Djfr/wAf4/8AGt3/ABjY/wAY0/8AFs3/ABTJ/wAU
+        w/8ADL7/WWK1/6y1wP8AG+X/ACPd/wAe1v8CHc//ABXD1wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAw
+        /edTgf7/VoX//2CR//9uof//c6b//2WW//9djv//Y5T//2qb//9xpP//dKX//2aW/P9UgfT/Qmzt/zJW
+        4v8fPtb/BR7J/wACvP9QV7P/sri9/wAd7/8AJeX/ACDd/wEe0/8AFcXhAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAADP/yxxN/v8lV/7/L2L+/zpr/v9Edf7/UYD+/1yM/v9ikv7/XpD+/1uM//9Zif//V4j//1SG
+        //9Rgv//VYX//3Sb//+cu/3/rsf4/6S45/+OqeD/MGD+/yRQ9P8UOur/BSXZ/wEWw+wAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAJf8HADL/KwAx/0UAM/9gADH/ewAz/5YAMf+xADD/zAAw/+cHOP/7E0L5/x5L
+        +P8nVPf/SW70/4me8v+dsvP/iar3/3Gc/v9glP//WIn//0h0+P8+ZO3/L1Hk/yE+2v8ULND6ABbRqwAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAr
+        /wYAKfYeACv2OQAn8lQAJO5vACHqigAd56UAHOTAABvf2wAe3esAGNjKABjWogAV0nsAFdBTABfKLAAA
+        ywgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP///////////4////4B///4AB//8AAD/+AA
+        AH/gAAAP4AAAD+AAAA/gAAAP4AAAD+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AA
+        AAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AAAAf8AAAH//4AP///////////KAAAADAAAABgAAAAAQAIAAAA
+        AACACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8AKFj/AKGhqAABCKwAdKb+AFpesQC5xvIAAB/wACoz
+        wADOyrYAUHntAHWJzgCSqNwA19/zAD5WzwAJH8kAETrpAK+3wgC9uJ8Anrb8AHN4rQBcjP8A8O3lAJCc
+        wwAWHq0AP2//AC1N4ABMUa4AZHbLAICc+AAAAsEAQGLjAOTn7AAHOPsAFy3MAJCRqAAAC9cANUfFADI5
+        rQCkuOcAUWzZACE+1gAZS/4An6e7AAAh3ADH0vAAhIiyAE5avwABEr0As7OvAK/A/AAyWewAUX72AEx4
+        /QAtR9UAGyrBALCtnwBocLgAAi/yAHF9xABJdO8AwL61AJuozQCEi8IAtsPgAAwv4QAiSe8AWHfdAJOk
+        zwBolPwAPkS1APf28wAAEskArK+xADJi/wD9+/MAWnrnABNB9QAqMLIACxazAFVkxwCFrPwAc3q6ACVD
+        4AANH8EAHzLOADVR1AABJ+gAGDbYAAAY0wBPbNoAl5y5AJ2u8ABHVcUAVF/BAE+A/gCtvvIAAAi8AMG/
+        pwDRzsAAJFHyAJOXrgBTV7IAXHTUAB8mtAANK9YANVbhAH6SxwDEw7sAkqjxAAAd5QBFS7YALEHYAEdg
+        0gBSY8sAEyPOAGFkpQBIY90ACCDRADtn9QB2nP4AiY6xADRDuQAwXPYAtLKoAKqopgClqL4A9/TsAO3w
+        +AABDrMAHD3fACxR6wAkMrcAK0HNALa3twCOqeAArL74ABlD8AB8g7QAlaTCAD5PyAAUI8AAABXDAHF2
+        rwAAFtgAH1H/ABxK+QCfoa4ALzi5AAwz6wBGbOsAW374AK/G+AAAC8IAASXtACMuwgAAGMsARnb/AGNp
+        sgAAENEAt7arAB5G6QAsXf8An7v7ABU44QASH7YAeoPBALCyvQAxN7cAEkL8ABkz1QAzXvMAOGj9AAAB
+        twACLv0AS3b1AB4zyQAIJdYAoay8AJ6htgBrnP8AYo/9AAAd1gApPdwAO2LsAP335gAbQegAKE/tAEpa
+        wwB5fakAP1PPABsuyAA3PbkAv7ynAL69sQAAG9EAEi3YABQ/7gAyTdEAACLoAGuB0gBcZr4APlzbAAAc
+        2gCYpb4A//74AAcRsABJbvQAxsOwALe1owAAJOIAqqurAJmbsAAjVf8AVYf+AEJUxwARGq8Au7qwAAUZ
+        xQCnsMcAHkTjACFB3AAnVPcAxcO5AAALvQC2u8EAABngACdU/QCElskATFO1AEpUwQBSWrsAAQuwAAAQ
+        xgAYPO0AjZGwACpK2gA2Zv8AOmr/AC5R4ABEb/sAaWuwAGFmtwAGFboAARTPAAAf4QCdsvMACzj0AJ6q
+        xgA5Tc0AW2W4AMzItQAAD7gAqbHAADxIugAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAE8ZHAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABw6WoQMYLZcAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA81AQk5JqxMSdMYJQRxUAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAABp20PWkpLFt8TExMSdMYLPwZAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAwf2DowLW1talt7e3t8TExMSdMYLPqToAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADr0WUuj
+        AgICAtalLS23t7e3xMTEnZ2PMYIET/MAAAAAAAAAAAAAAAAAAAAAAAAAAAm8S0ujo6MCAgK7LS0tLbe3
+        t8TEnZ2dj48x/ekEaQYAAAAAAAAAAAAAAAAAAAAAAJw0S0tLS6OjAgK709PTLS0tt7fExJ2dj4+PMeEV
+        dRkEaWcAAAAAAAAAAAAAAAAAADh87u5LS0ujo6ND09PT0y0tLbe3xMSdnY+PMWK+Occx/ekEGWcAAAAA
+        AAAAAAAAAMCs763u7ktLowJDWFhY09MtLS23t8SdnY+PMeG+OVfqj48x/QQVAAAAAAAAAAAAACN4Gu+t
+        7u6j1rZN+AjIyNPTLS23t8TEnZ2Pj+G+OVednZ2Pj4LyAAAAAAAAAAAAAHR4Ghrv7qNGLhfafYxohDtv
+        9i0tt8TEnZ2Pj+EVOWtaxJ2dnYLzAAAAAAAAAAAAAHewGu/uHg4XFxc+fX19fUrlW7v2kVrEnZ2Pj5oV
+        OcvMt7fEnfQGAAAAAAAAAAAAAHfxGlIhFxcXDkbH/xXU2n19fX2zDMtC9Unqj5qQOSD2LS23xDFnAAAA
+        AAAAAAAAANtuIRcXFy6YqivtmpqajuYvSn3UfX0yjB03dx86OSDI0y0ttzHmAAAAAAAAAAAAANshgIAH
+        NiuSktYbSY+Pj+FipqFKlH19fX19SuVmOSAIyNMtt9twAAAAAAAAAAAAAPWAYfGSAgIC1gLwnZ2dnY+P
+        ONp9Kp0mOtV9fX3Ufs0MuU7IzNv/AAAAAAAAAAAAAMQa1qOjowICAqNrWsTEnZ2PONra7VpaWqB3JjqU
+        fX05OdSMySbBAAAAAAAAAAAAAFruS0ujo6MCAks0zLe3xMSdONra3sy3t7fEWvWgEP+QA305ORWVAAAA
+        AAAAAAAAALfvS0tLS6OjAks09i0tt8SdwNra3S0tt7e3t8TEnUnqmlVwvpAJAAAAAAAAAAAAALca7u5L
+        S0ujo+6509MtLbfEwMPa3fYtLS23t7fExJ2dj4/hYvScAAAAAAAAAAAAAC0a763u7ktLo+94WFjTLS23
+        Iz7aotPT0y0tLbe3xJ2dj4+PMfQ4AAAAAAAAAAAAANOeGu/v7u6j1hqtCJvI9i23Vj4+ilhY09PTLS23
+        t8SdnY+PMfSOAAAAAAAAAAAAAEKeGhrvS6O2B4DiRcm5xtORIz4+ilhYWFjTLS23t8TEnY+PMfRVAAAA
+        AAAAAAAAAJae7+4WiUhMSEhtPj4+4BJFDNo+qgibm1hY0y0tt8TEnZ2PjzH0AAAAAAAAAAAAAFi2FIHO
+        TEhMTA4/qG1tbW0+PoeH4kXJIIqbb/bMt7fEnZ2PjzH0AAAAAAAAAAAAAEPOzs7Ozg4eAqO5oHeGUad/
+        4OA+Pj4+Pj7iRcnLpcyg9UmPjzExAAAAAAAAAAAAAEMBzg5SSysrKxqXWre3Wlqg9bFePFyHPj7a2tra
+        2ocYHQ+rSeExAAAAAAAAAAAAAEMU75LWAgLWkhqXzC23t7e3xMSdSeqajv/zL0raMjIyoaGhSlwxAAAA
+        AAAAAAAAAPijo6OjAgIC1p49zC0tLbe3t8TEnZ2PjzHhYq5p2jL7L9ShfcJVAAAAAAAAAAAAPPhLS0uj
+        o6MC1p499tMtLS23t7fExJ2dj48xMf2mwxLqmmL0lQZVAAAAAAAAAAAAyU7uS0tLo6OjAmCw9tPT0y0t
+        t7e3xJ2dnY+PMf2mw4daj4+PMeGPAAAAAAAAAAAAyarv7u5LS6OjAmCwyFhY09MtLbe3xMSdnY+PMTFQ
+        Poe3nZ2dj4/bAAAAAAAAAAAAyaoa763uS0ujo2A1m1hYWNPTLS23t8SdnY+PjzH0Poctt8TEnY/bUwAA
+        AAAAAAAAHSsaGu+t7ktLo9c1CJubWFjT0y23t8TEnZ2PjzH9PodYLbe3xJ3bUwAAAAAAAAAAaCueGhrv
+        7kujGgVSYHhllm9v9szMt8TEnZ2PjzHhPoc70y0tt8TbOgAAAAAAAAAAaCueGhqeFrVSBbVGtQUFUlIF
+        tj00g7L1SUnq6jFi2of4WFgtt7fb8wAAAAAAAAAAaAK2RgUFRra2FhYWFhbX19fX1xa2tQUFtgsg7SPh
+        Mtoim1jTLbfbygAAAAAAAAAADCIiK9ajrZ5gFka1trYWFhbX19dgYDaenmB5FC4OQQ2efEMR07edXwAA
+        AAAAAAAAAAAADB0pIISKIq87qivko63xYNd5pC4OIQ6ZUkbX19cWthY1l+1VygAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAMlodmtDlpublkNDZax4sNewuRuDdxBWJl9TAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAKcdc783q8WGXh0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///////8AAP//
+        /////wAA////////AAD//H////8AAP/wD////wAA/8AA////AAD/gAAf//8AAP4AAAP//wAA+AAAAH//
+        AAD4AAAAD/8AAPgAAAAB/wAA+AAAAAA/AAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgA
+        AAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAf
+        AAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgA
+        AAAAHwAA+AAAAAAfAADwAAAAAB8AAPAAAAAAHwAA8AAAAAAfAADwAAAAAA8AAPAAAAAADwAA8AAAAAAP
+        AADwAAAAAA8AAPAAAAAADwAA8AAAAAAPAAD+AAAAAA8AAP//gAAAHwAA////wA//AAD///////8AAP//
+        /////wAA////////AAAoAAAAMAAAAGAAAAABACAAAAAAAIAlAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIujkACa/CAAqu2gAKr5AACLA+AADPBAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC8UZAAu9nwAJsfwNK9X/Bh/L/wARvf8ADbP/AAuw5gAK
+        u5kAC8BIAACzCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADBBgANwHQACLLvCiHI/xxK+f8eVP//DCrX/wAb
+        0f8AG9H/ABjL/wASv/8ADrT+AAqy7QAKuqQACr9SAADMCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD9BIAAu21wYZwP8eRu//I1j//yFS
+        //8fUf//ETHa/wAd0/8AHNP/ABzT/wAb0v8AHNH/ABjL/wASv/8ADrX/AAux9AAKuq4ADb9cAADCEgAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA7MJQANw7EBEbr+Gz7i/ype
+        //8nWP//JFX//yJT//8hVf//FDXe/wAd1/8AHtb/AB7V/wAd1P8AHNP/ABvS/wAb0P8AGs//ABfJ/wAS
+        vv8ADrX/AAuy9gAJvLcAC71mAAvGGQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAENRkAA279hg2
+        2P8vYP//LF///ypa//8oWf//J1f//yVW//8kVv//Fjnj/wAf2v8AINr/AB/Z/wAf1/8AHtb/AB3U/wAc
+        0v8AG8//ABvN/wAYzP8AGMn/ABbE/wARu/8ADbT/AAqw+gAKvMEACbtwAAnFHwAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAEMjDKE/t/zNl//8wYP//Ll7//y1d//8rW///KVr//ydY//8mV///GT3l/wAh3v8AIt3/ACHc/wAg
+        2/8AH9n/AB7X/wAd1f8AHNL/ABvQ/wAZzf8AGMr/ABfH/wAVxf8AFcL/ABO+/wAPtv8ADLH/AAWx/QAD
+        ussACLl6AAa/KQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAADsrMLVXx/zRk//8yYv//MWH//y9h//8uXv//LFz//yla//8oWf//HUTq/wAj
+        4f8AI+H/ACPf/wAi3v8AIdz/ACDa/wAf1/8AHdX/ABzS/wAbz/8AGcz/ABjJ/wAWxv8AFcP/ABPA/wAR
+        vv8AC7r/cnen/2Fkpf8SHK//AAit/gAItdQACLiEAAa4MgAAjAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEMzRMFjz/zdo//81Zf//NGP//zJi//8wYP//Ll7//ytc
+        //8qXP//Hkfs/wAj5f8AJeT/ACTj/wAj4f8AIt//ACHc/wAg2v8AH9f/AB3U/wAc0f8AGs7/ABjL/wAX
+        yP8AFcX/ABTB/wASvv8ACLz/fICn/7CunP8xS8//AA+8/wAPuP8ADLD/AAiq/gAGq90ABrKJAADVBwAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEdDWNF3y/zpp//84Z///N2b//zVk
+        //8yYv//MGD//y1e//8pWv//HEfv/wAk6P8AJ+f/ACbm/wAl5P8AJOH/ACLf/wAh3P8AINn/AB7W/wAd
+        0/8AG9D/ABnN/wAYyf8AFsb/ABTD/wATv/8ACb3/eH2o/62qnf80UNP/ABHE/wAUxP8AE8L/ABO+/wAQ
+        tv8BCar/AAexVQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEdPdOmT1/z1s
+        //87av//OWj//zdm//81ZP//Ll///yNX//9niff/Wnrn/wk38/8AIe//ACHr/wAj5/8AJeT/ACTh/wAi
+        3v8AIdv/AB/Y/wAd1f8AHNH/ABrO/wAYy/8AF8f/ABXE/wATwf8AC77/eHyp/66rnf81UtX/ABbL/wAY
+        yf8AF8f/ABXE/wAUwf8CDbD/AAe0ZgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAE9TjPmj3/z9v//89bP//O2r//zRl//8rXv//b4/2/9HV5v/x7uL/vLmz/7Cwqv+Vo8L/X3vW/ytR
+        6/8BLO7/ABzl/wAe4f8AH93/ACDZ/wAe1v8AHNP/ABvP/wAZzP8AF8j/ABXF/wAUwf8AC7//dHir/6+s
+        nv82Vdr/ABjS/wAb0P8AGs3/ABjK/wAXx/8DEbP/AAa4cAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAE9foRXD4/0Jw//87bP//Nmf//36b9v/a3uf/7+zj/+no4//v7eT/wL+3/7Sy
+        qf+zsqr/s7Go/7Wxp/+tsrL/hpjJ/09s2v8bQuj/AB/g/wAY2P8AGdT/ABrQ/wAZzf8AGMn/ABbG/wAU
+        wv8AC8D/c3ms/7Ctn/8+XNv/ABvZ/wAe1/8AHdX/ABvQ/wAYzP8FErf/AAi4egAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAE9jtQ276/z9x//+KpfT/4eTo//Dt5f/t6+b/8u/k/9XZ
+        5/9qi/j/Mk7S/zxHt/9yebL/p6eu/7m4rP+0s6r/s7Kq/7SyqP+1s6j/oay8/3SIzf89XNr/DjHf/wAV
+        0P8AEcr/ABPG/wATw/8ADMD/cXat/7GuoP89X+D/ACDh/wAj3f8AINr/AB3V/wAc0f8DFLv/AAm7gwAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAvgMAEc/ykqjx/+nq6//x7+j/7+3o//Xy
+        5v/L0ez/W374/xFF//8aT///K0vY/wAMwv8ADML/AAnA/xUlvP9LVLX/gIOw/66vrf+vr6z/rayq/7Gv
+        qv+zsaf/sLKs/5Wjwv9iec//LUvY/wQh0P8AAsH/Z26v/7KuoP9AY+L/ACLn/wAl4/8AIt//ACDb/wAe
+        1f8DF77/AAi7jgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA3QUAEM/15eXo//Tx
+        6v/49Or/u8fv/050+v8WS///HVD//yBR//8kVv//Lk7c/wAUyP8AFsb/ABXG/wATwv8ADr//AAa9/xAe
+        uP+3tq3/rq2s/6Gjr/+1tKv/trSq/7OxqP+zsaj/tLGm/6qvtP+ClMn/k5eu/6+sov9CZuX/AB/x/wAj
+        6v8AJOP/ACLd/wAe2P8FGcH/AAq9mQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        9AgAENL38/Lr/62+8v9Dbvz/HVH//yVW//8mV///JVb//yNU//8pWv//LlHg/wAXzP8AGcz/ABjK/wAX
+        x/8AFcT/ABLC/xgovP+6ua7/trSr/yE+1v8AGM//MkbF/2Rwuv+Zm7D/trWo/7Syp/+xr6b/rKuo/6qo
+        pv+Ypb7/cIzZ/z9n7v8VQvP/ACHl/wAZ2/8EGcT/AArAowAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAU6Q0AGNP6Qm7//yRX//8rXP//LFz//ytb//8pWv//J1j//yVW//8rXf//NFjl/wAa
+        0/8AHNL/ABvP/wAZzf8AGMn/ABXF/xkrv/+7uq//urit/yZG2/8AGtP/ABnT/wAX0v8AEdP/BiDO/zhJ
+        wv9pcrf/nZ+s/7a0p/+ysKT/sK2j/6+soP+pq6n/lKXB/2qG1f8xRsX/AAjBrQAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAi4hEAGdf7N2j//zFh//8wYP//L1///y1e//8sXP//Klr//ydY
+        //8wYv//Mlno/wAd2f8AH9f/AB3V/wAc0/8AGs7/ABfJ/xstwv+8uq//u7mt/yFB3P8AG9f/AB7W/wAe
+        1f8AHdT/ABzT/wAY0f8AFND/AA/O/wshx/8+Tbv/cHWx/6GhqP+ysKT/r6yi/7GuoP9zdaj/AAbFtwAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAZ7RUAHtj8Omr//zRk//8zY///MmL//zBg
+        //8uXv//LFz//ypa//80ZP//M1vs/wAg3/8AId3/ACDa/wAe1v8AHNL/ABnN/xovxv+9u7D/vbqu/x9C
+        4P8AHtv/ACDa/wAf2f8AH9f/AB7W/wAd0/8AHNH/ABrO/wAYzf8AE8r/AA/H/wAKxP8RIrz/RE60/3h8
+        q/9xd6r/AAjGwQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAc7BwAH9v+Pm7//zdn
+        //82Zv//NGT//zNi//8xYP//Ll7//yxc//83af//OWLw/wAi5f8AJOL/ACLf/wAg2v8AHtb/ABrS/xow
+        yP++vLH/vLuv/x1F5f8AIN//ACLe/wAh3f8AINv/AB/Z/wAe1/8AHdT/ABzR/wAazv8AGcv/ABfI/wAV
+        xf8AE8H/AA6//wAJu/8EFLj/AA3GywAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAf
+        6CECJN7+QXH//zpp//85aP//N2b//zVl//8zYv//MGD//yxe//86a///OWX0/wAl6v8AJ+f/ACTk/wAi
+        3v8AIdn/ABzV/xsxyv/Bv7T/vbyx/x5G6f8AIuP/ACTi/wAj4P8AIt7/ACHc/wAg2v8AHtf/AB3U/wAb
+        0f8AGs3/ABjK/wAWx/8AFcP/ABPA/wARvP8HFrj/AA/H1gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAl9yUEJeH/RHT//z1s//87a///OWn//zdm//81ZP//Ll///yRW//88bv//N2j6/wAe
+        8v8AI+3/ACLn/wAh4f8AIdv/ABzX/x40zP/Bv7T/v72y/xlE7v8AJOf/ACbl/wAl5P8AJOL/ACPf/wAh
+        3P8AINn/AB7W/wAd0/8AG9D/ABnM/wAXyf8AFcX/ABTB/wASvv8HFrr/AA7I4AAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAj9CwJLOP/R3f//0Bv//8+bf//OGn//zFi//8tXv//aIz7/7fF
+        9f/7+fD/usDJ/5Sm0v9phd//PmLp/xQ/7v8AJOL/ABPY/xYvzf/Bv7X/wb6z/xdC8f8AJur/ACjp/wAn
+        5/8AJeX/ACTi/wAi3/8AIdz/AB/Y/wAd1f8AHNH/ABrO/wAYyv8AFsb/ABTD/wASv/8FFrv/ABDJ6QAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAk8zMKL+f/RXb//zts//80Zv//YYf9/6y+
+        +P/09PT//vvy//X18P/39vL/wcC9/7+9uP/Bv7n/w8C2/8PCuP+xusf/jqHU/3qMz/+8u7b/vry1/xFE
+        +v8AIPH/ACLw/wAk6/8AJun/ACXl/wAk4f8AIt7/ACDa/wAe1/8AHNP/ABvP/wAZy/8AF8j/ABXE/wAT
+        wP8CFLz/ABG/8QAAwAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAn+jcILuj/Y4z//6S5
+        +//t8Pj////2//z69f/6+fT//Pny///98f/W3/b/m6jN/7Cyvf/Ix7r/x8a7/8PBuv/CwLr/wL64/768
+        uf+5uLj/uri3/7S5wP+Xps3/a4XZ/0Jk5P8YQ+7/ACfu/wAc5f8AHeD/AB3d/wAd2P8AHdT/ABvQ/wAZ
+        zP8AF8n/ABXF/wATwf8EFb3/ABG89wAA0AgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAl
+        /j4lSOz////7////+v/+/fj///73////9v/Y3vb/gpz5/ypZ/v8pYP//OWHo/wAN0/8DH9H/KkHN/1Vk
+        x/99hML/pai+/8fEuf/GxLn/wcC4/8C/uP++vLb/vru0/7+8sv/AvLL/s7i7/5OhyP9qf9P/QF3b/xY7
+        4v8AHNv/ABPS/wATzv8AFMn/ABTF/wAUwf8BE73/ABG9+gAV2g4AAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAo/0UnSu/////9////+//e4/r/iKL7/zVi/f8USf//Gk3//xtM//88b///Rm7q/wAZ
+        1f8AHtb/ABrW/wAY1P8AFdP/ABDR/wAUzv8eM8n/R1XD/253v/+Wmbv/urq3/8LBtv/AvrX/vbu0/7m4
+        sf+5t6//ubet/7y4rf+wtLf/kJzD/2Z5yv8+Vs//FzLS/wAUyP8ACr//ABG+/QAL1hYAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAq/0ojSPH/nbT+/zxp/v8cT/7/IVT//yZX//8lVv//I1T//yBS
+        //8/cf//R27s/wAb2v8AINn/AB/Y/wAe1/8AHdX/AB3T/wAb0f8AGdD/ABXM/wARy/8ADsj/AAzF/xEj
+        wf84Rrz/X2i4/4aKtf+rq7P/u7ux/7KysP+ysa//t7Wt/7e1rP+3tav/t7Sp/6qws/+Xn7b/BRi+/gAR
+        zB8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAq/08LN/T/K13//ytd//8tXf//K1z//ypa
+        //8oWf//Jlf//yNU//9Fdv//RnDu/wAd3P8AId3/ACHb/wAg2v8AH9j/AB7W/wAd1P8AHNH/ABrP/wAZ
+        zP8AGMn/ABbG/wAUw/8AEMD/AA29/wAHuv8AAbf/ICqz/7q5sP+ws7T/W2W4/4aKsf+rrKz/ubiq/7W0
+        qf+/vKf/ChzA/wATyCkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAu/1cOO/X/NGT//zFh
+        //8wYP//Ll7//y1d//8rW///KVn//yRV//9Gef//S3bw/wAe4f8AI+D/ACLf/wAi3f8AIdv/AB/Z/wAe
+        1v8AHdT/ABzR/wAazv8AGcv/ABfI/wAWxf8AFML/ABK//wARvP8ADrj/FSG1/7+9sf+ss73/AAzH/wAK
+        wf8ABr//Bxi8/y06tf9ZX6//DB6//wAP0jIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAv
+        /1wQP/f/N2f//zRk//8zYv//MWH//y9f//8tXf//K1v//yZX//9Mff//TXny/wAg5P8AJeP/ACTi/wAj
+        4P8AIt7/ACHc/wAf2f8AHtb/AB3T/wAb0P8AGs3/ABjK/wAXx/8AFcT/ABPA/wASvf8AD7r/ER+2/769
+        sf+ytrr/ABjQ/wAWx/8AFcX/ABPC/wAQv/8ADLv/BRjB/wAQ0D0AAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAt/2ETQPn/O2r//zdm//82Zf//NGT//zJi//8vX///LV3//yha//9Of///THn0/wAi
+        6P8AJuf/ACbl/wAl4/8AI+H/ACLe/wAh2/8AH9j/AB7V/wAc0v8AG8//ABnM/wAXyf8AFsX/ABTC/wAS
+        vv8AEbv/Cxq3/8C/sv+yt7n/AB7X/wAazf8AGcv/ABfJ/wAWxf8AE8H/BxrB/wASzkgAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAw/2kTQvr/Pm3//zpp//84aP//Nmb//zRk//8xYf//L1///yta
+        //9ShP//T372/wAk6/8AKOr/ACfo/wAm5v8AJeP/ACPg/wAi3f8AINr/AB/X/wAd1P8AG9H/ABrN/wAY
+        yv8AFsb/ABXD/wATwP8AEbz/BBK4/8C/sv+ztrn/ASXe/wAd1P8AHNL/ABrQ/wAYy/8AFsb/BhrC/wAT
+        0FIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAu/28YR/v/QXD//z1s//87av//OWj//zZm
+        //8zY///MGD//ypb//9Thf//UYD4/wAe7/8AJ+3/ACbr/wAm6P8AJuX/ACTi/wAj3/8AIdz/AB/Z/wAe
+        1f8AHNL/ABrO/wAYy/8AF8j/ABXE/wATwP8AEr3/AA+5/8G/sv+3ubb/Ayrn/wAf2/8AH9j/AB3U/wAb
+        0P8AGMv/BRnE/wAU0lwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAy/3MaSv3/RHP//0Bu
+        //89bP//O2r//zdm//8yYf//Ll7//z9v//9xov//f7D+/09++f86aPb/IU3y/wkz7f8AHuf/ABzj/wAc
+        4f8AHdz/ABza/wAc1v8AG9P/ABvP/wAZzP8AF8j/ABXF/wAUwf8AEr7/AA27/8C+s/+2t7X/BjHs/wAk
+        4f8AIt7/ACDa/wAd1f8AG8//BRvG/wAV02YAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA0
+        /3odTf7/RnX//0Fv//8+bP//R3f//12O//9tn///frD//3iq//9qnP//ZZf//22e//90p///fK3//4S2
+        //+Etv//dab7/2KQ9v9Ld+//NVzp/x5A4f8IJdb/ABXO/wARyf8AEMj/ABHE/wARwv8AEL7/AAm6/728
+        s/+3uLX/Czjz/wAm6P8AJeX/ACLe/wAf2f8AHNT/BRrH/wAV03AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAy/4EnVf7/Y5H+/2aX//9xpP//caX//2aY//9gkv//XpD//12P//9cjv//W43//1qM
+        //9Yiv//V4n//1eI//9Wh///VYX//1aH//9cjP//YpT//2qd//9yo///cKD+/2GP+P9Qee3/PmPk/ytM
+        2P8TLsv/AAq+/7e2sP+8ua7/CTr5/wAl7f8AJej/ACPi/wAh3P8AHtX/AhrJ/wAV0XsAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2/1QAM//8Bzn+/xVH/v8iUv7/LV3+/zho/v9EdP7/Tn7+/1qJ
+        /v9llP7/aZj+/2GS//9fkP//XY7//1uM//9ai///V4n//1aH//9UhP//UYL//01///9KfP//SHn//0Z4
+        //9Tg///dZn+/5m0+//C0/j/0eL4/7bD4P+SqNz/Rnf//zBf+P8hTPL/ETrp/wMm3/8AHdf/AhvK/wAW
+        0oUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAL/8YADT/OQAx/1QANf9uADP/iQAx
+        /6QAMv+/ADH/2QAy//AALf/8ADH//hFB/v8bTP7/J1T9/y9e/P86Z/v/RnL7/098+/9Yhf3/dp79/5+7
+        +/++z/f/2OL1/+Dn9P/Q3fX/r8b4/4qt+v9nlf7/U4f//1SI//9Wiv//WYz//16P//9fjP7/U3v1/0Vo
+        6/8sSdz/DCLI/gAV1HUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA/wMALf8TADL/KwAy/0UANP9gADL/ewAv/5YALv+xAC7/ywAr
+        9eQAJvL3ACfv/gwz7f8lSe3/I07v/yZU8v8yX/P/Pmz1/0t59/9XhPn/THTz/zpg6/8rTOT/HDnb/wok
+        0v4AFc/yABTY0QAW2KoAFNeCABXXVgAA0AcAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAA/wEAHd4JACT4HAAp7DcAJ+lSACLpbAAi5ocAIOSiAB7gvQAd4NcAGdziABvZvgAZ
+        2JcAGtVvABvUSAAX0CEAAOQGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////////AAD///////8AAP///////wAA//x/////
+        AAD/8A////8AAP/AAP///wAA/4AAH///AAD+AAAD//8AAPgAAAB//wAA+AAAAA//AAD4AAAAAf8AAPgA
+        AAAAPwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAf
+        AAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgA
+        AAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA8AAAAAAf
+        AADwAAAAAB8AAPAAAAAAHwAA8AAAAAAPAADwAAAAAA8AAPAAAAAADwAA8AAAAAAPAADwAAAAAA8AAPAA
+        AAAADwAA/gAAAAAPAAD//4AAAB8AAP///8AP/wAA////////AAD///////8AAP///////wAA
+</value>
+  </data>
+</root>

app/DD-Record-Organizer/frmConstructor_Main.en-US.resx

@@ -370,7 +370,7 @@
     <value>227, 270</value>
   </data>
   <data name="GridControlMain.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1084, 212</value>
+    <value>1091, 212</value>
   </data>
   <data name="CopyRecordtsmi.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
@@ -447,13 +447,16 @@
     <value>geodata navigation</value>
   </data>
   <data name="ToolStripRecords.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1084, 25</value>
+    <value>1091, 25</value>
   </data>
   <data name="SplitContainerTop.Size" type="System.Drawing.Size, System.Drawing">
     <value>1379, 237</value>
   </data>
+  <data name="pnlDetails.Size" type="System.Drawing.Size, System.Drawing">
+    <value>699, 383</value>
+  </data>
   <data name="pnlDocFill.Size" type="System.Drawing.Size, System.Drawing">
-    <value>658, 326</value>
+    <value>665, 333</value>
   </data>
   <data name="tslblDocViewLocked.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
@@ -475,14 +478,17 @@
   <data name="tslblDocViewLocked.Text" xml:space="preserve">
     <value>View is locked - Click Edit Record for unlocking</value>
   </data>
+  <data name="statStripDoc.Location" type="System.Drawing.Point, System.Drawing">
+    <value>0, 359</value>
+  </data>
   <data name="statStripDoc.Size" type="System.Drawing.Size, System.Drawing">
-    <value>658, 24</value>
+    <value>665, 24</value>
   </data>
   <data name="pnlDocToolStrip.Size" type="System.Drawing.Size, System.Drawing">
-    <value>658, 26</value>
+    <value>665, 26</value>
   </data>
   <data name="SplitContainerDetails.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 380</value>
+    <value>1373, 387</value>
   </data>
   <data name="tsButtonAdd.Size" type="System.Drawing.Size, System.Drawing">
     <value>49, 22</value>
@@ -556,16 +562,16 @@
     <value>1373, 25</value>
   </data>
   <data name="TabDetails.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 405</value>
+    <value>1373, 412</value>
   </data>
   <data name="TabDetails.Text" xml:space="preserve">
     <value>Details</value>
   </data>
   <data name="TCDetails.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1379, 436</value>
+    <value>1379, 443</value>
   </data>
   <data name="GridControlPos.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 347</value>
+    <value>1373, 387</value>
   </data>
   <data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
@@ -685,7 +691,7 @@
 </value>
   </data>
   <data name="TabPos.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 372</value>
+    <value>1373, 412</value>
   </data>
   <data name="TabPos.Text" xml:space="preserve">
     <value>positions</value>
@@ -714,7 +720,7 @@
     <value>128, 48</value>
   </data>
   <data name="GridControlDocSearch.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 347</value>
+    <value>1373, 387</value>
   </data>
   <data name="tsbtnDoc_Refresh.Size" type="System.Drawing.Size, System.Drawing">
     <value>102, 22</value>
@@ -750,7 +756,7 @@
     <value>1373, 25</value>
   </data>
   <data name="TabWindream.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 372</value>
+    <value>1373, 412</value>
   </data>
   <data name="TabWindream.Text" xml:space="preserve">
     <value>windream-files</value>
@@ -800,13 +806,13 @@
     <value>Saved Follow Ups</value>
   </data>
   <data name="TabFollowUp.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 372</value>
+    <value>1373, 412</value>
   </data>
   <data name="TabFollowUp.Text" xml:space="preserve">
     <value>Follow Up</value>
   </data>
   <data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 347</value>
+    <value>1373, 387</value>
   </data>
   <data name="ToolStripButton1.Size" type="System.Drawing.Size, System.Drawing">
     <value>63, 22</value>
@@ -818,7 +824,7 @@
     <value>1373, 25</value>
   </data>
   <data name="TabPageVariant.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1373, 372</value>
+    <value>1373, 412</value>
   </data>
   <data name="SplitContainerMain.Size" type="System.Drawing.Size, System.Drawing">
     <value>1379, 685</value>
@@ -909,13 +915,13 @@
 </value>
   </data>
   <data name="DateiVersionierenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>180, 22</value>
+    <value>175, 22</value>
   </data>
   <data name="DateiVersionierenToolStripMenuItem.Text" xml:space="preserve">
     <value>Create new version</value>
   </data>
   <data name="DokumentartÄndernToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>180, 22</value>
+    <value>175, 22</value>
   </data>
   <data name="DokumentartÄndernToolStripMenuItem.Text" xml:space="preserve">
     <value>Change the doctpe</value>
@@ -1019,7 +1025,7 @@
     <value>Reset view</value>
   </data>
   <data name="ContextMenuStripResultFiles.Size" type="System.Drawing.Size, System.Drawing">
-    <value>210, 392</value>
+    <value>210, 370</value>
   </data>
   <data name="StatusStrip_Main.Size" type="System.Drawing.Size, System.Drawing">
     <value>1379, 24</value>

app/DD-Record-Organizer/frmConstructor_Main.vb

@@ -109,7 +109,7 @@ Public Class frmConstructor_Main
     Private EBENE2_GRID_RESULT
     Private EBENE3_GRID_RESULT
     Private act_FormViewID
-    Private DT_SELECTION As DataTable
+
     Private EDIT_STATE As EditState = EditState.None
     Private GRID_TYPE As GridType = GridType.Tiles
     Private GRID_TYPE_ID As Integer = 1
@@ -173,7 +173,6 @@ Public Class frmConstructor_Main
     Private COUNT_RO_CONTROLS As Integer
 
     Private FORMVIEW_ID As Integer
-    Private _ENTITYSQL As String
     Private _VIEWNAME As String
     Private _ENTITYSTRING As String
 
@@ -359,7 +358,7 @@ Public Class frmConstructor_Main
                             Dim bimage = row.Item("NODE_IMAGE")
                             If Not IsDBNull(bimage) Then
                                 Dim Node_image = ByteArrayToBitmap(bimage)
-                                TREEVIEW_IMAGELIST.Images.Add(row.Item("GUID").ToString & "#" & row.Item("ENTITY_ID"), Node_image)
+                                TREEVIEW_IMAGELIST.Images.Add(row.Item("GUID").ToString, Node_image) 'row.Item("GUID").ToString & "#" & row.Item("ENTITY_ID")
                             End If
                         Catch ex As Exception
 
@@ -1196,6 +1195,21 @@ Public Class frmConstructor_Main
             ClassLogger.Add("Error in SearchNodeForRecord: " & ex.Message, True)
         End Try
     End Sub
+    Private Sub TreeViewMain_BeforeSelect(sender As Object, e As TreeViewCancelEventArgs) Handles TreeViewMain.BeforeSelect
+        If NODE_NAVIGATION = False Then
+            If grvwGrid.Columns.Count > 0 Then
+                Save_Grid_Layout()
+            End If
+            If DOC_SEARCH_TAB1 = True Then
+                Save_DocGrid_Layout()
+            End If
+
+        Else
+            If Not IsNothing(TreeViewMain.SelectedNode) Then
+                TreeViewMain.SelectedNode.NodeFont = New Font(TreeViewMain.Font.FontFamily, TreeViewMain.Font.Size, FontStyle.Regular)
+            End If
+        End If
+    End Sub
     Private Sub TreeViewMain_AfterSelect(sender As Object, e As TreeViewEventArgs) Handles TreeViewMain.AfterSelect
         Dim sw As New SW("TreeViewMain_AfterSelect1")
         Dim swAll As New SW("TreeViewMain_AfterSelect")
@@ -1233,8 +1247,8 @@ Public Class frmConstructor_Main
             If SelectedNode IsNot Nothing Then
                 Update_Status_Label(True, SelectedNode.Tag)
 
-                ClassNodeNavigation.Check_NODE_CONFIG_ID(ENTITY_ID)
-               
+                ClassNodeNavigation.Check_NODE_CONFIG_ID(ENTITY_ID, SelectedNode)
+
                 If SelectedNode.Tag.ToString.Contains("RECORD-ID") Then
                     Dim Record = ClassNodeNavigation.Return_RECORD_forTag(SelectedNode.Tag)
                     If Record <> 0 Then
@@ -1287,21 +1301,7 @@ Public Class frmConstructor_Main
         End If
         sw.Done()
     End Sub
-    Private Sub TreeViewMain_BeforeSelect(sender As Object, e As TreeViewCancelEventArgs) Handles TreeViewMain.BeforeSelect
-        If NODE_NAVIGATION = False Then
-            If grvwGrid.Columns.Count > 0 Then
-                Save_Grid_Layout()
-            End If
-            If DOC_SEARCH_TAB1 = True Then
-                Save_DocGrid_Layout()
-            End If
 
-        Else
-            If Not IsNothing(TreeViewMain.SelectedNode) Then
-                TreeViewMain.SelectedNode.NodeFont = New Font(TreeViewMain.Font.FontFamily, TreeViewMain.Font.Size, FontStyle.Regular)
-            End If
-        End If
-    End Sub
     Sub Load_TreeView_Node_Navigation()
         MyTreeview = Nothing
         Dim newTreeview As TreeView
@@ -1947,14 +1947,14 @@ Public Class frmConstructor_Main
                 Select Case ACT_EBENE
                     Case 1
                         EBENE1_RECID = recid
-                        For Each row As DataRow In DT_SELECTION.Rows
+                        For Each row As DataRow In CURRENT_ENTITY_DT.Rows
                             If row.Item("Record-ID") = SELECTED_RECORD_ID Then
                                 EBENE1_GRID_RESULT = row.Item(EBENE1_COLUMNNAME)
                             End If
                         Next
                     Case 2
                         EBENE2_RECID = recid
-                        For Each row As DataRow In DT_SELECTION.Rows
+                        For Each row As DataRow In CURRENT_ENTITY_DT.Rows
                             If row.Item("Record-ID") = SELECTED_RECORD_ID Then
                                 EBENE2_GRID_RESULT = row.Item(EBENE2_COLUMNNAME)
                             End If
@@ -1972,7 +1972,7 @@ Public Class frmConstructor_Main
                 Select Case ACT_EBENE
                     Case 1
                         EBENE1_RECID = recid
-                        For Each row As DataRow In DT_SELECTION.Rows
+                        For Each row As DataRow In CURRENT_ENTITY_DT.Rows
                             If row.Item("Record-ID") = SELECTED_RECORD_ID Then
                                 If EBENE1_COLUMNNAME = "" Then
                                     EBENE1_GRID_RESULT = "No Column configured"
@@ -1984,7 +1984,7 @@ Public Class frmConstructor_Main
                         Next
                     Case 2
                         EBENE2_RECID = recid
-                        For Each row As DataRow In DT_SELECTION.Rows
+                        For Each row As DataRow In CURRENT_ENTITY_DT.Rows
                             If row.Item("Record-ID") = SELECTED_RECORD_ID Then
                                 If EBENE2_COLUMNNAME = "" Then
                                     EBENE2_GRID_RESULT = "No Column configured"
@@ -2427,8 +2427,8 @@ Public Class frmConstructor_Main
 
             Dim QuickViewSQL = query.Single().Item("SQL_QUICK_VIEW")
 
-            _ENTITYSQL = Get_Grid_Sql(CONSTRUCTORID, ENTITY_ID, CURRENT_CONSTRUCTOR_DETAIL_ID, GRID_TYPE, USER_GUID, QuickViewSQL, IS_SINGLE_RECORD, FORM_TYPE, VIEW_ID, GridControlMain, grvwGrid)
-            ' _ENTITYSQL = GridSQL
+            CURRENT_ENTITYSQL = Get_Grid_Sql(CONSTRUCTORID, ENTITY_ID, CURRENT_CONSTRUCTOR_DETAIL_ID, GRID_TYPE, USER_GUID, QuickViewSQL, IS_SINGLE_RECORD, FORM_TYPE, VIEW_ID, GridControlMain, grvwGrid)
+            ' CURRENT_ENTITYSQL = GridSQL
             'Anzahl der Datensätze
             ENTITY_RECORD_COUNT = ClassDatabase.Execute_Scalar("SELECT COUNT(*) FROM TBPMO_RECORD where PARENT_RECORD = 0 AND FORM_ID = " & ENTITY_ID, True)
 
@@ -2472,12 +2472,12 @@ Public Class frmConstructor_Main
                     If EBENE1_RECID > 0 Then
                         PARENT_RECORDID = EBENE1_RECID
                         If GRID_TYPE = GridType.Grid Then
-                            _ENTITYSQL = "SELECT T.* FROM VWPMO_ENTITY_TABLE" & ENTITY_ID.ToString & " T, TBPMO_RECORD_CONNECT t1 where T.[Record-ID] = T1.RECORD2_ID AND T1.RECORD1_ID = " & PARENT_RECORDID
+                            CURRENT_ENTITYSQL = "SELECT T.* FROM VWPMO_ENTITY_TABLE" & ENTITY_ID.ToString & " T, TBPMO_RECORD_CONNECT t1 where T.[Record-ID] = T1.RECORD2_ID AND T1.RECORD1_ID = " & PARENT_RECORDID
                         Else
-                            _ENTITYSQL = _ENTITYSQL.Replace("@RecordID", EBENE2_RECID)
-                            _ENTITYSQL = _ENTITYSQL.ToString.Replace("TBPMO_FORM T1", "TBPMO_FORM T1 ,TBPMO_RECORD_CONNECT T2")
-                            _ENTITYSQL = _ENTITYSQL & " AND T.GUID = T2.RECORD2_ID  AND T2.RECORD1_ID = @T2.RECORD1_ID"
-                            _ENTITYSQL = _ENTITYSQL.ToString.Replace("@T2.RECORD1_ID", PARENT_RECORDID)
+                            CURRENT_ENTITYSQL = CURRENT_ENTITYSQL.Replace("@RecordID", EBENE2_RECID)
+                            CURRENT_ENTITYSQL = CURRENT_ENTITYSQL.ToString.Replace("TBPMO_FORM T1", "TBPMO_FORM T1 ,TBPMO_RECORD_CONNECT T2")
+                            CURRENT_ENTITYSQL = CURRENT_ENTITYSQL & " AND T.GUID = T2.RECORD2_ID  AND T2.RECORD1_ID = @T2.RECORD1_ID"
+                            CURRENT_ENTITYSQL = CURRENT_ENTITYSQL.ToString.Replace("@T2.RECORD1_ID", PARENT_RECORDID)
                         End If
                     Else
                         SELECTED_RECORD_ID = 0
@@ -2513,12 +2513,12 @@ Public Class frmConstructor_Main
                         PARENT_RECORDID = EBENE2_RECID
                         Try
                             If GRID_TYPE = GridType.Grid Then
-                                _ENTITYSQL = "SELECT T.* FROM VWPMO_ENTITY_TABLE" & ENTITY_ID.ToString & " T, TBPMO_RECORD_CONNECT t1 where T.[Record-ID] = T1.RECORD2_ID AND T1.RECORD1_ID = " & PARENT_RECORDID
+                                CURRENT_ENTITYSQL = "SELECT T.* FROM VWPMO_ENTITY_TABLE" & ENTITY_ID.ToString & " T, TBPMO_RECORD_CONNECT t1 where T.[Record-ID] = T1.RECORD2_ID AND T1.RECORD1_ID = " & PARENT_RECORDID
                             Else
-                                _ENTITYSQL = _ENTITYSQL.Replace("@RecordID", EBENE2_RECID)
-                                _ENTITYSQL = _ENTITYSQL.ToString.Replace("TBPMO_FORM T1", "TBPMO_FORM T1 ,TBPMO_RECORD_CONNECT T2")
-                                _ENTITYSQL = _ENTITYSQL & " AND T.GUID = T2.RECORD2_ID  AND T2.RECORD1_ID = @T2.RECORD1_ID"
-                                _ENTITYSQL = _ENTITYSQL.ToString.Replace("@T2.RECORD1_ID", PARENT_RECORDID)
+                                CURRENT_ENTITYSQL = CURRENT_ENTITYSQL.Replace("@RecordID", EBENE2_RECID)
+                                CURRENT_ENTITYSQL = CURRENT_ENTITYSQL.ToString.Replace("TBPMO_FORM T1", "TBPMO_FORM T1 ,TBPMO_RECORD_CONNECT T2")
+                                CURRENT_ENTITYSQL = CURRENT_ENTITYSQL & " AND T.GUID = T2.RECORD2_ID  AND T2.RECORD1_ID = @T2.RECORD1_ID"
+                                CURRENT_ENTITYSQL = CURRENT_ENTITYSQL.ToString.Replace("@T2.RECORD1_ID", PARENT_RECORDID)
                             End If
                         Catch ex As Exception
                             ClassLogger.Add("Error in Replacing patterns in entity_sql: " & ex.Message)
@@ -2540,7 +2540,7 @@ Public Class frmConstructor_Main
                     'End Select
                     EBENE3_GRID_RESULT = Nothing
             End Select
-            CURRENT_ENTITYSQL = _ENTITYSQL
+
             _ENTITYSTRING = ACT_EBENE_STRING
             CURRENT_PARENT_RECORD_ID = PARENT_RECORDID
 
@@ -2598,14 +2598,14 @@ Public Class frmConstructor_Main
                 If LOCK_CONTROLS_BG_LOAD = True Then
                     SplitContainerMain.Panel2.Enabled = False
                 End If
-                Dim DTEntity As DataTable
+
                 Try
-                    Dim async As New ClassAsyncSQL(_ENTITYSQL)
+                    Dim async As New ClassAsyncSQL(CURRENT_ENTITYSQL)
                     async.bw.RunWorkerAsync()
                     While async.bw.IsBusy
                         Application.DoEvents()
                     End While
-                    DTEntity = async.dt
+                    CURRENT_ENTITY_DT = async.dt
                 Catch ex As Exception
                     ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error Async EntitySQL", ex.Message, ex.StackTrace)
                 End Try
@@ -2617,10 +2617,10 @@ Public Class frmConstructor_Main
                 progressLoadEntity.Visible = False
                 labelLoadEntity.Visible = False
 
-                If IsNothing(DTEntity) Then
+                If IsNothing(CURRENT_ENTITY_DT) Then
                     ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error", "Error in getting Entity-Data - Check logfile")
                 Else
-                    DTEntity.TableName = "VWPMO_ENTITY_TABLE" & ENTITY_ID
+                    CURRENT_ENTITY_DT.TableName = "VWPMO_ENTITY_TABLE" & ENTITY_ID
                     Dim SQL_AutoValues = "SELECT GUID AS CONTROL_ID, CONNECTION_ID_1 AS CONNECTION_ID, SQL_COMMAND_1 AS SQL_COMMAND FROM TBPMO_CONTROL WHERE CONNECTION_ID_1 <> '' AND SQL_COMMAND_1 <> '' AND FORM_ID = " & ENTITY_ID
                     Dim DT_AUTOVALUES As DataTable = ClassDatabase.Return_Datatable(SQL_AutoValues, True)
                     CURRENT_SQL_AUTO_VALUES_DT = DT_AUTOVALUES
@@ -2630,13 +2630,13 @@ Public Class frmConstructor_Main
                     End If
                     Try
                         Dim primaryKey(1) As DataColumn
-                        primaryKey(0) = DTEntity.Columns("Record-ID")
-                        DTEntity.PrimaryKey = primaryKey
+                        primaryKey(0) = CURRENT_ENTITY_DT.Columns("Record-ID")
+                        CURRENT_ENTITY_DT.PrimaryKey = primaryKey
                     Catch ex As Exception
                         ClassLogger.Add("Could not set the primary Key(Record-ID): " & ex.Message, True)
                     End Try
 
-                    DT_SELECTION = DTEntity
+
                     LoadGrid_Records()
                     If GRID_TYPE = GridType.Grid Then
                         grvwGrid.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.None
@@ -2769,11 +2769,11 @@ Public Class frmConstructor_Main
     Sub Load_Entity_Data_Only()
         Try
             ENTITY_LOADING_PROCESS = False
-            Dim DTEntity As DataTable = ClassDatabase.Return_Datatable(_ENTITYSQL, True)
+            Dim DTEntity As DataTable = ClassDatabase.Return_Datatable(CURRENT_ENTITYSQL, True)
             Dim primaryKey(1) As DataColumn
             primaryKey(0) = DTEntity.Columns("Record-ID")
             DTEntity.PrimaryKey = primaryKey
-            DT_SELECTION = DTEntity
+            CURRENT_ENTITY_DT = DTEntity
             LoadGrid_Records()
             Load_Grid_Layout()
         Catch ex As Exception
@@ -2787,7 +2787,7 @@ Public Class frmConstructor_Main
             Dim ImageIndex As Integer = -1
             Dim i As Integer = 0
             Dim j As Integer = 0
-            Dim DT As DataTable = DirectCast(DT_SELECTION, DataTable)
+            Dim DT As DataTable = DirectCast(CURRENT_ENTITY_DT, DataTable)
             If DT Is Nothing Then
                 MsgBox("Daten können nicht geladen werden - Datatable SELECTION is empty", MsgBoxStyle.Critical)
                 Exit Sub
@@ -3061,7 +3061,7 @@ Public Class frmConstructor_Main
                 'Grid leeren
                 Clear_Grid_View()
 
-                Dim gridFormatter As New ClassGridFormatter.ConstructorView(DT_SELECTION, ENTITY_ID)
+                Dim gridFormatter As New ClassGridFormatter.ConstructorView(CURRENT_ENTITY_DT, ENTITY_ID)
                 Dim DT_RESULT As DataTable = gridFormatter.FormatDatatable()
                 GridControlMain.DataSource = DT_RESULT
                 gridFormatter.FormatGridView(grvwGrid)
@@ -4113,11 +4113,11 @@ Public Class frmConstructor_Main
         If ClassDatabase.Execute_non_Query(upd) = True Then
             ' VIEW_ID Override zurücksetzen!!
             VIEW_ID_RUNTIME = -1
-            MsgBox("Stanard-View was saved successfully!", MsgBoxStyle.Information)
+            MsgBox("Standard-View was saved successfully!", MsgBoxStyle.Information)
         End If
     End Sub
     Private Sub ButtonResetView_Click(sender As Object, e As EventArgs) Handles ButtonResetView.Click
-        ' TODO: Ansicht zurücksetzen
+        'TODO: Ansicht zurücksetzen
         Try
             Dim XMLPath = Get_Grid_Layout_Filename()
             If File.Exists(XMLPath) Then
@@ -5577,7 +5577,7 @@ Public Class frmConstructor_Main
                 Exit Sub
             End If
             Refresh_Selected_Table()
-            Dim frm As New frmDocLink_to_Record() 'fileName, ClassWindreamDocGrid.RESULT_OBJECTTYPE)
+            Dim frm As New frmDocRecordLink ' frmDocLink_Record_Entities() 'fileName, ClassWindreamDocGrid.RESULT_OBJECTTYPE)
             frm.Show()
         Catch ex As Exception
             MsgBox("Unexpected Error in Linking Record: " & ex.Message, MsgBoxStyle.Critical)
@@ -6569,7 +6569,7 @@ Public Class frmConstructor_Main
                 If Not IsNothing(CURRENT_NODE_CONFIGURABLE_ID) And CURRENT_NODE_CONFIGURABLE_ID > 0 Then
                     Dim index As Integer = 0
                     For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
-                        If img = CURRENT_NODE_CONFIGURABLE_ID.ToString & "#" & ENTITY_ID Then
+                        If img = CURRENT_NODE_CONFIGURABLE_ID.ToString Then 'CURRENT_NODE_CONFIGURABLE_ID.ToString & "#" & ENTITY_ID
                             Exit For
                         End If
                         index += 1
@@ -6589,7 +6589,7 @@ Public Class frmConstructor_Main
                     Dim sel = String.Format("SELECT MAX(GUID) FROM TBPMO_STRUCTURE_NODES WHERE NODE_CONFIG_ID = {0} AND NODE_CAPTION = '{1}'", CURRENT_NODE_CONFIGURABLE_ID, tsmINewText.Text)
 
                     Dim NEW_GUID = ClassDatabase.Execute_Scalar(sel)
-                    ClassNodeNavigation.Check_NODE_CONFIG_ID(ENTITY_ID)
+                    ClassNodeNavigation.Check_NODE_CONFIG_ID(ENTITY_ID, Nothing)
                     NEWNODE.Tag = ClassNodeNavigation.CreateNODE_TAG(ENTITY_ID, NEW_GUID, NEWRECORD, CURRENT_NODE_CONFIGURABLE_ID)
 
                     If where = "HERE" Then
@@ -6666,6 +6666,15 @@ Public Class frmConstructor_Main
                 Exit Sub
             End If
             For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
+                'If File.Exists(row.Item("DOC_PATH")) = False Then
+                '    If clsWD_GET.WDFile_exists(ClassWindreamDocGrid.SELECTED_DOC_PATH, DD_LIB_Standards.clsDatabase.DB_PROXY_INITIALIZED, ClassProxy.MyLinkedServer, True) = True Then
+                '        ClassHelper.MSGBOX_Handler("ERROR", "File-Open", "File is existing in windream, but it seems as You don't have access to windream-drive! " & vbNewLine & "Please check Your windream-drive and contact your admin!" & vbNewLine & "DOC-ID: " & ClassWindreamDocGrid.SELECTED_DOC_ID.ToString)
+                '        Exit Sub
+                '    Else
+                '        ClassHelper.MSGBOX_Handler("ERROR", "File-Open", "This file is not existing in windream! " & vbNewLine & "Please contact your admin!" & vbNewLine & "DOC-ID: " & ClassWindreamDocGrid.SELECTED_DOC_ID.ToString)
+                '        Exit Sub
+                '    End If
+                'End If
                 ClassHelper.File_open(row.Item("DOC_PATH"), row.Item("DOC_ID"))
             Next
         Else

app/DD-Record-Organizer/frmDocLink_Record_Entities.Designer.vb

@@ -1,5 +1,5 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
-Partial Class frmDocLink_to_Record
+Partial Class frmDocLink_Record_Entities
     Inherits System.Windows.Forms.Form
 
     'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
@@ -22,7 +22,7 @@ Partial Class frmDocLink_to_Record
     'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
     <System.Diagnostics.DebuggerStepThrough()> _
     Private Sub InitializeComponent()
-        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDocLink_to_Record))
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDocLink_Record_Entities))
         Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
         Me.trvwMain = New System.Windows.Forms.TreeView()
         Me.dgEntityRecords = New DevExpress.XtraGrid.GridControl()

app/DD-Record-Organizer/frmDocLink_Record_Entities.vb

@@ -1,7 +1,7 @@
 Imports System.Text
 Imports System.IO
 Imports DD_LIB_Standards
-Public Class frmDocLink_to_Record
+Public Class frmDocLink_Record_Entities
     Dim DT_TREEVIEW_PER_CONTROLS As DataTable
     Dim TreeView_perControl As Boolean = False
     Dim DT_TREEVIEW_CONFIGURATION As DataTable
@@ -38,8 +38,8 @@ Public Class frmDocLink_to_Record
 
     Private Function GetConstructorForms() As DataTable
         Try
-            Dim SQL As String = String.Format("SELECT GUID, dbo.FNPMO_GETOBJECTCAPTION('{0}', 'CONSTR_MENUE' + CONVERT(VARCHAR(5), GUID), {1}) AS FORM_TITLE, SEQUENCE_MENU, ADDED_WHO, ADDED_WHEN, CHANGED_WHO," & _
-           "CHANGED_WHEN, MENU_IMG, SHORT_TITLE, LANGUAGE, " & _
+            Dim SQL As String = String.Format("SELECT GUID, dbo.FNPMO_GETOBJECTCAPTION('{0}', 'CONSTR_MENUE' + CONVERT(VARCHAR(5), GUID), {1}) AS FORM_TITLE, SEQUENCE_MENU, ADDED_WHO, ADDED_WHEN, CHANGED_WHO," &
+           "CHANGED_WHEN, MENU_IMG, SHORT_TITLE, LANGUAGE, " &
            "'CONSTR_MENUE' + CONVERT(VARCHAR(5), GUID) as OBECTNAME FROM TBPMO_FORM_CONSTRUCTOR where GUID in (SELECT CONSTRUCT_ID FROM TBPMO_CONSTRUCTOR_USER WHERE HOME_MENUE = 1 AND USER_ID = {2}) ORDER BY SEQUENCE_MENU", USER_LANGUAGE, CURRENT_SCREEN_ID, USER_GUID)
             Dim dt As DataTable = ClassDatabase.Return_Datatable(SQL)
             Return dt
@@ -93,10 +93,10 @@ Public Class frmDocLink_to_Record
                     trvwMain.Nodes.Add(node.Clone)
                 Next
             End If
-            
+
         Else
             Try
-                Dim sel_sql = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " & _
+                Dim sel_sql = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " &
                                 "from VWPMO_CONSTRUCTOR_FORMS WHERE FORM_TYPE_ID IN (1,4) AND PARENT_ID = 0 AND CONSTRUCT_ID = {2} AND SCREEN_ID = {3} ORDER BY SEQUENCE", USER_LANGUAGE, CURRENT_SCREEN_ID, constructorId, CURRENT_SCREEN_ID)
 
                 Dim DT As DataTable = ClassDatabase.Return_Datatable(sel_sql)
@@ -107,7 +107,7 @@ Public Class frmDocLink_to_Record
                         Node = trvwMain.Nodes.Add("E1: " & rowEbene0.Item("CAPTION").ToString)
                         Node.Tag = rowEbene0.Item("GUID")
                         'Jetzt die Ebene1Knoten einhängen
-                        sel_sql = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " & _
+                        sel_sql = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " &
                                 "from VWPMO_CONSTRUCTOR_FORMS WHERE FORM_TYPE_ID in (2,5) AND PARENT_ID = {2} AND CONSTRUCT_ID = {3} AND SCREEN_ID = {4} ORDER BY SEQUENCE", USER_LANGUAGE, CURRENT_SCREEN_ID, rowEbene0.Item("FORM_ID"), constructorId, CURRENT_SCREEN_ID)
 
                         Dim dtEbene1 As DataTable = ClassDatabase.Return_Datatable(sel_sql)
@@ -117,7 +117,7 @@ Public Class frmDocLink_to_Record
                                 Node1 = Node.Nodes.Add("E2: " & rowEbene1.Item("CAPTION").ToString)
                                 Node1.Tag = rowEbene1.Item("GUID")
                                 'Jetzt die Ebene2 Knoten einhängen
-                                sel_sql = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " & _
+                                sel_sql = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " &
                                "from VWPMO_CONSTRUCTOR_FORMS WHERE FORM_TYPE_ID in (3,5) AND PARENT_ID = {2} AND CONSTRUCT_ID = {3} AND SCREEN_ID = {4} ORDER BY SEQUENCE", USER_LANGUAGE, CURRENT_SCREEN_ID, rowEbene1.Item("FORM_ID"), constructorId, CURRENT_SCREEN_ID)
 
                                 Dim dtEbene2 As DataTable = ClassDatabase.Return_Datatable(sel_sql)
@@ -185,18 +185,18 @@ Public Class frmDocLink_to_Record
 
         If cmbConstructorForms.SelectedIndex <> -1 Then
             CONSTRUCTOR_ID = constructor.id
-            Dim SQL = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " & _
+            Dim SQL = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " &
                        "FROM VWPMO_CONSTRUCTOR_FORMS WHERE SCREEN_ID = {1} AND  CONSTRUCT_ID = {2} ORDER BY SEQUENCE", USER_LANGUAGE, CURRENT_SCREEN_ID, CONSTRUCTOR_ID)
 
             DT_VWPMO_CONSTRUCTOR_FORMS = ClassDatabase.Return_Datatable(SQL, True)
 
             SQL = String.Format("select * from VWPMO_STRUCTURE_NODES where ENTITY_ID IN (SELECT FORM_ID FROM VWPMO_CONSTRUCTOR_FORMS WHERE CONSTRUCT_ID = {0})", CONSTRUCTOR_ID)
-            Dim DT As DataTable = ClassDatabase.Return_Datatable(Sql)
+            Dim DT As DataTable = ClassDatabase.Return_Datatable(SQL)
             If DT.Rows.Count > 1 Then
                 TreeView_perControl = True
                 DT_TREEVIEW_PER_CONTROLS = DT
                 SQL = String.Format("select * from TBPMO_STRUCTURE_NODES_CONFIGURATION where ENTITY_ID IN (SELECT FORM_ID FROM VWPMO_CONSTRUCTOR_FORMS WHERE CONSTRUCT_ID = {0})", CONSTRUCTOR_ID)
-                DT_TREEVIEW_CONFIGURATION = ClassDatabase.Return_Datatable(Sql)
+                DT_TREEVIEW_CONFIGURATION = ClassDatabase.Return_Datatable(SQL)
 
                 Try
                     TREEVIEW_IMAGELIST = New ImageList
@@ -205,7 +205,7 @@ Public Class frmDocLink_to_Record
                             Dim bimage = row.Item("NODE_IMAGE")
                             If Not IsDBNull(bimage) Then
                                 Dim Node_image = ByteArrayToBitmap(bimage)
-                                TREEVIEW_IMAGELIST.Images.Add(row.Item("GUID").ToString & "#" & row.Item("ENTITY_ID"), Node_image)
+                                TREEVIEW_IMAGELIST.Images.Add(row.Item("GUID").ToString, Node_image) 'row.Item("GUID").ToString & "#" & row.Item("ENTITY_ID")
                             End If
                         Catch ex As Exception
 

app/DD-Record-Organizer/frmDocRecordLink.Designer.vb

@@ -0,0 +1,119 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmDocRecordLink
+    Inherits System.Windows.Forms.Form
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDocRecordLink))
+        Me.txtFileInfo = New System.Windows.Forms.TextBox()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.btnLink = New System.Windows.Forms.Button()
+        Me.dgEntityRecords = New DevExpress.XtraGrid.GridControl()
+        Me.grvwGrid = New DevExpress.XtraGrid.Views.Grid.GridView()
+        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
+        Me.tsslbl = New System.Windows.Forms.ToolStripStatusLabel()
+        CType(Me.dgEntityRecords, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.grvwGrid, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.StatusStrip1.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'txtFileInfo
+        '
+        resources.ApplyResources(Me.txtFileInfo, "txtFileInfo")
+        Me.txtFileInfo.Name = "txtFileInfo"
+        Me.txtFileInfo.ReadOnly = True
+        '
+        'Label3
+        '
+        resources.ApplyResources(Me.Label3, "Label3")
+        Me.Label3.Name = "Label3"
+        '
+        'btnLink
+        '
+        resources.ApplyResources(Me.btnLink, "btnLink")
+        Me.btnLink.Image = Global.DD_Record_Organizer.My.Resources.Resources.Link
+        Me.btnLink.Name = "btnLink"
+        Me.btnLink.UseVisualStyleBackColor = True
+        '
+        'dgEntityRecords
+        '
+        resources.ApplyResources(Me.dgEntityRecords, "dgEntityRecords")
+        Me.dgEntityRecords.MainView = Me.grvwGrid
+        Me.dgEntityRecords.Name = "dgEntityRecords"
+        Me.dgEntityRecords.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.grvwGrid})
+        '
+        'grvwGrid
+        '
+        Me.grvwGrid.Appearance.EvenRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.BackColor"), System.Drawing.Color)
+        Me.grvwGrid.Appearance.EvenRow.Options.UseBackColor = True
+        Me.grvwGrid.Appearance.FilterPanel.BackColor = CType(resources.GetObject("grvwGrid.Appearance.FilterPanel.BackColor"), System.Drawing.Color)
+        Me.grvwGrid.Appearance.FilterPanel.Options.UseBackColor = True
+        Me.grvwGrid.Appearance.HideSelectionRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.HideSelectionRow.BackColor"), System.Drawing.Color)
+        Me.grvwGrid.Appearance.HideSelectionRow.Options.UseBackColor = True
+        Me.grvwGrid.Appearance.SelectedRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.SelectedRow.BackColor"), System.Drawing.Color)
+        Me.grvwGrid.Appearance.SelectedRow.Options.UseBackColor = True
+        Me.grvwGrid.Appearance.SelectedRow.Options.UseForeColor = True
+        Me.grvwGrid.GridControl = Me.dgEntityRecords
+        Me.grvwGrid.Name = "grvwGrid"
+        Me.grvwGrid.OptionsBehavior.Editable = False
+        Me.grvwGrid.OptionsBehavior.ReadOnly = True
+        Me.grvwGrid.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False]
+        Me.grvwGrid.OptionsView.ColumnAutoWidth = False
+        Me.grvwGrid.OptionsView.EnableAppearanceEvenRow = True
+        Me.grvwGrid.OptionsView.ShowAutoFilterRow = True
+        '
+        'StatusStrip1
+        '
+        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsslbl})
+        resources.ApplyResources(Me.StatusStrip1, "StatusStrip1")
+        Me.StatusStrip1.Name = "StatusStrip1"
+        '
+        'tsslbl
+        '
+        Me.tsslbl.Name = "tsslbl"
+        resources.ApplyResources(Me.tsslbl, "tsslbl")
+        '
+        'frmDocRecordLink
+        '
+        resources.ApplyResources(Me, "$this")
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.Controls.Add(Me.StatusStrip1)
+        Me.Controls.Add(Me.dgEntityRecords)
+        Me.Controls.Add(Me.txtFileInfo)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.btnLink)
+        Me.Name = "frmDocRecordLink"
+        CType(Me.dgEntityRecords, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.grvwGrid, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.StatusStrip1.ResumeLayout(False)
+        Me.StatusStrip1.PerformLayout()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Friend WithEvents txtFileInfo As TextBox
+    Friend WithEvents Label3 As Label
+    Friend WithEvents btnLink As Button
+    Friend WithEvents dgEntityRecords As DevExpress.XtraGrid.GridControl
+    Friend WithEvents grvwGrid As DevExpress.XtraGrid.Views.Grid.GridView
+    Friend WithEvents StatusStrip1 As StatusStrip
+    Friend WithEvents tsslbl As ToolStripStatusLabel
+End Class

app/DD-Record-Organizer/frmDocRecordLink.vb

@@ -0,0 +1,135 @@
+Imports System.IO
+Imports System.Text
+Imports DD_LIB_Standards
+Public Class frmDocRecordLink
+    Private SELECTED_RECORDID
+    Private Sub frmDocRecordLink_Load(sender As Object, e As EventArgs) Handles Me.Load
+        If ClassWindreamDocGrid.DT_RESULTFILES.Rows.Count = 1 Then
+            txtFileInfo.Text = ClassWindreamDocGrid.DT_RESULTFILES.Rows(0).Item("DOC_PATH")
+        Else
+            txtFileInfo.Text = String.Format("{0} files selected for linking to record", ClassWindreamDocGrid.DT_RESULTFILES.Rows.Count)
+        End If
+        Try
+            If IsNothing(CURRENT_ENTITY_DT) Then
+                Me.Close()
+            End If
+            dgEntityRecords.DataSource = CURRENT_ENTITY_DT
+            grvwGrid.PopulateColumns()
+            dgEntityRecords.RefreshDataSource()
+        Catch ex As Exception
+            ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error in frmDocRecordLink_Load", ex.Message, ex.StackTrace)
+        End Try
+        SELECTED_RECORDID = Nothing
+        Load_DocGrid_Layout()
+        tsslbl.Text = "Waiting for record-Selection....."
+        tsslbl.BackColor = Color.Transparent
+    End Sub
+
+    Private Sub btnLink_Click(sender As Object, e As EventArgs) Handles btnLink.Click
+        If clsWindream.Create_Session = False Then
+            MsgBox("No Seesion to windream created! Check Your connection!", MsgBoxStyle.Critical)
+            Exit Sub
+        End If
+
+        If Not IsNothing(SELECTED_RECORDID) Then
+            tsslbl.Text = ""
+            tsslbl.BackColor = Color.Transparent
+            Try
+                For Each row As DataRow In CURRENT_DT_SELECTED_FILES.Rows
+                    CURRENT_DOC_ID = row.Item("DOC_ID")
+                    Dim DOC_PATH = row.Item("FILEPATH")
+                    Dim _objecttype = row.Item("OBJECTTYPE")
+                    clsWindream.MY_WDOBJECTTYPE = _objecttype
+                    Dim sql_Exec = String.Format("EXEC PRPMO_CHECK_DOC_RECORD_LINK {0},{1},'{2}','{3}'", SELECTED_RECORDID, CURRENT_DOC_ID, "MANUAL RECORD-LINK", USER_USERNAME)
+                    'Dim ins = String.Format("INSERT INTO TBPMO_DOC_RECORD_LINK (RECORD_ID,DOC_ID,COMMENT,ADDED_WHO) VALUES ({0},{1},'{2}','{3}')", SELECTED_RECORDID, CURRENT_DOC_ID, "MANUAL RECORD-LINK", USER_USERNAME)
+                    If ClassDatabase.Execute_non_Query(sql_Exec) = False Then
+                        MsgBox("Unexpected Error in Inserting Record-Doc Link. Please check logfile!", MsgBoxStyle.Critical)
+                    Else
+                        If LICENSE_PROXY = True And DD_LIB_Standards.clsDatabase.DB_PROXY_INITIALIZED Then
+                            Dim proc = String.Format("EXEC PRPROXY_DOC_CHECK_DOC_REC_LINK {0},{1}", CURRENT_DOC_ID, SELECTED_RECORDID)
+                            ClassDatabase.Execute_non_Query(proc, True)
+                        End If
+                    End If
+                    Dim sql = String.Format("SELECT * FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = '{0}'", _objecttype)
+                    Dim DT_OBJTYPE As DataTable = ClassDatabase.Return_Datatable(sql, True)
+                    If DT_OBJTYPE.Rows.Count = 1 Then
+                        Dim Entity_Index = DT_OBJTYPE.Rows(0).Item("IDXNAME_ENTITYID")
+                        Dim Record_Index = DT_OBJTYPE.Rows(0).Item("IDXNAME_RECORDID")
+                        Dim ENT_ID = ClassDatabase.Execute_Scalar(String.Format("SELECT FORM_ID FROM TBPMO_RECORD WHERE GUID = {0}", SELECTED_RECORDID))
+                        If ENT_ID > 1 Then
+                            If clsWD_SET.IndexFile(DOC_PATH, Entity_Index, ENT_ID, _objecttype) = False Then
+                                Dim msg = "Die Entität-ID konnte nicht gesetzt werden! Bitte überprüfen Sie die Logfile"
+                                If USER_LANGUAGE <> "de-DE" Then
+                                    msg = "Could not index Entity-ID! Please check logfile!"
+                                End If
+                                MsgBox(msg, MsgBoxStyle.Exclamation)
+                            End If
+                        End If
+                        If clsWD_SET.IndexFile(DOC_PATH, Record_Index, SELECTED_RECORDID, _objecttype) = False Then
+                            Dim msg = "Die Record-ID konnte nicht gesetzt werden! Bitte überprüfen Sie die Logfile"
+                            If USER_LANGUAGE <> "de-DE" Then
+                                msg = "Could not index Record-ID! Please check logfile!"
+                            End If
+                            MsgBox(msg, MsgBoxStyle.Exclamation)
+                        Else
+                            Dim msg = String.Format("Der Datensatz wurde erfolgreich mit der Datei " & vbNewLine & "{0}" & vbNewLine & "verknüpft!", DOC_PATH)
+                            If USER_LANGUAGE <> "de-DE" Then
+                                msg = "The record was successfully linked to the file: " & vbNewLine & DOC_PATH
+                            End If
+                            tsslbl.Text = msg
+                            tsslbl.BackColor = Color.Yellow
+
+                            ClassHelper.InsertEssential_Log(CURRENT_DOC_ID, "DOC-ID", "FILE LINK CREATED FOR RECORD: " & SELECTED_RECORDID.ToString)
+                        End If
+                    End If
+                Next
+            Catch ex As Exception
+                ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error in Linking Record to file", ex.Message, ex.StackTrace)
+            End Try
+        Else
+            MsgBox("Please choose a record!", MsgBoxStyle.Exclamation)
+            Exit Sub
+        End If
+    End Sub
+
+    Private Sub grvwGrid_FocusedRowChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.FocusedRowChangedEventArgs) Handles grvwGrid.FocusedRowChanged
+        Try
+            If Not IsNothing(dgEntityRecords.DataSource) Then
+                Dim RecordId As Integer = grvwGrid.GetFocusedRowCellValue(grvwGrid.Columns("Record-ID"))
+                SELECTED_RECORDID = RecordId
+                tsslbl.Text = "Record (" & RecordId.ToString & ") selected!"
+            End If
+        Catch ex As Exception
+            MsgBox("Could not get the RecordID: " & ex.Message, MsgBoxStyle.Exclamation)
+            SELECTED_RECORDID = Nothing
+        End Try
+
+    End Sub
+    Sub Save_DocGrid_Layout()
+        Try
+            Dim XMLPath = Get_DocGrid_Layout_Filename()
+            grvwGrid.SaveLayoutToXml(XMLPath)
+            ' Update_Status_Label(True, "Grid Layout Loaded")
+        Catch ex As Exception
+            ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error in Save_DocGrid_Layout", ex.Message, ex.StackTrace)
+        End Try
+    End Sub
+    Sub Load_DocGrid_Layout()
+        Try
+            Dim XMLPath = Get_DocGrid_Layout_Filename()
+            If File.Exists(XMLPath) Then
+                grvwGrid.RestoreLayoutFromXml(XMLPath)
+                grvwGrid.GuessAutoFilterRowValuesFromFilter()
+            End If
+        Catch ex As Exception
+            ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error in Load_DocGrid_Layout", ex.Message, ex.StackTrace)
+        End Try
+    End Sub
+    Private Function Get_DocGrid_Layout_Filename()
+        Dim Filename As String = String.Format("GridViewDocRecordLink-{0}-UserLayout.xml", CURRENT_ENTITY_ID)
+        Return System.IO.Path.Combine(Application.UserAppDataPath(), Filename)
+    End Function
+    Private Sub frmDocRecordLink_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
+        Save_DocGrid_Layout()
+    End Sub
+End Class

app/DD-Record-Organizer/frmMain.vb

@@ -798,15 +798,20 @@ Public Class frmMain
     Public Sub New()
         Dim splash As New frmSplash()
         splash.ShowDialog()
-        If ERROR_INIT <> "INVALID USER" Then
-            Dim cultureInfo As System.Globalization.CultureInfo
-            cultureInfo = New System.Globalization.CultureInfo(USER_LANGUAGE)
-            cultureInfo.DateTimeFormat.ShortDatePattern = USER_DATE_FORMAT
-            Thread.CurrentThread.CurrentCulture = cultureInfo
-            Thread.CurrentThread.CurrentUICulture = cultureInfo
-            CultureInfo.DefaultThreadCurrentCulture = cultureInfo
-            CultureInfo.DefaultThreadCurrentUICulture = cultureInfo
-        End If
+        Try
+            If ERROR_INIT <> "INVALID USER" Then
+                Dim cultureInfo As System.Globalization.CultureInfo
+                cultureInfo = New System.Globalization.CultureInfo(USER_LANGUAGE)
+                cultureInfo.DateTimeFormat.ShortDatePattern = USER_DATE_FORMAT
+                Thread.CurrentThread.CurrentCulture = cultureInfo
+                Thread.CurrentThread.CurrentUICulture = cultureInfo
+                CultureInfo.DefaultThreadCurrentCulture = cultureInfo
+                CultureInfo.DefaultThreadCurrentUICulture = cultureInfo
+            End If
+        Catch ex As Exception
+
+        End Try
+
 
         ' Dieser Aufruf ist für den Designer erforderlich.
         InitializeComponent()

app/DD-Record-Organizer/frmWM_Dokumentart_Konfig.Designer.vb

@@ -1389,14 +1389,14 @@ Partial Class frmWM_Dokumentart_Konfig
         '
         Me.TBWH_DOKART_MODULETableAdapter.ClearBeforeFill = True
         '
-        'frmWD_Dokumentart_Konfig
+        'frmWM_Dokumentart_Konfig
         '
         resources.ApplyResources(Me, "$this")
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.Controls.Add(Me.XtraTabControl1)
         Me.Controls.Add(Me.StatusStrip1)
         Me.Controls.Add(Me.GroupBox1)
-        Me.Name = "frmWD_Dokumentart_Konfig"
+        Me.Name = "frmWM_Dokumentart_Konfig"
         CType(Me.TBDD_DOKUMENTARTBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TBDD_DOKUMENTARTBindingNavigator.ResumeLayout(False)
         Me.TBDD_DOKUMENTARTBindingNavigator.PerformLayout()

app/DD-Record-Organizer/frmWM_Dokumentart_Konfig.resx

@@ -2025,7 +2025,7 @@
     <value>0, 25</value>
   </data>
   <data name="ListBox2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>305, 207</value>
+    <value>305, 210</value>
   </data>
   <data name="ListBox2.TabIndex" type="System.Int32, mscorlib">
     <value>2</value>
@@ -2234,7 +2234,7 @@
     <value>22</value>
   </data>
   <data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1261, 249</value>
+    <value>1265, 252</value>
   </data>
   <data name="XtraTabPage1.Text" xml:space="preserve">
     <value>Automatische Indexe</value>
@@ -2270,7 +2270,7 @@
     <value>0, 25</value>
   </data>
   <data name="ListBox1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>305, 224</value>
+    <value>305, 227</value>
   </data>
   <data name="ListBox1.TabIndex" type="System.Int32, mscorlib">
     <value>3</value>
@@ -2458,7 +2458,7 @@
     <value>0, 0</value>
   </data>
   <data name="BindingNavigator2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1261, 25</value>
+    <value>1265, 25</value>
   </data>
   <data name="BindingNavigator2.TabIndex" type="System.Int32, mscorlib">
     <value>2</value>
@@ -2479,7 +2479,7 @@
     <value>1</value>
   </data>
   <data name="XtraTabPage3.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1261, 249</value>
+    <value>1265, 252</value>
   </data>
   <data name="XtraTabPage3.Text" xml:space="preserve">
     <value>Manuelle Indexe</value>
@@ -2817,7 +2817,7 @@
     <value>0, 0</value>
   </data>
   <data name="BindingNavigator1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1261, 25</value>
+    <value>1265, 25</value>
   </data>
   <data name="BindingNavigator1.TabIndex" type="System.Int32, mscorlib">
     <value>2</value>
@@ -2838,7 +2838,7 @@
     <value>5</value>
   </data>
   <data name="XtraTabPage2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1261, 249</value>
+    <value>1265, 252</value>
   </data>
   <data name="XtraTabPage2.Text" xml:space="preserve">
     <value>Zurodnung Dokumentart - Entität</value>
@@ -3222,7 +3222,7 @@
     <value>4</value>
   </data>
   <data name="XtraTabPage4.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1261, 249</value>
+    <value>1265, 252</value>
   </data>
   <data name="XtraTabPage4.Text" xml:space="preserve">
     <value>Variabler Ordnerpfad</value>
@@ -3778,7 +3778,7 @@
     <value>DevExpress.Utils.ToolTipController, DevExpress.Utils.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
-    <value>frmWD_Dokumentart_Konfig</value>
+    <value>frmWM_Dokumentart_Konfig</value>
   </data>
   <data name="&gt;&gt;$this.Type" xml:space="preserve">
     <value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>

app/RecordOrganizer_RightManager/My Project/Resources.Designer.vb

@@ -1,7 +1,7 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
 '     Dieser Code wurde von einem Tool generiert.
-'     Laufzeitversion:4.0.30319.34209
+'     Laufzeitversion:4.0.30319.42000
 '
 '     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
 '     der Code erneut generiert wird.
@@ -22,7 +22,7 @@ Namespace My.Resources
     '''<summary>
     '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
     '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"),  _
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"),  _
      Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
      Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
      Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
@@ -100,6 +100,16 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property refresh_16xLG() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("refresh_16xLG", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>

app/RecordOrganizer_RightManager/My Project/Resources.resx

@@ -127,10 +127,13 @@
   <data name="112_RightArrowShort_Blue_24x24_72" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\112_RightArrowShort_Blue_24x24_72.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="cancel1" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\cancel1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="refresh_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\refresh_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="cancel1" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\cancel1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="refresh_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\refresh_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
 </root>

app/RecordOrganizer_RightManager/RecordOrganizer_RightManager.vbproj

@@ -234,6 +234,7 @@
   </ItemGroup>
   <ItemGroup>
     <Content Include="navigate_right2.ico" />
+    <None Include="Resources\refresh_16xLG.png" />
     <None Include="Resources\refresh_16xMD.png" />
     <None Include="Resources\112_RightArrowShort_Blue_24x24_72.png" />
   </ItemGroup>

app/RecordOrganizer_RightManager/frmCheckRightsRecords.Designer.vb

@@ -60,6 +60,8 @@ Partial Class frmCheckRightsRecords
         '
         'btnCheckRights
         '
+        Me.btnCheckRights.Image = Global.RecordOrganizer_RightManager.My.Resources.Resources.refresh_16xLG
+        Me.btnCheckRights.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnCheckRights.Location = New System.Drawing.Point(520, 59)
         Me.btnCheckRights.Name = "btnCheckRights"
         Me.btnCheckRights.Size = New System.Drawing.Size(335, 39)
@@ -84,7 +86,7 @@ Partial Class frmCheckRightsRecords
         Me.btncancel.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
         Me.btncancel.Location = New System.Drawing.Point(876, 25)
         Me.btncancel.Name = "btncancel"
-        Me.btncancel.Size = New System.Drawing.Size(75, 31)
+        Me.btncancel.Size = New System.Drawing.Size(178, 31)
         Me.btncancel.TabIndex = 4
         Me.btncancel.Text = "Cancel"
         Me.btncancel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@@ -159,7 +161,7 @@ Partial Class frmCheckRightsRecords
         Me.btnSelectVisiblRows.Name = "btnSelectVisiblRows"
         Me.btnSelectVisiblRows.Size = New System.Drawing.Size(178, 39)
         Me.btnSelectVisiblRows.TabIndex = 11
-        Me.btnSelectVisiblRows.Text = "Select all visible Rows"
+        Me.btnSelectVisiblRows.Text = "Select all visible records"
         Me.btnSelectVisiblRows.TextAlign = System.Drawing.ContentAlignment.MiddleRight
         Me.btnSelectVisiblRows.UseVisualStyleBackColor = True
         '
@@ -171,7 +173,7 @@ Partial Class frmCheckRightsRecords
         Me.btnUnselect.Name = "btnUnselect"
         Me.btnUnselect.Size = New System.Drawing.Size(178, 39)
         Me.btnUnselect.TabIndex = 12
-        Me.btnUnselect.Text = "Unselect all visible Rows"
+        Me.btnUnselect.Text = "Unselect all visible records"
         Me.btnUnselect.TextAlign = System.Drawing.ContentAlignment.MiddleRight
         Me.btnUnselect.UseVisualStyleBackColor = True
         '
@@ -198,7 +200,7 @@ Partial Class frmCheckRightsRecords
         Me.Name = "frmCheckRightsRecords"
         Me.ShowInTaskbar = False
         Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
-        Me.Text = "Check Rights for Records"
+        Me.Text = "Check rights for records"
         CType(Me.GridControlMain, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridViewMain, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)