Navigation auf TreeList umgestellt, Monitor-Layout refactored

- NavBarControl entfernt, Navigation erfolgt jetzt über TreeList_Cockpit mit modernem Design und Rechteprüfung (Monitor/Charts). - TreeList lädt Cockpit-Struktur aus DB, blendet Knoten je nach Berechtigung aus und zeigt mehrsprachige Fehler bei fehlender Konfiguration. - Klick auf Monitor- oder Chart-Knoten öffnet gezielt Monitor/Dashboard mit passender Konfiguration. - Methoden zum Laden/Speichern/Entfernen von Monitor-Grid-Layouts vereinheitlicht und auf Cockpit-spezifische Layout-Dateien umgestellt. - TreeList-Breite und Splitter-Positionen werden benutzerspezifisch gespeichert. - Neuer Refresh-Button für TreeList im Ribbon ergänzt. - Diverse Refactorings, Logging- und Fehlerbehandlungs-Verbesserungen.
Cockpit-Navigation: DevExpress TreeList integriert
2026-05-13 14:23:24 +02:00 · 2026-05-13 09:52:20 +02:00 · 2026-05-12 08:49:01 +02:00 · 2026-05-05 18:22:06 +02:00 · 2026-05-05 18:21:54 +02:00 · 2026-04-24 11:15:09 +02:00
445 changed files with 65178 additions and 48540 deletions
--- a/.gitignore
+++ b/.gitignore
@@ -154,8 +154,5 @@ $RECYCLE.BIN/
 # Mac desktop service store files
 .DS_Store
-/app/.vs/DD_PM_WINDREAM/v15/Server/sqlite3
+
-/app/.vs/DD_PM_WINDREAM/v16/Server/sqlite3/storage.ide-wal
+.vs
 /app/.vs/DD_PM_WINDREAM/v16/Server/sqlite3/storage.ide-shm
 /app/.vs/DD_PM_WINDREAM/v16/Server/sqlite3/storage.ide
 /app/.vs/DD_PM_WINDREAM/v16/Server/sqlite3/db.lock
--- a/.vs/VSWorkspaceState.json
+++ b/.vs/VSWorkspaceState.json
@@ -2,6 +2,6 @@
  "ExpandedNodes": [
    ""
  ],
-  "SelectedNode": "\\.gitignore",
+  "SelectedNode": "\\TaskFlow.sln",
  "PreviewInSolutionExplorer": false
 }
--- a/MARVIN_IST_COOL.txt
+++ b/MARVIN_IST_COOL.txt
@@ -0,0 +1 @@
 Aber El Raho ist cooler!
--- a/app/.vs/DD_PM_WINDREAM/FileContentIndex/read.lock
+++ b/app/.vs/DD_PM_WINDREAM/FileContentIndex/read.lock
--- a/app/DD_PM_WINDREAM/App.config
+++ b/app/DD_PM_WINDREAM/App.config
@@ -1,126 +0,0 @@
 <?xml version="1.0" encoding="utf-8"?>
 <configuration>
  <configSections>
    <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
      <section name="DD_ProcessManager.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
      <section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection" requirePermission="false" />
    </sectionGroup>
    <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
      <section name="DD_ProcessManager.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
    </sectionGroup>
  </configSections>
  <applicationSettings>
    <DD_ProcessManager.My.MySettings>
      <setting name="UseAppConfigConString" serializeAs="String">
        <value>False</value>
      </setting>
      <setting name="UserConfig_Prefix" serializeAs="String">
        <value>PROD</value>
      </setting>
    </DD_ProcessManager.My.MySettings>
    <DevExpress.LookAndFeel.Design.AppSettings>
      <setting name="DefaultAppSkin" serializeAs="String">
        <value>Skin/Office 2016 Colorful</value>
      </setting>
      <setting name="DefaultPalette" serializeAs="String">
        <value></value>
      </setting>
      <setting name="TouchUI" serializeAs="String">
        <value></value>
      </setting>
      <setting name="TouchScaleFactor" serializeAs="String">
        <value></value>
      </setting>
      <setting name="DirectX" serializeAs="String">
        <value></value>
      </setting>
      <setting name="RegisterUserSkins" serializeAs="String">
        <value></value>
      </setting>
      <setting name="FontBehavior" serializeAs="String">
        <value></value>
      </setting>
      <setting name="DefaultAppFont" serializeAs="String">
        <value></value>
      </setting>
      <setting name="DPIAwarenessMode" serializeAs="String">
        <value></value>
      </setting>
      <setting name="CompactUI" serializeAs="String">
        <value></value>
      </setting>
      <setting name="RegisterBonusSkins" serializeAs="String">
        <value></value>
      </setting>
      <setting name="CustomPaletteCollection" serializeAs="Xml">
        <value />
      </setting>
    </DevExpress.LookAndFeel.Design.AppSettings>
  </applicationSettings>
  <connectionStrings>
    <add name="DD_ProcessManager.My.MySettings.ConnectionString"
      connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
      providerName="System.Data.SqlClient" />
  </connectionStrings>
  <startup>
    <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
  </startup>
  <userSettings>
    <DD_ProcessManager.My.MySettings>
      <setting name="frmTableColumns_Position" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidator_Splitter" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidation_Size_PDFViewer" serializeAs="String">
        <value>890, 790</value>
      </setting>
      <setting name="frmValidation_Size_Email" serializeAs="String">
        <value>890, 790</value>
      </setting>
      <setting name="IntervallReminder" serializeAs="String">
        <value>5</value>
      </setting>
      <setting name="frmMainSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmMainPosition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorPosition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmMassValidatorSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmMassValidatorposition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorSearchSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorSearchPosition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValSearchSplitterDistance" serializeAs="String">
        <value>563</value>
      </setting>
      <setting name="frmMainWindowState" serializeAs="String">
        <value>Normal</value>
      </setting>
      <setting name="frmDocViewSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmDocViewPosition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorWindowState" serializeAs="String">
        <value>Normal</value>
      </setting>
    </DD_ProcessManager.My.MySettings>
  </userSettings>
 </configuration>
--- a/app/DD_PM_WINDREAM/ClassAnnotation.vb
+++ b/app/DD_PM_WINDREAM/ClassAnnotation.vb
@@ -1,35 +0,0 @@
 Imports PdfSharp.Pdf
 Imports PdfSharp.Pdf.Annotations
 Imports PdfSharp.Pdf.IO
 Imports PdfSharp.Drawing
 Public Class ClassAnnotation
    Public Shared Function Annotate_PDF(title As String, content As String, page As Integer, fromGui As Boolean, Optional ycorrect As Integer = 0, Optional sizecorrect As Integer = 0)
        Try
            Dim doc As PdfDocument = PdfReader.Open(CURRENT_DOC_PATH, PdfDocumentOpenMode.Modify)
            Dim firstPage As PdfPage = doc.Pages(page)
            Dim gfx As XGraphics = XGraphics.FromPdfPage(firstPage)
            Dim rect As XRect = gfx.Transformer.WorldToDefaultPage(New XRect(New XPoint(30, 60 + ycorrect), New XSize(60 + sizecorrect, 40 + sizecorrect)))
            Dim annot As PdfTextAnnotation = New PdfTextAnnotation
            annot.Title = title
            'annot.Subject = txtsubject.Text
            annot.Contents = content
            annot.Rectangle = New PdfRectangle(rect)
            firstPage.Annotations.Add(annot)
            doc.Save(CURRENT_DOC_PATH)
            Return True
        Catch ex As Exception
            If fromGui = True Then
                MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in Annotate pdf:")
            End If
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected error in Annotate pdf: " & ex.Message, False)
            Return False
        End Try
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ClassControlCreator.vb
+++ b/app/DD_PM_WINDREAM/ClassControlCreator.vb
@@ -1,983 +0,0 @@
 Imports System.ComponentModel
 Imports System.Text.RegularExpressions
 Imports DD_LIB_Standards
 Imports DevExpress.Utils
 Imports DevExpress.XtraEditors
 Imports DevExpress.XtraEditors.Controls
 Imports DevExpress.XtraEditors.NavigatorButtons
 Imports DevExpress.XtraEditors.Repository
 Imports DevExpress.XtraGrid
 Imports DevExpress.XtraGrid.Columns
 Imports DevExpress.XtraGrid.Views.Base
 Imports DevExpress.XtraGrid.Views.Grid
 Imports DigitalData.Controls.LookupGrid
 Imports DigitalData.Modules.Language.Utils
 Imports DigitalData.GUIs.Common
 Public Class ClassControlCreator
    ''' <summary>
    ''' Konstanten
    ''' </summary>
    Private Const DEFAULT_TEXT = "Bezeichnung definieren"
    Private Const DEFAULT_FONT_SIZE As Integer = 10
    Private Const DEFAULT_FONT_FAMILY As String = "Arial"
    Private Const DEFAULT_FONT_STYLE As FontStyle = FontStyle.Regular
    Private Const DEFAULT_COLOR As Integer = 0
    Private Const DEFAULT_WIDTH As Integer = 170
    Private Const DEFAULT_HEIGHT As Integer = 20
    Private Const DEFAULT_HEIGHT_TABLE As Integer = 150
    Public Const PREFIX_TEXTBOX = "TXT"
    Public Const PREFIX_LABEL = "LBL"
    Public Const PREFIX_CHECKBOX = "CHK"
    Public Const PREFIX_COMBOBOX = "CMB"
    Public Const PREFIX_DATETIMEPICKER = "DTP"
    Public Const PREFIX_DATAGRIDVIEW = "DGV"
    Public Const PREFIX_LOOKUP = "LU"
    Public Const PREFIX_TABLE = "TB"
    Public Const PREFIX_LINE = "LINE"
    Public Const PREFIX_BUTTON = "BTN"
    Public Const AGGREGATE_NONE = "NONE"
    Public Const AGGREGATE_TOTAL_INTEGER = "TOTAL_INTEGER"
    Public Const AGGREGATE_TOTAL_FLOAT = "TOTAL_FLOAT"
    Public Const AGGREGATE_TOTAL_MIN = "TOTAL_MIN"
    Public Const AGGREGATE_TOTAL_MAX = "TOTAL_MAX"
    Public Const AGGREGATE_TOTAL_AVG = "TOTAL_AVG"
    Public Const AGGREGATE_TOTAL_COUNT = "TOTAL_COUNT"
    ''' <summary>
    ''' Saves the column data for each grid and each column in that grid
    ''' </summary>
    Public Shared Property GridTables As New Dictionary(Of Integer, Dictionary(Of String, RepositoryItem))
    Public Shared Property GridColumns As New Dictionary(Of Integer, DataTable)
    ''' <summary>
    ''' Standard Eigenschaften für alle Controls
    ''' </summary>
    Private Class ControlDBProps
        Public Guid As Integer
        Public Name As String
        Public Location As Point
        Public [Font] As Font
        Public [Color] As Color
        Public [ReadOnly] As Boolean
    End Class
    Public Class ControlMetadata
        Public Guid As Integer
        Public [ReadOnly] As Boolean = False
    End Class
    Private Shared Function TransformDataRow(row As DataRow) As ControlDBProps
        Dim x As Integer = row.Item("X_LOC")
        Dim y As Integer = row.Item("Y_LOC")
        Dim style As FontStyle = NotNull(row.Item("FONT_STYLE"), DEFAULT_FONT_STYLE)
        Dim size As Single = NotNull(row.Item("FONT_SIZE"), DEFAULT_FONT_SIZE)
        Dim familyString As String = NotNull(row.Item("FONT_FAMILY"), DEFAULT_FONT_FAMILY)
        Dim family As FontFamily = New FontFamily(familyString)
        Dim oGuid As Integer = row.Item("GUID")
        Dim oName As String = row.Item("NAME")
        Dim oLocation As New Point(x, y)
        Dim oFont As New Font(family, size, style, GraphicsUnit.Point)
        Dim oColor As Color = IntToColor(NotNull(row.Item("FONT_COLOR"), DEFAULT_COLOR))
        Dim oReadOnly As Boolean = row.Item("READ_ONLY")
        Return New ControlDBProps() With {
            .Guid = oGuid,
            .Name = oName,
            .Location = oLocation,
            .Font = oFont,
            .Color = oColor,
            .ReadOnly = oReadOnly
        }
    End Function
    Public Shared Function CreateBaseControl(ctrl As Control, OControlRow As DataRow, designMode As Boolean) As Control
        Try
            Dim props As ControlDBProps = TransformDataRow(OControlRow)
            ctrl.Tag = New ControlMetadata() With {
                .Guid = props.Guid,
                .ReadOnly = props.ReadOnly
            }
            ctrl.Name = props.Name
            ctrl.Location = props.Location
            ctrl.Font = props.Font
            ctrl.ForeColor = props.Color
            If designMode Then
                ctrl.Cursor = Cursors.Hand
            End If
            If props.ReadOnly Then
                ctrl.BackColor = Color.LightGray
            End If
            Return ctrl
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    ' ----------------------- NEW CONTROLS -----------------------
    Public Shared Function CreateNewTextBox(location As Point) As TextBox
        Dim control As New TextBox With {
            .Name = $"{PREFIX_TEXTBOX}_{clsTools.ShortGuid()}",
            .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
            .Location = location,
            .ReadOnly = True,
            .BackColor = Color.White,
            .Cursor = Cursors.Hand
        }
        Return control
    End Function
    Public Shared Function CreateNewLabel(location As Point) As Label
        Dim control As New Label With {
            .Name = $"{PREFIX_LABEL}_{clsTools.ShortGuid}",
            .Text = DEFAULT_TEXT,
            .AutoSize = True,
            .Location = location,
            .Cursor = Cursors.Hand
        }
        Return control
    End Function
    Public Shared Function CreateNewCheckbox(location As Point) As CheckBox
        Dim control As New CheckBox With {
            .Name = $"{PREFIX_CHECKBOX}_{clsTools.ShortGuid}",
            .AutoSize = True,
            .Text = DEFAULT_TEXT,
            .Cursor = Cursors.Hand,
            .Location = location,
            .CheckState = CheckState.Indeterminate
        }
        Return control
    End Function
    Public Shared Function CreateNewCombobox(location As Point) As ComboBox
        Dim control As New ComboBox With {
            .Name = $"{PREFIX_COMBOBOX}_{clsTools.ShortGuid}",
            .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
            .Cursor = Cursors.Hand,
            .Location = location
           }
        Return control
    End Function
    Public Shared Function CreateNewDatetimepicker(location As Point) As DateTimePicker
        Dim control As New DateTimePicker With {
            .Name = $"{PREFIX_DATETIMEPICKER}_{clsTools.ShortGuid}",
            .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
            .Cursor = Cursors.Hand,
            .Location = location,
            .Format = DateTimePickerFormat.Short
        }
        Return control
    End Function
    Public Shared Function CreateNewDatagridview(location As Point) As DataGridView
        Dim control As New DataGridView With {
            .Name = $"{PREFIX_DATAGRIDVIEW}_{clsTools.ShortGuid}",
            .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT_TABLE),
            .Cursor = Cursors.Hand,
            .Location = location,
            .AllowUserToAddRows = False,
            .AllowUserToDeleteRows = False,
            .AllowUserToResizeColumns = False,
            .AllowUserToResizeRows = False
        }
        control.Columns.Add(New DataGridViewTextBoxColumn With {
            .HeaderText = "",
            .Name = "column1"
        })
        Return control
    End Function
    Friend Shared Function CreateNewLookupControl(location As Point) As LookupControl3
        Dim control As New LookupControl3 With {
            .Name = $"{PREFIX_LOOKUP}_{clsTools.ShortGuid}",
            .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
            .Cursor = Cursors.Hand,
            .Location = location
        }
        Return control
    End Function
    Public Shared Function CreateNewTable(location As Point) As GridControl
        Dim oControl As New GridControl With {
            .Name = $"{PREFIX_TABLE}_{clsTools.ShortGuid}",
            .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT_TABLE),
            .Cursor = Cursors.Hand,
            .Location = location
        }
        oControl.UseEmbeddedNavigator = True
        oControl.ForceInitialize()
        Dim oView As GridView = oControl.DefaultView
        oView.OptionsView.ShowGroupPanel = False
        Dim oDatatable As New DataTable()
        oDatatable.Columns.Add("column1", GetType(String))
        oDatatable.Columns.Add("column2", GetType(String))
        oControl.DataSource = oDatatable
        Return oControl
    End Function
    Public Shared Function CreateNewLine(location As Point) As LineLabel
        Dim control As New LineLabel With {
            .Name = $"{PREFIX_LINE}_{clsTools.ShortGuid}",
            .Text = "---------------------------------",
            .Size = New Size(100, 5),
            .Location = location
        }
        Return control
    End Function
    Public Shared Function CreateNewButton(location As Point) As Button
        Dim control As New Button With {
            .Name = $"{PREFIX_BUTTON}_{clsTools.ShortGuid}",
            .Size = New Size(108, 28),
            .Cursor = Cursors.Hand,
            .Location = location
           }
        Return control
    End Function
    ' ----------------------- EXISITING CONTROLS -----------------------
    Public Shared Function CreateExistingTextbox(oControlRow As DataRow, designMode As Boolean) As TextBox
        Try
            Dim control As TextBox = CreateBaseControl(New TextBox(), oControlRow, designMode)
            control.BackColor = Color.White
            If oControlRow.Item("HEIGHT") > 27 Then
                control.Multiline = True
            End If
            control.Height = oControlRow.Item("HEIGHT")
            control.Width = oControlRow.Item("WIDTH")
            If Not designMode Then
                control.AcceptsReturn = True
                control.ReadOnly = oControlRow.Item("READ_ONLY")
                control.TabStop = Not oControlRow.Item("READ_ONLY")
                control.BackColor = IIf(oControlRow.Item("READ_ONLY"), Color.LightGray, Color.White)
            Else
                control.ReadOnly = True
            End If
            Return control
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
    End Function
    Public Shared Function CreateExistingLabel(row As DataRow, designMode As Boolean) As Label
        Dim control As Label = CreateBaseControl(New Label(), row, designMode)
        Try
            control.Text = row.Item("CTRL_CAPTION_LANG")
        Catch ex As Exception
            control.Text = row.Item("CTRL_TEXT")
        End Try
        control.AutoSize = True
        Return control
    End Function
    Public Shared Function CreateExistingButton(row As DataRow, designMode As Boolean) As Button
        Dim oControl As Button = CreateBaseControl(New Button(), row, designMode)
        Dim ctrl_image As Bitmap = Nothing
        Dim oBitmap As Bitmap
        If Not IsDBNull(row.Item("IMAGE_CONTROL")) Then
            Dim obimg() As Byte = row.Item("IMAGE_CONTROL")
            oBitmap = ByteArrayToBitmap(obimg)
            ctrl_image = oBitmap
        End If
        Try
            oControl.Text = row.Item("CTRL_CAPTION_LANG")
        Catch ex As Exception
            oControl.Text = row.Item("CTRL_TEXT")
        End Try
        oControl.Height = row.Item("HEIGHT")
        oControl.Width = row.Item("WIDTH")
        If Not IsNothing(ctrl_image) And Not IsNothing(oBitmap) Then
            oControl.Image = oBitmap
            oControl.ImageAlign = ContentAlignment.MiddleLeft
            oControl.TextAlign = ContentAlignment.MiddleRight
        End If
        oControl.AutoSize = True
        Return oControl
    End Function
    Public Shared Function CreateExistingCombobox(row As DataRow, designMode As Boolean) As Windows.Forms.ComboBox
        Dim control As Windows.Forms.ComboBox = CreateBaseControl(New Windows.Forms.ComboBox(), row, designMode)
        control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
        If Not designMode Then
            control.Enabled = Not row.Item("READ_ONLY")
            control.TabStop = Not row.Item("READ_ONLY")
            control.BackColor = IIf(row.Item("READ_ONLY"), Color.LightGray, Color.White)
            control.AutoCompleteMode = AutoCompleteMode.SuggestAppend
            control.AutoCompleteSource = AutoCompleteSource.ListItems
        End If
        Return control
    End Function
    Public Shared Function CreateExistingDatepicker(row As DataRow, designMode As Boolean) As DateTimePicker
        Dim control As DateTimePicker = CreateBaseControl(New DateTimePicker(), row, designMode)
        control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
        control.Format = DateTimePickerFormat.Short
        If Not designMode Then
            control.Enabled = Not row.Item("READ_ONLY")
            control.TabStop = Not row.Item("READ_ONLY")
        End If
        Return control
    End Function
    Public Shared Function CreateExisingCheckbox(row As DataRow, designMode As Boolean) As CheckBox
        Dim oCheckBox As CheckBox = CreateBaseControl(New CheckBox(), row, designMode)
        oCheckBox.AutoSize = True
        Try
            oCheckBox.Text = row.Item("CTRL_CAPTION_LANG")
        Catch ex As Exception
            oCheckBox.Text = row.Item("CTRL_TEXT")
        End Try
        oCheckBox.CheckState = CheckState.Indeterminate
        If Not designMode Then
            oCheckBox.Enabled = Not row.Item("READ_ONLY")
            oCheckBox.TabStop = Not row.Item("READ_ONLY")
        End If
        Return oCheckBox
    End Function
    Public Shared Function CreateExistingDataGridView(row As DataRow, designMode As Boolean) As DataGridView
        Dim control As DataGridView = CreateBaseControl(New DataGridView(), row, designMode)
        control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
        control.AllowUserToAddRows = False
        control.AllowUserToDeleteRows = False
        control.AllowUserToResizeColumns = False
        control.AllowUserToResizeRows = False
        control.AlternatingRowsDefaultCellStyle.BackColor = Color.Aqua
        Dim col As New DataGridViewTextBoxColumn
        col.HeaderText = ""
        col.Name = "column1"
        col.Width = control.Width - 30
        control.Columns.Add(col)
        If Not designMode Then
            control.Enabled = Not row.Item("READ_ONLY")
            control.TabStop = Not row.Item("READ_ONLY")
        End If
        Return control
    End Function
    Public Shared Function CreateExistingLookupControl(row As DataRow, designMode As Boolean) As LookupControl3
        Dim control As LookupControl3 = CreateBaseControl(New LookupControl3(), row, designMode)
        control.Properties.Name = control.Name
        control.Width = row.Item("WIDTH")
        control.ReadOnly = row.Item("READ_ONLY")
        If designMode Then
            control.Cursor = Cursors.Hand
        End If
        Return control
    End Function
    Public Shared Function CreateExistingGridControl(row As DataRow, DT_MY_COLUMNS As DataTable, designMode As Boolean, pPanel As Panel) As GridControl
        Dim oControl As GridControl = CreateBaseControl(New GridControl(), row, designMode)
        Dim oControlId = DirectCast(oControl.Tag, ControlMetadata).Guid
        Dim oDatatable As New DataTable
        Dim oView As GridView
        oControl.ForceInitialize()
        oView = oControl.MainView
        oView.OptionsView.ShowGroupPanel = False
        oControl.ContextMenu = Nothing
        Dim oGridBuilder As New GridBuilder(oView)
        oGridBuilder.WithClipboardHandler()
        If Not designMode Then
            oView.OptionsBehavior.Editable = Not row.Item("READ_ONLY")
            oView.OptionsBehavior.ReadOnly = row.Item("READ_ONLY")
            'oView.OptionsBehavior.EditorShowMode = EditorShowMode.Click
            oControl.UseEmbeddedNavigator = Not row.Item("READ_ONLY")
            oView.OptionsBehavior.EditorShowMode = EditorShowMode.MouseDown
            ' Copy single cell value in CTRL+C instead of whole row
            oView.OptionsSelection.MultiSelectMode = GridMultiSelectMode.CellSelect
            oView.OptionsSelection.MultiSelect = True
            oView.OptionsClipboard.CopyColumnHeaders = DefaultBoolean.False
            If row.Item("VKT_ADD_ITEM") = True Then
                oView.OptionsBehavior.AllowAddRows = DefaultBoolean.True
                oView.OptionsBehavior.AllowDeleteRows = DefaultBoolean.True
                oView.OptionsView.NewItemRowPosition = NewItemRowPosition.Bottom
            Else
                oView.OptionsBehavior.AllowAddRows = DefaultBoolean.False
                oView.OptionsBehavior.AllowDeleteRows = DefaultBoolean.False
                oView.OptionsView.NewItemRowPosition = NewItemRowPosition.None
            End If
        End If
        oControl.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
        ' Add and configure navigator to delete rows
        oControl.UseEmbeddedNavigator = True
        With oControl.EmbeddedNavigator.Buttons
            .CancelEdit.Visible = False
            .Edit.Visible = False
            .EndEdit.Visible = False
            .First.Visible = False
            .Last.Visible = False
            .Next.Visible = False
            .NextPage.Visible = False
            .PrevPage.Visible = False
            .Prev.Visible = False
        End With
        If GridColumns.ContainsKey(oControlId) Then
            GridColumns.Item(oControlId) = DT_MY_COLUMNS
        Else
            GridColumns.Add(oControlId, DT_MY_COLUMNS)
        End If
        If GridTables.ContainsKey(oControlId) Then
            GridTables.Item(oControlId).Clear()
        Else
            GridTables.Add(oControlId, New Dictionary(Of String, RepositoryItem)())
        End If
        For Each oRow As DataRow In DT_MY_COLUMNS.Rows
            ' Create Columns in Datatable
            Dim oColumn = New DataColumn() With {
                .DataType = GetType(String),
                .ColumnName = oRow.Item("SPALTENNAME"),
                .Caption = oRow.Item("SPALTEN_HEADER"),
                .ReadOnly = False
            }
            oDatatable.Columns.Add(oColumn)
            ' Fetch and cache Combobox results
            Dim oConnectionId As Integer = NotNull(oRow.Item("CONNECTION_ID"), 0)
            Dim oSqlCommand As String = NotNull(oRow.Item("SQL_COMMAND"), "")
            If oConnectionId > 0 And oSqlCommand <> "" Then
                Try
                    Dim oComboboxDataTable As DataTable = Nothing
                    Dim oColumnName As String = oRow.Item("SPALTENNAME")
                    If Not clsPatterns.HasComplexPatterns(oSqlCommand) Then
                        oComboboxDataTable = ClassDatabase.Return_Datatable_ConId(oSqlCommand, oConnectionId)
                    End If
                    Dim oRepositoryItem = GridTables_GetRepositoryItemForColumn(oColumnName, oComboboxDataTable, oRow.Item("ADVANCED_LOOKUP"))
                    If GridTables.Item(oControlId).ContainsKey(oColumnName) Then
                        GridTables.Item(oControlId).Item(oColumnName) = oRepositoryItem
                    Else
                        GridTables.Item(oControlId).Add(oColumnName, oRepositoryItem)
                    End If
                Catch ex As Exception
                    LOGGER.Warn("Could not load data for column {0} in control {1}", oRow.Item("SPALTENNAME"), oControl.Name)
                    LOGGER.Error(ex)
                End Try
            End If
        Next
        oView.PopulateColumns(oDatatable)
        oControl.DataSource = oDatatable
        oControl.RefreshDataSource()
        oControl.ForceInitialize()
        Dim oShouldDisplayFooter As Boolean = False
        For Each oCol As GridColumn In oView.Columns
            Dim oColumnData As DataRow = DT_MY_COLUMNS.
                Select($"SPALTENNAME = '{oCol.FieldName}'").
                FirstOrDefault()
            If oColumnData Is Nothing Then
                Continue For
            End If
            Dim oSequence As Integer = oColumnData.Item("SEQUENCE")
            oCol.VisibleIndex = oSequence
            Dim oSummaryFunction As String = oColumnData.Item("SUMMARY_FUNCTION")
            Select Case oSummaryFunction
                Case AGGREGATE_TOTAL_INTEGER
                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum
                    oCol.SummaryItem.DisplayFormat = "SUM: {0:0}"
                    oShouldDisplayFooter = True
                Case AGGREGATE_TOTAL_FLOAT
                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum
                    oCol.SummaryItem.DisplayFormat = "SUM: {0:n2}"
                    oShouldDisplayFooter = True
                Case AGGREGATE_TOTAL_AVG
                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Average
                    oCol.SummaryItem.DisplayFormat = "AVG: {0}"
                    oShouldDisplayFooter = True
                Case AGGREGATE_TOTAL_MAX
                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Max
                    oCol.SummaryItem.DisplayFormat = "MAX: {0}"
                    oShouldDisplayFooter = True
                Case AGGREGATE_TOTAL_MIN
                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Min
                    oCol.SummaryItem.DisplayFormat = "MIN: {0}"
                    oShouldDisplayFooter = True
                Case AGGREGATE_TOTAL_COUNT
                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Count
                    oCol.SummaryItem.DisplayFormat = "NUM: {0}"
                    oShouldDisplayFooter = True
            End Select
        Next
        oView.OptionsView.ShowFooter = oShouldDisplayFooter
        AddHandler oView.InitNewRow, Sub(sender As Object, e As InitNewRowEventArgs)
                                         Try
                                             For Each oColumnData As DataRow In DT_MY_COLUMNS.Rows
                                                 For Each oGridColumn As GridColumn In oView.Columns
                                                     If oGridColumn.FieldName <> oColumnData.Item("SPALTENNAME") Then
                                                         Continue For
                                                     End If
                                                     Dim oDefaultValue = NotNull(oColumnData.Item("DEFAULT_VALUE"), String.Empty)
                                                     If oDefaultValue <> String.Empty Then
                                                         oView.SetRowCellValue(e.RowHandle, oGridColumn.FieldName, oDefaultValue)
                                                     End If
                                                 Next
                                             Next
                                         Catch ex As Exception
                                             LOGGER.Error(ex)
                                         Finally
                                             newRowModified = False
                                         End Try
                                     End Sub
        AddHandler oView.CustomRowCellEdit, Sub(sender As Object, e As CustomRowCellEditEventArgs)
                                                Try
                                                    For Each oRow As DataRow In DT_MY_COLUMNS.Rows
                                                        Dim oColumnName = oRow.Item("SPALTENNAME")
                                                        Dim oEditorExists = GridTables_TestEditorExistsByControlAndColumn(oControlId, oColumnName)
                                                        If oColumnName = e.Column.FieldName And oEditorExists Then
                                                            Dim oEditor = GridTables.Item(oControlId).Item(oColumnName)
                                                            e.RepositoryItem = oEditor
                                                        End If
                                                    Next
                                                Catch ex As Exception
                                                    LOGGER.Warn("Error in CustomRowCellEdit for [{0}]", e.CellValue)
                                                    LOGGER.Error(ex)
                                                End Try
                                            End Sub
        AddHandler oView.ValidatingEditor, Sub(sender As Object, e As BaseContainerValidateEditorEventArgs)
                                               Dim oRow As DataRowView = oView.GetRow(oView.FocusedRowHandle)
                                               Dim oColumnName = oView.FocusedColumn.FieldName
                                               LOGGER.Debug("Validating Editor for Column [{0}]", oColumnName)
                                               GridTables_ValidateColumn(oView, DT_MY_COLUMNS, oColumnName, e.Value, e.Valid, e.ErrorText)
                                           End Sub
        AddHandler oView.InvalidRowException, AddressOf View_InvalidRowException
        AddHandler oView.ValidatingEditor, AddressOf View_ValidatingEditor
        ' These handlers are all used for the custom DefaultValue functionality
        ' https://supportcenter.devexpress.com/ticket/details/t1035580/how-to-default-a-value-in-a-column-when-add-new-row-in-data-grid
        AddHandler oView.ShowingEditor, AddressOf View_ShowingEditor
        AddHandler oView.ShownEditor, AddressOf View_ShownEditor
        AddHandler oView.ValidateRow, AddressOf View_ValidateRow
        Return oControl
    End Function
    Private Shared newRowModified As Boolean
    Private Shared Sub View_ShowingEditor(sender As Object, e As CancelEventArgs)
        Dim view As GridView = TryCast(sender, GridView)
        If view.IsNewItemRow(view.FocusedRowHandle) AndAlso Not newRowModified Then
            view.AddNewRow()
        End If
    End Sub
    Private Shared Sub View_ShownEditor(sender As Object, e As EventArgs)
        Dim view As GridView = TryCast(sender, GridView)
        If view.IsNewItemRow(view.FocusedRowHandle) Then
            AddHandler view.ActiveEditor.Modified, Sub()
                                                       LOGGER.Debug("Row was modified")
                                                       newRowModified = True
                                                   End Sub
        End If
    End Sub
    Private Shared Sub View_ValidateRow(sender As Object, e As ValidateRowEventArgs)
        Dim view As GridView = TryCast(sender, GridView)
        If view.IsNewItemRow(e.RowHandle) AndAlso Not newRowModified Then
            LOGGER.Debug("Deleting unused row")
            view.DeleteRow(e.RowHandle)
        End If
        LOGGER.Debug("Validating row. Resetting Modified.")
        newRowModified = False
    End Sub
    Private Shared Sub View_ValidatingEditor(sender As Object, e As BaseContainerValidateEditorEventArgs)
        Dim oValue As String = NotNull(e.Value, "")
        If oValue.Contains(" | ") Then
            oValue = oValue.Split(" | ").ToList().First()
            e.Value = oValue
        End If
    End Sub
    Private Shared Sub View_InvalidRowException(sender As Object, e As InvalidRowExceptionEventArgs)
        e.ExceptionMode = ExceptionMode.NoAction
    End Sub
    Public Shared Function CreateExistingLine(row As DataRow, designMode As Boolean) As LineLabel
        Dim control As LineLabel = CreateBaseControl(New LineLabel(), row, designMode)
        control.Text = "------------------------------"
        control.BorderStyle = BorderStyle.None
        control.AutoSize = False
        control.BackColor = IntToColor(NotNull(row.Item("FONT_COLOR"), DEFAULT_COLOR))
        control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
        Return control
    End Function
    ' ----------------------- CUSTOM LABEL/LINE CLASS ----------------------- 
    Public Class LineLabel
        Inherits Label
        Protected Overrides Sub OnPaint(e As PaintEventArgs)
            'MyBase.OnPaint(e)
            Dim size As New Size(e.ClipRectangle.Width, 2)
            Dim rect As New Rectangle(New Point(0, 0), size)
            'ControlPaint.DrawBorder(e.Graphics, rect, Me.ForeColor, ButtonBorderStyle.Solid)
            e.Graphics.DrawLine(New Pen(ForeColor, 100), New Point(0, 0), New Point(e.ClipRectangle.Width, 2))
        End Sub
    End Class
    Public Shared Function GET_CONTROL_PROPERTIES(DT_CONTROL As DataTable, ControlName As String)
        Try
            CURRENT_CONTROL_ID = 0
            CURR_CON_ID = 0
            CURR_SELECT_CONTROL = ""
            CURR_CHOICE_LIST = ""
            Dim dt As New DataTable
            dt = DT_CONTROL
            '  Define the filter
            Dim filter As String = "NAME = '" & ControlName & "'"
            ' Filter the rows using Select() method of DataTable
            Dim FilteredRows As DataRow() = dt.Select(filter)
            If FilteredRows.Count = 1 Then
                For Each row As DataRow In FilteredRows
                    CURRENT_CONTROL_ID = row("GUID")
                    CURR_CON_ID = IIf(IsDBNull(row("CONNECTION_ID")), 0, row("CONNECTION_ID"))
                    If CURR_CON_ID = 0 Then
                        LOGGER.Info("CONNECTION NOT DEFINED - CTRL_GUID:" & CURRENT_CONTROL_ID)
                    End If
                    CURR_SELECT_CONTROL = IIf(IsDBNull(row("SQL_UEBERPRUEFUNG")), "", row("SQL_UEBERPRUEFUNG"))
                    CURR_CHOICE_LIST = IIf(IsDBNull(row("CHOICE_LIST")), "", row("CHOICE_LIST"))
                Next
                Return 1
            Else
                Return 0
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected Error in GET_CONTROL_PROPERTIES (" & ControlName & "):" & ex.Message)
            Return 0
        End Try
    End Function
    Public Shared Function GET_CONTROL_PROPERTY(DT_CONTROL As DataTable, ControlGUID As Integer, ColNAME As String)
        Try
            CURRENT_CONTROL_ID = 0
            CURR_CON_ID = 0
            CURR_SELECT_CONTROL = ""
            CURR_CHOICE_LIST = ""
            Dim dt As New DataTable
            dt = DT_CONTROL
            '  Define the filter
            Dim filter As String = "GUID = " & ControlGUID
            ' Filter the rows using Select() method of DataTable
            Dim FilteredRows As DataRow() = dt.Select(filter)
            If FilteredRows.Count = 1 Then
                Dim oRESULT = FilteredRows(0).Item(ColNAME)
                If IsDBNull(oRESULT) Then Return Nothing
                Return oRESULT
            Else
                Return Nothing
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected Error in GET_CONTROL_PROPERTY (" & ControlGUID & "#" & ColNAME & "):" & ex.Message)
            Return Nothing
        End Try
    End Function
    Public Shared Function GET_DEPENDING_CONTROLS(DT_CONTROLS As DataTable, ControlName As String)
        Try
            Dim dt As New DataTable
            dt = DT_CONTROLS
            '  Define the filter
            Dim filter As String = String.Format("SQL_UEBERPRUEFUNG LIKE '%{0}%'", ControlName)
            Dim FilteredRows As DataRow() = dt.Select(filter)
            CURR_DT_DEPENDING_CONTROLS = Nothing
            If FilteredRows.Length > 0 Then
                CURR_DT_DEPENDING_CONTROLS = FilteredRows.CopyToDataTable
            End If
            Return True
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected Error in GET_DEPENDING_CONTROLS (" & ControlName & "):" & ex.Message)
            Return 0
        End Try
    End Function
    Public Shared Function GET_CONNECTION_INFO(CON_ID As Integer)
        Try
            Dim dt As New DataTable
            dt = BASEDATA_DT_TBDD_CONNECTION
            '  Define the filter
            Dim filter As String = "GUID = " & CON_ID
            ' Filter the rows using Select() method of DataTable
            Dim FilteredRows As DataRow() = dt.Select(filter)
            If FilteredRows.Count = 1 Then
                Return FilteredRows
            Else
                Return Nothing
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected Error in GET_CONNECTION_INFO (" & CON_ID.ToString & "):" & ex.Message)
            Return Nothing
        End Try
    End Function
    Public Shared Sub GridTables_CacheDatatableForColumn(pControlId As Object, pColumnName As Object, pSqlStatement As Object, pConnectionId As Integer, pAdvancedLookup As Boolean)
        Try
            Dim oTable As DataTable = ClassDatabase.Return_Datatable_ConId(pSqlStatement, pConnectionId)
            ' If no columns for this control have been added, create an empty dict now
            If Not GridTables.ContainsKey(pControlId) Then
                GridTables.Add(pControlId, New Dictionary(Of String, RepositoryItem))
            End If
            Dim oRepositoryItem = GridTables_GetRepositoryItemForColumn(pColumnName, oTable, pAdvancedLookup)
            Dim oColumnDictionary = GridTables.Item(pControlId)
            If oColumnDictionary.ContainsKey(pColumnName) Then
                oColumnDictionary.Item(pColumnName) = oRepositoryItem
            Else
                oColumnDictionary.Add(pColumnName, oRepositoryItem)
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
    End Sub
    Public Shared Function GridTables_GetRepositoryItemForColumn(pColumnName As String, pDataTable As DataTable, pIsAdvancedLookup As Boolean) As RepositoryItem
        If pIsAdvancedLookup Then
            Dim oEditor = New RepositoryItemLookupControl3
            If pDataTable IsNot Nothing Then
                oEditor.DisplayMember = pDataTable.Columns.Item(0).ColumnName
                oEditor.ValueMember = pDataTable.Columns.Item(0).ColumnName
                oEditor.DataSource = pDataTable
            End If
            Return oEditor
        Else
            Dim oEditor = New RepositoryItemComboBox()
            Dim oItems As New List(Of String)
            AddHandler oEditor.Validating, Sub(_sender As ComboBoxEdit, _e As CancelEventArgs)
                                               If oItems.Contains(_sender.EditValue) Then
                                                   _e.Cancel = False
                                               Else
                                                   _e.Cancel = True
                                               End If
                                           End Sub
            If pDataTable IsNot Nothing Then
                For Each oRow2 As DataRow In pDataTable.Rows
                    Dim oValue = oRow2.Item(0)
                    Try
                        oValue &= $" | {oRow2.Item(1)}"
                    Catch ex As Exception
                    End Try
                    oEditor.Items.Add(oValue)
                    oItems.Add(oValue)
                Next
            End If
            Return oEditor
        End If
    End Function
    Public Shared Sub GridTables_HandleControlValueChange(pControlPanel As Panel, pColumnsWithSqlAndControlPlaceholders As DataTable)
        If Not IsNothing(pColumnsWithSqlAndControlPlaceholders) AndAlso pColumnsWithSqlAndControlPlaceholders.Rows.Count > 0 Then
            For Each oRow As DataRow In pColumnsWithSqlAndControlPlaceholders.Rows
                Try
                    Dim oControlId = oRow.Item("CONTROL_ID")
                    Dim oSqlStatement = oRow.Item("SQL_COMMAND")
                    Dim oConnectionId = oRow.Item("CONNECTION_ID")
                    Dim oColumnName = oRow.Item("SPALTENNAME")
                    Dim oAdvancedLookup = oRow.Item("ADVANCED_LOOKUP")
                    If Not IsDBNull(oSqlStatement) And Not IsDBNull(oSqlStatement) Then
                        oSqlStatement = clsPatterns.ReplaceAllValues(oSqlStatement, pControlPanel, True)
                        ClassControlCreator.GridTables_CacheDatatableForColumn(oControlId, oColumnName, oSqlStatement, oConnectionId, oAdvancedLookup)
                        ' === Block to force setting the editor for GridColumns
                        For Each oControl As Control In pControlPanel.Controls
                            Try
                                Dim oMeta = DirectCast(oControl.Tag, ClassControlCreator.ControlMetadata)
                                If oMeta.Guid = oControlId AndAlso TypeOf oControl Is GridControl Then
                                    Dim oGrid As GridControl = DirectCast(oControl, GridControl)
                                    DirectCast(oGrid.FocusedView, GridView).FocusInvalidRow()
                                    Exit For
                                End If
                            Catch ex As Exception
                                LOGGER.Error(ex)
                            End Try
                        Next
                        ' === End
                    End If
                Catch ex As Exception
                    LOGGER.Error(ex)
                    LOGGER.Info("Unexpected Error in Display SQL result for grid column: " & oRow.Item("CONTROL_ID") & " - ERROR: " & ex.Message)
                End Try
            Next
        End If
    End Sub
    Private Shared Function GridTables_TestEditorExistsByControlAndColumn(oControlId As Integer, pColumn As String) As Boolean
        If GridTables.ContainsKey(oControlId) Then
            Dim oContainsKey = GridTables.Item(oControlId).ContainsKey(pColumn)
            If oContainsKey AndAlso GridTables.Item(oControlId).Item(pColumn) IsNot Nothing Then
                Return True
            Else
                Return False
            End If
        Else
            Return False
        End If
    End Function
    Private Shared Function GridTables_ValidateColumn(pView As GridView, pColumnDefinition As DataTable, ColumnName As String, pValue As Object, ByRef pIsValid As Boolean, ByRef pErrorText As String) As Boolean
        Dim oColumn As DataRow = (From r As DataRow In pColumnDefinition.Rows
                                  Where r.Item("SPALTENNAME") = ColumnName
                                  Select r).FirstOrDefault()
        Dim oGridColumn As GridColumn = (From c As GridColumn In pView.Columns
                                         Where c.FieldName = ColumnName
                                         Select c).FirstOrDefault()
        Dim oIsRequired = oColumn.Item("VALIDATION")
        Try
            Dim oRegex = NotNull(oColumn.Item("REGEX_MATCH"), String.Empty)
            Dim oRegexMessage = NotNull(oColumn.Item("REGEX_MESSAGE_DE"), String.Empty)
            If oRegex <> String.Empty Then
                Dim oMatch = New Regex(oRegex).IsMatch(pValue.ToString)
                Dim oDefaultMessage = "Wert entspricht nicht dem gefordertem Format!"
                Dim oMessage = IIf(oRegexMessage <> String.Empty, oRegexMessage, oDefaultMessage)
                If oMatch = False Then
                    pErrorText = oMessage
                    pIsValid = False
                    Return False
                End If
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
        If oIsRequired And pValue.ToString = "" Then
            pErrorText = "Spalte muss ausgefüllt werden!"
            pIsValid = False
            Return False
        End If
        Return True
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ClassDataASorDB.vb
+++ b/app/DD_PM_WINDREAM/ClassDataASorDB.vb
@@ -1,92 +0,0 @@
 Imports DigitalData.Modules.EDMI.API.EDMIServiceReference
 Imports DigitalData.Modules.Logging
 Public Class ClassDataASorDB
    Private _Logger As Logger
    Public Sub New()
        _Logger = LOGGER
    End Sub
    Public Function GetDatatable(pDB As String, pSQL As String, pAppServDT As String, pAppServFilter As String, Optional pAppServSort As String = "", Optional pForce As String = "") As DataTable
        Try
            Dim oReturnDT As DataTable
            If EDMIAppServerActive = True And pForce = String.Empty Then
                Try
                    Dim oTableResult As TableResult = _Client.GetDatatableByName(pAppServDT, pAppServFilter, pAppServSort)
                    oReturnDT = oTableResult.Table
                    If IsNothing(oReturnDT) Then
                        _Logger.Warn($"Datatable from ApPServData is nothing [{pAppServDT} - {pAppServFilter}] - Failover via DB")
                        Return GetDatatable(pDB, pSQL, "", "", "", "DB")
                    End If
                Catch ex As Exception
                    _Logger.Warn($"Error getting ApPServData [{pAppServDT} - {pAppServFilter}]")
                    Return GetDatatable(pDB, pSQL, "", "", "", "DB")
                End Try
            Else
                If pDB = "DD_ECM" Then
                    oReturnDT = Database_ECM.GetDatatable(pSQL)
                ElseIf pDB = "IDB" Then
                    oReturnDT = Database_IDB.GetDatatable(pSQL)
                End If
            End If
            Return oReturnDT
        Catch ex As Exception
            _Logger.Error(ex)
        End Try
    End Function
    Public Function CheckModuleData()
        Try
            Dim oSql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','CW',{1})", USER_USERNAME)
            Dim DT_CHECKUSER_MODULE As DataTable
            DT_CHECKUSER_MODULE = GetDatatable("DD_ECM", oSql, "TBDD_USER_MODULE", $"USERNAME = '{USER_USERNAME.ToLower}' AND MODULE_SHORT = 'CW'", "", "")
            If DT_CHECKUSER_MODULE.Rows.Count = 0 Then
                _Logger.Info("DT_CHECKUSER_MODULE.Rows.Count = 0", True)
                'ERROR_STATE = "NO USER"
                MsgBox("Sorry - Something went wrong in getting Your rights." & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
                Return False
            End If
            If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
                _Logger.Info(">> Login Username: " & USER_USERNAME, False)
                _Logger.Info(">> Login time: " & Now.ToString, False)
                USER_ID = DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID")
                USER_SURNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME"))
                USER_PRENAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME"))
                USER_SHORTNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME"))
                USER_EMAIL = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL"))
                USER_LANGUAGE = DT_CHECKUSER_MODULE.Rows(0).Item("USER_LANGUAGE")
                USER_DATE_FORMAT = DT_CHECKUSER_MODULE.Rows(0).Item("USER_DATE_FORMAT")
                USER_IS_ADMIN = DT_CHECKUSER_MODULE.Rows(0).Item("IS_ADMIN")
                ADDITIONAL_TITLE = DT_CHECKUSER_MODULE.Rows(0).Item("ADDITIONAL_TITLE")
                If ADDITIONAL_TITLE = String.Empty Then
                    ADDITIONAL_TITLE = My.Application.Info.ProductName
                End If
                Return True
            Else
                _Logger.Info(" - User '" & USER_USERNAME & "' not listed in Useradministration!", False)
                'MsgBox("Achtung: Sie sind nicht in der Userverwaltung hinterlegt." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
                'Me.Close()
                Dim msg = String.Format("You are not listed in the Useradministration." & vbNewLine & "Please contact the admin.")
                MsgBox(msg, MsgBoxStyle.Exclamation)
                Return False
            End If
        Catch ex As Exception
            _Logger.Error(ex)
            Return False
        End Try
    End Function
    Public Sub Refresh_Connections()
        Try
            Dim oSql = String.Format("SELECT * FROM TBDD_CONNECTION")
            Dim oResult As DataTable
            DT_CONNECTIONS = GetDatatable("DD_ECM", oSql, "TBDD_CONNECTION", "", "", "")
        Catch ex As Exception
            _Logger.Error(ex)
            MsgBox("Unexpected Error in Refresh_Connections: " & ex.Message, MsgBoxStyle.Critical)
        End Try
    End Sub
 End Class
--- a/app/DD_PM_WINDREAM/ClassDatabase.vb
+++ b/app/DD_PM_WINDREAM/ClassDatabase.vb
@@ -1,341 +0,0 @@
 Imports System.Data.SqlClient
 Imports Oracle.ManagedDataAccess.Client
 Imports System.Threading.Tasks
 Public Class ClassDatabase
    Private Shared SQLSERVERConnectionString As String
    Private Shared OracleConnectionString As String
    Public Shared Function Get_ConnectionString(id As Integer)
        Dim connectionString As String = ""
        Try
            'Me.TBCONNECTIONTableAdapter.FillByID(Me.DD_DMSLiteDataSet.TBCONNECTION, id)
            Dim DTConnection As DataTable = Database_ECM.GetDatatable("SELECT * FROM TBDD_CONNECTION WHERE GUID = " & id)
            If DTConnection.Rows.Count = 1 Then
                Select Case DTConnection.Rows(0).Item("SQL_PROVIDER").ToString.ToUpper
                    Case "MS-SQL"
                        If DTConnection.Rows(0).Item("USERNAME") = "WINAUTH" Then
                            connectionString = "Server=" & DTConnection.Rows(0).Item("SERVER") & ";Database=" & DTConnection.Rows(0).Item("DATENBANK") & ";Trusted_Connection=True;"
                        Else
                            connectionString = "Server=" & DTConnection.Rows(0).Item("SERVER") & ";Database=" & DTConnection.Rows(0).Item("DATENBANK") & ";User Id=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("PASSWORD") & ";"
                        End If
                        ' connectionString = "Server=" & DTConnection.Rows(0).Item("SERVER") & ";Database=" & DTConnection.Rows(0).Item("DATENBANK") & ";User Id=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("PASSWORD") & ";"
                    Case "Oracle"
                        If DTConnection.Rows(0).Item("BEMERKUNG").ToString.Contains("without tnsnames") Then
                            connectionString = "Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=" & DTConnection.Rows(0).Item("SERVER") & ")(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=" &
                               DTConnection.Rows(0).Item("DATENBANK") & ")));User Id=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("PASSWORD") & ";"
                        Else
                            connectionString = "Data Source=" & DTConnection.Rows(0).Item("SERVER") & ";Persist Security Info=True;User Id=" & DTConnection.Rows(0).Item("USERNAME") & ";Password=" & DTConnection.Rows(0).Item("PASSWORD") & ";Unicode=True"
                        End If
                        'Case "ODBC"
                        '    Dim conn As New OdbcConnection("dsn=" & DTConnection.Rows(0).Item("SERVER") & ";uid=" & DTConnection.Rows(0).Item("USERNAME") & ";pwd=" + DTConnection.Rows(0).Item("PASSWORD"))
                        '    connectionString = conn.ConnectionString
                    Case Else
                        LOGGER.Info(" - ConnectionType nicht integriert", False)
                        MsgBox("ConnectionType nicht integriert", MsgBoxStyle.Critical, "Bitte Konfiguration Connection überprüfen!")
                End Select
            Else
                LOGGER.Info(" No entry for Connection-ID: " & id.ToString, True)
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info(" - Error in bei Get ConnectionString - Fehler: " & vbNewLine & ex.Message)
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in Get ConnectionString:")
        End Try
        Return connectionString
    End Function
    Public Shared Function Init(Optional ConString As String = "")
        Try
            If ConString = String.Empty Then
                SQLSERVERConnectionString = CONNECTION_STRING_ECM
            End If
            Dim SQLconnect As New SqlClient.SqlConnection
            If ConString <> String.Empty Then
                SQLconnect.ConnectionString = ConString
            Else
                SQLconnect.ConnectionString = SQLSERVERConnectionString
            End If
            SQLconnect.Open()
            SQLconnect.Close()
            Return True
        Catch ex As Exception
            LOGGER.Error(ex)
            If ConString <> String.Empty Then
                LOGGER.Info($"Error initializing Database [{ConString}] " & ex.Message, True)
            Else
                LOGGER.Info($"Error initializing Database [{CONNECTION_STRING_ECM}] " & ex.Message, True)
            End If
            Return False
        End Try
    End Function
    Public Shared Function Return_Datatable(pSQLCommand As String, Optional pInfo As String = "") As DataTable
        Try
            If pInfo <> "" Then
                pInfo = "[" & pInfo & "]"
            End If
            Dim SQLconnect As New SqlClient.SqlConnection
            Dim SQLcommand As SqlClient.SqlCommand
            LOGGER.Debug($"Return_Datatable[{pSQLCommand}]#{pInfo}")
            SQLconnect.ConnectionString = SQLSERVERConnectionString
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            SQLcommand.CommandTimeout = 120
            SQLcommand.CommandText = pSQLCommand
            LOGGER.Debug("Execute ReturnDatatable: " & pSQLCommand)
            Dim adapter1 As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter(SQLcommand)
            Dim dt As DataTable = New DataTable()
            adapter1.Fill(dt)
            SQLconnect.Close()
            Return dt
        Catch ex As Exception
            LOGGER.Warn($"Unexpected Error in Return_Datatable{pInfo}: {ex.Message} [{pSQLCommand}]")
            Return Nothing
        End Try
    End Function
    Public Shared Async Function Return_DatatableAsync(pSQLCommand As String, Optional pInfo As String = "") As Task(Of DataTable)
        Return Await Task.Run(Function()
                                  Return Return_Datatable(pSQLCommand, pInfo)
                              End Function)
    End Function
    Public Shared Function Return_Datatable_ConId(pSQLCommand As String, ConnID As Integer, Optional pInfo As String = "")
        Try
            If pInfo <> "" Then
                pInfo = "[" & pInfo & "]"
            End If
            Dim oConnString = Get_ConnectionString(ConnID)
            LOGGER.Debug($"Return_Datatable_ConId [{ConnID}]#[{pSQLCommand}]#{pInfo}")
            Dim oSQLconnect As New SqlClient.SqlConnection
            Dim oSQLcommand As SqlClient.SqlCommand
            oSQLconnect.ConnectionString = oConnString
            oSQLconnect.Open()
            oSQLcommand = oSQLconnect.CreateCommand
            oSQLcommand.CommandText = pSQLCommand
            Dim oSQLAdapter As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter(oSQLcommand)
            Dim oReturnDatatable As DataTable = New DataTable()
            oSQLAdapter.Fill(oReturnDatatable)
            oSQLconnect.Close()
            Return oReturnDatatable
        Catch ex As Exception
            LOGGER.Warn($"Unexpected Error in Return_Datatable_ConId{pInfo}: {ex.Message} [{pSQLCommand}]")
            Return Nothing
        End Try
    End Function
    Public Shared Function Return_Datatable_ConStr(pSQLCommand As String, ConNStr As String, Optional pInfo As String = "")
        Try
            If pInfo <> "" Then
                pInfo = "[" & pInfo & "]"
            End If
            LOGGER.Debug("ConnectionString: [{0}]", ConNStr)
            LOGGER.Debug("Return_Datatable_ConStr: {0}", pSQLCommand)
            Dim oSQLconnect As New SqlClient.SqlConnection
            Dim oSQLcommand As SqlClient.SqlCommand
            oSQLconnect.ConnectionString = ConNStr
            oSQLconnect.Open()
            oSQLcommand = oSQLconnect.CreateCommand
            oSQLcommand.CommandText = pSQLCommand
            Dim oSQLAdapter As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter(oSQLcommand)
            Dim oReturnDatatable As DataTable = New DataTable()
            oSQLAdapter.Fill(oReturnDatatable)
            oSQLconnect.Close()
            Return oReturnDatatable
        Catch ex As Exception
            LOGGER.Warn($"Unexpected Error in Return_Datatable_ConStr{pInfo}: {ex.Message} [{pSQLCommand}]")
            Return Nothing
        End Try
    End Function
    Public Shared Function Execute_non_Query(pSQLCommand As String, Optional pInfo As String = "")
        Try
            If pInfo <> "" Then
                pInfo = "[" & pInfo & "]"
            End If
            Dim SQLconnect As New SqlClient.SqlConnection
            Dim SQLcommand As SqlClient.SqlCommand
            SQLconnect.ConnectionString = SQLSERVERConnectionString
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            'Update Last Created Record in Foo
            SQLcommand.CommandText = pSQLCommand
            LOGGER.Debug("Execute_non_Query Created: " & pSQLCommand)
            SQLcommand.ExecuteNonQuery()
            SQLcommand.Dispose()
            SQLconnect.Close()
            Return True
        Catch ex As Exception
            LOGGER.Warn($"Unexpected Error in Execute_non_Query{pInfo}: {ex.Message} [{pSQLCommand}]")
            Return False
        End Try
    End Function
    Public Shared Function Execute_non_Query_ConStr(pSQLCommand As String, ConnString As String, Optional pInfo As String = "")
        Try
            If pInfo <> "" Then
                pInfo = "[" & pInfo & "]"
            End If
            Dim SQLconnect As New SqlClient.SqlConnection
            Dim SQLcommand As SqlClient.SqlCommand
            SQLconnect.ConnectionString = ConnString
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            'Update Last Created Record in Foo
            SQLcommand.CommandText = pSQLCommand
            LOGGER.Debug("Execute_non_Query_ConStr Created: " & pSQLCommand)
            SQLcommand.ExecuteNonQuery()
            SQLcommand.Dispose()
            SQLconnect.Close()
            Return True
        Catch ex As Exception
            LOGGER.Warn($"Unexpected Error in Execute_non_Query_ConStr{pInfo}: {ex.Message} [{pSQLCommand}]")
            Return False
        End Try
    End Function
    Public Shared Function Execute_Scalar(pSQLCommand As String, ConString As String, Optional pInfo As String = "")
        Dim result
        Try
            If pInfo <> "" Then
                pInfo = "[" & pInfo & "]"
            End If
            Dim SQLconnect As New SqlClient.SqlConnection
            Dim SQLcommand As SqlClient.SqlCommand
            SQLconnect.ConnectionString = ConString
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            'Update Last Created Record in Foo
            SQLcommand.CommandText = pSQLCommand
            LOGGER.Debug("Execute_Scalar: " & pSQLCommand)
            result = SQLcommand.ExecuteScalar()
            SQLcommand.Dispose()
            SQLconnect.Close()
            Return result
        Catch ex As Exception
            LOGGER.Warn($"Unexpected Error in Execute_Scalar{pInfo}: {ex.Message} [{pSQLCommand}]")
            Return Nothing
        End Try
    End Function
    Public Shared Function Execute_Scalar_ConStr(pSQLCommand As String, ConString As String, Optional pInfo As String = "")
        Dim result
        Try
            If pInfo <> "" Then
                pInfo = "[" & pInfo & "]"
            End If
            Dim SQLconnect As New SqlClient.SqlConnection
            Dim SQLcommand As SqlClient.SqlCommand
            SQLconnect.ConnectionString = ConString
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            'Update Last Created Record in Foo
            SQLcommand.CommandText = pSQLCommand
            LOGGER.Debug("Execute_Scalar_ConStr Scalar: " & pSQLCommand)
            result = SQLcommand.ExecuteScalar()
            SQLcommand.Dispose()
            SQLconnect.Close()
            Return result
        Catch ex As Exception
            LOGGER.Warn($"Unexpected Error in Execute_Scalar_ConStr{pInfo}: {ex.Message} [{pSQLCommand}]")
            Return Nothing
        End Try
    End Function
    Public Shared Function Execute_Scalar_ConID(pSQLCommand As String, ConnID As Integer, Optional pInfo As String = "")
        Dim result
        Try
            If pInfo <> "" Then
                pInfo = "[" & pInfo & "]"
            End If
            Dim oConnString = Get_ConnectionString(ConnID)
            LOGGER.Debug($"Execute_Scalar_ConID [{ConnID}]: " & pSQLCommand)
            Dim SQLconnect As New SqlClient.SqlConnection
            Dim SQLcommand As SqlClient.SqlCommand
            SQLconnect.ConnectionString = oConnString
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            'Update Last Created Record in Foo
            SQLcommand.CommandText = pSQLCommand
            result = SQLcommand.ExecuteScalar()
            SQLcommand.Dispose()
            SQLconnect.Close()
            Return result
        Catch ex As Exception
            LOGGER.Warn($"Unexpected Error in Execute_Scalar_ConID{pInfo}: {ex.Message} [{pSQLCommand}]")
            Return Nothing
        End Try
    End Function
    Public Shared Function OracleExecute_Scalar(cmdscalar As String, OracleConnection As String)
        Dim result
        Try
            Dim SQLconnect As New OracleConnection
            Dim SQLcommand As New OracleCommand
            SQLconnect.ConnectionString = OracleConnection
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            'Update Last Created Record in Foo
            SQLcommand.CommandText = cmdscalar
            result = SQLcommand.ExecuteScalar()
            SQLcommand.Dispose()
            SQLconnect.Close()
            Return result
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Fehler bei OracleExecute_Scalar: " & ex.Message, True)
            LOGGER.Info("#SQL: " & cmdscalar, False)
            Return Nothing
        End Try
    End Function
    Public Shared Function OracleExecute_non_Query(ExecuteCMD As String, OracleConnection As String, Optional userInput As Boolean = False)
        Try
            Dim SQLconnect As New OracleConnection
            Dim SQLcommand As OracleCommand
            SQLconnect.ConnectionString = OracleConnection
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            'Update Last Created Record in Foo
            SQLcommand.CommandText = ExecuteCMD
            SQLcommand.ExecuteNonQuery()
            SQLcommand.Dispose()
            SQLconnect.Close()
            Return True
        Catch ex As Exception
            LOGGER.Error(ex)
            If userInput = True Then
                MsgBox("Error in OracleExecute_non_Query - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & ExecuteCMD, MsgBoxStyle.Critical)
            End If
            LOGGER.Info("Fehler bei OracleExecute_non_Query: " & ex.Message, True)
            LOGGER.Info("#SQL: " & ExecuteCMD, False)
            Return False
        End Try
    End Function
    Public Shared Function Oracle_Return_Datatable(Select_anweisung As String, OracleConnection As String, Optional userInput As Boolean = False)
        Try
            Dim SQLconnect As New OracleConnection
            Dim SQLcommand As OracleCommand
            SQLconnect.ConnectionString = OracleConnection
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            SQLcommand.CommandText = Select_anweisung
            Dim adapter1 As OracleDataAdapter = New OracleDataAdapter(SQLcommand)
            Dim dt As DataTable = New DataTable()
            adapter1.Fill(dt)
            SQLconnect.Close()
            Return dt
        Catch ex As Exception
            LOGGER.Error(ex)
            If userInput = True Then
                MsgBox("Error in Oracle Return Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & Select_anweisung, MsgBoxStyle.Critical)
            End If
            LOGGER.Info("Fehler bei Oracle_Return_Datatable: " & ex.Message, True)
            LOGGER.Info("#SQL: " & Select_anweisung, False)
            Return Nothing
        End Try
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ClassIDBData.vb
+++ b/app/DD_PM_WINDREAM/ClassIDBData.vb
@@ -1,246 +0,0 @@
 Public Class ClassIDBData
    Public DTVWIDB_BE_ATTRIBUTE As DataTable
    ''' <summary>
    ''' Gets all indices by BusinessEntity.
    ''' </summary>
    ''' <param name="BusinessEntity">Title of Business Entity</param>
    ''' <returns>Array with all Indices</returns>
    ''' <remarks></remarks>
    ''' 
    Public Function Init()
        Dim oSQL = $"SELECT * FROM VWIDB_BE_ATTRIBUTE"
        DTVWIDB_BE_ATTRIBUTE = Database_IDB.GetDatatable(oSQL)
    End Function
    Public IDBSystemIndices As List(Of String)
    Public Function GetIndicesByBE(ByVal BusinessEntity As String) As String()
        Try
            Dim aNames(4) As String
            aNames(0) = "ObjectID"
            aNames(1) = "IDBCreatedWhen"
            aNames(2) = "IDBCreatedWho"
            aNames(3) = "IDBChangedWhen"
            aNames(4) = "IDBChangedWho"
            IDBSystemIndices = aNames.ToList
            ' Array für Indizes vorbereiten
            Dim aIndexNames(DTVWIDB_BE_ATTRIBUTE.Rows.Count + 4) As String
            Dim oCount As Integer = 0
            aIndexNames(oCount) = "ObjectID"
            oCount += 1
            aIndexNames(oCount) = "IDBCreatedWhen"
            oCount += 1
            aIndexNames(oCount) = "IDBCreatedWho"
            oCount += 1
            aIndexNames(oCount) = "IDBChangedWhen"
            oCount += 1
            aIndexNames(oCount) = "IDBChangedWho"
            For Each oRow As DataRow In DTVWIDB_BE_ATTRIBUTE.Rows
                oCount += 1
                aIndexNames(oCount) = oRow.Item("ATTR_TITLE")
            Next
            ' Indexarray sortiert zurückgeben
            Array.Sort(aIndexNames)
            ' Indexarray zurückgeben
            Return aIndexNames
        Catch ex As Exception
            LOGGER.Error(ex)
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error getting the IDB Indicies")
            Return Nothing
        End Try
    End Function
    Public Function GetTypeOfIndex(ByVal indexname As String) As Integer
        Try
            For Each oRow As DataRow In DTVWIDB_BE_ATTRIBUTE.Rows
                If oRow.Item("ATTR_TITLE") = indexname Then
                    Try
                        Dim oType = oRow.Item("TYP_ID")
                        Return oType
                    Catch ex As Exception
                        Try
                            Dim oType = oRow.Item("TYP_ID")
                            Return oType
                        Catch ex1 As Exception
                            LOGGER.Error(ex)
                            Return Nothing
                        End Try
                    End Try
                End If
            Next
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    Public Function GetVariableValue(oAttributeName As String, Optional oIDBTyp As Integer = 0, Optional FromIDB As Boolean = False) As Object
        Try
            Dim oSingleAttribute As Boolean = True
            Select Case oIDBTyp
                Case 8
                    oSingleAttribute = False
                Case 9
                    oSingleAttribute = False
            End Select
            Dim oAttributeValue
            If oSingleAttribute = True And IDB_DT_DOC_DATA.Rows.Count = 1 And FromIDB = False Then
                Try
                    If oAttributeName = "IDBCreatedWhen" Then
                        oAttributeName = "ADDED_WHEN"
                    ElseIf oAttributeName = "IDBCreatedWho" Then
                        oAttributeName = "ADDED_WHO"
                    ElseIf oAttributeName = "IDBChangedWhen" Then
                        oAttributeName = "CHANGED_WHEN"
                    ElseIf oAttributeName = "IDBChangedWho" Then
                        oAttributeName = "CHANGED_WHO"
                    End If
                    oAttributeValue = IDB_DT_DOC_DATA.Rows(0).Item(oAttributeName)
                Catch ex As Exception
                    LOGGER.Debug($"Error getting Attribute from IDB_DT_DOC_DATA: {ex.Message}")
                End Try
            End If
            If Not IsNothing(oAttributeValue) Then
                Return oAttributeValue
            Else
                LOGGER.Debug($"oAttributeValue for Attribute [{oAttributeName}] is so far nothing..Now trying FNIDB_PM_GET_VARIABLE_VALUE ")
            End If
            Dim oFNSQL = $"SELECT * FROM [dbo].[FNIDB_PM_GET_VARIABLE_VALUE] ({CURRENT_DOC_ID},'{oAttributeName}','{USER_LANGUAGE}',CONVERT(BIT,'{IDB_USES_WMFILESTORE}'))"
            oAttributeValue = Database_IDB.GetDatatable(oFNSQL)
            Dim odt As DataTable = oAttributeValue
            If odt.Rows.Count = 1 Then
                oAttributeValue = odt.Rows(0).Item(0)
            End If
            Return oAttributeValue
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    Public Function Delete_Term_Object_From_Metadata(oAttributeName As String, oTerm2Delete As String) As Object
        Try
            Dim oAttributeValue
            Dim oID_IS_FOREIGN As Integer
            oID_IS_FOREIGN = 0
            If IDB_USES_WMFILESTORE Then
                oID_IS_FOREIGN = 1
            End If
            Dim oDELSQL = $"EXEC PRIDB_DELETE_TERM_OBJECT_METADATA {CURRENT_DOC_ID},'{oAttributeName}','{oTerm2Delete}','{USER_USERNAME}','{USER_LANGUAGE}',{oID_IS_FOREIGN}"
            Database_IDB.ExecuteNonQuery(oDELSQL)
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    Public Function Delete_AttributeData(pIDB_OBJID As Int64, pAttributeName As String) As Object
        Try
            Dim oDELSQL = $"EXEC PRIDB_DELETE_ATTRIBUTE_DATA {pIDB_OBJID},'{pAttributeName}','{USER_USERNAME}'"
            Database_IDB.ExecuteNonQuery(oDELSQL)
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    Public Function SetVariableValue(oAttributeName As String, oNewValue As Object, Optional CheckDeleted As Boolean = False, Optional oIDBTyp As Integer = 0)
        Try
            Dim omytype = oNewValue.GetType.ToString
            If omytype = "System.Data.DataTable" Then
                Dim oDTMyNewValues As DataTable = oNewValue
                Dim oOldAttributeResult
                Dim oTypeOldResult
                If CheckDeleted = True Then
                    oOldAttributeResult = GetVariableValue(oAttributeName, oIDBTyp)
                    oTypeOldResult = oOldAttributeResult.GetType.ToString
                    If oTypeOldResult = "System.Data.DataTable" Then
                        Dim myOldValues As DataTable = oOldAttributeResult
                        If myOldValues.Rows.Count > 1 Then
                            'now Checking whether the old row still remains in Vector? If not it will be deleted as it cannot be replaced in multivalues
                            For Each oOldValueRow As DataRow In myOldValues.Rows
                                Dim oExists As Boolean = False
                                For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
                                    Dim oInfo1 = $"Checking oldValue[{oOldValueRow.Item(0)}] vs NewValue [{oNewValueRow.Item(1)}]"
                                    If oNewValueRow.Item(1).ToString.ToUpper = oOldValueRow.Item(0).ToString.ToUpper Then
                                        oExists = True
                                        Exit For
                                    End If
                                Next
                                If oExists = False Then
                                    Dim oInfo = $"Value [{oOldValueRow.Item(0)}] no longer existing in Vector-Attribute [{oAttributeName}] - will be deleted!"
                                    LOGGER.Info(oInfo)
                                    'SetVariableValue(CURRENT_PROFILE_LOG_INDEX, oInfo)
                                    Delete_Term_Object_From_Metadata(oAttributeName, oOldValueRow.Item(0))
                                End If
                            Next
                        End If
                    Else
                        '### Old Value is a single value ###
                        If oDTMyNewValues.Rows.Count > 1 Then
                            '### there is more than one new value ###
                            Dim oExists As Boolean
                            For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
                                oExists = False
                                Dim oInfo1 = $"Checking oldValue[{oOldAttributeResult}] vs NewValue [{oNewValueRow.Item(1)}]"
                                If oNewValueRow.Item(1).ToString.ToUpper = oOldAttributeResult.ToString.ToUpper Then
                                    oExists = True
                                End If
                            Next
                            If oExists = False Then
                                Dim oInfo2 = $"Value [{oOldAttributeResult}] no longer existing in Vector-Attribute [{oAttributeName}] - will be deleted!"
                                LOGGER.Info(oInfo2)
                                'SetVariableValue(CURRENT_PROFILE_LOG_INDEX, oInfo2)
                                Delete_Term_Object_From_Metadata(oAttributeName, oOldAttributeResult)
                            End If
                        Else
                            '### there is only ONE new value ###
                            If oDTMyNewValues.Rows(0).Item(1) <> oOldAttributeResult Then
                                Dim oInfo = $"Value [{oOldAttributeResult}] of Attribute [{oAttributeName}] obviously was updated during runtime - will be deleted!"
                                LOGGER.Info(oInfo)
                                SetVariableValue(CURRENT_PROFILE_LOG_INDEX, oInfo)
                                Delete_Term_Object_From_Metadata(oAttributeName, oOldAttributeResult)
                            Else
                                LOGGER.Debug($"Attributvalue of [{oAttributeName}] did not change!")
                            End If
                        End If
                    End If
                End If
                For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
                    Dim oSuccess As Boolean = False
                    Dim oFNSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oNewValueRow.Item(1).ToString}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT"
                    oSuccess = Database_IDB.ExecuteNonQuery(oFNSQL)
                    If oSuccess = False Then
                        Return False
                    End If
                Next
                Return True
            Else
                Dim oFNSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oNewValue}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT"
                Return Database_IDB.ExecuteNonQuery(oFNSQL)
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            Return False
        End Try
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ClassInit.vb
+++ b/app/DD_PM_WINDREAM/ClassInit.vb
@@ -1,467 +0,0 @@
 Imports System.ComponentModel
 Imports System.Globalization
 Imports DLLLicenseManager
 Imports DigitalData.Modules.Logging
 Imports DigitalData.Modules.Config
 Imports System.Threading
 Imports DigitalData.Modules.EDMI.API
 Imports DigitalData.Modules.EDMI.API.EDMIServiceReference
 Imports DigitalData.Modules.Database
 Public Class ClassInit
    Public _lizenzManager As ClassLicenseManager
    Private DataASorDB As ClassDataASorDB
    Public Sub New()
    End Sub
    <STAThread()>
    Public Sub InitLogger()
        Dim oConfigPrefix As String = My.Settings.UserConfig_Prefix
        Dim oLocalUserAppDataPath As String = Application.LocalUserAppDataPath
        If oConfigPrefix.Length > 0 Then
            oLocalUserAppDataPath = IO.Path.Combine(oLocalUserAppDataPath, oConfigPrefix)
        End If
        LOGCONFIG = New LogConfig(LogConfig.PathType.CustomPath,
                                       oLocalUserAppDataPath & "\Log",
                                        Nothing,
                                        My.Application.Info.CompanyName,
                                        My.Application.Info.ProductName)
        LOGGER = LOGCONFIG.GetLogger("ProcessManager")
        LOGGER.Info("## ProcessManager started - {0}", Now)
        Try
            Dim directory As New IO.DirectoryInfo(Application.LocalUserAppDataPath & "\Log")
            For Each file As IO.FileInfo In directory.GetFiles
                If (Now - file.CreationTime).Days > 29 Then
                    file.Delete()
                Else
                    Exit For
                End If
            Next
        Catch ex As Exception
        End Try
    End Sub
    <STAThread()>
    Public Sub InitUserConfig()
        Try
            DataASorDB = New ClassDataASorDB
            Dim oUserAppDataPath As String = Application.UserAppDataPath
            Dim oLegacyAppDataPath As String = Application.UserAppDataPath
            Dim oCommonAppDataPath = Application.CommonAppDataPath
            Dim oStartupPath = Application.StartupPath
            Dim oConfigPrefix As String = My.Settings.UserConfig_Prefix
            ' If prefix is configured, use it to create a subfolder in app data and migrate existing data
            If oConfigPrefix.Length > 0 Then
                oUserAppDataPath = IO.Path.Combine(Application.UserAppDataPath, oConfigPrefix)
                Dim oConfigUtils As New ConfigUtils(LOGCONFIG)
                If oConfigUtils.TestMigrationNeeded(oUserAppDataPath) Then
                    LOGCONFIG.Debug = True
                    oConfigUtils.MigrateConfig(oLegacyAppDataPath, oUserAppDataPath)
                    LOGCONFIG.Debug = False
                End If
            End If
            ' If AppConfig from Startup Path should be forced, rewrite the common app data path
            If My.Settings.UseAppConfigConString = True Then
                ' UserAppDataPath = StartupPath
                oCommonAppDataPath = oStartupPath
            End If
            CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, oUserAppDataPath, oCommonAppDataPath, oStartupPath)
            LOGGER.Info("Config loaded")
            If CONFIG.Config.ConnectionStringTest <> String.Empty And CONFIG.Config.TestMode = True Then
                LOGGER.Debug("Test Connection String loaded")
                CONNECTION_STRING_ECM = DecryptConnectionString(CONFIG.Config.ConnectionStringTest)
            Else
                LOGGER.Debug("Connection String loaded")
                CONNECTION_STRING_ECM = DecryptConnectionString(CONFIG.Config.ConnectionString)
            End If
            'If CONFIG.Config.ConnectionStringAppServer <> String.Empty Then
            '    LOGGER.Debug("ConnectionStringAppServer will be used")
            '    CONNECTION_STRING_APP_SERVER = DecryptConnectionString(CONFIG.Config.ConnectionStringAppServer)
            '    CONNECTION_STRING_READ = CONNECTION_STRING_APP_SERVER
            'Else
            '    CONNECTION_STRING_READ = CONNECTION_STRING_ECM
            'End If
            If CONFIG.Config.EDMIAppServer <> String.Empty Then
                Try
                    Dim oSplit() = CONFIG.Config.EDMIAppServer.ToString.Split(";")
                    Dim oAppServer = oSplit(0)
                    Dim oAppServerPort = 9000
                    If oSplit.Length = 2 Then
                        oAppServerPort = oSplit(1)
                    End If
                    _Client = New Client(LOGCONFIG, oAppServer, oAppServerPort)
                    If Not IsNothing(_Client) Then
                        If _Client.Connect() Then
                            EDMIAppServerActive = True
                            LOGGER.Info($"EDMIAppServer [{oAppServer}] is active!")
                        Else
                            LOGGER.Warn($"#### !!! Could not Connect to APPServer [{oAppServer}]!!! ###")
                        End If
                    End If
                Catch ex As Exception
                    LOGGER.Warn($"Could not initialize the AppServer: {ex.Message}")
                End Try
            End If
            INDEX_DMS_ERSTELLT = CONFIG.Config.IndexDmsErstellt
            INDEX_DMS_ERSTELLT_ZEIT = CONFIG.Config.IndexDmsErstelltZeit
            USER_MANAGER_PATH = CONFIG.Config.UserManagerPath
            USER_CONFIG_DEBUG = CONFIG.Config.DEBUG
            If USER_CONFIG_DEBUG = True Then
                DEBUG = True
                LOGCONFIG.Debug = True
            End If
            TEST_MODE = CONFIG.Config.TestMode
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
        'Settings_Load()
    End Sub
    Private Function DecryptConnectionString(EncryptedConnectionString As String) As String
        Dim oBuilder As New SqlClient.SqlConnectionStringBuilder With {
            .ConnectionString = EncryptedConnectionString
        }
        If oBuilder.ConnectionString.Contains("Password=") Then
            Dim oPlaintextPassword As String
            Dim oDecryptor As New ClassEncryption("!35452didalog=")
            Try
                oPlaintextPassword = oDecryptor.DecryptData(oBuilder.Password)
            Catch ex As Exception
                LOGGER.Error(ex)
                LOGGER.Debug("Password {0} could not be decrypted. Assuming plaintext password.")
                oPlaintextPassword = oBuilder.Password
            End Try
            Return EncryptedConnectionString.Replace(oBuilder.Password, oPlaintextPassword)
        Else
            Return EncryptedConnectionString
        End If
    End Function
    <STAThread()>
    Public Function InitDatabase()
        Dim dbResult As Boolean
        If CONNECTION_STRING_ECM = String.Empty Then
            MsgBox("No Databaseconnection configured. (First Start or Appdata not accessible)" & vbNewLine & "Basic-Config will be loaded.", MsgBoxStyle.Information)
            ERROR_STATE = "NO DB-CONNECTION"
            frmKonfig.ShowDialog()
        End If
        Database_ECM = New MSSQLServer(LOGCONFIG, CONNECTION_STRING_ECM)
        If Database_ECM.DBInitialized = True Then
            ClassDatabase.Init(CONNECTION_STRING_ECM)
            dbResult = True
        Else
            dbResult = False
        End If
        If CONNECTION_STRING_IDB <> String.Empty Then
            Database_IDB = New MSSQLServer(LOGCONFIG, CONNECTION_STRING_ECM)
            If Database_IDB.DBInitialized = True Then
                IDB_ACTIVE = True
                LOGGER.Info("IDB is active via Config")
            End If
        End If
        'If CONNECTION_STRING_APP_SERVER <> String.Empty Then
        '    Database_APPSERVER = New MSSQLServer(LOGCONFIG, CONNECTION_STRING_APP_SERVER)
        '    If Database_APPSERVER.DBInitialized = False Then
        '        MsgBox("ApplicationServer can not be reached! Check Your configuration.", MsgBoxStyle.Information)
        '        If dbResult = True Then
        '            CONNECTION_STRING_READ = CONNECTION_STRING_ECM
        '        End If
        '    End If
        'End If
        If dbResult = False Then
            ERROR_STATE = "FAILED DBCONNECTION"
            MsgBox("Error in init database. (Connection failed) More information in the logfile.", MsgBoxStyle.Critical)
            Return False
        Else
            Return True
        End If
    End Function
    <STAThread()>
    Sub Refresh_Licence()
        Dim oStopWatch As New RefreshHelper.SW("Refresh_Licence")
        Try
            Me._lizenzManager = New ClassLicenseManager("#DigitalData35452!#", "")
            Dim lic As String = BASEDATA_DT_CONFIG.Rows(0).Item("LIZENZEN")
            Dim licString = Me._lizenzManager.DecodeLicenseKey(lic)
            Dim split() = licString.ToString.Split("#")
            If lic <> "" Then
                LICENSE_COUNT = split(0)
            Else
                LICENSE_COUNT = 0
            End If
            If LICENSE_VALID = False Then
                MsgBox("Your license has expired!" & vbNewLine & "Last valid date: " & split(1) & vbNewLine & "Please contact Your sysadmin", MsgBoxStyle.Exclamation)
                LICENSE_EXPIRED = True
                LICENSE_COUNT = 0
            End If
            LOGGER.Debug("license initialized....")
            LICENSE_PROFILES = split(2)
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected error in Refresh license: " & ex.Message, True)
            MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Fehler bei Licensemanager:")
        End Try
        oStopWatch.Done()
    End Sub
    <STAThread()>
    Public Sub InitUserLogin(Optional pUSRNAME As String = "")
        Dim oStopWatch As New RefreshHelper.SW("InitUserLogin")
        Dim oSQL As String
        Try
            If pUSRNAME <> String.Empty Then
                LOGGER.Info($"InitUserLogin with GhostUSer [{pUSRNAME}]")
                USER_USERNAME = pUSRNAME
            Else
                USER_USERNAME = Environment.UserName
            End If
            Try
                Dim oSQLSW As New RefreshHelper.SW("VWDD_USER_CLIENT")
                oSQL = $"SELECT * FROM VWDD_USER_CLIENT WHERE UPPER(USERNAME) = UPPER('{USER_USERNAME}')"
                DT_CLIENT_USER = DataASorDB.GetDatatable("DD_ECM", oSQL, "VWDD_USER_CLIENT", $"USERNAME like '{USER_USERNAME}'")
                oSQLSW.Done()
                If DT_CLIENT_USER.Rows.Count > 1 Then
                    frmClientLogin.ShowDialog()
                ElseIf DT_CLIENT_USER.Rows.Count = 1 Then
                    CLIENT_SELECTED = DT_CLIENT_USER.Rows(0).Item("CLIENT_ID")
                Else
                    ERROR_STATE = "NO CLIENT"
                    Dim oDT As DataTable = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("No Client relation")
                    MsgBox(oDT.Rows(0).Item("STRING1") & vbNewLine & oDT.Rows(0).Item("STRING2") & vbNewLine & vbNewLine & oSQL, MsgBoxStyle.Exclamation)
                    Exit Sub
                End If
            Catch ex As Exception
                LOGGER.Error(ex)
                LOGGER.Info("Unexpected error in checking CLIENT: " & ex.Message)
                CLIENT_SELECTED = 1
            End Try
            LOGGER.Debug("Username: " & USER_USERNAME)
            Dim oFnct As New RefreshHelper.SW("FNDD_CHECK_USER_MODULE")
            oSQL = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','PM',{1})", USER_USERNAME, CLIENT_SELECTED)
            Dim DT_CHECKUSER_MODULE As DataTable
            DT_CHECKUSER_MODULE = DataASorDB.GetDatatable("DD_ECM", oSQL, "TBDD_USER_MODULE", $"USERNAME = '{USER_USERNAME.ToLower}' AND MODULE_SHORT = 'PM'")
            oFnct.Done()
            If DT_CHECKUSER_MODULE.Rows.Count = 0 Then
                LOGGER.Info("DT_CHECKUSER_MODULE.Rows.Count = 0", True)
                ERROR_STATE = "NO USER"
                MsgBox("Sorry - Something went wrong in getting Your rights." & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
                Exit Sub
            End If
            If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
                LOGGER.Info($"Got a CheckUserDefintion for User [{USER_USERNAME}]")
                If DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID") <> 0 Then
                    USER_EXISTS = True
                Else
                    USER_EXISTS = False
                End If
                USER_ID = DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID")
                USER_SURNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME"))
                USER_PRENAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME"))
                USER_SHORTNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME"))
                USER_EMAIL = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL"))
                USER_LANGUAGE = DT_CHECKUSER_MODULE.Rows(0).Item("USER_LANGUAGE")
                USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS")
                USER_IS_ADMIN = DT_CHECKUSER_MODULE.Rows(0).Item("IS_ADMIN")
                Try
                    USER_RIGHT_FILE_DELETE = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT_FILE_DEL")), False, DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT_FILE_DEL"))
                Catch ex As Exception
                    LOGGER.Warn("Error in USER_RIGHT_FILE_DELETE: " & ex.Message)
                    USER_RIGHT_FILE_DELETE = False
                End Try
                USER_DATE_FORMAT = DT_CHECKUSER_MODULE.Rows(0).Item("USER_DATE_FORMAT")
                USERCOUNT_LOGGED_IN = DT_CHECKUSER_MODULE.Rows(0).Item("USERCOUNT_LOGGED_IN")
                ClassParamRefresh.Refresh_Params(DT_CHECKUSER_MODULE)
                FINALINDICES = New ClassFinalIndex()
                FINALINDICES.init()
                If IDB_ACTIVE = True Then
                    IDBData = New ClassIDBData()
                End If
                Try
                    USER_RIGHT_VIEW_ONLY = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT2")
                Catch ex As Exception
                    USER_RIGHT_VIEW_ONLY = False
                End Try
                Try
                    USER_RIGHT3 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT3")
                Catch ex As Exception
                    USER_RIGHT3 = False
                End Try
                Try
                    USER_RIGHT4 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT4")
                Catch ex As Exception
                    USER_RIGHT4 = False
                End Try
                LOGGER.Debug("User exists....")
                'Am System anmelden
                Refresh_Licence()
                'Check_User_Exists_in_PMGroups()
                'Dim Culture = CultureInfo.CreateSpecificCulture("en-US")
                '' The following line provides localization for the application's user interface. 
                'Thread.CurrentThread.CurrentUICulture = Culture
                '' The following line provides localization for data formats. 
                'Thread.CurrentThread.CurrentCulture = Culture
                '' Set this culture as the default culture for all threads in this application.  
                '' Note: The following properties are supported in the .NET Framework 4.5+ 
                'CultureInfo.DefaultThreadCurrentCulture = Culture
                'CultureInfo.DefaultThreadCurrentUICulture = Culture
                If ClassAllgemeineFunktionen.LoginOut("LOGIN") = True Then
                    USERCOUNT_LOGGED_IN += 1
                End If
                LOGGER.Debug("Count Users logged in: " & USERCOUNT_LOGGED_IN.ToString)
                If LICENSE_COUNT < USERCOUNT_LOGGED_IN And LICENSE_EXPIRED = False Then
                    MsgBox("Die Anzahl der aktuell angemeldeten User (" & USERCOUNT_LOGGED_IN.ToString & ") überschreitet die Anzahl der aktuellen Lizenzen!" & vbNewLine & "Anzahl der Lizenzen: " & LICENSE_COUNT.ToString & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
                    LOGGER.Info("Die Anzahl der aktuell angemeldeten User (" & USERCOUNT_LOGGED_IN.ToString & ") überschreitet die Anzahl der Lizenzen (" & LICENSE_COUNT & ") für Process Manager!")
                    If USER_IS_ADMIN = False Then
                        ClassAllgemeineFunktionen.LoginOut("LOGOUT")
                        ERROR_STATE = "START INCOMPLETE"
                    End If
                End If
                'Alles OK bis hierhin...nun die FolderwatchKonfig laden
                LOGGER.Debug("Init Userlogin successfull completed....")
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected Error in InitUserLogin: " & ex.Message, True)
            ERROR_STATE = "START INCOMPLETE"
        End Try
        oStopWatch.Done()
    End Sub
    <STAThread()>
    Public Sub InitBasics()
        Dim oStep As String
        Try
            If IsNothing(DataASorDB) Then
                DataASorDB = New ClassDataASorDB
            End If
            Dim oStopWatch As New RefreshHelper.SW("InitBasics")
            Dim oSql = String.Format("select * from TBPM_KONFIGURATION WHERE GUID = 1")
            oStep = "TBPM_KONFIGURATION"
            BASEDATA_DT_CONFIG = DataASorDB.GetDatatable("DD_ECM", oSql, "TBPM_KONFIGURATION", $"GUID = 1")
            Settings_LoadBasicConfig()
            oStep = "TBDD_CONNECTION"
            oSql = "select * from TBDD_CONNECTION WHERE AKTIV = 1"
            BASEDATA_DT_TBDD_CONNECTION = DataASorDB.GetDatatable("DD_ECM", oSql, "TBDD_CONNECTION", "")
            oStep = "TBDD_3RD_PARTY_MODULES"
            oSql = "Select * FROM TBDD_3RD_PARTY_MODULES WHERE ACTIVE = 1"
            Dim oTBDD_3RD_PARTY_MODULES As DataTable
            oTBDD_3RD_PARTY_MODULES = DataASorDB.GetDatatable("DD_ECM", oSql, "TBDD_3RD_PARTY_MODULES", "")
            For Each oROW As DataRow In oTBDD_3RD_PARTY_MODULES.Rows
                If oROW.Item("NAME") = "GDPICTURE" Then
                    GDPICTURE_LICENSE = oROW.Item("LICENSE")
                End If
            Next
            oStep = "TBDD_GUI_LANGUAGE_PHRASE"
            oSql = "SELECT * FROM TBDD_GUI_LANGUAGE_PHRASE WHERE MODULE IN ('PM','All Modules')"
            BASEDATA_DT_GUI_LANGUAGE_PHRASES = DataASorDB.GetDatatable("DD_ECM", oSql, "TBDD_GUI_LANGUAGE_PHRASE", "")
            oStep = "TBPM_PROFILE_SEARCH"
            oSql = "select * from TBPM_PROFILE_SEARCH where TYPE = 'DOC' AND ACTIVE = 1 ORDER BY PROFILE_ID,TAB_INDEX"
            BASEDATA_DT_PROFILES_SEARCHES_DOC = DataASorDB.GetDatatable("DD_ECM", oSql, "TBPM_PROFILE_SEARCH", "TYPE = 'DOC'", "PROFILE_ID,TAB_INDEX")
            BASEDATA_DT_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Clone()
            oStep = "TBPM_MAIN_VIEW_GROUPS"
            oSql = "SELECT * FROM TBPM_MAIN_VIEW_GROUPS WHERE ACTIVE = 1"
            BASEDATA_DTGRID_GROUPS = DataASorDB.GetDatatable("DD_ECM", oSql, "TBPM_MAIN_VIEW_GROUPS", "")
            oStep = "TBPM_CHART"
            oSql = "SELECT * FROM TBPM_CHART"
            BASEDATA_DT_CHARTS = DataASorDB.GetDatatable("DD_ECM", oSql, "TBPM_CHART", "")
            oStopWatch.Done()
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info($"Unexpected Error in InitBasics - last Step [{oStep}]: {ex.Message}", True)
            ERROR_STATE = "Basics not initialized"
        End Try
    End Sub
    <STAThread()>
    Public Sub InitBasics2()
        Try
            Dim oStopWatch As New RefreshHelper.SW("InitBasics2")
            Dim oSql = String.Format("SELECT * FROM VWPM_PROFILE_USER WHERE USER_ID = {0}", USER_ID)
            BASEDATA_DT_VW_PROFILE_USER = DataASorDB.GetDatatable("DD_ECM", oSql, "VWPM_PROFILE_USER", $"USER_ID = {USER_ID}")
            If BASEDATA_DT_VW_PROFILE_USER.Rows.Count = 0 Then
                LOGGER.Warn($"no profiles for user: '{USER_USERNAME}' configured - Check SQL [{oSql}]!", False)
            End If
            oStopWatch.Done()
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected Error in InitBasics2: " & ex.Message, True)
            ERROR_STATE = "Basics2 not initialized"
        End Try
    End Sub
    <STAThread()>
    Private Function Settings_LoadBasicConfig()
        Try
            Dim oSql As String = "select * from tbdd_Modules where SHORT_NAME = 'PM'"
            Dim oDTtbdd_Modules As DataTable
            oDTtbdd_Modules = DataASorDB.GetDatatable("DD_ECM", oSql, "tbdd_Modules", $" SHORT_NAME = 'PM'")
            If oDTtbdd_Modules.Rows.Count = 1 Then
                Try
                    VERSION_DELIMITER = oDTtbdd_Modules.Rows(0).Item("VERSION_DELIMITER")
                    FILE_DELIMITER = oDTtbdd_Modules.Rows(0).Item("FILE_DELIMITER")
                    LICENSE_VALID = oDTtbdd_Modules.Rows(0).Item("LICENSE_VALID")
                    WMSESSION_STARTSTOP_STARTUP = oDTtbdd_Modules.Rows(0).Item("WMSESSION_STARTSTOP_STARTUP")
                Catch ex As Exception
                    LOGGER.Error(ex)
                    LOGGER.Info("Unexpected Error in Settings_LoadBasicConfig: " & ex.Message, True)
                End Try
            Else
                Return False
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            MsgBox("Error in Settings_LoadBasicConfig" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
            Return False
        End Try
        Return True
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ClassPMWindream.vb
+++ b/app/DD_PM_WINDREAM/ClassPMWindream.vb
@@ -1,644 +0,0 @@
 Imports WINDREAMLib
 Imports WMOSRCHLib
 Public Class ClassPMWindream
    Inherits ClassWindream_allgemein
    Dim clsWM As ClassWindream_allgemein
    'Private email As New ClassNIEmail
    Private allgFunk As New ClassAllgemeineFunktionen
 #Region "+++++ Konstanten +++++"
    Protected Const WMObjectEditModeObject = &H1F
    Protected Const WMObjectStreamOpenModeReadWrite = 2
    Protected Const WMEntityObjectType = 10
    Protected Const WMEntityDocument = 1
    Const WMObjectVariableValueTypeUndefined = 0
    Const WMObjectVariableValueTypeString = 1
    Const WMObjectVariableValueTypeInteger = 2
    Const WMObjectVariableValueTypeInteger64bit = 11
    Const WMObjectVariableValueTypeFloat = 3
    Const WMObjectVariableValueTypeBoolean = 4
    Const WMObjectVariableValueTypeDate = 5
    Const WMObjectVariableValueTypeFixedPoint = 6
    Const WMObjectVariableValueTypeTimeStamp = 7
    Const WMObjectVariableValueTypeCurrency = 8
    Const WMObjectVariableValueTypeTime = 9
    Const WMObjectVariableValueTypeVariant = 10
    Const WMObjectVariableValueTypeMask = &HFFF
    Const WMObjectVariableValueFlagMask = &HFFFFF000
    Const WMObjectVariableValueTypeVector = &H1000
    Const WMObjectVariableValueTypeFulltext = &H2000
    Const WMObjectVariableValueTypeDefaultValue = &H4000
    Const WMObjectEditModeIndexEdit = &H3DA
 #End Region
 #Region "+++++ Variablen +++++"
    Private oController As New WMOSearchController
 #End Region
 #Region "+++++ Allgemeine Methoden und Funktionen +++++"
    Sub New()
        MyBase.New()
    End Sub
    Private Function IsNotEmpty(ByVal aValue As Object)
        If aValue IsNot Nothing Then
            Return True
            'If TypeOf aValue Is String Then
            '    ' Änderung 28.08.2018: Auch ein leerer String gilt als Wert, damit indexfelder auch geleert werden können
            '    'If Not aValue = "" Then
            '    '    Return True
            '    'End If
            '    Return False
            'Else
            '    Return True
            'End If
        Else
            Return False
        End If
    End Function
    Private Function return_type(ByVal _wert As Object)
        Return _wert.GetType
    End Function
    Public Function GetValuesfromAuswahlliste(ByVal listname As String)
        Try
            'Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, listname)
            'Dim vType = oAttribute.getVariableValue("vItems")
            'Return vType
            Dim oChoiceList = oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityChoiceList, listname)
            If Err.Number = 0 And TypeName(oChoiceList) <> "Nothing" Then
                Dim Values = oChoiceList
                Values = oChoiceList.GetVariableValue("vItems")
                Dim anz As Integer = 0
                For Each CLItem In Values
                    If oChoiceList.aName IsNot Nothing Then
                        anz += 1
                    End If
                Next
                Dim strListe(anz - 1)
                Dim zahl As Integer = 0
                For Each CLItem In Values
                    If oChoiceList.aName IsNot Nothing Then
                        strListe(zahl) = CLItem
                        zahl += 1
                    End If
                Next
                Return strListe
            Else
                MsgBox("Auswahlliste: " & listname & " nicht gefunden!", MsgBoxStyle.Critical, "Fehler:")
                Return Nothing
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler in GetValuesfromAuswahlliste:")
            Return Nothing
        End Try
    End Function
    Public Function Return_Type(Indexname As String)
        Try
            ' das entsprechende Attribut aus windream auslesen
            Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, Indexname)
            ' den Variablentyp (String, Integer, ...) auslesen 
            Dim vType = oAttribute.getVariableValue("dwAttrType")
            Return vType.ToString
        Catch ex As Exception
            LOGGER.Error(ex)
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler in Return_Type:")
            Return ""
        End Try
    End Function
    Public Function RunIndexing(ByVal oDocument As WMObject, ByVal Indizes() As String, ByVal aValues() As Object)
        Dim vType
        Try
            If Indizes IsNot Nothing And aValues IsNot Nothing Then
                If Not oDocument.aLocked Then
                    ' 02.07. Änderung der Lock Methode, um eine Validierung auch zuzulassen, wenn das Recht "Datei ändern"
                    ' nicht gesetzt ist
                    'oDocument.lock()
                    Try
                        oDocument.LockFor(WMObjectEditModeIndexEdit)
                    Catch ex As Exception
                        LOGGER.Error(ex)
                        frmValidator.idxerr_message = "Could not lock WMFile - Check Your rights and inform the admin!"
                        Return False
                    End Try
                    Dim i As Integer = 0
                    Dim indexname As String
                    If aValues.Length = 1 And aValues(0) = "" Then
                        LOGGER.Debug("Indexwert ist leer/Nothing - Keine Indexierung")
                    Else
                        'Jetzt jeden Indexwert durchlaufen
                        For Each aName As String In Indizes
                            indexname = aName
                            ' das entsprechende Attribut aus windream auslesen
                            Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, Indizes(i))
                            ' den Variablentyp (String, Integer, ...) auslesen 
                            vType = oAttribute.getVariableValue("dwAttrType")
                            ' wenn in aValues an Position i ein Wert steht
                            If IsNotEmpty(aValues(i)) Then
                                Dim _int As Boolean = False
                                Dim _date As Boolean = False
                                Dim _dbl As Boolean = False
                                Dim _bool As Boolean = False
                                'If indexname = "Tournr" Then
                                '    MsgBox("Index: " & indexname & vbNewLine & "wert: " & aValues(i), MsgBoxStyle.Information, "Index: " & aName.ToString)
                                'End If
                                LOGGER.Debug(" ### Indexierung von Index: " & indexname & " ####")
                                'MsgBox(oDocument.aName & vbNewLine & aValues(i) & vbNewLine & vType, MsgBoxStyle.Exclamation, "Zeile 87")
                                Dim value = aValues(i)
                                Dim convertValue
                                Dim vektor As Boolean = False
                                'Den Typ des Index-Feldes auslesen
                                'MsgBox(value.GetType.ToString)
                                Select Case vType
                                'Case WMObjectVariableValueTypeUndefined
                                    Case WMObjectVariableValueTypeString
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeString")
                                        convertValue = CStr(value)
                                    Case WMObjectVariableValueTypeInteger
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeInteger")
                                        If IsNumeric(value) = False Then
                                            frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
                                            LOGGER.Debug("Achtung: Value " & value & " kann nicht in Zahl konvertiert werden!")
                                            oDocument.Save()
                                            oDocument.unlock()
                                            Return False
                                        End If
                                        convertValue = CInt(value)
                                        _int = True
                                    Case WMObjectVariableValueTypeInteger64bit
                                        LOGGER.Debug("Typ des windream-Indexes: Integer64bit")
                                        If IsNumeric(value) = False Then
                                            frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
                                            LOGGER.Debug("Achtung: Value " & value & " kann nicht in Zahl konvertiert werden!")
                                            oDocument.Save()
                                            oDocument.unlock()
                                            Return False
                                        End If
                                        convertValue = CInt(value)
                                        _int = True
                                    Case WMObjectVariableValueTypeFloat
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFloat")
                                        Try
                                            convertValue = CDbl(value)
                                        Catch ex As Exception
                                            LOGGER.Error(ex)
                                            frmValidator.idxerr_message = "Could't convert value '" & value & "' to double!"
                                            oDocument.Save()
                                            oDocument.unlock()
                                            Return False
                                        End Try
                                    Case WMObjectVariableValueTypeFixedPoint
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFixedPoint")
                                        Try
                                            convertValue = CDbl(value)
                                        Catch ex As Exception
                                            LOGGER.Error(ex)
                                            frmValidator.idxerr_message = "Could't convert value '" & value & "' to double!"
                                            oDocument.Save()
                                            oDocument.unlock()
                                            Return False
                                        End Try
                                        _dbl = True
                                    Case WMObjectVariableValueTypeBoolean
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeBoolean")
                                        convertValue = CBool(value)
                                        _bool = True
                                    Case WMObjectVariableValueTypeDate
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeDate")
                                        _date = True
                                        'Dim _date As Date = value
                                        convertValue = value
                                    Case WMObjectVariableValueTypeTimeStamp
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeTimeStamp")
                                        convertValue = CInt(value)
                                    Case WMObjectVariableValueTypeCurrency
                                        LOGGER.Info(" >> Typ des windream-Indexes: WMObjectVariableValueTypeCurrency")
                                        'Wegen currency muß ein eigenes Objekt vom typ Variant erzeugt werden
                                        Dim aValueWrapper As System.Runtime.InteropServices.CurrencyWrapper = New System.Runtime.InteropServices.CurrencyWrapper(CDec(value))
                                        convertValue = aValueWrapper
                                    Case WMObjectVariableValueTypeTime
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeTime", False)
                                        'If ((value)) Then
                                        '    convertValue = CDate(value)
                                        'Else
                                        '    convertValue = ""
                                        'End If
                                        'Dim _date As Date = value
                                        convertValue = convertValue '*_date.ToShortTimeString
                                    Case WMObjectVariableValueTypeFloat
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFloat", False)
                                        convertValue = CStr(value)
                                    Case WMObjectVariableValueTypeVariant
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeVariant", False)
                                        convertValue = CStr(value)
                                    Case WMObjectVariableValueTypeFulltext
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFulltext", False)
                                        convertValue = CStr(value)
                                    Case 4100
                                        LOGGER.Debug("Typ des windream-Indexes: 4100 Vektor Boolean", False)
                                        vektor = True
                                    Case 4101
                                        LOGGER.Debug("Typ des windream-Indexes: 4101 Vektor Date", False)
                                        vektor = True
                                    Case 4104
                                        LOGGER.Debug("Typ des windream-Indexes: 4104 Vektor Currency", False)
                                        vektor = True
                                    Case 4097
                                        LOGGER.Debug("Typ des windream-Indexes: 4097 Vektor alphanumerisch", False)
                                        vektor = True
                                    Case 4098
                                        LOGGER.Debug("Typ des windream-Indexes: 4098 Vektor Numerisch", False)
                                        vektor = True
                                    Case 4099
                                        LOGGER.Debug("Typ des windream-Indexes: 4099 Vektor Kommazahl", False)
                                        vektor = True
                                    Case 36865
                                        LOGGER.Debug("Typ des windream-Indexes: 36865 Vektor alphanumerisch", False)
                                        vektor = True
                                    Case Else
                                        LOGGER.Debug("Typ des windream-Indexes konnte nicht bestimmt werden!", False)
                                        LOGGER.Debug("Versuch des Auslesens (vType): " & vType)
                                        'MsgBox(vType & vbNewLine & CStr(value), MsgBoxStyle.Exclamation, "Marlon-Case Else")
                                        convertValue = ""
                                End Select
                                If vektor = False Then
                                    If convertValue.ToString Is Nothing = False Then
                                        LOGGER.Debug("Konvertierter Wert: '" & convertValue.ToString & "'", False)
                                    End If
                                End If
                                '############################################################################################
                                '####################### Der eigentliche Indexierungsvorgang ################################
                                '############################################################################################
                                If vektor = False Then
                                    If convertValue.ToString Is Nothing = False Then
                                        Try
                                            LOGGER.Debug("Jetzt indexieren: oDocument.SetVariableValue(" & aName & ", " & convertValue.ToString & ")", False)
                                        Catch ex As Exception
                                            LOGGER.Error(ex)
                                            LOGGER.Info(" >> Unexpected Error in Logging SetVariableValue for " & aName & ": " & ex.Message, False)
                                        End Try
                                        'Dim ArrValues()
                                        'ReDim ArrValues(0)
                                        'ArrValues(0) = convertValue
                                        'Dim ArrName()
                                        'ReDim ArrName(0)
                                        'ArrName(0) = "Tournr"
                                        'oDocument.SetValues(ArrName, ArrValues)
                                        If _int = True Then
                                            oDocument.SetVariableValue(aName, CInt(convertValue))
                                        ElseIf _date = True Then
                                            oDocument.SetVariableValue(aName, CDate(convertValue))
                                        ElseIf _bool Then
                                            oDocument.SetVariableValue(aName, CBool(convertValue))
                                        ElseIf _dbl Then
                                            oDocument.SetVariableValue(aName, CDbl(convertValue))
                                        Else
                                            oDocument.SetVariableValue(aName, convertValue)
                                        End If
                                        LOGGER.Debug("Index '" & aName & "' wurde geschrieben", False)
                                    Else
                                        LOGGER.Info(" >> Kein Indexwert vorhanden", False)
                                    End If
                                Else
                                    'VEKTORFELDER, ALSO ÜBERPRÜFEN OB ERGEBNIS-ARRAY GEFÜLLT IST
                                    LOGGER.Debug("VEKTORFELD: Vorbereiten des Arrays", False)
                                    Dim myArray()
                                    'Dim anz As Integer = 0
                                    'For Each obj In aValues
                                    'ReDim Preserve myArray(anz)
                                    Select Case vType
                                        Case 4100
                                            'Vektortyp Boolean
                                            'Umwandeln in Boolean
                                            'Die Größe des Arrays festlegen
                                            ReDim myArray(aValues.Length - 1)
                                            Dim i1 As Integer = 0
                                            'Das Array durchlaufen und Werte für den Index in Array schreiben
                                            For Each obj In aValues
                                                Select Case obj.ToString.ToLower
                                                    Case "falsch"
                                                        obj = False
                                                    Case "wahr"
                                                        obj = True
                                                    Case "nein"
                                                        obj = False
                                                    Case "ja"
                                                        obj = True
                                                End Select
                                                myArray(i1) = CBool(obj)
                                                i1 = i1 + 1
                                            Next
                                        Case 4101
                                            'Vektortyp Date
                                            'Umwandeln in String
                                            'Die Größe des Arrays festlegen
                                            ReDim myArray(aValues.Length - 1)
                                            Dim i1 As Integer = 0
                                            'Das Array durchlaufen und Werte für den Index in Array schreiben
                                            For Each obj In aValues
                                                myArray(i1) = CDate(obj)
                                                i1 = i1 + 1
                                            Next
                                        Case 4104
                                            'Vektortyp Currency
                                            'Die Größe des Arrays festlegen
                                            ReDim myArray(aValues.Length - 1)
                                            Dim i1 As Integer = 0
                                            'Das Array durchlaufen und Werte für den Index in Array schreiben
                                            For Each obj In aValues
                                                Dim aValueWrapper As System.Runtime.InteropServices.CurrencyWrapper = New System.Runtime.InteropServices.CurrencyWrapper(CDec(obj))
                                                myArray(i1) = aValueWrapper
                                                i1 = i1 + 1
                                            Next
                                        Case 4097
                                            'Vektortyp ALPHANUMERISCH
                                            'Umwandeln in String
                                            'Die Größe des Arrays festlegen
                                            ReDim myArray(aValues.Length - 1)
                                            Dim i1 As Integer = 0
                                            'Das Array durchlaufen und Werte für den Index in Array schreiben
                                            For Each obj In aValues
                                                myArray(i1) = CStr(obj)
                                                i1 = i1 + 1
                                            Next
                                        Case 4098
                                            'Umwandeln in Integer
                                            'Die Größe des Arrays festlegen
                                            ReDim myArray(aValues.Length - 1)
                                            Dim i1 As Integer = 0
                                            'Das Array durchlaufen und Werte für den Index in Array schreiben
                                            For Each obj In aValues
                                                myArray(i1) = CInt(obj)
                                                i1 = i1 + 1
                                            Next
                                        Case 4099
                                            'Umwandeln in Double
                                            'Die Größe des Arrays festlegen
                                            ReDim myArray(aValues.Length - 1)
                                            Dim i1 As Integer = 0
                                            'Das Array durchlaufen und Werte für den Index in Array schreiben
                                            For Each obj In aValues
                                                Dim Str As String = obj
                                                myArray(i1) = CDbl(Str.Replace(".", ","))
                                                i1 = i1 + 1
                                            Next
                                        Case 36865
                                            'Umwandeln in String
                                            'Die Größe des Arrays festlegen
                                            ReDim myArray(aValues.Length - 1)
                                            Dim i1 As Integer = 0
                                            'Das Array durchlaufen und Werte für den Index in Array schreiben
                                            For Each obj In aValues
                                                myArray(i1) = CStr(obj)
                                                i1 = i1 + 1
                                            Next
                                        Case Else
                                            'Umwandeln in String
                                            'Die Größe des Arrays festlegen
                                            ReDim myArray(aValues.Length - 1)
                                            Dim i1 As Integer = 0
                                            'Das Array durchlaufen und Werte für den Index in Array schreiben
                                            For Each obj In aValues
                                                myArray(i1) = CStr(obj)
                                                i1 = i1 + 1
                                            Next
                                    End Select
                                    LOGGER.Debug("Wert für Index vor Indexierung: [{0}]", myArray)
                                    'Jetzt die Nachindexierung für Vektor-Felder
                                    oDocument.SetVariableValue(aName, myArray)
                                    LOGGER.Debug("'SetVariableValue' für VEKTOR erfolgreich", False)
                                End If
                            End If
                            i += 1
                        Next
                    End If
                    ' oDocument.LockRights()
                    'SetRights(WMObject, User)
                    oDocument.Save()
                    oDocument.unlock()
                    LOGGER.Debug(" ### Indexierung erfolgreich beendet (Save und Unlock durchgeführt) ###", False)
                    Return True
                Else
                    LOGGER.Info(" ### Dokument ist gesperrt, Indexierung nicht möglich! ###", False)
                    frmValidator.idxerr_message = "Dokument " & oDocument.aName & " ist gesperrt, Indexierung nicht möglich"
                    Return False
                End If
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("ClassSearchResult.RunIndexing - " & ex.Message, True)
            frmValidator.idxerr_message = "Unvorhergesehener Fehler in Indexing: " & ex.Message & vbNewLine & "vType: " & vType.ToString
            allgFunk.Insert_LogEntry($"ERROR RunIndexing>> {ex.Message}")
            oDocument.Save()
            oDocument.unlock()
            Return False
        End Try
    End Function
    Public Sub SetfinalIndex(ByVal oDocument As WMObject, ByVal Indexname As String, ByVal _state As Boolean)
        Try
            If Indexname IsNot Nothing Then
                If Not oDocument.aLocked Then
                    oDocument.LockFor(WMObjectEditModeIndexEdit)
                    Dim i As Integer = 0
                    ' das entsprechende Attribut aus windream auslesen
                    Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, Indexname)
                    ' den Variablentyp (String, Integer, ...) auslesen 
                    Dim vType = oAttribute.getVariableValue("dwAttrType")
                    'MsgBox("Typ: " & vType.ToString, MsgBoxStyle.Critical, "_state: " & _state.ToString)
                    ' wenn in aValues an Position i ein Wert steht
                    'MsgBox(oDocument.aName & vbNewLine & aValues(i) & vbNewLine & vType, MsgBoxStyle.Exclamation, "Zeile 87")
                    Dim value = _state
                    Dim convertValue
                    'Den Typ des Index-Feldes auslesen
                    LOGGER.Debug(">> Typ des windream-Indexes: " & vType.ToString)
                    Select Case (vType)
                        Case WMObjectVariableValueTypeBoolean
                            convertValue = CBool(value)
                        Case Else
                            LOGGER.Info(">> Typ des windream-Indexes ist nicht BOOLEAN also Abbruch:")
                    End Select
                    '############################################################################################
                    '####################### Der eigentliche Indexierungsvorgang ################################
                    oDocument.SetVariableValue(Indexname, convertValue)
                    LOGGER.Debug(">> Index '" & Indexname & "' wurde gesetzt")
                    oDocument.Save()
                    oDocument.unlock()
                    LOGGER.Info(">> DATEI wurde erfolgreich als fertig nachindexiert gekennzeichnet")
                Else
                    LOGGER.Info(">> Dokument ist gesperrt, Indexierung erst im nächsten Durchlauf!")
                End If
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("ClassSearchResult.SetfinalIndex - " & ex.Message, True)
            'If My.Settings.vNIMailsenden = True Then
            '    email.Send_EMail("Fehler bei SetfinalIndex - Datei: " & oDocument.aName.ToString & " - Fehler: " & ex.Message)
            'End If
            oDocument.Save()
            oDocument.unlock()
        End Try
    End Sub
 #End Region
 #Region "+++++ Allgemeine Funktionen die Informationen zurückliefern +++++"
    Public Function Get_No_Documents(Profil As String, WD_Search As String)
        Try
            Dim wmsearch_exists As Boolean
            Try
                wmsearch_exists = System.IO.File.Exists(WD_Search)
            Catch ex As Exception
                LOGGER.Error(ex)
                wmsearch_exists = clsWM.CheckFileExists(WD_Search)
            End Try
            If wmsearch_exists = False Then
                LOGGER.Info(">> Windream Suche für Profil: '" & Profil & "' konnte nicht ausgeführt werden! Die Datei '" & WD_Search & "' existiert nicht!", False)
                MsgBox("Windream Suche für Profil: '" & Profil & "' konnte nicht ausgeführt werden!" & vbNewLine & "Die Datei '" & WD_Search & "' existiert nicht!", MsgBoxStyle.Exclamation, "Achtung:")
                'wenn die gesuchte File eine Suche ist: per MAil informierne und Indexierung abbrechen
                'If My.Settings.vNIMailsenden = True Then
                '    email.Send_EMail("Fehler bei Nachindexierung: <br> >> Profil: " & Me.aktivesProfil.Profilname & "<br> >> die windream-Suche : " & Me.aktivesProfil.WindreamSuche & " konnte nicht gefunden werden!" & _
                '                     "<br> >> Mögliche Fehlerursache: Das W-Laufwerk ist nicht verfügbar!")
                'End If
                Return 0
            Else
                ' windream-Suche für Profil starten
                Dim windreamSucheErgebnisse As WMObjects = Me.GetSearchDocuments(WD_Search)
                If windreamSucheErgebnisse.Count > 0 Then
                    ' neue Anzahl von Dateien
                    Return windreamSucheErgebnisse.Count
                Else
                    ' keine Dateien zum Importieren
                    Return 0
                End If
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info(ex.Message)
            Return 0
        End Try
    End Function
    Public Function GetSearchDocuments(ByVal wdfLocation As String)
        If clsWM.CheckFileExists(wdfLocation) = True Then
            Try
                Dim ProfileName = wdfLocation.Substring(wdfLocation.LastIndexOf("\") + 1)
                Dim ProfilePath = wdfLocation.Substring(0, wdfLocation.Length - ProfileName.Length)
                Me.oController.CheckSearchProfile(wdfLocation.ToLower)
                Dim suchTyp = Me.oController.SearchProfileTargetProgID
                Dim ExSettings As Object
                Dim oSearch As Object
                ExSettings = Me.oController.SearchProfileExSettings
                If ExSettings = 0 Then ExSettings = 7
                Dim srchQuick As WMOSRCHLib.WMQuickSearch = CreateObject("WMOSrch.WMQuickSearch")
                Dim srchIndex As WMOSRCHLib.WMIndexSearch = CreateObject("WMOSrch.WMIndexSearch")
                Dim srchObjectType As WMOSRCHLib.WMObjectTypeSearch = CreateObject("WMOSrch.WMObjectTypeSearch")
                Select Case suchTyp.ToString.ToUpper
                    Case "WMOSRCH.WMQUICKSEARCH"
                        srchQuick.WMSession = CreateObject("Windream.WMSession", Me.GetCurrentServer)
                        Me.oConnect.LoginSession(srchQuick.WMSession)
                        srchQuick.ClearSearch()
                        srchQuick.SearchProfilePath = ProfilePath
                        srchQuick.LoadSearchProfile(ProfileName)
                        oSearch = srchQuick.GetSearch()
                    Case "WMOSRCH.WMINDEXSEARCH"
                        srchIndex.WMSession = CreateObject("Windream.WMSession", Me.GetCurrentServer)
                        Me.oConnect.LoginSession(srchIndex.WMSession)
                        srchIndex.ClearSearch()
                        srchIndex.SearchProfilePath = ProfilePath
                        srchIndex.LoadSearchProfile(ProfileName)
                        oSearch = srchIndex.GetSearch()
                    Case "WMOSRCH.WMOBJECTTYPESEARCH"
                        srchObjectType.WMSession = CreateObject("Windream.WMSession", Me.GetCurrentServer)
                        Me.oConnect.LoginSession(srchObjectType.WMSession)
                        srchObjectType.ClearSearch()
                        srchObjectType.SearchProfilePath = ProfilePath
                        srchObjectType.LoadSearchProfile(ProfileName)
                        oSearch = srchObjectType.GetSearch()
                    Case Else
                        LOGGER.Info("KEIN GÜLTIGER WINDREAM-SUCHTYP")
                        Return Nothing
                End Select
                Dim WMObjects As Object
                WMObjects = oSearch.Execute
                Return oSearch.execute
            Catch ex As Exception
                LOGGER.Error(ex)
                ' bei einem Fehler einen Eintrag in der Logdatei machen
                LOGGER.Info("Fehler in GetSearchDocuments - " & ex.Message, True)
                Return Nothing
            End Try
        End If
        Return Nothing
    End Function
    ''' Liefert den Wert eines Indexes als String
    ''' _indexname = Name des zu überprüfenden Indexfeldes
    Public Function GetValueforIndex(ByVal _fullfilepath As String, _indexname As String)
        Try
            Const WMEntityDocument = 1
            Dim IndexwertAusWindream As Object = Nothing
            Dim _dok As WINDREAMLib.WMObject
            _dok = Nothing
            _dok = oSession.GetWMObjectByPath(WMEntityDocument, _fullfilepath) 'WINDREAMLib.WMEntity.WMEntityDocument
            IndexwertAusWindream = _dok.GetVariableValue(_indexname)
            Return IndexwertAusWindream.ToString
        Catch ex As Exception
            LOGGER.Error(ex)
            'MsgBox(ex.Message)
            Return Nothing
        End Try
    End Function
 #End Region
 End Class
--- a/app/DD_PM_WINDREAM/ClassParamRefresh.vb
+++ b/app/DD_PM_WINDREAM/ClassParamRefresh.vb
@@ -1,207 +0,0 @@
 Imports DigitalData.Modules.Database
 Public Class ClassParamRefresh
    Public Shared Sub Refresh_Params(DT_CHECKUSER As DataTable)
        Dim oStopwatch As New RefreshHelper.SW("Refresh_Params")
        FORCE_LAYOUT_OVERVIEW = False
        SHOW_CHARTS = True
        If DT_CHECKUSER.Rows.Count = 1 Then
            USERCOUNT_LOGGED_IN = DT_CHECKUSER.Rows(0).Item("USERCOUNT_LOGGED_IN")
            Try
                WORKING_MODE = DT_CHECKUSER.Rows(0).Item("WORKING_MODE")
            Catch ex As Exception
                WORKING_MODE = ""
            End Try
            Try
                ADDITIONAL_TITLE = DT_CHECKUSER.Rows(0).Item("ADDITIONAL_TITLE")
                If ADDITIONAL_TITLE = String.Empty Then
                    ADDITIONAL_TITLE = My.Application.Info.ProductName
                End If
            Catch ex As Exception
                ADDITIONAL_TITLE = My.Application.Info.ProductName
            End Try
            Dim oSplitWorkMode As String() = WORKING_MODE.Split("#")
            ' Use For Each loop over words and display them.
            Dim oMode As String
            For Each oMode In oSplitWorkMode
                LOGGER.Debug($"oWorkingMode Parameter: {oMode}")
                If oMode = "PM.FORCE_LAYOUT_OVERVIEW" Then
                    FORCE_LAYOUT_OVERVIEW = True
                    LOGGER.Debug($"FORCE_LAYOUT_OVERVIEW [{FORCE_LAYOUT_OVERVIEW}]")
                ElseIf oMode = "PM.NO_MASS_VALIDATOR" Then
                    SHOW_MASS_VALIDATOR = False
                    LOGGER.Debug($"SHOW_MASS_VALIDATOR [{SHOW_MASS_VALIDATOR}]")
                ElseIf oMode = "PM.NO_CHARTS" Then
                    SHOW_CHARTS = False
                    LOGGER.Debug($"SHOW_CHARTS [{SHOW_CHARTS}]")
                ElseIf oMode = "PM.DEBUG_LOG" Then
                    DEBUG = True
                    LOGCONFIG.Debug = True
                ElseIf oMode = "PM.IDBWITHWMFS" Then
                    IDB_USES_WMFILESTORE = True
                ElseIf oMode = "PM.NO_BASICCONF" Then
                    BASIC_CONF_VISIBLE = False
                    LOGGER.Debug($"BASIC_CONF_VISIBLE [{BASIC_CONF_VISIBLE}]")
                ElseIf oMode.StartsWith("PM.IDB_CONID!") Then
                    If CONNECTION_STRING_IDB <> "" And Not IsNothing(Database_IDB) Then
                        If Database_IDB.DBInitialized = True Then
                            IDB_ACTIVE = True
                            Continue For
                        End If
                    Else
                        Dim CON_ID = oMode.Replace("PM.IDB_CONID!", "")
                        Dim oConString = ClassDatabase.Get_ConnectionString(CON_ID)
                        CONNECTION_STRING_IDB = oConString
                        Database_IDB = New MSSQLServer(LOGCONFIG, CONNECTION_STRING_IDB)
                        If Database_IDB.DBInitialized = True Then
                            IDB_ACTIVE = True
                            LOGGER.Info($"IDB is active - IDB-Connection [{CON_ID}]!")
                        Else
                            IDB_ACTIVE = False
                        End If
                    End If
                    'ElseIf oMode.StartsWith("PM.IDB_APP_SERV_CONID!") Then
                    '    Dim CON_ID = oMode.Replace("PM.IDB_APP_SERV_CONID!", "")
                    '    Dim oConString = ClassDatabase.Get_ConnectionString(CON_ID)
                    '    CONNECTION_STRING_IDB_APP_SERVER = oConString
                    '    If ClassDatabase.Init(CONNECTION_STRING_IDB_APP_SERVER) = True Then
                    '        LOGGER.Info($"Got an IDB APP-Server-Connection [{CON_ID}]!")
                    '    End If
                ElseIf oMode = "PM.MONITORING" Then
                    MONITORING_ACTIVE = True
                    LOGGER.Debug($"SHOW_MASS_VALIDATOR [{SHOW_MASS_VALIDATOR}]")
                ElseIf oMode = "PM.GHOSTMODE" Then
                    GHOSTMODE_ACTIVE = True
                    LOGGER.Debug($"GHOSTMODE_ACTIVE [{GHOSTMODE_ACTIVE}]")
                ElseIf oMode.StartsWith("PM.COLORSCHEME") Then
                    Dim oColorScheme = oMode.Replace("PM.COLORSCHEME=", "")
                    RIBBON_COLOR_SCHEME = oColorScheme.ToUpper
                    LOGGER.Debug($"RIBBON_COLOR_SCHEME [{RIBBON_COLOR_SCHEME}]")
                ElseIf oMode.StartsWith("PM.NO_DETAIL_PROFILES") Then
                    NO_DETAIL_PROFILES = True
                    LOGGER.Debug($"NO_DETAIL_PROFILES [{NO_DETAIL_PROFILES}]")
                ElseIf oMode = "PM.NO_POPUP" Then
                    POPUP_REMINDER_ACTIVE = False
                    LOGGER.Debug($"POPUP_REMINDER_ACTIVE [{POPUP_REMINDER_ACTIVE}]")
                ElseIf oMode.StartsWith("PM.CONV_IDENTIFICATION") Then
                    Dim oIdent = oMode.Replace("PM.CONV_IDENTIFICATION=", "")
                    CONV_IDENTIFICATION = oIdent
                ElseIf oMode.StartsWith("PM.INACTIVITY_DURATION") Then
                    Dim oInactivityDuration = oMode.Replace("PM.INACTIVITY_DURATION=", "")
                    Try
                        INACTIVITY_DURATION = CInt(oInactivityDuration)
                        LOGGER.Debug($"InactivityDuration [{INACTIVITY_DURATION}]")
                    Catch ex As Exception
                        LOGGER.Warn($"INACTIVITY_DURATION = 0 - {ex.Message}")
                        INACTIVITY_DURATION = 0
                    End Try
                ElseIf oMode.StartsWith("PM.COL_LAST_EDITED") Then
                    Dim oLEDITEDCOL = oMode.Replace("PM.COL_LAST_EDITED=", "")
                    Try
                        LAST_EDITED_COLUMN = oLEDITEDCOL
                        LOGGER.Debug($"LAST_EDITED_COLUMN: {oLEDITEDCOL}")
                    Catch ex As Exception
                        LAST_EDITED_COLUMN = ""
                    End Try
                ElseIf oMode.StartsWith("PM.COL_LAST_ADDED") Then
                    Dim oLEDITEDCOL = oMode.Replace("PM.COL_LAST_ADDED=", "")
                    Try
                        LAST_ADDED_COLUMN = oLEDITEDCOL
                        LOGGER.Debug($"LAST_ADDED_COLUMN: {oLEDITEDCOL}")
                    Catch ex As Exception
                        LAST_ADDED_COLUMN = ""
                    End Try
                ElseIf oMode.StartsWith("PM.USE_APPSERVER") Then
                    Dim oUSE_APPSERVER = oMode.Replace("PM.USE_APPSERVER=", "")
                    Try
                        USE_APPSERVER = CBool(oUSE_APPSERVER)
                    Catch ex As Exception
                        USE_APPSERVER = False
                    End Try
                ElseIf oMode.StartsWith("PM.SEARCH1") Then
                    Dim oSearch1 = oMode.Replace("PM.SEARCH1=", "")
                    Try
                        SEARCH1 = oSearch1
                    Catch ex As Exception
                        SEARCH1 = ""
                    End Try
                ElseIf oMode.StartsWith("PM.SEARCH2") Then
                    Dim oSearch2 = oMode.Replace("PM.SEARCH2=", "")
                    Try
                        SEARCH2 = oSearch2
                    Catch ex As Exception
                        SEARCH2 = ""
                    End Try
                ElseIf oMode.StartsWith("PM.TRAFFICLIGHT_ICON") Then
                    Dim oParam = oMode.Replace("PM.TRAFFICLIGHT_ICON=", "")
                    Try
                        TL_ICON = CBool(oParam)
                    Catch ex As Exception
                        TL_ICON = False
                    End Try
                ElseIf oMode.StartsWith("PM.START_CW") Then
                    Dim oAfterReplace = oMode.Replace("PM.START_CW=", "")
                    Try
                        START_CW = True
                        Dim oSplit As String() = oAfterReplace.Split("~")
                        START_CW_CAPTION = oSplit(0)
                        Try
                            START_CW_LOC_VARIANT = oSplit(1)
                        Catch ex As Exception
                            START_CW_LOC_VARIANT = "-1"
                            LOGGER.Warn($"Could not read START_CW_LOCVARIANT : {ex.Message}")
                        End Try
                    Catch ex As Exception
                        LOGGER.Warn($"Could not read START_CW Param: {ex.Message}")
                        START_CW = False
                    End Try
                ElseIf oMode.StartsWith("PM.RibbonPageCustTitle") Then
                    Dim oAfterReplace = oMode.Replace("PM.RibbonPageCustTitle=", "")
                    RibbonPageCustTitle = oAfterReplace
                ElseIf oMode.StartsWith("PM.RibbonPageCustItm1") Then
                    Dim oAfterReplace = oMode.Replace("PM.RibbonPageCustItm1=", "")
                    RibbonPageCustItm1 = oAfterReplace
                ElseIf oMode.StartsWith("PM.ButtonExport2FolderCaption") Then
                    Dim oAfterReplace = oMode.Replace("PM.ButtonExport2FolderCaption=", "")
                    ButtonExport2Folder_Caption = oAfterReplace
                ElseIf oMode.StartsWith("PM.ButtonExport2Folder_RootFolder") Then
                    Dim oAfterReplace = oMode.Replace("PM.ButtonExport2Folder_RootFolder=", "")
                    ButtonExport2Folder_RootFolder = oAfterReplace
                Else
                    LOGGER.Info($"Wrong oMode: {oMode}")
                End If
            Next
            'If IDB_ACTIVE Then
            '    If CONNECTION_STRING_APP_SERVER <> String.Empty Then
            '        If USE_APPSERVER = True Then
            '            CONNECTION_STRING_IDB_READ = CONNECTION_STRING_APP_SERVER
            '        Else
            '            CONNECTION_STRING_IDB_READ = CONNECTION_STRING_IDB
            '        End If
            '    Else
            '        CONNECTION_STRING_IDB_READ = CONNECTION_STRING_IDB
            '    End If
            '    CONNECTION_STRING_IDB_WRITE = CONNECTION_STRING_IDB
            'End If
        End If
        oStopwatch.Done()
    End Sub
 End Class
--- a/app/DD_PM_WINDREAM/ClassSQLEditor.vb
+++ b/app/DD_PM_WINDREAM/ClassSQLEditor.vb
@@ -1,31 +0,0 @@
 Imports System.ComponentModel
 Imports System.Drawing.Design
 Imports System.Windows.Forms.Design
 Imports DD_ProcessManager.InputProperties
 Public Class ClassSQLEditor
    Inherits UITypeEditor
    Public Overrides Function GetEditStyle(context As ITypeDescriptorContext) As UITypeEditorEditStyle
        Return UITypeEditorEditStyle.Modal
    End Function
    Public Overrides Function EditValue(context As ITypeDescriptorContext, provider As IServiceProvider, value As Object) As Object
        Dim svc As IWindowsFormsEditorService = TryCast(provider.GetService(GetType(IWindowsFormsEditorService)), IWindowsFormsEditorService)
        Dim SQLSTring As String = DirectCast(value, SQLValue).Value
        If svc IsNot Nothing AndAlso SQLSTring IsNot Nothing Then
            'CURRENT_DESIGN_TYPE = "INPUT_INDEX"
            Using Form As New frmSQL_DESIGNER()
                Form.SQLCommand = SQLSTring
                If svc.ShowDialog(Form) = DialogResult.OK Then
                    Dim sql As New SQLValue(Form.SQLCommand)
                    CURRENT_SQL_CON = Form.ConnectionID
                    value = sql
                End If
            End Using
        End If
        Return value
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ModuleControlProperties.vb
+++ b/app/DD_PM_WINDREAM/ModuleControlProperties.vb
@@ -1,284 +0,0 @@
 Imports System.ComponentModel
 Imports System.ComponentModel.Design
 Imports System.Drawing.Design
 Imports System.Globalization
 Imports DigitalData.Modules.Language.Utils
 Public Module ModuleControlProperties
    Public Enum IndexTypes
        SimpleIndex = 0
        VectorIndex = 1
    End Enum
    Public Class BaseProperties
        Private _size As Size
        Private _font As Font
        <Category("Allgemein")>
        <[ReadOnly](True)>
        Public Property ChangedAt As Date
        <Category("Allgemein")>
        <[ReadOnly](True)>
        Public Property ChangedWho As String
        <Category("Allgemein")>
        <[ReadOnly](True)>
        Public Property ID() As Integer
        <Category("Allgemein")>
        Public Property Name() As String
        <Category("Anzeige")>
        Public Property Location() As Point
        <Category("Anzeige")>
        Public Property Size() As Size
            Get
                Return _size
            End Get
            Set(value As Size)
                If (value.Height <= 0) Then
                    value.Height = 1
                End If
                If (value.Width <= 20) Then
                    value.Width = 20
                End If
                _size = value
            End Set
        End Property
        <Category("Anzeige")>
        <TypeConverter(GetType(FontConverter))>
        Public Overridable Property Font As Font
            Get
                Return _font
            End Get
            Set(value As Font)
                _font = value
            End Set
        End Property
        <Category("Anzeige")>
        Public Property TextColor As Color
        Class FontConverter
            Inherits TypeConverter
            Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object
                Dim font = DirectCast(value, Font)
                Return $"{font.Name}, {font.Size}"
            End Function
        End Class
    End Class
    Public Class InputProperties
        Inherits BaseProperties
        Private _index_type As String
        Private _sql_command As String
        Private _Override_SQL As String
        Private _Enable_SQL As String
        Private _Enable_SQL_ONLOAD As String
        Private _default_value
        <Category("Allgemein")> Public Property Active() As Boolean
        Public Property Required() As Boolean
        <Category("Validierung")>
        Public Property [ReadOnly]() As Boolean
        <Browsable(False)>
        <Category("Indexierung")>
        Public Property IndexType() As IndexTypes
        ''' <summary>
        ''' Diese Eigenschaft enthält die auswählbaren Indicies, die für das Control verfügbar sind. Wird nicht direkt angezeigt.
        ''' </summary>
        <Browsable(False)>
        Public Property Indicies() As List(Of String)
        ''' <summary>
        ''' Diese Eigenschaft enthält des ausgewählten Index
        ''' </summary>
        <Category("Indexierung")>
        <TypeConverter(GetType(IndexListConverter))>
        Public Property Index() As String
        <Category("Daten")>
        Public Property SQLCommand() As SQLValue
            Get
                Return New SQLValue(NotNull(_sql_command, ""))
            End Get
            Set(ByVal value As SQLValue)
                _sql_command = value.Value
            End Set
        End Property
        Public Property Override_SQL() As SQLValue
            Get
                Return New SQLValue(NotNull(_Override_SQL, ""))
            End Get
            Set(ByVal value As SQLValue)
                _Override_SQL = value.Value
            End Set
        End Property
        Public Property Enable_SQL() As SQLValue
            Get
                Return New SQLValue(NotNull(_Enable_SQL, ""))
            End Get
            Set(ByVal value As SQLValue)
                _Enable_SQL = value.Value
            End Set
        End Property
        Public Property Enable_SQL_OnLoad() As SQLValue
            Get
                Return New SQLValue(NotNull(_Enable_SQL_ONLOAD, ""))
            End Get
            Set(ByVal value As SQLValue)
                _Enable_SQL_ONLOAD = value.Value
            End Set
        End Property
        <Category("Daten")>
        Public Property DefaultValue() As String
            Get
                Return _default_value
            End Get
            Set(value As String)
                _default_value = value
            End Set
        End Property
    End Class
    Public Class TextboxProperties
        Inherits InputProperties
        <Category("Sonstiges")>
        Public Property SetControlData As SQLValue
        <Category("Validierung")>
        <Editor(GetType(ClassRegexEditor), GetType(UITypeEditor))>
        Public Property Regex As String
        <Category("Validierung")>
        <Editor(GetType(MultilineStringEditor), GetType(UITypeEditor))>
        Public Property RegexMessage As String
    End Class
    Public Class LabelProperties
        Inherits BaseProperties
        <Category("Allgemein")>
        Public Property Text() As String
    End Class
    Public Class CheckboxProperties
        Inherits InputProperties
        <Category("Allgemein")>
        Public Property Text() As String
        <Category("Sonstiges")>
        Public Property SetControlData As SQLValue
    End Class
    Public Class ComboboxProperties
        Inherits InputProperties
        <Category("Allgemein")>
        Public Property Text() As String
        <Category("Sonstiges")>
        Public Property SetControlData As SQLValue
        <Browsable(False)>
        Public Property ChoiceLists() As List(Of String)
        <Category("Daten")>
        <TypeConverter(GetType(ChoiceListConverter))>
        Public Property ChoiceList() As String
        <Category("SpecialBehaviour")>
        Public Property DisplayAsLookUpControl As Boolean
        Public Class ChoiceListConverter
            Inherits TypeConverter
            Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean
                Return True
            End Function
            Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection
                Dim choiceListList = DirectCast(context.Instance, ComboboxProperties).ChoiceLists
                Dim values As New StandardValuesCollection(choiceListList)
                Return values
            End Function
            Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object
                If IsNothing(value) Then
                    Return ""
                Else
                    Return value.ToString()
                End If
            End Function
        End Class
    End Class
    Public Class DatepickerProperties
        Inherits InputProperties
    End Class
    Public Class GridViewProperties
        Inherits InputProperties
    End Class
    Public Class GridControlProperties
        Inherits InputProperties
        <Category("Einstellungen")>
        Public Property AllowAddNewValues As Boolean
    End Class
    Public Class ButtonProperties
        Inherits InputProperties
        Private _image_Value As String
        <Category("Allgemein")>
        Public Property Text() As String
        <Category("Image")>
        Public Property CtrlImage() As ImageValue
            Get
                Return New ImageValue(NotNull(_image_Value, ""))
            End Get
            Set(ByVal value As ImageValue)
                _image_Value = value.Value
            End Set
        End Property
    End Class
    Public Class LookupControlProperties
        Inherits InputProperties
        <Category("Einstellungen")>
        Public Property MultiSelect As Boolean
        <Category("Einstellungen")>
        Public Property AllowAddNewValues As Boolean
        <Category("Einstellungen")>
        Public Property PreventDuplicates As Boolean
        Public Property ChoiceList() As String
        <Category("SpecialBehaviour")>
        Public Property DisplayAsComboBox As Boolean
        <Category("Sonstiges")>
        Public Property SetControlData As SQLValue
    End Class
    Public Class LineLabelProperties
        Inherits BaseProperties
        <Browsable(False)>
        Public Overrides Property Font As Font
            Get
                Return Nothing
            End Get
            Set(value As Font)
            End Set
        End Property
    End Class
 End Module
--- a/app/DD_PM_WINDREAM/ModuleMySettings.vb
+++ b/app/DD_PM_WINDREAM/ModuleMySettings.vb
@@ -1,36 +0,0 @@
 Module ModuleMySettings
    ' Connection String
    Public SOURCE_INIT As Boolean = False
    Public CONNECTION_STRING_ECM As String = ""
    Public CONNECTION_STRING_IDB As String = ""
    Public IDB_ACTIVE As Boolean = False
    Public EDMIAppServerActive As Boolean = False
    Public IDB_USES_WMFILESTORE As Boolean = False
    Public BASIC_CONF_VISIBLE As Boolean = True
    Public IDB_DOC_DATA_SQL As String
    Public IDB_DT_DOC_DATA As DataTable
    Public TEST_MODE As String = False
    Public NO_DETAIL_PROFILES As Boolean = False
    Public DT_CONNECTIONS As DataTable
    ' Debug Settings
    Public DEBUG As Boolean = False
    ' Viewer Settings
    'Public VIEWER_UNIVERSAL As String = ""
    'Public VIEWER_XCHANGE As String = ""
    'Public VIEWER_SUMATRA As String = ""
    'Public VIEWER_ZOOM_LEVEL As Integer = 3
    'Public VIEWER_PDF As String = "internal"
    'Public VIEWER_ALL As String = "docview"
    Public INDEX_DMS_ERSTELLT = "DMS erstellt"
    Public INDEX_DMS_ERSTELLT_ZEIT = "DMS erstellt (Zeit)"
    Public USER_MANAGER_PATH = ""
    ' These settings are loaded from the database
    Public VERSION_DELIMITER As String = "~"
    Public FILE_DELIMITER As String = "_"
    Public WMSESSION_STARTSTOP_STARTUP As Boolean = False
 End Module
--- a/Project/licenses.licx
+++ b/Project/licenses.licx
@@ -1,19 +0,0 @@
 DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraReports.UI.XtraReport, DevExpress.XtraReports.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.Snap.Extensions.SnapDockManager, DevExpress.Snap.v19.2.Extensions, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.Snap.SnapControl, DevExpress.Snap.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.Repository.RepositoryItemProgressBar, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraVerticalGrid.PropertyGridControl, DevExpress.XtraVerticalGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraCharts.ChartControl, DevExpress.XtraCharts.v19.2.UI, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraPrinting.Preview.DocumentViewer, DevExpress.XtraPrinting.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraDataLayout.DataLayoutControl, DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
--- a/Project/licenses.licx.bak
+++ b/Project/licenses.licx.bak
@@ -1,5 +0,0 @@
 DevExpress.XtraCharts.ChartControl, DevExpress.XtraCharts.v19.2.UI, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
--- a/app/DD_PM_WINDREAM/frmAbout.resx
+++ b/app/DD_PM_WINDREAM/frmAbout.resx
--- a/app/DD_PM_WINDREAM/frmChat_NewConversation.Designer.vb
+++ b/app/DD_PM_WINDREAM/frmChat_NewConversation.Designer.vb
@@ -1,52 +0,0 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
 Partial Class frmChat_NewConversation
    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()
        Me.ChatNewConv1 = New DigitalData.Controls.ChatNewConv.ChatNewConv()
        Me.SuspendLayout()
        '
        'ChatNewConv1
        '
        Me.ChatNewConv1.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.ChatNewConv1.Location = New System.Drawing.Point(2, 1)
        Me.ChatNewConv1.Name = "ChatNewConv1"
        Me.ChatNewConv1.Size = New System.Drawing.Size(463, 472)
        Me.ChatNewConv1.TabIndex = 0
        '
        'frmChat_NewConversation
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(474, 480)
        Me.Controls.Add(Me.ChatNewConv1)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.Name = "frmChat_NewConversation"
        Me.Text = "Neue Konversation"
        Me.ResumeLayout(False)
    End Sub
    Friend WithEvents ChatNewConv1 As DigitalData.Controls.ChatNewConv.ChatNewConv
 End Class
--- a/app/DD_PM_WINDREAM/frmChat_NewConversation.vb
+++ b/app/DD_PM_WINDREAM/frmChat_NewConversation.vb
@@ -1,24 +0,0 @@
 Public Class frmChat_NewConversation
    Public Property NewConversation() As String
        Get
            Return oNewConversation
        End Get
        Set(value As String)
            oNewConversation = value
        End Set
    End Property
    Public oNewConversation As Long
    Public Sub New(oDTUsers As DataTable, oDTGroups As DataTable)
        ' Dieser Aufruf ist für den Designer erforderlich.
        InitializeComponent()
        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
        ChatNewConv1.Init(LOGCONFIG, CONNECTION_STRING_IDB, CURRENT_DOC_ID, USER_ID, USER_USERNAME, USER_LANGUAGE, oDTUsers, oDTGroups)
        AddHandler ChatNewConv1.Conversation_Created, AddressOf onConversationCreated
    End Sub
    Sub onConversationCreated()
        CURRENT_CONVERSATION_NEW = ChatNewConv1.NewConversation
        Me.Close()
    End Sub
 End Class
--- a/app/DD_PM_WINDREAM/frmDocView.Designer.vb
+++ b/app/DD_PM_WINDREAM/frmDocView.Designer.vb
@@ -1,58 +0,0 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
 Partial Class frmDocView
    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()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDocView))
        Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer()
        Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
        Me.SuspendLayout()
        '
        'DocumentViewer1
        '
        Me.DocumentViewer1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.DocumentViewer1.Location = New System.Drawing.Point(0, 0)
        Me.DocumentViewer1.Name = "DocumentViewerfrmDocView"
        Me.DocumentViewer1.Size = New System.Drawing.Size(800, 450)
        Me.DocumentViewer1.TabIndex = 0
        '
        'Timer1
        '
        Me.Timer1.Interval = 1000
        '
        'frmDocView
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(800, 450)
        Me.Controls.Add(Me.DocumentViewer1)
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.Name = "frmDocView"
        Me.Text = "DocumentViewer"
        Me.ResumeLayout(False)
    End Sub
    Friend WithEvents DocumentViewer1 As DigitalData.Controls.DocumentViewer.DocumentViewer
    Friend WithEvents Timer1 As Timer
 End Class
--- a/app/DD_PM_WINDREAM/frmDocView.resx
+++ b/app/DD_PM_WINDREAM/frmDocView.resx
@@ -1,573 +0,0 @@
 <?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>
  <metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>17, 17</value>
  </metadata>
  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        AAABAAgAMDAAAAEACACoDgAAhgAAACAgAAABAAgAqAgAAC4PAAAYGAAAAQAIAMgGAADWFwAAEBAAAAEA
        CABoBQAAnh4AADAwAAABACAAqCUAAAYkAAAgIAAAAQAgAKgQAACuSQAAGBgAAAEAIACICQAAVloAABAQ
        AAABACAAaAQAAN5jAAAoAAAAMAAAAGAAAAABAAgAAAAAAAAJAAAAAAAAAAAAAAABAAAAAQAAAAAAAEtL
        SwBiY2QAZGVmAGdnaABoaGkAbW1tAHBwcgBzc3QAdXV2AHd3eQB5eXoAenp8AH19fQCWfWkAmYBqAJCC
        dQCbiXgAoox3AKiRegCxmH8AgIGBAIKDhACEg4QAhoWFAIeHiACIh4gAiomKAIuKjACOjo4AkoqBAJqN
        gQCOj5AAkZCRAJaTkwCSkpQAlJSUAJyXkgCbmJYAlpaYAJmZmQCdm5sAn5yZAJuanQCdnZ4Ap5eHAKqT
        gACunY0AsZmGALuehACknJUApJ6aAKCengCln5wAvqKIAKCgnwCupJkAtaaYALGnnwCfoKAAoKGgAKOk
        pAClpaUAqaamAKuopwCnp6gAqaipAK2trQCxqKEAs6iqALKvqwCwr68Atq2vAL21rwCvr7AAsK+xALqu
        sgCvsLEAsLCxALO0tQC0tbYAurCyALq1sAC6srUAvbO1ALq4tAC6t7kAubm6ALy5uAC/vLsAu7u8AL68
        vADCp5IAzrCTAMywlQDHsJsAwLKmANO5owDcv6cAw7y1AMG5uwDFur0Awb29AN3BpgDPxLcAxMC7AMjA
        uQDMxb8A2sOyAOPErwDkya8A7cyrAOHBuADixbkA68u9AOfQtgDu1LoA99e5APjXugD12LsA9dm8APrY
        uQD62r0Awr7AAMLCwgDFwMIAxMPEAMTExADKxcUAzsnDAMvJxwDHx8gAyMjJAM3KyADLzM0Azc3NANbK
        wgDUy8QA1c7GANPJzADQzs0A39DBANnRyADc0MgA3NTNANDR0QDT09QA1tXVANrR0wDf19oA2NnaAN7a
        2wDe3t4A48bAAOPOwwDlz8oA5s/MAOHVzgDi2c4A7NvKAPPXxgDy2cAA9drBAPPcwwDy3MUA9t3FAPrd
        wQD63sQA89bIAPPfygD038oA+NrIAOXc1gDg398A7t/fAPDS1ADy2dkA++DGAPbgyQD14s4A+eDJAP3i
        ygD95MsA+uPMAPzjzAD75c4A/OXNAO/j1gDp4toA7OPeAPXi0ADz5NQA9ebWAPvm0QD66NMA/OjRAPro
        1gD86NYA9uHZAPPm2gD16NoA8+jeAPfq3QD66dkA+erdAPns3gDe3+AA897hAOHg4ADk4uMA4+PkAOXj
        5QDj5OUA5eXmAOji5QDq5ucA6ejnAOnp6QDr6+wA6+ztAO3t7gD24eAA9evhAPXs4QDx6+UA9+jmAPDs
        5gD27uUA+OzhAPnu5QD16ugA8+/rAPXv6AD58OcA9vHqAPjw6AD58uwA7u/wAO/w8QDx8vIA9vPwAPLz
        9ADz9PUA9fX2APjy8AD59PEA+Pb0APb3+AD49/gA9/j4APn5+gD6+/wA+/z9AP7+/gAAAAAA////AAAA
        AAAAAAAWAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPDcGAQYMAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABW0SBCDCCE0fP4+Pj4+Pj4+Pj4+Pj4
        +Pj4+Pj4+Pj4+Pj4+Pj4AAAAAAAAAAAAAAB9lZgWQgk8hNvz+Pj4+Pjz8/Pz8/Pz8/Pz8/Pz8/Pz8/Pz
        8/P4AAAAAAAAAAAAAAAATNZ9IDwLTpPz8/j4+Pj48/Pz8/Pz8/Pz8/Pz8/Pz8/Pz8/P4AAAAAAAAAAAA
        AAAAAEXWRycnFlaY7vf4+PL3+PPz8/Pz8/Pz8/Pz8/Pz8/Pz8/P4AAAAAAAAAAAAAAAAAFdR0TcmDCCD
        0fP48vf3+Pjz8/Pz8/Pz8/Pz8/Pz8/Pz8/P4AAAAAAAAAAAAAAAAAIR9ZdEaPAk8ktv48vf3+Pj39/P3
        8/fz9/P38/fz9/Pz8/P4AAAAAAAAAAAAAAAAAJLzZWWYHTcKSpbu9/f3+Pj4+Pfz8/P38/Pz9/Pz8/Pz
        8/P4AAAAAAAAAAAAAAAAAIT621GLZScVGXzR9/f3+PL3+Pj48/fz8/P38/Pz9/P38/P3AAAAAAAAAAAA
        AAAAAIT6+ttIkj8gBjyR2/ju9+7u29vu9/Pz8/Pz8/P38/Pz9/P3AAAAAAAAAAAAAAAAAJL6+vrRUZQ0
        GgpNg5GDTTwsPE59ltvu8/P38/fz8/P38/P3AAAAAAAAAAAAAAAAAIT6+vr60VGCJwYGFQoGCgoKBgMH
        IFCY2/Pz8/Pz8/fz8/P3AAAAAAAAAAAAAAAAAJH6+vr6+ttkVxYJIE5ripGOi2k8BQYnhNHz8/fz9/Pz
        8/P3AAAAAAAAAAAAAAAAAIT6+vr6+vh7PEhOj7zi8Pj46Ly8gScCIH3R9/Pz8/Pz8/f4AAAAAAAAAAAA
        AAAAAJH6+vr6+tssJ2Os4vDs7Pjs+PDmro9CAieH2/jz9/P38/P3AAAAAAAAAAAAAAAAAIT6+vr694Qn
        a7zi4uXs7Ozs7PDw4s+dPAVCmO739/Pz9/P3AAAAAAAAAAAAAAAAAJH6+vr60TdHnsnJzeXl5enp6eXi
        5eKwiQ0MhNvz9/fz8/f4AAAAAAAAAAAAAAAAAIT6+vr3hDdou8fJzeXl5eXl5enp4uXdnFgDVpjz9/j3
        8/P3AAAAAAAAAAAAAAAAAJH6+vrzNzSNu7vF5c3NzeXN5c3l5eLlr48HJ5Hz+Pj49/P3AAAAAAAAAAAA
        AAAAAIT6+vrbIDifvr7Nzc3Nzc3Nzc3Nzc3isJs3Fobu9/j4+Pf4AAAAAAAAAAAAAAAAAJL6+vrbGjmq
        qrPNxM3FxcXFzcXNzc3Nx5lXDITz8/j48vf4AAAAAAAAAAAAAAAAAIT6+vrYGi+zor7NxcXFxcXFxc3F
        zc3NxnBlCYTz8/jy9/f4AAAAAAAAAAAAAAAAAJL6+vrbIC2hor7Exc3FxcXFxcXNzc3NxnBlDJLz8/f3
        9/f4AAAAAAAAAAAAAAAAAIT6+vrmJx9uenV1dXp6pqa0tLS0tKqzoHFHIJbz9/f39/f4AAAAAAAAAAAA
        AAAAAJL6+vr3PB5eob60pnp6enp6enq0tL7EqJogPNvz9/f39/f4AAAAAAAAAAAAAAAAAIT6+vr3VyYT
        b77Fvrq+vrq+usXFxcXEcokJffP39/f39/f4AAAAAAAAAAAAAAAAAJL6+vr60UcQMXrFur66tLq+ur66
        xcWqbDcn2/P39/f39/f3AAAAAAAAAAAAAAAAAIT6+vr6+n1FD13Furq+tLS6urrFxb5tSRZ98/r39/f3
        9/f3AAAAAAAAAAAAAAAAAJL6+vr6+tg8Mg9fo7q2tra0urrFoWdgIE7z9/r6+vf39/f3AAAAAAAAAAAA
        AAAAAIT6+vr6+vrRTTQRE2FzprS2tHRnXDonUfP3+vr6+vr39/f3AAAAAAAAAAAAAAAAAJL6+vr6+vr6
        0T81OBISFDExMTA5NyBX8/f3+vr6+vr69/f3AAAAAAAAAAAAAAAAAIT6+vr6+vr6+vORPDwmMjIyJiYg
        V9j4+vr6+vr6+vr6+vf3AAAAAAAAAAAAAAAAAJL6+vr6+vr6+vr699GTgYGBh9Ht+vr6+vr6+vr6+vr6
        +vr3AAAAAAAAAAAAAAAAAIT6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vP3AAAAAAAAAAAA
        AAAAAJL6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr68/PzAAAAAAAAAAAAAAAAAIT6+vr6+vr6
        +vr6+vr6+vr6+vr6+vr6+vr6+vr6+vrz89vmAAAAAAAAAAAAAAAAAJL6+vr6+vr6+vr6+vr6+vr6+vr6
        +vr6+vr6+vr6+vPz25iEAAAAAAAAAAAAAAAAAIT6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr6TUdHQk5C
        R4QgAAAAAAAAAAAAAAAAAJL6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr6Tfr6+vPRkjcAAAAAAAAAAAAA
        AAAAAIT6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vr6Tvr6+NGSNwAAAAAAAAAAAAAAAAAAAJL6+vr6+vr6
        +vr6+vr6+vr6+vr6+vr6+vr6TvrzvJFBAAAAAAAAAAAAAAAAAAAAAIT6+vr6+vr6+vr6+vr6+vr6+vr6
        +vr6+vr6R9vRkUEAAAAAAAAAAAAAAAAAAAAAAJL6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+vjzR9GSPAAA
        AAAAAAAAAAAAAAAAAAAAAIT6+vr6+vr6+vr6+vr6+vr6+vr6+vr6+PPYR5JBAAAAAAAAAAAAAAAAAAAA
        AAAAAJL6+vr6+vr6+vr6+vr6+vr6+vr6+vr689utg0IAAAAAAAAAAAAAAAAAAAAAAAAAAIT6+vr6+vr6
        +vr6+vr6+vr6+vr6+vr48/OBNwAAAAAAAAAAAAAAAAAAAAAAAAAAAJiSk5iSkpiSk5iSkpiSk5iSkpiS
        k5OTkpMAAAAAAAAAAAAAAAAAAAAAAP7//////wAA+B//////AADwAAAAAH8AAPAAAAAAfwAA+AAAAAB/
        AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwA
        AAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/
        AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwA
        AAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/
        AAD8AAAAAH8AAPwAAAAAfwAA/AAAAAB/AAD8AAAAAH8AAPwAAAAA/wAA/AAAAAH/AAD8AAAAA/8AAPwA
        AAAH/wAA/AAAAA//AAD8AAAAH/8AAPwAAAA//wAA/AAAAH//AAD8AAAB//8AACgAAAAgAAAAQAAAAAEA
        CAAAAAAAAAQAAAAAAAAAAAAAAAEAAAABAAAAAAAAVlZWAFxcXABhYGAAZWVlAGRmaABqamoAamttAG9v
        bwBrbXAAbW5wAHFxcQBwc3QAdHR0AHV2eQB3eXoAenx9AH9/fwCAfn8Af4CAAIOEhACFhIQAiYeEAIqJ
        hwCPioUAiomKAI2KiACTjIUAkY+OAJKQjgCUkY4AmZKOAJqUjgCRkZEAmZWRAJmTlgCZl5QAm5eZAJiY
        mACdnp4AqJuOAKCgnwCpopkAtqiWALOomAC3qp0AvK2dAKSdoACloKIAoKKlAKenpwCro6YAqaamAKqo
        pQCnp6gAraaoAKeoqQCpqakAr6mqAK2trgCvsbMAsbGyALW2tgC5trYAtre4ALm4uQC8ursAu7u9AL29
        vQDCq5YAzb2tANC/qwDSv64Awr25AMG8vgDJwLYA0MG0ANrHtADcx7QA3smzAN3NvgDjzrkA69C1AOTR
        vgDv1rwA8tO2APnWtgD617kA9Ni7AP3auQDCwsMAxcXGAMnJyQDMyMoAzc3NANHNzwDNztAAz9DQANHR
        0QDT09QA1dbWANra2gDc3d0A59nKAOvdzgD73MAA/d3AAP3fxADh2tMA/ODHAPzhyQD948wA++TPAPzk
        zQDv4dMA5+DbAO/n3wD65tEA/OXRAPzn1QD66NcA/OjVAPfr3wD76tsA/erZAPrt3gD97N0A/vDeAN/g
        4ADh4eEA4+PkAOTk5ADn5+gA6erqAOvs7ADt7u4A+u3iAPzu4QD87+QA/vHiAPvw5gD98OUA+/PrAP3y
        6QD99OoA+vPsAPn07gD89e0A7/DwAPDx8QD19vYA+vXwAPj39QD7+PMA9/j4APn5+QD7/PwA/f39AAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAADASDQERAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJUpCDRRhlJqampqampqampqampqampqa
        mpoAAAAAAAAAMF8wBSlkmpqampqampqampqampqampqamgAAAAAAAAAAI2ImAz6Ampqampqampqampqa
        mpqampqaAAAAAAAAAABCL10UCFuUmpqampqampqampqampqalJoAAAAAAAAAAGRbM0oGGWGampqampqa
        mpqampqampqamgAAAAAAAAAAZJpCMzkCOYCUlICAgICUmpqampqampqaAAAAAAAAAABkmppCOhkDOSEG
        AwcROV2AlJqampqampoAAAAAAAAAAGSamppKMxEFNWRzbEoXD0JklJqampqamgAAAAAAAAAAZJqampoG
        P3SXmpqajnpLDECAmpqampqaAAAAAAAAAABkmpqaPiN6jpeXjo6OiH1MD1uUmpqampoAAAAAAAAAAGSa
        mpoRZ4iIjI6Zl46MfXYqJoCampqamgAAAAAAAAAAZJqaWyp4eH2Il46OjIh9dk4UXZqampqaAAAAAAAA
        AABkmpo5RnZxdo6OjoyMiH14VBlCmpeampoAAAAAAAAAAGSamjZOcW1xfYyOjIiMfX1WIEKampqamgAA
        AAAAAAAAZJqaNkhram1xcXh9jH19fVUjXJqampqaAAAAAAAAAABkmpo+LGpqbY52cW1rcXZ4Tylkmpqa
        mpoAAAAAAAAAAGSammQYUllrjoyIfXFta2ouNZSampqamgAAAAAAAAAAZJqahTkrVmqMjIyMiIx/Tx6A
        mpqampqaAAAAAAAAAABkmpqahBhFVH+TjoyTf1MgQJqampqampoAAAAAAAAAAGSampqahBwoR2dyaFAu
        HkKampqampqamgAAAAAAAAAAZJqampqamjkjGyAkHjKAmpqampqampqaAAAAAAAAAABkmpqampqampqa
        mpqampqampqampqamoAAAAAAAAAAAGSampqampqampqampqampqampqaZmRKPwAAAAAAAAAAZJqampqa
        mpqampqampqampqaQjo5Mz1BAAAAAAAAAABkmpqampqampqampqampqamppdmpqEQTkAAAAAAAAAAGSa
        mpqampqampqampqampqammKZlFsAAAAAAAAAAAAAZJqampqampqampqampqampqaZIRbAAAAAAAAAAAA
        AABkmpqampqampqampqampqampRKWwAAAAAAAAAAAAAAAGSampqampqampqampqampqaZlo+AAAAAAAA
        AAAAAAAAZIBkgGSAZIBkgGSAZIBkgGRfAAAAAAAAAAAAAP/////B////wAAAD+AAAA/wAAAP8AAAD/AA
        AA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AA
        AA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAD/wAAB/8AAA//AAAP/wAAP/KAAAABgAAAAwAAAAAQAIAAAA
        AABAAgAAAAAAAAAAAAAAAQAAAAEAAAAAAACBgYEAjYuIAI6MiACLjIwAjY2MAJWVlQCZmZkAnp6eAKWf
        mgCloJkApKGeALSpnQChoqIApKOgAK+qpACpqakArKysALesogCzraYAta+qALmwpwC3s64AubCoALiy
        rAC4tK8At7SxALS0tAC9vb0A1sCrANfBrADKxb8A1se4AN7NvQDx0rMA8ti/AMHCwgDHxcMAysXAAMbG
        yADPz88A2tLJAN7WzwDR0dEA2draANvc3ADg0MAA4dfMAPHZwgD938AA/uHDAP3hxAD85c4A9OPRAPTm
        1wD859IA++jVAP3p1QDx59wA8ujfAPvr2gD869oA/uzZAPvs3QD87d0A4ODgAO7u7gD67uAA/e/hAP7w
        4QD98eUA/fPpAP706wD+9ewA9fb2APf4+AD5+voA+/z8AP7+/gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAP///wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABwUAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAABRwBJEpKSkpKSkpKSkpKSkpKSgAAAAAAAAUcBSRKSkpKSkpKSkpKSkpKSgAA
        AAAAAAABHAUsSkpKSkpKSkpKSkpKSgAAAAAAAAAQBRwGLEpKSkpKSkpKSkpKSgAAAAAAAAAoLAYQDSxL
        S0tLS0tLS0tLSwAAAAAAAAAoSywNBwcaDgUFDSVKS0tLSwAAAAAAAAAoTEwsBwUWKjs6KhMWS0xMTAAA
        AAAAAAAoTExMFhZDQz8/NzgTJUxMTAAAAAAAAAAoTExMCS9DPz84ODggDktMTAAAAAAAAAAoTExMBTY/
        Pz8/PzgwA0xMTAAAAAAAAAAoTExMAjY0RkdGRkYjA0xMTAAAAAAAAAAoTExMCSEyP0dHR0YuE0xMTAAA
        AAAAAAAoTExMHxIxMjhGODIMH0xMTAAAAAAAAAAoTExMTBYMHiIiHgwVTExMTAAAAAAAAAArTExMTEwl
        CgMDDh9MTExMTAAAAAAAAAArTExMTExMTExMTExMTEpBKwAAAAAAAAArTExMTExMTExMTEwcGhoaGwAA
        AAAAAAArTExMTExMTExMTEwaTExBJAAAAAAAAAArTExMTExMTExMTEwbTEEkAAAAAAAAAAArTExMTExM
        TExMTEwcQSQAAAAAAAAAAAArTExMTExMTExMTEEnHAAAAAAAAAAAAAArKysrKysrKysrKyscAAAAAAAA
        AAD///8An///AIAADwDAAA8A4AAPAOAADwDgAA8A4AAPAOAADwDgAA8A4AAPAOAADwDgAA8A4AAPAOAA
        DwDgAA8A4AAPAOAADwDgAA8A4AAPAOAAHwDgAD8A4AB/AOAA/wAoAAAAEAAAACAAAAABAAgAAAAAAAAB
        AAAAAAAAAAAAAAABAAAAAQAAAAAAAHl5eQCDg4MAhoaGAJCQkACUlJQAm5ubAJ2dnQClnZIApp+XAKSh
        ngCpopkAoaGhAKWlpQCoqKcAq6usAK2trQC2rqUAuK2hALmvpAC2sKoAt7KuALiwqAC8tKsAsrKyALW1
        tQC7t7MAvrixALm5uQC9vb0AwLOmAMa3pwDHvbIA3MizAODJsgDn0LkA4dC/APPYvgDAwMAAxcXFAMrK
        ygDf2dMA39vXAOHQwADm2MoA8dnAAPPeyQDh29YA6t7RAOHd2QD04MsA/ePKAOjj3gDp5N4A/OjUAPLl
        2AD15tgA8+jcAPrp2QD969kA/OzaAPnr3AD77d4A/e3dAN/f4ADi4eIA5eXmAO3r6gDs7OsA7uzsAP7x
        4wD98uYA8fDxAPLy9ADz9PUA9fX2APf3+AD3+PkA+fn6APv7/AD7/PwA/v7+AAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAA////AAwMAQEBAQEBAQEBAQEBAQAMDAFBSUlJSUlMSU5MTgMAAAwHD0FJ
        SUlMSU5JTk4EAAAAAwwYQUVFRUlJTk5OBwAAAAwYBAwVFRMbMUxOTg8AAAAPQQwgMDk3LCAxTk4QAAAA
        GEUVMD8/NjYrFE5OGAAAABhFEzg/Pz8/LglOThgAAAAYRRMyP0dHRzILTk4cAAAAHEgVIzM/Rz8kG05O
        HAAAABxJMB8iJSUiEzVOThwAAAAcTkkwEQgIFDVORUEcAAAAHE5OTk5OTk5OHBwcHAAAACZOTk5OTk5O
        TihJHAAAAAAmTk5OTk5OTk4oHAAAAAAAJiYmJiYmJiYmJgAAAAAAAQAAAAEAAIABAADAAQAAwAEAAMAB
        AADAAQAAwAEAAMABAADAAQAAwAEAAMABAADAAQAAwAMAAMAHAADADwAAKAAAADAAAABgAAAAAQAgAAAA
        AACAJQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB/fH0DUE9QOSUlJXYGBgaAAAAAXgAA
        AEMMDAwuAgICKAAAACcAAAAnAAAAJwAAACcAAAAnAAAAJwAAACcAAAAnAAAAJwAAACcAAAAnAAAAJwAA
        ACcAAAAnAAAAJwAAACcAAAAnAAAAJwAAACcAAAAnAAAAJwAAACcAAAAnAAAAJwAAACcAAAAnAAAAJwAA
        ACcAAAAnAAAAHQAAAAoAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB1c3RDkI+Q2Jyc
        nPVbW1vgAgICtQAAAJcCAgKDAwMDeQAAAHYAAAB2AAAAdgAAAHYAAAB2AAAAdgAAAHYAAAB2AAAAdgAA
        AHYAAAB2AAAAdgAAAHYAAAB2AAAAdgAAAHYAAAB2AAAAdgAAAHYAAAB2AAAAdgAAAHYAAAB2AAAAdgAA
        AHYAAAB2AAAAdgAAAHYAAABvAAAATQAAABsAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AACgnJ+45OPj/4+Pj/+qqar/f35+/46Oj//Jycn/5eXm//X19v/39/j/9/f4//f3+P/39/j/9/f4//f3
        +P/39/j/9/f4//f3+P/39/j/9/f4//f3+P/39/j/9/f4//f3+P/39/j/9/f4//f3+P/39/j/9/f4//f3
        +P/39/j/9/f4//f3+P/39/j/9/f4//f3+P/39/j/AAAAZwAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAACglpqY39fa/t/d3v+Eg4T/qqmp/3Z1df+hoaH/zc3O/+jp6v/19vf/9vf4//b3
        +P/29/j/9vf4//b3+P/29vf/9vb3//X29//19vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X2
        9//19vf/9fX2//T19v/09fb/9PX2//T19v/09fb/9PX2//T19v/39/j/AAAAaAAAACMAAAACAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACZkpUusKOn3uji5f/Ew8T/iomK/6emp/91dXb/sLCx/9XW
        1//w8fL/9vf4//b3+P/29/j/9vf4//b3+P/29/j/9vb3//b29//19vf/9fb3//X29//19vf/9fb3//X2
        9//19vf/9fb3//X29//19vf/9fb3//X19v/09fb/9PX2//T19v/09fb/9PX2//T19v/39/j/AAAAaAAA
        ACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACNiYsBkoqNSrOoqv/q5uf/sK+v/5WV
        lf+VlJT/gYGB/7i4uf/e3+D/8fLz//b3+P/29/j/9vf4//b3+P/29/j/9vf4//b29//29vf/9fb3//X2
        9//19vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X29//19vf/9fX2//T19v/09fb/9PX2//T1
        9v/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAjoqNAbu4
        uv+6sLL/5eLj/52bm/+dnJ3/fn5+/4+PkP/IyMj/5OTl//T19v/29/j/9vf4//b3+P/29/j/9vf4//b3
        +P/29/f/9vb3//b29//19vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X1
        9v/09fb/9PX2//T19v/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAM3Nzf/EwMP/xLq8/+bk5f+Hhob/pKSk/25vb/+oqKj/0NDR/+zs7f/19vf/9vf4//b3
        +P/29/j/9vf4//b3+P/29/j/9vf4//b29//29vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X2
        9//19vf/9fb3//X29//19fb/9PX2//T19v/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/y8vP/w77A/8e7vv/e2tv/j46O/5+fn/91dXb/r6+w/9jY
        2f/x8fL/9vf4//b3+P/29/j/9vf4//b3+P/29/j/9vf4//b3+P/29vf/9vb3//X29//19vf/9fb3//X2
        9//19vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X19v/39/j/AAAAaAAAACMAAAACAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/4+Pn/6+vs/7qztv/Tycz/v7y8/5OS
        k/+AgYL/h4eI/8LCw//k5OX/9fX2//f3+P/29/j/9vf4//b3+P/29/j/9vf4//b3+P/29/j/9vb3//b2
        9//29vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X29//39/j/AAAAaAAA
        ACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/4+Pn/+Pj5/+3t
        7v+2ra//2tHT/6mmpv+Pj4//b29v/6Chof/Q0dL/6urr//b29//29vf/9PX2//Hy8//t7u//7O3u/+7v
        8P/y8/T/9PX2//X29//29vf/9vb3//X29//19vf/9fb3//X29//19vf/9fb3//X29//19vf/9fb3//X2
        9//39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7O
        zv/4+fr/+Pj5//j4+f/m5ef/u7K1/9vS0/+hnp//h4aH/3V1dv+vsLH/y8zN/9HR0v/ExMT/sLCx/6Ch
        of+dnp//o6Sk/7Gxsv/Cw8P/2drb/+bn5//w8fL/9fX2//b29//19vf/9fb3//X29//19vf/9fb3//X2
        9//19vf/9fb3//X29//39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAM7Ozv/4+fr/+Pn6//j4+f/39/j/5ePl/72ztf/KxMX/lpOT/2xsbP9sbW3/gICB/3V2
        d/9sbG7/dXV2/3p6fP93d3n/aWlr/2NjZf9ub2//jo6P/7i5uv/Y2dr/6+zt//Pz9P/29vf/9vb3//X2
        9//19vf/9fb3//X29//19vf/9fb3//X29//39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/4+fr/+Pn6//j5+v/4+Pn/+Pj5/+rp6v/Bubv/vry8/4eH
        iP9xcXP/i4mM/7q1sv/Mxb//1s/G/9nQyP/Y0cj/1M3H/8TAu/+lpaT/Z2do/2xsbf+UlZX/zc3O/+Tl
        5v/z8/T/9vb3//b29//19vf/9fb3//X29//19vf/9fb3//X29//39/j/AAAAaAAAACMAAAACAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/4+fr/+Pn6//j5+v/4+fr/+Pn6//j4
        +f/Bv8H/n6Ch/7Cvsf+6tbD/2tLK/+ji2v/w7Ob/9vPw//n4+P/49vT/8+/r/+zj3v/m3Nf/zsnD/5aV
        lP9kZGX/jo6P/8TFxf/j5OX/9PX2//b29//29vf/9fb3//X29//19vf/9fb3//X29//39/j/AAAAaAAA
        ACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/5+fr/+Pn6//j5
        +v/4+fr/+Pn6/+7v7/+enp//lpaZ/8O8tf/k3dX/8evl//fy6//58uz/+fTw//v28v/69fL/+fTw//jy
        8P/16un/7t/f/9zUzf+rqKf/YmNk/5WVlv/Nzc7/7O3u//X29//29vf/9vb3//X29//19vf/9fb3//X2
        9//39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7O
        zv/5+fr/+fn6//n5+v/4+fr/9vf3/8jIyf+XlZj/yMC5/+rj2//17OT/9ezj//fv5//58ev/+fLs//ny
        7P/58uz/+fLs//fx6//28ev/9uro//Pe4f/h1c7/o6Oi/2ZmZ/+qqqv/2drb//Hy8//29/j/9vf4//b2
        9//29vf/9fb3//X29//39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAM7Ozv/5+fr/+fn6//n5+v/5+fr/5ubn/5mZm/+6tbD/4tnO//Pp3//z6N3/9evh//nv
        5v/57+f/+e/n//nw5//58Oj/+PDo//jw6P/28Oj/9e/o//fo5v/x2Nv/1MvE/318fv98fH3/ysrL/+jp
        6v/19vf/9vf4//b3+P/29vf/9vb3//X29//39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/5+fr/+fn6//n5+v/39/j/ycnK/5uanf/PxLf/7+PW//Pm
        2v/06Nr/9+zh//nu4//57uP/+u7k//nu5P/57uT/+e/k//jv5f/37+X/9u7m//Xu5v/24eD/5s/M/7q4
        tP9kZWb/tLW2/9zd3v/19vf/9vf4//b3+P/29/j/9vb3//b29//39/j/AAAAaAAAACMAAAACAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/5+vv/+fn6//n5+v/z8vP/nJye/6Wf
        nP/f0MH/9OXV//Pk1P/26Nr/+Ozg//ns3//57N//+u3f//nt4P/57eD/+e3h//nt4f/47eL/9+3j//bu
        5P/07OP/8NLU/9zQyP9wcHH/lpeY/9HS0//z9PX/9vf4//b3+P/29/j/9vf4//b29//39/j/AAAAaAAA
        ACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/5+vv/+fr7//n5
        +v/v7u7/i4uN/7Gnn//s28r/9OLQ//Ti0P/36tz/+Ove//rr3f/669z/+uvc//rr3P/6693/+uzd//ns
        3v/47OD/+Ozh//fs4f/17eL/89rY/+XPyv+goJ//hISE/83Oz//w8fL/9vf4//b3+P/29/j/9vf4//b3
        +P/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7O
        zv/5+vv/+fr7//n6+//r6ej/iYmK/7SmmP/z38r/9N/K//Xizv/56tz/+erb//vr2v/76tr/++rZ//rq
        2f/66tr/+uva//rr2//5693/+Ove//jr3//27OD/9uDa/+PGwP+8ubj/eHh5/8zMzf/v8PH/9vf4//b3
        +P/29/j/9vf4//b3+P/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAM7Ozv/6+vv/+fr7//n6+//p6Of/iIeI/66djf/24Mj/89zF//fi0P/66tv/+unY//vp
        1//66db/++jW//vp1//76df/++nX//rq2P/66tr/+erc//jr3f/369//9+Pb/+LBuf/Bvb3/dXV2/83N
        zv/x8fL/9/f4//b3+P/29/j/9vf4//b3+P/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/6+vv/+vr7//r6+//q6ej/j4+R/6eXh//y2cD/9drB//fh
        y//66Nb/+unY//vq2f/76dj//OjX//zo1v/86df/++nX//vq2f/76tr/+urd//nr3v/47N7/9+HY/+HB
        uP+/vLv/enp7/9HS0//09PT/9/f4//f3+P/29/j/9vf4//b3+P/39/j/AAAAaAAAACMAAAACAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/6+vv/+vr7//r6+//v7ez/lpeY/5qN
        gf/kya//99q9//XYu//317n/+Ne6//ravP/627//+97B//vfxP/74Mb/++DI//rgyf/54cn/+ODJ//fg
        yv/14s7/89fG/+LFuf+ysLD/ioqL/9na2//19vf/9/f4//f3+P/39/j/9vf4//b3+P/39/j/AAAAaAAA
        ACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/6+vv/+vr7//r6
        +//z8vL/n6Cg/5KKgf/MsJX/+Ni5//rjzP/64cr/+t3C//ravP/72br/+9m6//vZuv/62rz/+tu+//rc
        wv/53sX/+eDK//jj0P/359f/89bI/+POw/+QkJH/pqan/+bn5//3+Pn/9/j5//f3+P/39/j/9/f4//f3
        +P/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7O
        zv/6+vv/+vr7//r6+//29vb/u7u8/5uYlv+okXr/7cyr//vjzP/76db/++fR//vmz//85s7//eXO//zm
        z//85s///ebR//zn0v/76NT/+ujW//np2f/559f/68u9/9bKwv9zc3T/xMXF//Hy8//3+Pn/9/j5//f4
        +f/3+Pn/9/f4//f3+P/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAM7Ozv/6+vv/+vr7//r6+//6+vv/5uTk/66urv+QgnX/vp+D//TZvP/86tX/++bO//vj
        zf/8483//ePL//zjzP/8483//eTO//vl0P/759L/+ujU//ro1v/42sj/2sOy/56dnP+UlJX/6urr//f4
        +P/3+Pn/9/j5//f4+f/3+Pn/9/j5//f3+P/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/6+/z/+vv8//r6+//6+vv/9vX1/8LBwf+yr6v/ln1p/86w
        k//66NP//ejQ//zkzP/948v//eHK//3iy//948z//eTN//vlz//759H/++jV//rgy//jxK//vbWv/4KD
        hP/Hx8j/9fX2//j4+f/3+Pn/9/j5//f4+f/3+Pn/9/j5//f4+f/39/j/AAAAaAAAACMAAAACAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/7+/z/+vv8//r7/P/6+vv/+vr7/+fm
        5/+jpKT/pZyX/5mAav/HsJv/8dzG//znzv/95cz//eTL//3jy//948v//eXN//3n0f/86NL/9tzF/9y/
        p//Asqb/jo+Q/7O0tf/x8fH/+Pj5//j4+f/4+Pn/+Pj5//f4+f/3+Pn/9/j5//f4+f/39/j/AAAAaAAA
        ACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/7+/z/+/v8//r7
        /P/6+/z/+vr7//r6+v/g39//r7Cx/6Semv+biXn/qpOA/9O5o//n0Lb/89zD//riyP/74sj/9t7G/+7U
        uv/dwab/wqeS/7Goof+SkpT/urq6//Dx8f/4+fr/+Pj5//j4+f/4+Pn/+Pj5//j4+f/3+Pn/9/j5//f4
        +f/39/j/AAAAaAAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7O
        zv/7+/z/+/v8//v7/P/6+/z/+vv8//r6+//5+fn/4+Pk/6enqP+hnp3/rqSZ/5yKeP+ijHf/sZh//7uf
        hf++ooj/uJ6G/7GZhv+2ppn/n5yZ/4+PkP+7u7v/8vPz//j5+v/4+fr/+Pn6//j5+v/4+Pn/+Pj5//j4
        +f/4+Pn/9/j5//f4+f/39/j/AAAAaQAAACMAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAM7Ozv/7+/z/+/v8//v7/P/7+/z/+vv8//r7/P/6+/z/+vr6//X09f/Q0ND/paSk/6Ce
        nv+dl5L/pJuU/6Sclf+mnZf/nJeS/5mYmP+QkJH/vr29/+no6P/49/j/+fn6//n5+v/4+fr/+Pn6//j5
        +v/4+fr/+Pj5//j4+f/4+Pn/+Pj5//f4+f/39/j/AAAAagAAACQAAAACAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/6+/z/+vv8//r6
        +//6+vv/9fT1/+fm5v/X1dT/zcrI/8rHxf/Lycf/0M7N/+Hg4P/t7e7/+fn6//n5+v/5+fr/+fn6//n5
        +v/5+fr/+Pn6//j5+v/4+fr/+Pn6//j4+f/4+Pn/+Pj5//j4+f/39/j/AAAAawAAACMAAAACAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/7+/z/+/v8//v7/P/7+/z/+/v8//v7
        /P/7+/z/+vv8//r7/P/6+vv/+vr7//r6+//6+vv/+vr7//r6+//6+vv/+vr7//n6+//5+vv/+fr7//n5
        +v/5+fr/+fn6//n5+v/5+fr/+fn6//j5+v/4+fr/+Pn6//j5+v/4+fr/+Pj5//b29v/39/j/AAAAagAA
        ACIAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/7+/z/+/v8//v7
        /P/7+/z/+/v8//v7/P/7+/z/+/v8//r7/P/6+/z/+vv8//r6+//6+vv/+vr7//r6+//6+vv/+vr7//r6
        +//5+vv/+fr7//n6+//5+vv/+fn6//n5+v/5+fr/+fn6//n5+v/4+fr/+Pn6//j5+v/4+fr/9vb2//Ly
        8v/39/j/AAAAXQAAABwAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7O
        zv/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+vv8//r7/P/6+vv/+vr7//r6
        +//6+vv/+vr7//r6+//6+vv/+vr7//n6+//5+vv/+fr7//n5+v/5+fr/+fn6//n5+v/5+fr/+fn6//n5
        +v/39/f/8/Pz/+/v7//v7+//AAAAagAAACIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAM7Ozv/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//r7
        /P/6+/z/+vr7//r6+//6+vv/+vr7//r6+//6+vv/+vr7//r6+//5+vv/+fr7//n6+//5+vv/+fr7//n6
        +//7+/v/+/v7//X19f/19fX/6+vr/9/f3//Kysv/AAAAPAAAAA8AAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/7/P3/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7
        /P/7+/z/+/v8//v7/P/6+/z/+vv8//r7/P/6+vv/+vr7//r6+//6+vv/+vr7//r6+//6+vv/+fr7//n6
        +//5+vv/rq6u/66urv+urq7/rq6u/66urv+urq7/rq6u/8jIyv8+Pj6YAAAAHAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/8/P3/+/z9//v7/P/7+/z/+/v8//v7
        /P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//r7/P/6+/z/+vr7//r6+//6+vv/+vr7//r6
        +//6+vv/+vr7//r6+//6+vv/rq6u////////////+fn5//Pz8//h4eH/09PU/4CAgMkDAwMrAAAABwAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/8/P3//Pz9//z8
        /f/7/P3/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/6+/z/+vv8//r6
        +//6+vv/+vr7//r6+//6+vv/+vr7//r6+//7+/v/rq6u///////5+fn/8/Pz/+Hh4f/T09T/hoaGyAMD
        AywAAAAIAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7O
        zv/8/P3//Pz9//z8/f/8/P3/+/z9//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7
        /P/7+/z/+vv8//r7/P/6+vv/+vr7//r6+//6+vv/+vr7//r6+//7+/v/rq6u//n5+f/z8/P/4eHh/9PT
        1P+SkpLMAwMDLwAAAAgAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAM7Ozv/8/P3//Pz9//z8/f/8/P3//Pz9//v8/f/7+/z/+/v8//v7/P/7+/z/+/v8//v7
        /P/7+/z/+/v8//v7/P/7+/z/+/v8//r7/P/6+/z/+vv8//r6+//6+vv/+vr7//n5+f/19fX/rq6u/+3t
        7f/h4eH/09PU/5GRkcsCAgIsAAAACAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/8/P3//Pz9//z8/f/8/P3//Pz9//z8/f/8/P3/+/z9//v7
        /P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+vv8//r7/P/6+vv/+Pj4//X1
        9f/19fX/rq6u/+Hh4f/T09T/hIWFxQICAi0AAAAHAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/8/P3//Pz9//z8/f/8/P3//Pz9//z8
        /f/8/P3//Pz9//v8/f/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//r7
        /P/4+Pj/9PT0//Ly8v/r6+v/rq6u/9PT1P+UlJTPAQEBLAAAAAgAAAABAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7Ozv/8/P3//Pz9//z8
        /f/8/P3//Pz9//z8/f/8/P3//Pz9//z8/f/7/P3/+/v8//v7/P/7+/z/+/v8//v7/P/7+/z/+/v8//v7
        /P/7+/z/+/v8//v7/P/4+Pj/8/Pz/+/v7//f39//yMjK/5iYmM0DAwMvAAAACAAAAAEAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7O
        zv/39/j/9/f4//f3+P/39/j/9/f4//f3+P/39/j/9/f4//f3+P/39/j/9/f4//f3+P/39/j/9/f4//f3
        +P/39/j/9/f4//f3+P/39/j/9/f4//f3+P/39/j/8/Pz//Pz8//Kysv/gICAwwICAicAAAAHAAAAAQAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAANbW1v/W1tb/1tbW/9bW1v/W1tb/1tbW/9bW1v/W1tb/1tbW/9bW1v/W1tb/1tbW/9bW
        1v/W1tb/1tbW/9bW1v/W1tb/1tbW/9bW1v/W1tb/1tbW/9bW1v/W1tb/1tbW/9bW1v91lZdxAAAAGwAA
        AAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPAA
        AAAADwAA8AAAAAAPAADwAAAAAA8AAPAAAAAADwAA8AAAAAAPAADwAAAAAA8AAPgAAAAADwAA/AAAAAAP
        AAD8AAAAAA8AAPwAAAAADwAA/AAAAAAPAAD8AAAAAA8AAPwAAAAADwAA/AAAAAAPAAD8AAAAAA8AAPwA
        AAAADwAA/AAAAAAPAAD8AAAAAA8AAPwAAAAADwAA/AAAAAAPAAD8AAAAAA8AAPwAAAAADwAA/AAAAAAP
        AAD8AAAAAA8AAPwAAAAADwAA/AAAAAAPAAD8AAAAAA8AAPwAAAAADwAA/AAAAAAPAAD8AAAAAA8AAPwA
        AAAADwAA/AAAAAAPAAD8AAAAAA8AAPwAAAAADwAA/AAAAAAPAAD8AAAAAA8AAPwAAAAAHwAA/AAAAAAf
        AAD8AAAAAD8AAPwAAAAAPwAA/AAAAAA/AAD8AAAAAH8AAPwAAAAA/wAA/AAAAAH/AAD8AAAAA/8AAPwA
        AAAH/wAA/AAAAA//AAD8AAAAP/8AACgAAAAgAAAAQAAAAAEAIAAAAAAAgBAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAPDw9TCgoKfAAAAFUAAAA3AAAAIQAAACAAAAAgAAAAIAAAACAAAAAgAAAAIAAA
        ACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAGAAA
        AAgAAAAAAAAAAAAAAAAAAAAAiIGEwHZ0dexycnL6ExMTtgAAAIAAAABrAAAAYAAAAGAAAABgAAAAYAAA
        AGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAA
        AGAAAABIAAAAGAAAAAAAAAAAAAAAAAAAAACCfH/Kwry//7y6u/9xcXH/g4SE/8/Q0P/u7+//+Pj4//j4
        +P/3+Pj/9/j4//f4+P/3+Pj/9/j4//f39//29/f/9vf3//b39//29/f/9vf3//b39//29/f/9fb2//X2
        9v/19vb/9fb2/wAAAGAAAAAgAAAAAAAAAAAAAAAAAAAAAG1obCmIgYTA0s7P/6enqP9kZWX/np+f/9bX
        1//09fX/+Pj4//j4+P/3+Pj/9/j4//f4+P/3+Pj/9/j4//f39//29/f/9vf3//b39//29/f/9vf3//b3
        9//29/f/9vb2//X29v/19vb/AAAAYAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAG1obCmZk5b/0c3P/5iY
        mP9hYGD/tba2/9/g4P/3+Pj/+Pn5//j4+P/3+Pj/9/j4//f4+P/3+Pj/9/j4//f39//29/f/9vf3//b3
        9//29/f/9vf3//b39//29/f/9vb2//X29v8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALq5
        uf+knaD/zMjK/4WEhP9vb2//xcbG/+jp6f/4+fn/+Pn5//j4+P/4+Pj/9/j4//f4+P/3+Pj/9/j4//f4
        +P/39/f/9vf3//b39//29/f/9vf3//b39//29/f/9vf3/wAAAGAAAAAgAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAA1tbW/8XExf+ro6b/v7y8/2pqav+Li4v/0dLS//Hy8v/4+fn/+Pn5//j4+P/4+Pj/9/j4//f4
        +P/3+Pj/9/j4//f4+P/39/f/9vf3//b39//29/f/9vf3//b39//29/f/AAAAYAAAACAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAADW1tb/+vr6/7q4uv+tpqj/q6mp/1xcXP+urq7/3d3d//Dx8f/o6en/3+Dg/9vb
        2//c3Nz/4eLi/+vs7P/29/f/9/j4//f4+P/39/f/9vf3//b39//29/f/9vf3//b39/8AAABgAAAAIAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAANbW1v/6+vr/+vr6/7i1t/+vqar/ioiJ/2ZmZv+np6f/kZGR/21u
        cP9kZmj/amtt/3+AgP+qqqr/0NHR/9zd3f/w8fH/9/j4//f4+P/39/f/9/f3//b39//29/f/9vf3/wAA
        AGAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA1tbW//r7+//6+vr/+Pj4/8C8vv+ppqb/dnd6/2Vn
        af+qqKX/0tLQ/+fg2//h2tP/wr25/4qJh/91dnj/u7u7/9bX1//v8PD/9/j4//f4+P/3+Pj/9/f3//b3
        9//29/f/AAAAYAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADW1tb/+vv7//r7+//6+vr/8fHx/2tt
        cP+6t7X/7+ff//r28f/5+fn/+fn5//j39f/58+z/9+vf/8nAtv9wc3T/uLi4/9na2v/19vb/9/j4//f4
        +P/3+Pj/9/f3//b39/8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANbW1v/7+/v/+vv7//r7
        +/+xsbL/mZeU//fr3//69O3/+fTv//n18P/69O7/+/Xw//vz6//67uP/+u3e/9DBtP93eXr/ysrK/+rr
        6//3+Pj/9/j4//f4+P/3+Pj/9/f3/wAAAGAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA1tbW//v7
        +//7+/v/7e7u/3p8ff/r3c7/++7i//vt4f/78Ob/+/Pt//v48//89e///PPr//zw5//769v/+ubT/6mi
        mv+dnZ7/4ODg//f4+P/3+Pj/9/j4//f4+P/3+Pj/AAAAYAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AADW1tb/+/v7//v7+//CwsP/qaOZ//ro1//76df/++rb//zu4v/99e///PTs//zz6v/88ef//O/k//zt
        4P/75tD/2se0/3+AgP/R0dL/+Pj4//j4+P/3+Pj/9/j4//f4+P8AAABgAAAAIAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAANbW1v/7/Pz/+/v7/6eoqf/Nva3//OfS//vkz//859X//fHn//306//98uj//PHn//zw
        5f/87uH//eze//zp1v/v1rz/jYqI/7i5uv/4+fn/+Pj4//j4+P/3+Pj/9/j4/wAAAGAAAAAgAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAA1tbW//v8/P/6+/v/oKKl/9zHtP/848n//ODH//zkzv/96tr//fHn//3y
        6f/98Ob//e/i//3u4P/97N3//eva//rXuf+ZlI//vL2///j5+f/4+fn/+Pj4//j4+P/3+Pj/AAAAYAAA
        ACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADW1tb//Pz8//v7+/+go6X/0r+u//3fw//93MD//eHI//zk
        zv/85dD//ejV//3t4P/98OT//u/j//3t3v/97t7/8tO2/5mVkP/Gxsf/+Pn5//j5+f/4+fn/+Pn5//j4
        +P8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANbW1v/8/Pz/+/v7/6+xs/+zqJj/+9zA//3a
        uv/94cn//vPo//3l0f/94sr//eHK//3fxv/95M3//ebT//3p1P/eybP/oKCf/9PT1P/5+fn/+Pn5//j5
        +f/4+fn/+Pn5/wAAAGAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA1tbW//z8/P/8/Pz/zc7Q/4+K
        hf/r0LX//dq4//7fxP/+8+r//vLo//7v4v/+6tj//ePM//3iyf/938T//d7A/7ytnf+oqqr/6+zs//n5
        +f/5+fn/+Pn5//j5+f/4+fn/AAAAYAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADW1tb//P39//z8
        /P/n5+j/rKyt/7aolv/51rb//d7A//7x5//+8eX//vDl//7x5f/+8OX//vDj//7w3//jzrn/kpCO/97f
        3//3+Pj/+fr6//n5+f/5+fn/+fn5//j5+f8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANbW
        1v/9/f3//P39//r6+v/i4uL/iYeE/8Krlv/02Lv//vDe//737P/+9er//vXp//716v/+8uL/5NG+/5mS
        jv+2t7j/+vr6//r6+v/5+vr/+fr6//n6+v/5+fn/+fn5/wAAAGAAAAAgAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAA1tbW//39/f/9/f3//P39//z8/P/j4+T/kY+O/6ibjv/Qv6v/59nK/+/h0//r3c7/3c2+/7eq
        nf+UkY7/u7u9//r7+//6+vr/+vr6//r6+v/5+vr/+fr6//n6+v/5+fn/AAAAYAAAACAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAADW1tb//f39//39/f/9/f3//P39//z8/P/u7u7/sLCx/5iVkv+TjIX/m5WO/5uV
        kf+Uko//p6en/+Dg4P/7+/v/+vv7//r7+//6+vr/+vr6//r6+v/5+vr/+fr6//n6+v8AAABgAAAAIAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAANbW1v/9/f3//f39//39/f/9/f3//P39//z9/f/8/Pz//Pz8//z8
        /P/8/Pz//Pz8//v8/P/7+/v/+/v7//v7+//7+/v/+vv7//r7+//6+vr/+vr6//r6+v/5+vr/1NTU/wAA
        AGAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA1tbW//39/f/9/f3//f39//39/f/9/f3//f39//z9
        /f/8/Pz//Pz8//z8/P/8/Pz//Pz8//v8/P/7/Pz/+/v7//v7+//7+/v/+vv7//r7+//W1tb/zs7O/7+/
        v/+4uLj/AAAAVQAAABsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADW1tb//f39//39/f/9/f3//f39//39
        /f/9/f3//f39//z9/f/8/Pz//Pz8//z8/P/8/Pz//Pz8//v8/P/7/Pz/+/v7//v7+/+ysrL/q6ur/6mp
        qf+pqan/r6+v/7i4uP4AAAA3AAAADgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANbW1v/+/v7//f39//39
        /f/9/f3//f39//39/f/9/f3//f39//z9/f/8/Pz//Pz8//z8/P/8/Pz//Pz8//v8/P/7/Pz/+/v7/8bG
        xv/19fX/9PT0/+Pj4/+8vLz+ZGRkhAAAABQAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA1tbW//7+
        /v/+/v7//f7+//39/f/9/f3//f39//39/f/9/f3//f39//z9/f/8/f3//Pz8//z8/P/8/Pz//Pz8//z8
        /P/7/Pz/zs7O//r6+v/r6+v/ysrK/m1tbX8AAAAXAAAAAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AADW1tb//v7+//7+/v/+/v7//f7+//39/f/9/f3//f39//39/f/9/f3//f39//39/f/8/f3//Pz8//z8
        /P/8/Pz//Pz8//z8/P/Nzc3/5OTk/8nJyf5oaGh/AAAAFwAAAAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAANbW1v/+/v7//v7+//7+/v/+/v7//f7+//39/f/9/f3//f39//39/f/9/f3//f39//39
        /f/8/f3//Pz8//z8/P/8/Pz/6urq/8PDw//Hx8f+ZWVlfgAAABcAAAADAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAA1tbW//7+/v/+/v7//v7+//7+/v/+/v7//v7+//39/f/9/f3//f39//39
        /f/9/f3//f39//39/f/8/f3//Pz8//z8/P/c3Nz/v7+//mtra4IAAAAZAAAABAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADW1tb/1tbW/9bW1v/W1tb/1tbW/9bW1v/W1tb/1tbW/9bW
        1v/W1tb/1tbW/9bW1v/W1tb/1tbW/9bW1v/W1tb/1tbW/8zMzPiCgoJvAAAAEgAAAAMAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAA4AAAA8AAAAPAAAADwAAAA+AAAAPwAAAD8AAAA/AAAAPwAAAD8AAAA/AA
        AAPwAAAD8AAAA/AAAAPwAAAD8AAAA/AAAAPwAAAD8AAAA/AAAAPwAAAD8AAAA/AAAAPwAAAD8AAAA/AA
        AAPwAAAD8AAAB/AAAA/wAAAf8AAAP/AAAH8oAAAAGAAAADAAAAABACAAAAAAAGAJAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAABgAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAIAAA
        ACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAYAAAACAAAAAAAAAAAAAAAAJmZmf9mZma9WFhYawAA
        AEgAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAA
        AGAAAABIAAAAGAAAAAAAAAAAAAAAAGZmZr29vb3/gYGB/8HCwv/19vb/9fb2//X29v/19vb/9fb2//X2
        9v/19vb/9fb2//X29v/19vb/9fb2//X29v/19vb/9fb2//X29v8AAABgAAAAIAAAAAAAAAAAAAAAAGZm
        ZlxmZma9vb29/4uMjP/Cw8P/9vf3//b39//29/f/9vf3//b39//29/f/9vf3//b39//29/f/9vf3//b3
        9//29/f/9vf3//b39/8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAABmZmZcgYGB/729vf+LjIz/2dra//b3
        9//29/f/9vf3//b39//29/f/9vf3//b39//29/f/9vf3//b39//29/f/9vf3//b39/8AAABgAAAAIAAA
        AAAAAAAAAAAAAAAAAAAAAAAAqamp/4uMjP+9vb3/lZWV/9na2v/29/f/9vf3//b39//29/f/9vf3//b3
        9//29/f/9vf3//b39//29/f/9vf3//b39/8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P/9rb
        2/+Vlpb/rKys/6Giov/a29v/9/j4//f4+P/3+Pj/9/j4//f4+P/3+Pj/9/j4//f4+P/3+Pj/9/j4//f4
        +P8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P//f4+P/a29v/oaKi/56env+Vlpb/t7Sx/6Si
        n/+OjYz/jo2M/6SjoP/HxcP/9vf3//f4+P/3+Pj/9/j4//f4+P8AAABgAAAAIAAAAAAAAAAAAAAAAAAA
        AAAAAAAAz8/P//j5+f/4+fn/29zc/5WVlf+NjY3/uLOt/97Wz//y6N//8efc/9rSyf+1r6r/uLSv//f4
        +P/4+fn/+Pn5//j5+f8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P//n5+f/5+fn/+fn5/7ez
        rv+4sqz/+u7h//vu4f/77N3/++va//zp1//76NX/s62m/8nFwf/5+fn/+fn5//n5+f8AAABgAAAAIAAA
        AAAAAAAAAAAAAAAAAAAAAAAAz8/P//n6+v/5+vr/+fr6/6Wfmv/h18z/++7g//vr2//869r//Ova//zp
        1v/859L/1se4/6Whnf/5+vr/+fr6//n6+v8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P//r6
        +v/6+vr/+vr6/46Mif/05tf//Ozd//zt3v/97t///e3d//7t3P/96dX/8dnC/46Mif/6+vr/+vr6//r6
        +v8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P//r7+//6+/v/+vv7/42LiP/049H//OXO//3z
        5//98+j//fHm//7x5P/+8OH/8ti//42LiP/6+/v/+vv7//r7+/8AAABgAAAAIAAAAAAAAAAAAAAAAAAA
        AAAAAAAAz8/P//v7+//7+/v/+/v7/6Wgmf/ezb3//eHF//7s2f/+8+r//vTr//717P/97+H/4NDA/6+q
        pP/7+/v/+/v7//v7+/8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P//v8/P/7/Pz/+/z8/8rF
        v/+3rKL//d/A//7hxP/+6tX///Hi//7q1P/+4cP/tKme/8rFv//7/Pz/+/z8//v8/P8AAABgAAAAIAAA
        AAAAAAAAAAAAAAAAAAAAAAAAz8/P//z8/P/8/Pz//Pz8//v7+/+5sKf/taqe/9fBrP/x07P/8dKz/9bA
        q/+0qZ3/ubCo//v7+//8/Pz//Pz8//z8/P8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P//39
        /f/9/f3//f39//39/f/8/Pz/y8bA/6Wgmv+OjIj/joyI/6Wgmv/LxsD//Pz8//39/f/9/f3//f39//39
        /f8AAABgAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P//39/f/9/f3//f39//39/f/9/f3//f39//39
        /f/9/f3//f39//39/f/9/f3//f39//39/f/u7u7/4ODg/9HR0f8AAABVAAAAGwAAAAAAAAAAAAAAAAAA
        AAAAAAAAz8/P//7+/v/+/v7//v7+//7+/v/+/v7//v7+//7+/v/+/v7//v7+//7+/v/+/v7/tLS0/7S0
        tP+0tLT/tLS0/7S0tP8AAAA2AAAADgAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P//7+/v/+/v7//v7+//7+
        /v/+/v7//v7+//7+/v/+/v7//v7+//7+/v/+/v7/tLS0//7+/v/+/v7/4ODh/35+foAAAAATAAAAAwAA
        AAAAAAAAAAAAAAAAAAAAAAAAz8/P//7+/v/+/v7//v7+//7+/v/+/v7//v7+//7+/v/+/v7//v7+//7+
        /v/+/v7/tLS0//7+/v/g4OH/fn5+gAAAABMAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P////
        ////////////////////////////////////////////////////////tLS0/+Dg4f9+fn6AAAAAEwAA
        AAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAz8/P////////////////////////////////////
        ///////////////////g4OH/xsbI/35+foAAAAATAAAAAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAz8/P/8/Pz//Pz8//z8/P/8/Pz//Pz8//z8/P/8/Pz//Pz8//z8/P/8/Pz//Pz8//fn5+gAAA
        ABMAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA4AADAIAAAwCAAAMAgAADAMAAAwDgAAMA4AADAOAA
        AwDgAAMA4AADAOAAAwDgAAMA4AADAOAAAwDgAAMA4AADAOAAAwDgAAMA4AADAOAAAwDgAAcA4AAPAOAA
        HwDgAD8AKAAAABAAAAAgAAAAAQAgAAAAAABABAAAAAAAAAAAAAAAAAAAAAAAAJSUlOB0dHSleXl4/3p6
        ev96enr/enp6/3p6ev96enr/enp6/3p6ev96enr/enp6/3p6ev96enr/enp6/wAAAAB0dHSlkpKS3nl5
        ef/i4eL/8fHz//Hy8//y8vT/8/P0//P09f/09fb/9fX3//b29//39/j/9/j5/4aGhv8AAAAAd3RwOXJy
        cqabm5v/q6us/+bm5v/y8vT/8/P1//P09f/09fb/9fX3//b29//39/j/9/j5//j5+v+QkJD/AAAAAJGJ
        fwJ/enQgg4OD/6Ghof+vrq//4+Li/+7t7P/s7Ov/7uzs//Lw8P/29vb/+Pj5//j5+v/5+vr/nZ2d/wAA
        AAAAAAAAAAAAAKiop/+vrq//lJSU/6OhoP+3sq7/uLCo/7iwqP+7t7P/39vX//f39//5+vr/+vv7/6ys
        rP8AAAAAAAAAAAAAAACtra3/4uHi/6Shnv/HvbL/6t7S//Po3P/y5dj/5tjK/8e9s//h3dn/+vv7//v7
        /P+tra3/AAAAAAAAAAAAAAAAsbGx/+7s7f+5sar/697R//nr3f/66tr/++nY//zo1P/h0MD/trCq//v8
        /P/7/Pz/sbGx/wAAAAAAAAAAAAAAALOzs//t6+r/ua+k//Xm2P/669z/++3e//3t3f/969n/897I/6af
        l//7/P3//P39/7Ozs/8AAAAAAAAAAAAAAAC1tbX/7+3s/7itof/04Mv//Oza//3y5//98uf//vHj//Pf
        y/+popn//P39//3+/v+1tbX/AAAAAAAAAAAAAAAAuLi4//Hw8P+8tKv/59C5//3jyv/+7d///vLm//7t
        3f/h0L//vrix//3+/v/9/v7/uLi4/wAAAAAAAAAAAAAAALq6uv/29vf/39nT/8a3p//gybL/89i+//HZ
        wP/cyLP/wLOm/+jj3v/9/v7//f7+/7i4uP8AAAAAAAAAAAAAAAC8vLz/+Pn6//f39v/h29b/tq6l/6Wd
        kv+lnZP/uLGp/+nk3v/8/Pz/5eXm/9/f4P+6urr/AAAAAAAAAAAAAAAAvb29//n6+v/6+/v/+/v8//v8
        /P/8/f3//P39//3+/v/9/v7/urq6/7i4uP+4uLj/urq6/wAAAAAAAAAAAAAAAL+/v//6+/v/+/v8//v8
        /P/8/f3//P39//3+/v/9/v7//f7+/8XFxf/29vb/urq6+d3d3V8AAAAAAAAAAAAAAADAwMD/+/v8//v8
        /P/8/f3//P39//3+/v/9/v7/+/z8//3+/v/Kysr/urq6/ePl4mkAAAAAAAAAAAAAAAAAAAAAwMDA/8DA
        wP/AwMD/wMDA/8DAwP/AwMD/wMDA/8DAwP/AwMD/v7+//PX19XkAAAAAAAAAAAAAAAAAAQAAAAEAAAAB
        AAAAAQAAwAEAAMABAADAAQAAwAEAAMABAADAAQAAwAEAAMABAADAAQAAwAEAAMADAADABwAA
 </value>
  </data>
 </root>
--- a/app/DD_PM_WINDREAM/frmDocView.vb
+++ b/app/DD_PM_WINDREAM/frmDocView.vb
@@ -1,50 +0,0 @@
 Public Class frmDocView
    Private Sub frmDocView_Load(sender As Object, e As EventArgs) Handles Me.Load
        Try
            'Sind Werte hinterlegt?
            If My.Settings.frmDocViewPosition.IsEmpty = False Then
                If My.Settings.frmDocViewPosition.X > 0 And My.Settings.frmDocViewPosition.Y > 0 Then
                    ' Gespeicherte Werte verwenden
                    Me.Location = Screen.AllScreens(UBound(Screen.AllScreens)).Bounds.Location + My.Settings.frmDocViewPosition
                End If
            End If
            'Sind Werte hinterlegt?
            If Not My.Settings.frmDocViewSize.IsEmpty Then
                ' Gespeicherte Werte verwenden
                Try
                    Me.Size = My.Settings.frmDocViewSize
                Catch ex As Exception
                End Try
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Error in Load FormLayout: " & ex.Message)
        End Try
        Try
            DocumentViewer1.Init(LOGCONFIG, GDPICTURE_LICENSE)
        Catch ex As Exception
            LOGGER.Warn("Error initializing DocViewer: " & ex.Message)
        End Try
    End Sub
    Private Sub frmDocView_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
        My.Settings.frmDocViewSize = Me.Size
        My.Settings.frmDocViewPosition = Me.Location
        My.Settings.Save()
        DocumentViewer1.Done()
    End Sub
    Public Sub LoadFile(FilePath As String)
        DocumentViewer1.LoadFile(FilePath)
        Timer1.Start()
        Me.BringToFront()
    End Sub
    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        Me.BringToFront()
        Timer1.Stop()
    End Sub
 End Class
--- a/app/DD_PM_WINDREAM/frmError.vb
+++ b/app/DD_PM_WINDREAM/frmError.vb
@@ -1,24 +0,0 @@
 Imports System.Windows.Forms
 Public Class frmError
    Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
        Me.Close()
    End Sub
    Private Sub frmError_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        Me.txterror.Text =errormessage
        Me.Label1.Focus()
        Me.Timer1.Start()
    End Sub
    Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
        If Me.OK_Button.Focused Then
            Me.Label1.Focus()
        End If
    End Sub
    Private Sub frmError_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown
        Me.Label1.Focus()
    End Sub
 End Class
--- a/app/DD_PM_WINDREAM/frmFormDesigner.en-US.resx
+++ b/app/DD_PM_WINDREAM/frmFormDesigner.en-US.resx
--- a/app/DD_PM_WINDREAM/frmMain.en-US.resx
+++ b/app/DD_PM_WINDREAM/frmMain.en-US.resx
--- a/app/DD_PM_WINDREAM/frmMain.fr-FR.resx
+++ b/app/DD_PM_WINDREAM/frmMain.fr-FR.resx
--- a/app/DD_PM_WINDREAM/frmMain.fr.resx
+++ b/app/DD_PM_WINDREAM/frmMain.fr.resx
@@ -1,931 +0,0 @@
 <?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>
  <data name="ChartTopLeft.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ToolStripTopLeft.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerTop.Panel1.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ChartTopRight.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ToolStripTopRight.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerTop.Panel2.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerTop.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerDashboard.Panel1.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ChartBottomLeft.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ToolStripBottomLeft.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerBottom.Panel1.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ChartBottomRight.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ToolStripBottomRight.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerBottom.Panel2.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerBottom.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerDashboard.Panel2.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="SplitContainerDashboard.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ImageListProfile.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
    <value>
        AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
        LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw
        CAAAAk1TRnQBSQFMAgEBAgEAAdgBBAHYAQQBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
        AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
        AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
        AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
        AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
        AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
        AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
        ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
        AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
        AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
        AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
        AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
        AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
        AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
        AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
        AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
        ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
        Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
        AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
        AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
        AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
        ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
        Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
        AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
        AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
        AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
        AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
        AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
        AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/0YAAQgEcgEICgABGgEc
        AnQBHAEaKQABcgFVAVoCWwFaAVUBTwgAAXQBeQF6AuUBegF5AXQnAAJVAVoBWwLkAVsBWgJVBgABdAJ6
        BOUBegF5AVIlAAFPAVUCWgRbAVoCVQFPBAABUgFZAXoG5QF6AlIjAAEIAlUIWgJVAQgCAAEaAVIBWQF6
        BuUBWQFYAVIBGiIAAU8CVQdaA1UBTwIAAUwBUgpZAVIBTCIAAU8BNApVATQBLgIAAUwBUgFTCFkBUwFS
        AUwiAAEtAzMHNAIzAS0CAAIrAjIGUwIyAisiAAFPAS0BMwhVATQCLQIAAUwCKwhTAVICKyIAAQgBLQFV
        CJcBVQEtAQgCAAEaASsBUgh1AVIBKwEaIwABAgGXCJgBlwEtBAABKgF0CJoBdAErJQABTwEIARsFwgHx
        AU8GAAFMARoBGwQaARsBGgFSJwABTwEIAfMC/wHzAQgBcggAAUwBGgT2ARoBdCkAAQgEcgEICgABGgR0
        ARplAAFCAU0BPgcAAT4DAAEoAwABQAMAARADAAEBAQABAQUAAYAXAAP/AQAE/wQAAfgBHwH4AR8EAAHw
        AQ8B8AEPBAAB4AEHAeABBwQAAcABAwHAAQMEAAGAAQEBgAEBBAABgAEBAYABAQQAAYABAQGAAQEEAAGA
        AQEBgAEBBAABgAEBAYABAQQAAYABAQGAAQEEAAHAAQMBwAEDBAAB4AEHAeABBwQAAfABDwHwAQ8EAAH4
        AR8B+AEfBAAE/wQACw==
 </value>
  </data>
  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
  <data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAC9SURBVDhP3ZOxEcMgEAQpxbWoEtdBAeSqyDERpWAHQIhZ
        /PYIhNCMnflmLvm/u3leL9UjpXQNIdxijHlLavREtkdpXorQWWuz1jovy9KQGj00aMX2gpi9MWZn7Lmu
        KyG+CSGVRi+++0dlX5cQV828i9F6ETwKgHjwKpYzevMZ8eBl/KEAziaAeP8hYLbEWcBniT9/RlBGcaMr
        PApoDglwlqXgR9fYc3jKQEK++5m24F0spwjrlt+kRk9kAqWezFIoWYYVo9kAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="ProfileUndBasisToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
    <value>165, 26</value>
  </data>
  <data name="KonfigurationenToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
        xAAADsQBlSsOGwAAAQNJREFUOE+VUrkNg0AQpASXQAkuwSKnADICCiCmAFJEThfkEJOTk0NARnqeWe9Z
        x2NOHmmE8Dy3ezj4F9u25eCqfOrPfsAcgv04jibLMlOWpWGJyn7Q3DSNiaJImCTJfQHECpQR+QS/YXIY
        BhbkYr4CAyD3TPnkyDZc1zW1Xq1nQJQTdU95MmjfQRaHat8DAsM0SIi7OuH7m6c4z/NaFIXhbduT9cLI
        VK1n2DA/kbPncfzrCY5hmpdlMXYSFjmsNPYBw+Dadd0ufJjk9+4QJpp4Er+tG74d2wKimOM4lhJ3Em+Y
        YAHDbon+y/xhAqaqbVspIL07HwHjgyUgg+QEvlT2IAje23iU4vnsUjYAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="KonfigurationenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
    <value>165, 26</value>
  </data>
  <data name="MonitoringToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
        xAAADsQBlSsOGwAAAF9JREFUOE/tzMENgDAIhWFGM+xj92Qa9cIV7cGmmocFvdrkSxoIP5nZJ3CY0T6q
        ahkwwMwhbqDMxdZle/QHBoG6jHADPRG5HNyhwNQfeeoxHQ8GzvoIDLwFhxlwGGe0AxBLE8+WRPPCAAAA
        AElFTkSuQmCC
 </value>
  </data>
  <data name="MonitoringToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
    <value>165, 26</value>
  </data>
  <data name="tsddConfig.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAACpSURBVDhPvVLLDcMgDO0InYktmIIVemKHZA2m4NQLe7g9
        wJXwrBoRBdJGiWrpoScbPz8+t1GklPIv+GzfBopKqV38T+BF7xUOC4xwnQMiuscYHyVBSAq01nVzD1Wg
        kGcIgRPGGAa49z5ba7vNAAtgMpqRQKMUhUNk5IQFysK20TBNcz0nuDhxzu0K1GntBQlHDS4k3+IygUNH
        aIewwOlLPP2MEr2P9B0pLx8WRpfW43ukAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="ToolStrip1.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="tsslblLastSysnc.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
        xAAADsQBlSsOGwAAAMhJREFUOE+lksENwyAMRTMKI2SG3LkzQMZCyjLNMnCgvXB1/ZHd0sZpmybSk4xj
        P0PCQESnMJNHeAby1FodszCFIQExck7KbAEXjCmlEmMk7z1N09RAjJyIRlMAOwrmeX5pDCE81ngnEmcJ
        FkzRxvWy0rXcGoh1R7KTxRIULdJmxL1E5ajdCHLOrQBb1qZeAHQAC7hlR4CiXqBgrd/DFFhH6Pl6BE6e
        /oib3/jOx9+oFwkFmKITAWKZvH+R9IGdOX6V/8VM/g4Nd1V+xlTSTXpaAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="StatusStrip1.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="tsmiMarkedFilesFinish.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
        wwAADsMBx2+oZAAAAM5JREFUOE9jwAa+fv3a8O3bt/9I+D0QCECl8QOQQpAG+fTl/xmC5/yvXnryP8hA
        qDRhALJx1s4rYM38sYv+P3/zAcUlX758MYAqhQAkSbACEI1se2Rk5H8nJycwTklJ+f/8+XNUQ0CakDUg
        2754xVq4ZpyGgPyHrAnZsI8fPv3/8P4jHOfl5mEagh5oyLYja0Y2AGYISB+GK2C2g/yObgAMwwwBhRfY
        AJgrQAIgvHnzZrACbJpBGMMAZAAShCnAphmER5IBhDDtDCAef/sPAEGjQ6y45GCmAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="LöscheAlleFilterToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
        wwAADsMBx2+oZAAAAP9JREFUOE9jAIHv3787fHz5/P/DQ3v+f/v2jSQMNuDr168NZ/qa/i9U4/1/sCQF
        RcGRPbvAYk/v3fkfGRn538nJCY7hBgBdkPDs/Kn/y4xlwIYcaywGS17YueX/Gget/6fnTv6fkpKCohnF
        ABAAcV7fufl/o68l3BCQgddWzIe7BhuGaocYAMKgsIC5ZFuUO4YGdAzVjukCkNNBNC7no3gBGIj7b29d
        C7cZFpAg54PEbh/Zjz8MQM4GaUTWDMOgwAW5CkQji8Mw2AAg4z1IIygq0RUQwmADvnz5YgDi4PIrLgw3
        AARAHGyK8GEMA8jBUO1UMgCbM/Fh6htAOv72HwANMrXhfARkwAAAAABJRU5ErkJggg==
 </value>
  </data>
  <data name="ContextMenuGrid.ToolTip" xml:space="preserve">
    <value />
  </data>
  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
  <data name="GridControl_Docs.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControl_Docs.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <assembly alias="DevExpress.Data.v19.2" name="DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControl_Docs.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControl_Docs.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControl_Docs.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControl_Docs.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControl_Docs.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControl_Docs.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <assembly alias="DevExpress.XtraEditors.v19.2" name="DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControl_Docs.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControl_Docs.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <assembly alias="DevExpress.Utils.v19.2" name="DevExpress.Utils.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControl_Docs.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControl_Docs.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControl_Docs.ToolTip" xml:space="preserve">
    <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="BindingNavigator1.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="NavBarGroupProfiles.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAFNhbGU76FnfrwAACeVJREFUWEfF
        lwdUlFcWx8e2bmJBKQISFVEEEhVRseCCJipSRDEYCyJqbPQZLBBHBAUETMQ2CLFgS+EIIlgCioigwFBk
        AJUuRZEuShMbOf+975uRDB6yuzm75+w75zIz3zfzfv//vfe998ED8H+N/9Xo00v829FDgORHM15OmCnv
        /vEFvOyQr3hZx+bxMo/M5YmD/8FL+8GIdy9oFi9l/0xekq8hz3GiQh/RKi2lCCc9fpSLXk602+eVkc56
        IT9v0bY+YDNGkabrR9FXFt2i/E3V6OWP0UNATtgiXvuzhH8ZBO57edukmdGCiecTAue+eRDjjMfJh1ER
        8zWa79nj8WVrXBca4LTd2Lsh32j6Bi757EuaeoAsPojqzk4PAfdDTXuFtj2N4131mKIQv3uq01VP/dzc
        X9egMmknarL8UZHiC0lsIMRHTVAeZYFnv1mj4dZyNCSuQEXsMtw7ZALRqrEd+75STdxlrLLH2VBRh1BM
        CCeipwBKvTyYpfn23pnTE/ZOP303eMGrsnhn1Gb4oDE3EJUpe5DxiwOST21FQqgbrvrMQ+aZlcg++w3y
        I1ahMMoWhZEr8Dh2NSqurELVtbWo+c0GPvPUGHEgBctETwHZIfM5cLz3DIXkgNkOib4zJPkRdqi8sx2N
        OX5oygtAgyQA1eJAgrujs/43dFRHob38NFqKDuJF7l40ifloSNmCukR71N5YiZp4G9Rcs0L1tZUQ79GC
        cI4KI35KwbLQQ0Cf1ENzp6YFm5zIOm7e/iTFCw15oWitikUbRXt1HFqq4tFYFIOy1HAkntpG8Et4+cgP
        zTk70Ji+BfXJBL21gqDLUHPdCs+uWaI23hYFwbqQCEcgyUUFnrOUGHEwRQ8BrB59qePRUHAez8viUJNx
        CE9ue6DiBh9lV9ejJGYdHlywQuYxY9zcY4D475ejrfIsmiUeaMp0JPg6gjPHUnhd4gaUhBkgb58acner
        ImenCm47kIAZiow4hKI/A8sL6J9BAl7VBqH1aTg6mvLR0ViIjuJQdGSuQ1v6KjQn2qA62gLZx4wgPrMJ
        LcVHCO5EKV/fDW9IdkD5BSM8OvAZ8v3UkbtXDTm7RiBrhzISScD26cOw20L3vpeF7kX3BeNZKbhmZH8G
        ZBw2wbvGA3hXv5/Cn96H4vfOh8D7FnTVRqM9YzPq45YgN8wYBVe240XePoJvQB3BG1P5eBpjiYIjo/Eo
        aBQeBozk3EuEqsgm95nuJGCrEgRTh2GnqXaw56IJjkILnXOMywSwjhxIGw7eNQRx8Le1+/CmZi9eP92N
        19X78b7tHtDVhrc1t1AatRZVd32p4QRoSN2Bmlu2KD45DkWiMSg4NIoEyNx7k3uhCuc+Q6CEW5uV4Gag
        gLWzRn9pPlFtzB5L3ZfEZf3ACfgk/aAR3tX5402tXze8s2oXXpXvoFK4o71kB940xOJlfQka804QnPrj
        vA5KT41HUZgmwaXu8wM05NwrI0tAAlwVcXODIlz0FTDk7/015oxX0vSy0Gsj7nAmgHXkoLTvjcg5wWsZ
        3FsG34mOEoIX89Fa6IzW/K1425yO8ktf4PGvuig9NwHFP45DYQhzTwICNXq4zyb3mW5KEDtJBThNVmBd
        p0FZWOZhpiORFzAkNWg2CSB4NYMLpfAyATnno00Gb8n+Fm8bkwj+Oee+5CP3D0kA5373CM49qz1zn7Z1
        OOLXKcJhEidAWzB//KVNxpo+9H4QE8CWhMK9wJlS+BMhOis8CL4N7UUCKfwhwe9T52etx+vaeDy+QO7D
        taXuj/ZSe0/qfEr9MSdTzN4QAkN7EabaHoK+TSAMjBaLhBa6DcqDB2oTl9sPmIDhKfsN8ZrgryplcHLe
        +shF6lxC8Pvr0JxuRwKjUSrvXtb5+YHU+T4Ep3XP3IucTWH1XSzczpSDf7YCruEl2HhYjC3Ll2LpXKN4
        YiozOBtsKSjd8Z2OzkpPdJSypmPOCf7AQQrPXo8XGWvw/N5qdDz+CaVn5Gp/8A/3Em/adMi9PPzbsDLM
        c7+Cacv9YLV6G/h2K6A11wVD1CeNIi63D/yNQjVp7zSanLbYUgE1nKs07bkyuNgOz1NXo/HOChJ2Quo+
        dKy09mzT8Ze6Z51/zNUUiz1j4XKqBPZHH8HS7z4MVh6E+yJ9eK61hoVrOLTmuWOw+sTx8gLUE70NqONl
        zhlcspnSvoGc23POmwjekGBDJTkicz9a6j7gQ+1VIeIv4uAOYQVwFGXA+0wW3ENSscwjCvpLvWG5ORhr
        /OKhacLHIBVddjRzAtjxqJHgNQVtBcy5E1pzt3Dwl2KCp9riefJKgi9H3Q1rvMgOQNFxuc4n9xJyLxIs
        4tLufLIEDkczkF9Wjyd1L9HV9TuEoXexxCsB9oFJsNp1HaONnPGp8oRuAVwGbu7WRzXt6y255DxHCm9O
        s0VTCm21t2xQH2+NWjpam9P2oJA1XrBs2fmoQ7TNjJzHYGvYI6wIFOPALzl4WteCaWtPorXjNc5dz4Ox
        WyzFZehZ+UFJ1+owMYd+EMCtgsBVY11jPSY/zwk3RVOaHT1irZY6p0OIweuuWKE2xhxNyTu63T/wGwnR
        djPOueOPhQiKyENRVTMWCi7j7bsuOH4fh8t3imDkEAFjl0scXFnX8hjxVCj6yZ+GrAzKUzUHG4bYa8XG
        CaegNNISjYnLUX/za9ReWUJwS9RELqLPzty6Z+4ldNpZbtqPraEPYXc4Dz/dKOCcG64/i9ziGogiM2Hk
        dBHGrgRfTHAdCxFxRlD0U/5idY8HEnYesFIMo9DcaDJi85l1WjW3/WfgySV6sIhejGcXzVAdsZDEbOqu
        fZaXGn510sHCTYdg4ZMOr1NivHvfxdW+/Fkz7H2vYY5LlDTtOuYhNLcqRb+1+67yPhbABssEKwc7p1WV
        B/c38DJX//n8Ru2u7CNz8PQnU1Sdn49n0fZ03GogQ6iGu9tUEbFGGRtnju2cvvJAp63/bfCPJGFXaDIW
        8iMxx/GiFD7B4jibk4KD9yrgspsue2Ei5LOhZao71NbffGRJpLMuCo8b0wPHN0gXjkSiuxqOLib4ZIWs
        MUMHWCqONbLRX+b3cp7gCkz41HAu0QT3Zc5DaR72D0E3vFcBUc46vJLIxbziCAv2UT4b7MeTvzUcHvaD
        1ci3cd/NRvRmVXgZK3ZYjhsURPcmUTB3w5TGmyzQM9vVYkx117Pyh5K2eRhdV6foAe9VQKTjBN4vm8bx
        zq/X4oXbabJLH2dj3CTVgdaCmcPFztOGibWGDTCna1qye2w7Z98dpDB6hpmG4cZmpQnmLO0cnMF6i497
        4M8GE8JOLZYNtnzGyIIdJuwayxT7Dhvs9RMK1ulMGLv3p+M/FcAGm5gFm5AtWRYfwB/gf3n8FQHy47+C
        yg8AvH8CqUB0J/cNlPoAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="cmsNavPane.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="NavBarGroupMore.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAXdEVYdFRpdGxlAFByb2R1Y3Q7UHJvZHVjdHM7c0vM
        pAAACNJJREFUWEfFV3lcT+kePsLYyoSmaeEqtO9psRUjkmUywhQyolSKaRCNFkmWiKGUTK4xKbkVVwta
        SXW1WiptSpvSooWiLHe6z3zfU5mRX/+Mz2fu9/N5Tuf3vud9n+/2PufEAfi/QuDgYCAbQhBifwXN/xXw
        l1z/eVzOSUMu6ycDLvPobC7jyAwu7ZA+l7pfl0vxnN5PPJwg7LtmymJV6dESdD+mb2xIsKUsF2Q+mfNf
        OYk7YSrNHV0i+RHRYOAvOX5zufZHIR+BjEX72WSxkeMDN8ltSzlmUled7oPQzfLdp9bKxjkbS1nTvDhB
        hD1HGNL1+DjnYyLxEdFg4C/ZJwz/TMqiHUoYaWc8UT7sB03/jMAV3VW39qD5/iHQM8gJt0NFvB0yTi7E
        aQuZ9r2LpaIsp49fS2ukCGMJvDMDyQSBv2T/NIee54mHEcb42SguinbVS8wLseypy/REfeY+lEY7ofBf
        W1ASvRfRHibIPmuF/Ev2KL1ij+wAU0Q4qMN7vni7o974SybThL+mfUYPJBMEZnx95aTGiIZu13BK9Dao
        LKBNG3K9+YgZGHnn4yh0lJ7H84eBaLt/FK25nmjJ3I3mjO/RdNsWjTet0Ji8DnXxFjhno8R2niiIcCCY
        fRbjruOTFWjaWZ3hw6d4IFjUHWUX8DR+xaBoSFyFtpztqI22gIfBF2znaYIIB4KZcPrhGXjVdA2tldGo
        e/AzavL8UZ5+FPmxrrgT4oAol0V4URQkkJihJXMbGpJsUBSgjQJfFbjOFmM7ywkiHAhmoumH9fGmwRvv
        2sLQ87oAPa/u4PWzy2h7FIzqTB+kBWxAe/6xj4gbU23QlL4DZb/MQpG/OgqPqyLfRwkuMyewnRUEEQ4E
        s/G3D+ridb0nup+4o6t2H962RZMjpehujkdzgR/yLzuhNc/rD+KUDWjOdMPjcCOU/qyN4kANPDyhhoKj
        yrh3UAG79MeznVUITCfYiRr0RDATS92vg64aN3RV78HLyt3orHDGy8d7yZEkvHv5CC3FIWjJ+hENyZZo
        yduPmmgzVJzXQ9nZ6Sg5rYkiPyI/poK7BxVxx10OBxdJIMRW9kGo7ZQsT1NJU+J4rxMBq6Q5v+VS3LGl
        vVrBTPzmPm0i3sUTdz7ajs4yJ3QUb6WOd6Tf3uh58wyt9w6hIcUaVRdnoCJEH4/+qYPSM1pEroF8qnu2
        lxKSXeQRu0OejqcDuhrTUB1vjQy/JQiwmHTf3kBsDXGJEUYShHyX/OGARIqnFk/cUfo9XjDiQgc8L7BH
        +/3NaL1rjTetWaiOmo3KS7PwOFQf5ed1UEKpL/TXQJ6PCm65KSLeRRGFkY5EnE6On8azO84oj5yPtw0X
        0F5wAClHjHFomUSRhaYoU08mWKMJTGk5qSQPTTwvciTiLdRstmi7R8R5m9Cas4FSvx7djcmojpiFyrAZ
        KP9Vj6KfTuSaSPNWQZK7MkqubP2AmOHpTSfk+umgKtkDVYnuqEpwRVG4DSIcdeA6U7TWVFHEnriZanIT
        49000P6AiCna1txNaMnegGeZ60lk1lCXm+NV7VVUhs9ExQVK/bne1Of5quGmlyraS3zxpu0u6m87oSrm
        G1ReXYqKy8ZErjuoeJVHrUeA2WQojOI0mAP/uOGiRpNWFO135L1lL3GaORpvraKON0Nn+YW+1OuiLJga
        L1AT2YdVkOKpiu7avdS81LCt1/Fb10O8a72Cd00XKXLPj8SrIXE1BTKPAtDG/vm8WLGTwslc26WK5v8Q
        cboFyeq3RLySOp4WJS1H/Y1lfATlIbp86kuCqPHozGcfUEaShwpeVbriZYUL9RA1cZk73rak4beObN6B
        fvGqv2GGmiuL+fXs2JYEacJrHu+AGnNgcuxOFTSlUrQ3+4gTiPj6MtTFLUFdjAn1w2GU86mnMx/Qe+az
        qOsT3ZTxsmwXOkp2kpNOeJ6/lfqHGvihJ57kxKHtgS+exC4n5/VRdo7Ig3vJ2R775vJqqc4cmHDSckpC
        0l4tVEQtIuKlqI9dzBPX/nsBai4bUUlc35/5hyfV+TOfuU8BCa5KeNFH3H7fgcpoS2W0oTJuxKsn11AV
        YURNS2Vjzp9l5JQ9JlqUQU9D3gFN5gBTK6l1M8V+CLaa2pJ+RJeOHBFHGaEm4itUU80ak7ehtC/1/XKb
        6jIN1+notVPEPHG2NZVxI/XOd1TCteisjOwt2y865Lw237hMMYtOqVMQanCfw8u1Vr8YsPMoIiY8TMt5
        oURMuJ1cz4MAfVSFGaAy1AD1cVaUNoq+T27jtsnCSW/c22u7FPiIe4nXE/E6PE02R338KjwvPtdLzvqG
        1Z0at5+cBeE2m3dAk3cgYos8VxP5FXOEz8Y8ORFrLxPJuugdiuS9PmVjJSmeOnIPKeHMamlYqYwtkxwz
        dG3MDgU8TVmLBor4abIF6hNWoe76CjyJMSXlPNmrlsFafOn43qE9Co+rINJeBnban9cQlyzvQLjtNK76
        oiFH0TInWDbYB6eypZZo+PHlkv9NPzwTCbvl4DH3izcLZccE0ZwiYcKB1RN/vOqs1F0cZoK6aytQG2uK
        GtKB6ssmaLrjhTL2oqKmKyJy9r5gkZ/5VhrmyiLpw4WGsK/dUbwDYZumcuc3yHJn18nQ1+0k7pSZNM3x
        n2cSyuIjzB10xxXZTRctkvl8+Dc0xj5C2RxftmUaokaBlpNLbh3UQWWkCTWeMUm2EWVmO990LPIifzWS
        bGUcWfzl/xbIjg6kdVMJI/jys8tgIGOfa0yzJxKYV+z+/auV3RNGEGR2LhAPCbeX68kPmoWKUEPUxm2i
        ujNydSTvkYeroVi3ktiIzfTsl4Rhu/XG9e7Rv9mngIy988WNFUWsfZZLPkt0V0VV5EoUE/lFGxk46o2r
        EP5MiDUZ036hD9b++cengIxlQ1hy7DC9LbMmpP66cSr8VkjCTFkkYqgQp0pzIwWuEzT4V8E+Nsj4knyt
        JOI8Y9Io9r8CGxzuNmeCwDUCBz8VZKwkowjMmQ9SPhACB/9OCBz8+wDud0IUucB3M2m1AAAAAElFTkSu
        QmCC
 </value>
  </data>
  <data name="NavBarItemOverview.Appearance.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAB10RVh0VGl0
        bGUASG9yaXpvbnRhbDtBbGlnbjtDZW50ZXIHNZ/PAAAFLUlEQVRYR8WV+VOVVRjHtcXK1LTF6pdGxQXI
        mjIogggpFVB2ENlcQZDF2ES0XGr8oRxtcUE2F0iIwDU1xxZA9kXWJCfLMlJbLLL/4NvzfRfivZz0ms14
        Zj5z7znvOc/znHPP+7nDANxWlIP24heeLR/qZ/aiHLQX37As+VA/sxflILGnzQnNtGuiKr6JcpAMasMN
        7rBlVlAaJw4eu3PQd67Rmiq+iXKQGI1BGHSEcK9wnzDSxNs/hRPvt4HP7hG4TitCFd9EOUiMxp2M2LjP
        q/atkpl4s3gm5Ds27PXC+j1eWFfkiexcN7xe6Im1BZ5Yk++BnDwPZG93r5V1LJjrlfFNlIPEaNzFSCa9
        /FcLLl1rxk/XGtD3Zx1+7D+Ni/3V+KH/S3z/x+e48PspfHf1U5z/7TiytrkxwChjvTK+iXKQGI0BRr0h
        O73YX4VDXUtwsGsxDnQtRGVnLCo7YlB+JgofkbYFKGuNwKlzWUh79wUGGCPcxSCq+CbKQWI0FjB6Td5L
        srNjkjAWFR3RKO+IlKSRKGuLEOajtCUc+1tC8WFLME72piFliysDjBVuuQAGGLNqhzu+ulImSfVdlraF
        o7Q1TBLqSYubg7CvKQh7mwJw4mwqkt52YYBxxnplfBPlIDEaA4zN+MANZ/rytYQlzSGCJJWE+xoDtaS7
        G+dhd/1cFNb54Wh3IhI2zWCAB4W7GUQV30Q5SIymFbBy6/Oov7BFTyoJ9zb6a0mL6pjUFwW1PsJs5NXO
        knsSh2Ubn2GAh4T/p4Dkd1xQdX4DjvUkyw6TtF0e7U7Ake7lONwdh0Ody4SlONC5BAc6FmHxeq0A8wSG
        q+KbWDtDm/YWRGY7VUfnPInIbGdEZDkiPMMRYenTEJI2FcGpUxCcMgWByZMRsMIB8xInwXfpxBpZN9pY
        P2BEs1lyWjp64wJiqpVW4yv1sDBeeMTExXMBF5n9x4XHBM7hG0Br8gQY41/VbO3ok7jAVC+1SqFwNw8Y
        MDgZ5+KhFcDbTnjkhN/5nEVzHfXMWPw5tSIsOS2d/6jenFwPrM51R/ZOd6za8SIyt7shQ2yY/r4b0t5z
        Q+pm1zqJyxMZomZrR9+9jXobNfX2Dai3StT7haj3M1HvSXx79QS+EUmd+/UIvv7lEHp/rsTZK+WaN3ou
        70fXpRIkb9a8YN4Ja05LR5+gUO8iVHaJekW/Fe1iQhv9lraKCQ0xlWhi0j1R3BSIE70rEb/pWQZXmtHa
        0QuwUW8MPu6QZO2iXyZU6LdETKg7IlDkFIA99ESDeELkxNd20bqnGVxpRmtHn2BVryQsZcK2MGOXIUP0
        a4qpsMEPhfW+hpzmIF/kdLg7HlGrnRlcaUZrxxCPSr2afhvV+i2o80F+nZ4w//SryBN21byC3BpvHBQ5
        haU7MrjSjNaOUYBVvTxWf+1Yi3isktBWv7skYa6RMLfGCzurvbC96mVsq/KUnzAWAUmTGZweGWJGZQGm
        eo/3pOATTb0rNPXq+o1X6rdSqOhYKJd0IcrbY+SiymVti5Z7EwXf5ZMY3DyB6xagvQVROc7VsWunI3o1
        9esk+nXC/EwnhGVMQ+hrUxG6ciqCUgXqN8kBAYmi4AQH+CVMgl+8qDhuInyWTsBssmQCvGOeOC1xKSbG
        v24BNBWrpP14aXhsA+q1YbzzjLlcRPWaPKqAc5mcSr+hiAb/B7CQwVDPFqa7BnLRkHEF/GkH/g8sOS2d
        fxon3pCnXIO5SPlMwUCz5BzcuVl4ArZjN4ty0F6mP3ebC7h1MOxvLUMuFbJnVbsAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="NavBarItemOverview.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAZdEVYdFRpdGxlAFVubWVyZ2VDZWxscztNZXJnZTuJ
        vne9AAAGqElEQVRYR8WX6VtVVRTGKcucp+qPyHnKUkvzg08fckgrFQQHlOnCFTWj1ERAwBkVQWJWEIdU
        REVkUERFEMUpUHAWhydERUSF60VdvWuds8+5N+tTj3ae58faZ5999vuutfc95+CiH+/ovPsWUFrGwSet
        wPvgAwfavCFag/cAm5Gj1dqE3JFJW0rKU7aXUcq2MkpWbC2jpK0nhMQtiCBxSyklMBkloJTiN5cIv6WD
        tOMUBzakFdOGTcUUu/EYKKaY1GO0nkk5SmuTDpeHrtzxNXTZhFSi9Yq4wtqbd+rp1atXr3Hi7K3X+l7q
        sfRMjbT/iePlN8zzlybXah5QSFTuPehylaUKbWBAJnz0xA6eUwN41AgQt2adkSg04jr362TsPq33P6d6
        xHqOejs9s9wYZ/QDNhEadYCg21YZaLs89pBuwJxciRkiDgJqTMZuTUT1qetM+q5TVP/Y5tTHsIGQVTls
        oB3gvefSdhkMcKnUxI6TiQGHc8cxm/UsVX/9Y51GG6U5GpA+jZYXryh4pRhorwy0WxpzkI6fvilinJWK
        LDAnY4Qwd/MImr35K5N0kDbcYFbaMArkuIkZRlZm45dkTdUIAP5MyheCk4HI9QVSGtOtWbrA9OF09u5S
        ByI17kTSvC0j6MydCOG0QbgwB/eV317iQJhwCvgmDWUDHZSB9hHRyoCNHkoZEcWEjazI7AzEjl6bbXBE
        Zy4qceRqoFBkMIuKrsyiQFTi8BWrQaEQQKduhZBPwhBnA+Hr8uiFbkATN01w6TgjZyGIAC590VUrBE0h
        jQAKQPkLLwfo+AuHLlmorCaYZsYNZgMdlYEOYWvyZHNw9iZcDRtZsF5cOhY6zDgI8RpzVoIhAi5bZJ0P
        QlDDT2IBYunNReQZ+5mzgdCoXCosuUIbd57U2FEGtMjrZd04TNtYiGpDBaRiMzEQsqQMJUvyUPJjMJ7h
        +3wTmSFSco3B5B0/mKZHD2IDnZSBjiF4MLS0oAINWuYPGpjnEvmGEzWLJSszIw0W4qwKqgFi/iVfyq/2
        pbxqH7kvr8oHeEvMRcyt8qLi67/QlHUDlQF+HLt0XLw6h+wwoAmb4syMuM+lbCLEIhAo0IU4q3yIiZBE
        FtOEvHFf7kUvtGfSgYuKGdjEQeQeNYANdDYM8IPB3vKS7hsGwCObnPN6ldxYKEIiZgh5kRc2E4sJDiI5
        gO/LuYD2BU9hf+V04ElHrswjt1X9nQx0+nVFthhgYWXiPhsAU7Fex6/P10VMIY4zWARRCe13YPr6Tykb
        ohrTaB/YWzEVG3UOTVrRjw10MQwsXJZN+wur8NotNUhk8Nr1WDtQhBjOyjN2EHnGDKLpDESmAd5U06LR
        FgbCNMA681ozHmsHyDwc3dcMoAlL+zgZ6Lxg2T6y2V9IxnWSeTNis0T31QPw+59H2Re4hGY22RXTRGgf
        smI4u70VU2gP2FvhQR4QyvrDQ8edss67026QXx1A30f2ZgNdDQPzI/eKgbp6iAMlzoZcV/anIpRtX6Um
        pImxyBTJaA8EGBEBLMJMXt2fMs+5UeZ5gLiL2+dcsXcsNC68p5OBLj9H7CHbc82AAVejvhnr1RcPl0BD
        aI8uxBlNjuoPsck6upgu6LqyL0RdadfZSbRTmCjkXPShsaFioJthICgii5psbACldwRVmLC0L37nVild
        fhVAzKvyR9sfu7kfNqcFGxJU+SH6YYP6QsSXJi7vg+iNDemNDarF/ZVeWEIvGr24uzLA36EuXYPCs2hX
        znl81xXjmw5w1NvfRfTWCO9F44WeNG5JL52e9C0T2oPGhgGOYHRIDxoT0l2END6hUcHdadQiRPANgO6H
        hoGfluyWCtzjrB82SxTQjt10zDyvb5I+Ffmjk9u13KcjbYxdn3JEb+O6zKWNa3zWQv4LtzsZ6PZjWCY9
        a27RJtaF+KZaxBg2gJs1AS3WymS4lsoiypS6rp1H6wa0seY9jU9hYIEY+EgZ6Do3NJOeNrXIADURi/N5
        DGfJAg6TaW2I6AaceKCNi05WBkzx2gdN9PipnSzztzlVoPPs4B1/nq28KyaeNNkR7fQEpWL4s6zxmV2n
        BRnoEWzCm9O8ZqfHCoxJ/b1MItPA4Iub48nzt8k3KKMWusaDqO0Yt7BJHtbkuinWVPJgAlIEd8Y/mSYr
        LEnkpvBLIlchUZjkq0gQJvr8nXia6B1PP3jF1Y0cv9CVdYF8lvM7mU/45cBl4bX5Nz7+j/Ac/ADiT3LO
        Xv4z4j/shDt4Td40rMN6rCsG+FAnbxPtIKL/EXL5C4aQjGB1h9mhAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="NavBarItemDashboard.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAPdEVYdFRpdGxlAEJhck9mUGllO7hVPVUAAAf4SURB
        VFhHvZdZUFTZGcfJOJuzZalJHvOQhzwklap5sSqjJpWlMknGiZPggqIzUUZFZBPBEQFZZbMBAUFFEGVr
        oIVmaWj2RRRkRxih2USWQaCh6WZv1n/Od+69dI/LVMxDqPrV953z3f7+/3PvuQsW4t9rjC2vwOv/I2+I
        UE59fsCweC1Z2VKVmtuG7yOFyHkBSoqtSCaULycpW6KFk6horBZNWGxJvNOM//dfnLweTJvOhsXrNxWC
        gZWVdSyvrIlIOUVzhLrR7BjKjSw3Los1Fr+PjY0NXEt9QAbe5AbiM5uwwQyYC7wILsKjAJ9/pvnSC+LS
        8qo4priKdWbgqrmBG+mNzBXEprQSYTUcEjOPrIFUE5qLGAURLmYUx3xOjDQn1shAbHIdGXiLDLwRJ28Q
        DDzT3JQL85vNxfqiGElgkc3TeFEUXJTmNnOBBTKwvoErSbUmA9fT6rkB+qGRIQkIKxFy+rGwEtGE1JzX
        nheSWCCWhLhIkUEGom7fMxmg60EGyL3QUBDSj46jW3EH9f7+qLC1RcXxY6j380Nnmhy6oRGTACGKUFRU
        +SJCsQ/hmXsRlmEJWbol0sq8WG0F84srWGMGIhNryMDbZODN2JQ6vjPNXT8uKUWjjze646/jaZEKhqY6
        DuWauGt44OGB7uwczLGGXJyaiyv0TfgrhqdLMKQrxqCuiKGGa+ROVl/hx3MDN++aDMQk1/KNwRvNLaFZ
        Fob2cBkmilXQV5VgqigX2jwFR8dyfXUxxovy0RIaAu8btdDPLbOVrfLVER7X/oyO0QSUadwYrnj4bRwc
        Ln3Ma2RgdW0DEfHVZGArGXgrml0Pui60ikcpqWiXhWKqVAVtbgbGM5MxoUjCuCKZ51J8cicdTZ0jCM9o
        Q1RmK28s4Rb1ezQNRaPwG3sUdJxC4+Bl2AZuw9zCCma5gXWE3TAzEJUoGNA+HsR9V1d8q0jDuDwRT1Pj
        McZ4mpqAsRQhJ3oTb0DdNISafgNym5/CIbwS7b1aLj7LRJxk21HbHwJlqw2yW47iXl8gbHw/4jWCDMiu
        V5oMRN6s4delIykFHWEhGEtLwOitWIwmMm5dFaKIJi4GeQ8GUN6jh6JlAjntWsgy2xApb+bNZxgng7ah
        UuON9AZryBsOolzjiS+8fsNrxMrqOkKvVZCBd8jA2xEJd7mBShdX9EZdwkjcZYxcf57OKxHIuteHoi4d
        UhrHNrla0gdrj3zMzAsCVRc+g3FYjYXu2xzjUCFKv/4EBlYnlpmBkNhyk4Fwdj3W2MYoOGCNPt+zGAhw
        x1BUMIajQzbpC/ZCas1jqB5NIrFulHOTEVU1jPDSAXxiJ4dWvwTD3AoT+wsWOhMw2xCA2Xp/LDyKh9rl
        D7zGDbCnbXBMGRl4lwxsDYur4jszf58VNG4n0eN6Aj0s9l9wwUDgeTy55INen7PIfqjF1bvDiK4cwqWy
        QQSoB+Cn7odvXi/+dDwFkzNL0M8vc7H5jljM1F7gzD+MQb79dna3rHDIQGB0qclAcGwZvy5Fx0+i1f4o
        epy/Qjdx2oZBuQ0eHt3Lxb3z++CtMoONXW63YLdzBqZnlzE9s8zEdmCuOQKG6nOcuaYwKI9v47XpWSN/
        svpeLiYD73EDgVdKuav6yBjc/+pLaByPPEfbl5aIqRqCZ27vcxyVVeJ8VMWmgPLENszUBUFf6oLp0tOY
        uR+AzCMfQTdjZMcY2cNuDT7h6k0D71xkp4MMDHd0Q221H23HrKE59QU09gJdjLbDnyOqchDuOd1wV/aw
        yGDRMakNf3fMRDW7LXXMAImQmKHaC7pCO+hUdjBUekB+6Ne8RtAD70IYN/A+N+AfWcxet+v8FNYEy1B+
        YC++sbVGl90hdJ0krNF68DNcLn+Cs1ndcMvSMLrhkv4I//RQwTFIvdlcZzAijYnpS9wwlWODSaUNpovO
        IGX/LzFlWGIIBrzCCjcNvOtHBtg3AJ0e7eQs1PbOKLH8HC1H9qHT9iA6TxxAi9UuvtvPKLo4tvFN2PV1
        DvY4ZWB4bJY3lgRITKdywKTiMLSZhzGVZ4dblr/AJLtLJtkx9Nj2DFWZDPhEFPGNQe5pFRPMRJVfEJSf
        foqKPbvRcMgSjXv/hou53fh3dC12exZgp00STvmpMDI+hylqrBcMTLIet0lMeQxauRUm0vZjMtsGCbt/
        zm9TOm6ODIRwAx+Qgfe82YagjWG+Cor9je2o9AtG5j/+heTf/RG/2hWF31rFwSlQjYr6J0zYyAX5yjYx
        ItV5P4J3/gwhO36K4B0fImj7h0h22MMNEPTIPh+cbzLgJSvkr2ESlk6TsCqhoXlzQvudOaHpy1nkcUIc
        U6RHtnsQN/BDMvC+p6yAbwyp2X/fXGJRFJCiKZ/gUcqFMT2uzwXmmhkILeAfE1JDqYn0o2fnTWPz5t/N
        x4npJSGyOYoTNJ4WDJy9yA38iBvwCMnnXysvEjM1fVlOkcTMEMeSoPkcoWfvA7eAnE0DH9D1oJ1pai42
        FpvwKDWlKNaEhmYiZnNjYj6mY5jVKKf3hZu/0nQGzgXl8S8V6YOBw8bS+1vCwOMyi8vs1StgEKGm9GnG
        ozk0xzFyplk+zeIZP5OBrU5e8ruu/jlwZa4EstkB2XBhB7n4ZcHFl+GThdM+d+BMeDMuKODkrYAji4SD
        V6aAZwbsPYh02LP8FIuc8+mwI9zlHJvTCfeYNn8b0r/m9GlE9yTtSoKcvQo/fgV+wqDfMHGLLf8BKVH4
        p8+ug0MAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="NavBarControl1.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="Panel1.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="ContextMenuNotifyIcon.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="NotifyIcon1.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAgCUAABMLAAATCwAAAAAAAAAA
        AAAxJKXfMSSl8jEkpe4uIqHuMCSk7lhC3e5eSOfuWELe7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD
        3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uW0Th7ldC3e43KK3uVkDa7l5G5e5YQ97uYEnp7j4v
        uO4hF47uQDC77mBI6e5ZQ9/uWUPf7llD3+5YQt3uW0Xi7mBJ6u5fSOfuWUPf7lhC3u5ZQ9/uWUPf7llD
        3+5ZQ9/uWUPf8llD398xJKX/MCOi/zIlqP84Kbz/LyKv/0Ewyf9oTvz/X0jm/19H5/9fR+f/X0fn/19H
        5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/Xkfm/2hO8v9MOdP/Py7H/2ZN
        9/9eR+X/ZUzx/1dB2f8rH6T/PS3D/2JK7P9gSOj/X0fn/19H5/9hSev/WELc/0w5zv9WQen/ZEv7/2FJ
        6/9eR+X/X0fn/19I6P9aROH/WELe/1lD3/8xJKXuMiWp/zAjoP8pHov/KR6L/yEYfv9GM7//W0To/1A8
        0P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdP/UT3T/11G
        9f9PO8z/HBRu/z8vrf9ZQ+X/UT3U/1lD4/8tIY7/Jx2H/1VA3f9TPtX/UT3U/1E91P9WQdv/SDbK/ycd
        kf8bFG//OSuk/1hC4P9SPtX/UT3U/1E90/9YQt3/WkTh/1lD3+4xJKXuOCm8/ykeiv8AAAD/AAAA/wAA
        AP8CAQ//MSOs/zAjqf8sIZ7/LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/ywh
        nf8tIZ//OCnD/yIZfP8AAAX/AAAA/ygekv8xJK7/LCCc/zUnuv8fFmT/AAAA/y0hn/8wJKr/LSGf/y0h
        n/8sIJ3/MiWq/zYosf8GBBb/AAAA/yAYd/81J7n/LCCd/ygdmP9QPNP/YEjo/1lD3+4xJKXuNym6/yke
        i/8AAAD/AAAA/wAAAP8AAAD/GhNb/zwsyv8wI6D/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAj
        pP8wI6T/MCOj/zAkpP88K8r/Ihlx/wAAAP8AAAD/KB2G/zorxP8vI6D/MCSk/zAkpP86KsT/DAkn/xoT
        WP87K8f/LyOh/zAjpP8wI6T/LyOi/zkqwv8RDDr/AAAA/xkSVv87K8j/LyKg/ywgnv9RPdT/X0fn/1lD
        3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AgII/zMmrP81J7L/MSSl/zEkpf8xJKX/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MCSi/z0szP8jGnf/AAAA/wAAAP8hGG7/PCzK/zAko/8xJKX/MSSl/zAk
        o/83Kbv/KR6J/wsIJf83KLn/MiWo/zEkpf8xJKX/MSSn/zcpu/8NCSv/AAAA/w0KK/87K8f/MSSm/y0h
        nv9RPdT/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/xsUXP88LMr/MCOh/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8wI6D/OyvH/ykdif8AAAD/AAAA/x8Xav89Lc3/MSSm/zEk
        pP8xJKX/MSSl/zEkpf8wI6L/OyvG/wsJJ/8ZE1b/PCzK/zAjof8xJKX/MSSk/zsrxf8WEEj/AAAA/wAA
        AP8kGnr/Pi7T/y0hnv9RPdP/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQD
        D/80J7H/Myat/zEkpf8xJKX/MSSl/zEkpf8wJKT/MSSk/zEkpf87K8T/MCOh/wAAAP8AAAD/JBp3/zws
        yv8xJKb/MCSj/zEkpf8xJKX/MSSl/zEkpf8xJKP/OirF/x4WZf8AAAD/Myas/zYotv8xJKP/MSSk/zco
        uP8uIZn/AAAA/wAAAP8AAAH/Ihlz/zUnu/9RPdP/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8jGnb/OivE/zEko/8xJKP/MSSk/zQnsP86KsL/OirC/zkqv/81J7P/BwUW/wIB
        Bf8qH4//QjHd/zkqwv86KsL/Nyi4/zIlp/8wI6L/MSSl/zEkpf8xJKX/Nii1/y8inf8AAAD/Dwsz/zws
        yv8xJKT/MSSm/zAkov86KsT/Ixp4/wAAAP8AAAD/AAAA/yQbgv9ZQ+//Xkfk/1lD3+4xJKXuNym6/yke
        jP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8QDDb/OSrA/zAjof83KLn/OirE/zEkp/8jGXX/FA5C/w4K
        L/8DAgv/AAAA/wQDDf8PCzL/DAkq/xMOQf8gF2z/LCCT/zcpuv87K8b/NCaw/zAjov8xJKX/MiWp/zYn
        tf8HBRj/AAAA/ykeif85KsD/MCSj/zEkpP8xJKX/OirD/y4imv8KByL/AAAA/wUDGP9YQen/X0jq/1lD
        3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8BAQX/MSSl/z8v1f8uIpv/FQ9I/wQD
        D/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/w0KLf8gF2z/MyWr/zsr
        x/8zJq7/LyOf/zsrxf8WEEr/AAAA/w8LMf86K8P/MSSk/zEkpf8xJKT/MCOi/zssx/81J7T/BAMQ/wAA
        AP9OO8b/Y0v4/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/KB2E/ycd
        hP8AAAH/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/BgQT/x4WZv83KLf/OSq+/zwsyv8qH4//AAAA/wAAAP8tIZf/Nii2/zEkpf8xJKX/MSSl/zAj
        n/89Lc3/HhZp/wAAAP9NOsH/Y0v4/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/BAMN/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8JBx//LCCS/zoqw/8gF2v/AAAA/wAAAP8dFV//OivD/zEk
        pP8xJKX/MSSl/zEko/85KsD/JBp6/wAABf9UP97/YEjs/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQACP8AAAD/AAAA/wAA
        AP8ZD1L/Oi7E/zEkpP8wJKP/MSSk/zQnr/9BL9n/EQw7/xINQ/9bRPT/Xkfl/1lD3+4xJKXuNym6/yke
        jP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8UWGH/GW50/xpydf8RS1b/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8FFRf/GWtz/xdmc/8bc3b/Cy81/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wg0
        K/8acnP/FmZx/xZncf8nJoj/MRug/zMlq/86K8P/OSrB/zQmsP8ZE1b/CAYc/zEkr/9TP9v/X0fn/1lD
        3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8y3fX/P////0L/
        //8rvdn/AAAA/wAAAP8AAAD/AAAA/wAAAP8MNDn/Pf///zr///9E////G3eH/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/yGPm/9E////Of///zj///8pN5b/Mwyh/zcpuP8jGnb/EQ07/wAAAP8CAQT/LyKe/zQm
        t/9QPND/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8rvNT/Nuz//zj1//8loLv/AAAA/wAAAP8AAAD/AAAA/wAAAP8KLTH/NOT//zLa//86/f//F2Z0/wAA
        AP8AAAD/Bhke/wUWGv8AAAD/AAAA/xx5hv86/P//MNv//zHd/P8sNZ7/Iwls/wwJKP8AAAD/AAAA/w0J
        Lf82J7X/OCm8/ysfmf9RPdP/ZEvu/2BJ6u4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8rvdT/Nu3//zj2//8lobv/AAAA/wAAAP8AAAD/AAAA/wAAAP8KLTH/NOX//zLb
        //86/f//F2Z0/wAAAP8AAAD/I5en/yGOm/8AAAD/AAAA/xx6hv86/P//Mtz//zXh//8VKlD/AAAA/wAA
        AP8CAQf/HhZk/zkqwv81KLT/LiKf/zMmtf9aROb/WkTf/0Ixve4xJKXuNym6/ykejP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zj2//8lobv/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8KLTH/NOX//zLb//86/f//F2Z0/wAAAP8AAAD/M+D8/zDU8f8AAAD/AAAA/xx6hv86/P//M93//zLg
        /f8EIhf/BwIY/xsUXP8xJKX/OyvH/zEkpv81J7L/OivE/yYdgv81KJ//MyWt/ygdmO4xJKXuNym6/yke
        jP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zj2//8lobv/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8KLTH/NOX//zLb//86/f//F2d1/wAAAP8NPEH/Ofr//zj1//8LLjH/AAAA/xx7
        h/86/P//Mt3//zDe+f8IJCb/Jwh7/z4t0P81J7T/MCOg/zorxP8yJar/FA9D/wAAAP8gF3f/Nii6/zIl
        pu4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zj2
        //8lobv/AAAA/wAAAP8AAAD/AAAA/wAAAP8KLTH/NOb//zLb//86/f//F2Zz/wAAAP8ilan/Ovz//zv/
        //8giJr/AAAA/xx6hv86/P//Mt3//zPg//8AHg3/FwFH/zgqvf8xJaf/PCzK/ykdiP8EAw7/AAAA/wAA
        AP8qH4//Nym6/zEkpe4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8rvdT/Nu3//zn7//8jmbD/AAAA/wAAAP8AAAD/AAAA/wAAAP8KLTL/NOX//zLc//86/f//E1Jd/wAA
        AP8z4Pz/NOL//zXn//8x1vP/AAAA/xhpc/86/P//Mt3//zPg//8BHg3/CAAT/zkqvv89Lc3/Hxdq/wAA
        AP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4uIaDuNCe3/yYch/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8rvdT/Nu7//zTi//8swuP/IImY/x6Bjf8VV1v/AwwN/wAAAP8JJSr/NOP//zLb
        //87/v//Dj1G/w04PP87////Mdf//zLY//86////DDQ5/xNSW/86/f//Mt3//zPg//8EIRj/AAAA/zws
        yf8gFmj/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4zJqjuOCq8/yofj/8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu7//zDQ//8z4P//Ovz//zv///87/f//M+Dn/xJP
        U/8BBAf/L872/zLZ//85+f//E1Nd/yGQof849v//Mdn//zLZ//85+P//H4mb/xRaX/85+f//Mt3//zPg
        //8GIx//AgAC/xgSUv8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe5cRePuX0jp/1E9
        1P8qH5b/JBt7/xMNP/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu7//zDS//8z3f//N+///zTi
        //8w0///Nu3//zn7//8ceon/I5e4/zHU//8z3v7/Ipao/y7K7P86+///IZCi/yKVqv85+v//LMHh/yKW
        pv805P//M93//zPg//8IJCj/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEk
        pe5ZQ97uY0rq/1hC3/83KMP/QTDf/0Qy5f8xJKT/Cwgn/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu7//zLb
        //8uzO//KrXR/zDS8P848///MNP//zPg//815f//JJy4/yu74P8w0fz/Mdj7/zLa//86////Ci0x/w05
        Pf87////Mtf//zLY//8w0///M9///zPg//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8pHoz/Nym6/zEkpe4xJKXuOyu8/zEkmP8OCzL/FxFN/x0VYP8vIpv/KR6J/wcEFf8AAAD/AAAA/wAA
        AP8rvdT/Nu3//zn4//8knLX/AAAA/wUUFf8ehZH/N+///zHU//805P//KbHQ/yalxf8x0/v/M93//zXn
        //8x1/X/AAAA/wEDAf8z4P3/NOP//zLb//8x1f//M9///zPg//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4uIqHuMya2/yQagv8AAAD/AAAA/wAAAP8AAAD/AgII/wMC
        Cv8AAAD/AAAA/wAAAP8rvdT/Nu3//zj3//8loLn/AAAA/wAAAP8AAAD/MdPu/zTl//804v//KrjZ/ySf
        vf8v0Pj/MdT//zv///8hj6L/AAAA/wAAAP8knLH/Ov7//zHT//8x1v//M9///zPg//8IJCf/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4xJKXuNym6/ykejP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zn5//8knbb/AAAA/wAAAP8BBQT/Mtzy/zTi
        //804v//KrfY/ySfvf8v0Pj/Mdf//zr6//8OO0D/AAAA/wAAAP8QR0//Ovz//zHU//8x1v//M9///zPg
        //8IJCf/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4xJKXuNym6/yke
        jP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zjz//8lo77/Aw8R/ww1
        OP8mpLP/Nu7//zDT//805f//KK/P/yakxP8w0vr/N/D//y3G5f8AAAD/AAAA/wAAAP8BBAP/L83s/zbq
        //8x1v//M9///zPg//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEk
        pe4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8qvdL/Nu7//zHW
        //8x1Pz/MNL0/zbs//849P//L87//zTj//805f//I5i0/yu63v8w0f7/PP///xt5h/8AAAD/AAAA/wAA
        AP8AAAD/HoST/zv///8w0///M9///zPg//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8pHoz/Nym6/zEkpe4xJKXuNym6/ygdi/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wEA
        Av8svNf/Nu3//zDT//8y2f//NOP//zLZ//8x1///OPf//zn1//8acHz/IpS2/zHR/P8y2v//Nu3//wgm
        KP8AAAD/AAAA/wAAAP8AAAD/CzA1/zj0//8x2P//M97//zPf//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4qHpruMSSy/yQbhP8AAAD/AAAA/wAAAP8CAgf/CQcf/xAM
        N/8aE1f/IhRw/yQNdP8v1/D/N////zn6//85+///Ofv//zr7//837v//LsfO/w9AQv8CCw3/OPT//zr+
        //9C////K7vV/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/y7H5P9B////Ov///zb///8JKiz/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe5HNcTuUj7Y/0k3xf8lHIX/KR6M/ywg
        lP8vIp3/NCaw/zkqvv86K8X/OCW6/y8dnP8uYrf/HG6G/xBeWv8XZXP/F2Vy/xRVYP8MNDL/AAAA/wAA
        AP8EERT/GGt5/xhmc/8bdnb/Ci4z/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/ww0Of8adnH/FWNr/yJr
        lv8BDwv/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe5gSeruZUzv/1dB
        3v8zJbT/Nie5/zYotv81J7L/MyWq/zEkpf8wJKP/MSWj/zAloP8tBYz/JgBx/wUABP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/FAA4/y8Bkf8EAA7/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEk
        pe5ZQ9/uX0fn/1E91P8tIZ//MCOk/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSk/zEkpP8wJKD/NCew/zYn
        tP8aElb/AQAC/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wEAA/8jGXT/OCm8/zkswv8oHoj/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8pHoz/OCq7/y4ioO5ZQ9/uX0fn/1E91P8tIZ//MCOk/zEkpf8xJKX/MSSl/zEkpP8wJKP/MSSl/zMl
        qv82KLX/OCm9/z4uz/9DMeD/LCGV/wkHH/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/Ew4+/y8inv87K8f/MiWn/zAkov87LMf/Ixp2/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8kGoL/LiGt/zIlp+5ZQ9/uX0fn/1E91P8tIZ//MSOm/zMmrP81J7P/Nym6/zkq
        wf86K8P/OCm9/zUnsv8uIpv/Jx2B/xsUW/8QDDj/DAkp/wQDDP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8BAQL/CAYc/xcRTv8qH4z/OSrA/zcpuv8wI6H/MSSl/zEkpP8xJKX/OivE/ysg
        kv8RDTr/AgEG/wAAAP8AAAD/AAAA/wAAAP8vI5b/SzjX/1lD3u5gSeruZ03w/1hC4f80Jrf/Nie3/zMl
        q/8uIpv/Kh6M/yEYcf8bFFv/Eg08/woHIv8BAQX/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wgGHP8mG33/Ixp1/yUbfP8tIZb/NCav/zorxf84Kbz/MSSl/zAko/8xJKX/MSSl/zEk
        pf8xJKT/MCOi/zgpvP85Kr7/LiKa/yQaeP8hGG//Ixp2/ycdjf9VQNz/aE71/1xF5O5EM8DuSTfQ/zor
        qv8PCzb/DQks/wcFGP8BAQT/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/Dgow/zYouP89Lc//OSrA/zgqv/82KLb/MyWr/zEko/8xJKT/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zAko/8xJKb/NSe0/zkqwP85KsL/OCm//zIlsf9SPtb/Xkbl/1lD
        3+4pHpruMCOx/yIZf/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8UD0T/OSrB/zcpuP8vI5//MSSk/zEkpP8xJKX/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpP8xJKT/MCOj/y0h
        n/9RPdT/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/xoTWf87LMn/NSey/zAjof8xJKX/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEk
        pf8xJKX/MCOk/y0hn/9RPdT/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/IRhw/z0tzf8zJa3/MCOi/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MCOk/y0hn/9RPdT/X0fn/1lD3+4xJKXuNym6/ykei/8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8mHIL/PCzK/zEk
        pv8wI6L/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAj
        pP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/LyKj/ywgnv9RPdT/X0fn/1lD3+4xJKXuOCm8/yke
        iv8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAM/ygd
        jv84KcT/LSGd/ywhnv8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0h
        n/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LCCe/ygdmP9QPNP/YEjo/1lD
        3+4xJKXuMiWp/zAjoP8pHov/KR6L/ykejP8pHoz/KR6M/ykejP8pHoz/KR6M/ykejP8qHoz/Kx+N/yEX
        f/8rIIz/Uz7U/1tE8P9QPdD/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E9
        1P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E9
        0/9YQt3/WkTh/1lD3+4xJKX/MCOi/zIlqP83Kbv/Nym7/zcpuv83Kbr/Nym6/zcpuv83Kbr/Nym6/zcp
        uv84Kbv/LyKu/zwswf9jSvv/Zk33/11H4/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H
        5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H
        5/9fR+f/X0fn/19I6P9aROH/WELe/1lD3/8xJKXfMSSl8jEkpe4xJKXuMSSl7jEkpe4xJKXuMSSl7jEk
        pe4xJKXuMSSl7jEkpe4sIJ3uOyyz7mBJ6e5fR+fuWELd7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD
        3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD
        3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf8llD398AAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAA=
 </value>
  </data>
  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAgCUAABMLAAATCwAAAAAAAAAA
        AAAxJKXfMSSl8jEkpe4uIqHuMCSk7lhC3e5eSOfuWELe7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD
        3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uW0Th7ldC3e43KK3uVkDa7l5G5e5YQ97uYEnp7j4v
        uO4hF47uQDC77mBI6e5ZQ9/uWUPf7llD3+5YQt3uW0Xi7mBJ6u5fSOfuWUPf7lhC3u5ZQ9/uWUPf7llD
        3+5ZQ9/uWUPf8llD398xJKX/MCOi/zIlqP84Kbz/LyKv/0Ewyf9oTvz/X0jm/19H5/9fR+f/X0fn/19H
        5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/Xkfm/2hO8v9MOdP/Py7H/2ZN
        9/9eR+X/ZUzx/1dB2f8rH6T/PS3D/2JK7P9gSOj/X0fn/19H5/9hSev/WELc/0w5zv9WQen/ZEv7/2FJ
        6/9eR+X/X0fn/19I6P9aROH/WELe/1lD3/8xJKXuMiWp/zAjoP8pHov/KR6L/yEYfv9GM7//W0To/1A8
        0P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdP/UT3T/11G
        9f9PO8z/HBRu/z8vrf9ZQ+X/UT3U/1lD4/8tIY7/Jx2H/1VA3f9TPtX/UT3U/1E91P9WQdv/SDbK/ycd
        kf8bFG//OSuk/1hC4P9SPtX/UT3U/1E90/9YQt3/WkTh/1lD3+4xJKXuOCm8/ykeiv8AAAD/AAAA/wAA
        AP8CAQ//MSOs/zAjqf8sIZ7/LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/ywh
        nf8tIZ//OCnD/yIZfP8AAAX/AAAA/ygekv8xJK7/LCCc/zUnuv8fFmT/AAAA/y0hn/8wJKr/LSGf/y0h
        n/8sIJ3/MiWq/zYosf8GBBb/AAAA/yAYd/81J7n/LCCd/ygdmP9QPNP/YEjo/1lD3+4xJKXuNym6/yke
        i/8AAAD/AAAA/wAAAP8AAAD/GhNb/zwsyv8wI6D/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAj
        pP8wI6T/MCOj/zAkpP88K8r/Ihlx/wAAAP8AAAD/KB2G/zorxP8vI6D/MCSk/zAkpP86KsT/DAkn/xoT
        WP87K8f/LyOh/zAjpP8wI6T/LyOi/zkqwv8RDDr/AAAA/xkSVv87K8j/LyKg/ywgnv9RPdT/X0fn/1lD
        3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AgII/zMmrP81J7L/MSSl/zEkpf8xJKX/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MCSi/z0szP8jGnf/AAAA/wAAAP8hGG7/PCzK/zAko/8xJKX/MSSl/zAk
        o/83Kbv/KR6J/wsIJf83KLn/MiWo/zEkpf8xJKX/MSSn/zcpu/8NCSv/AAAA/w0KK/87K8f/MSSm/y0h
        nv9RPdT/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/xsUXP88LMr/MCOh/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8wI6D/OyvH/ykdif8AAAD/AAAA/x8Xav89Lc3/MSSm/zEk
        pP8xJKX/MSSl/zEkpf8wI6L/OyvG/wsJJ/8ZE1b/PCzK/zAjof8xJKX/MSSk/zsrxf8WEEj/AAAA/wAA
        AP8kGnr/Pi7T/y0hnv9RPdP/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQD
        D/80J7H/Myat/zEkpf8xJKX/MSSl/zEkpf8wJKT/MSSk/zEkpf87K8T/MCOh/wAAAP8AAAD/JBp3/zws
        yv8xJKb/MCSj/zEkpf8xJKX/MSSl/zEkpf8xJKP/OirF/x4WZf8AAAD/Myas/zYotv8xJKP/MSSk/zco
        uP8uIZn/AAAA/wAAAP8AAAH/Ihlz/zUnu/9RPdP/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8jGnb/OivE/zEko/8xJKP/MSSk/zQnsP86KsL/OirC/zkqv/81J7P/BwUW/wIB
        Bf8qH4//QjHd/zkqwv86KsL/Nyi4/zIlp/8wI6L/MSSl/zEkpf8xJKX/Nii1/y8inf8AAAD/Dwsz/zws
        yv8xJKT/MSSm/zAkov86KsT/Ixp4/wAAAP8AAAD/AAAA/yQbgv9ZQ+//Xkfk/1lD3+4xJKXuNym6/yke
        jP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8QDDb/OSrA/zAjof83KLn/OirE/zEkp/8jGXX/FA5C/w4K
        L/8DAgv/AAAA/wQDDf8PCzL/DAkq/xMOQf8gF2z/LCCT/zcpuv87K8b/NCaw/zAjov8xJKX/MiWp/zYn
        tf8HBRj/AAAA/ykeif85KsD/MCSj/zEkpP8xJKX/OirD/y4imv8KByL/AAAA/wUDGP9YQen/X0jq/1lD
        3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8BAQX/MSSl/z8v1f8uIpv/FQ9I/wQD
        D/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/w0KLf8gF2z/MyWr/zsr
        x/8zJq7/LyOf/zsrxf8WEEr/AAAA/w8LMf86K8P/MSSk/zEkpf8xJKT/MCOi/zssx/81J7T/BAMQ/wAA
        AP9OO8b/Y0v4/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/KB2E/ycd
        hP8AAAH/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/BgQT/x4WZv83KLf/OSq+/zwsyv8qH4//AAAA/wAAAP8tIZf/Nii2/zEkpf8xJKX/MSSl/zAj
        n/89Lc3/HhZp/wAAAP9NOsH/Y0v4/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/BAMN/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8JBx//LCCS/zoqw/8gF2v/AAAA/wAAAP8dFV//OivD/zEk
        pP8xJKX/MSSl/zEko/85KsD/JBp6/wAABf9UP97/YEjs/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQACP8AAAD/AAAA/wAA
        AP8ZD1L/Oi7E/zEkpP8wJKP/MSSk/zQnr/9BL9n/EQw7/xINQ/9bRPT/Xkfl/1lD3+4xJKXuNym6/yke
        jP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8UWGH/GW50/xpydf8RS1b/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8FFRf/GWtz/xdmc/8bc3b/Cy81/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wg0
        K/8acnP/FmZx/xZncf8nJoj/MRug/zMlq/86K8P/OSrB/zQmsP8ZE1b/CAYc/zEkr/9TP9v/X0fn/1lD
        3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8y3fX/P////0L/
        //8rvdn/AAAA/wAAAP8AAAD/AAAA/wAAAP8MNDn/Pf///zr///9E////G3eH/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/yGPm/9E////Of///zj///8pN5b/Mwyh/zcpuP8jGnb/EQ07/wAAAP8CAQT/LyKe/zQm
        t/9QPND/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8rvNT/Nuz//zj1//8loLv/AAAA/wAAAP8AAAD/AAAA/wAAAP8KLTH/NOT//zLa//86/f//F2Z0/wAA
        AP8AAAD/Bhke/wUWGv8AAAD/AAAA/xx5hv86/P//MNv//zHd/P8sNZ7/Iwls/wwJKP8AAAD/AAAA/w0J
        Lf82J7X/OCm8/ysfmf9RPdP/ZEvu/2BJ6u4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8rvdT/Nu3//zj2//8lobv/AAAA/wAAAP8AAAD/AAAA/wAAAP8KLTH/NOX//zLb
        //86/f//F2Z0/wAAAP8AAAD/I5en/yGOm/8AAAD/AAAA/xx6hv86/P//Mtz//zXh//8VKlD/AAAA/wAA
        AP8CAQf/HhZk/zkqwv81KLT/LiKf/zMmtf9aROb/WkTf/0Ixve4xJKXuNym6/ykejP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zj2//8lobv/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8KLTH/NOX//zLb//86/f//F2Z0/wAAAP8AAAD/M+D8/zDU8f8AAAD/AAAA/xx6hv86/P//M93//zLg
        /f8EIhf/BwIY/xsUXP8xJKX/OyvH/zEkpv81J7L/OivE/yYdgv81KJ//MyWt/ygdmO4xJKXuNym6/yke
        jP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zj2//8lobv/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8KLTH/NOX//zLb//86/f//F2d1/wAAAP8NPEH/Ofr//zj1//8LLjH/AAAA/xx7
        h/86/P//Mt3//zDe+f8IJCb/Jwh7/z4t0P81J7T/MCOg/zorxP8yJar/FA9D/wAAAP8gF3f/Nii6/zIl
        pu4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zj2
        //8lobv/AAAA/wAAAP8AAAD/AAAA/wAAAP8KLTH/NOb//zLb//86/f//F2Zz/wAAAP8ilan/Ovz//zv/
        //8giJr/AAAA/xx6hv86/P//Mt3//zPg//8AHg3/FwFH/zgqvf8xJaf/PCzK/ykdiP8EAw7/AAAA/wAA
        AP8qH4//Nym6/zEkpe4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8rvdT/Nu3//zn7//8jmbD/AAAA/wAAAP8AAAD/AAAA/wAAAP8KLTL/NOX//zLc//86/f//E1Jd/wAA
        AP8z4Pz/NOL//zXn//8x1vP/AAAA/xhpc/86/P//Mt3//zPg//8BHg3/CAAT/zkqvv89Lc3/Hxdq/wAA
        AP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4uIaDuNCe3/yYch/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8rvdT/Nu7//zTi//8swuP/IImY/x6Bjf8VV1v/AwwN/wAAAP8JJSr/NOP//zLb
        //87/v//Dj1G/w04PP87////Mdf//zLY//86////DDQ5/xNSW/86/f//Mt3//zPg//8EIRj/AAAA/zws
        yf8gFmj/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4zJqjuOCq8/yofj/8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu7//zDQ//8z4P//Ovz//zv///87/f//M+Dn/xJP
        U/8BBAf/L872/zLZ//85+f//E1Nd/yGQof849v//Mdn//zLZ//85+P//H4mb/xRaX/85+f//Mt3//zPg
        //8GIx//AgAC/xgSUv8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe5cRePuX0jp/1E9
        1P8qH5b/JBt7/xMNP/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu7//zDS//8z3f//N+///zTi
        //8w0///Nu3//zn7//8ceon/I5e4/zHU//8z3v7/Ipao/y7K7P86+///IZCi/yKVqv85+v//LMHh/yKW
        pv805P//M93//zPg//8IJCj/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEk
        pe5ZQ97uY0rq/1hC3/83KMP/QTDf/0Qy5f8xJKT/Cwgn/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu7//zLb
        //8uzO//KrXR/zDS8P848///MNP//zPg//815f//JJy4/yu74P8w0fz/Mdj7/zLa//86////Ci0x/w05
        Pf87////Mtf//zLY//8w0///M9///zPg//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8pHoz/Nym6/zEkpe4xJKXuOyu8/zEkmP8OCzL/FxFN/x0VYP8vIpv/KR6J/wcEFf8AAAD/AAAA/wAA
        AP8rvdT/Nu3//zn4//8knLX/AAAA/wUUFf8ehZH/N+///zHU//805P//KbHQ/yalxf8x0/v/M93//zXn
        //8x1/X/AAAA/wEDAf8z4P3/NOP//zLb//8x1f//M9///zPg//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4uIqHuMya2/yQagv8AAAD/AAAA/wAAAP8AAAD/AgII/wMC
        Cv8AAAD/AAAA/wAAAP8rvdT/Nu3//zj3//8loLn/AAAA/wAAAP8AAAD/MdPu/zTl//804v//KrjZ/ySf
        vf8v0Pj/MdT//zv///8hj6L/AAAA/wAAAP8knLH/Ov7//zHT//8x1v//M9///zPg//8IJCf/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4xJKXuNym6/ykejP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zn5//8knbb/AAAA/wAAAP8BBQT/Mtzy/zTi
        //804v//KrfY/ySfvf8v0Pj/Mdf//zr6//8OO0D/AAAA/wAAAP8QR0//Ovz//zHU//8x1v//M9///zPg
        //8IJCf/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4xJKXuNym6/yke
        jP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8rvdT/Nu3//zjz//8lo77/Aw8R/ww1
        OP8mpLP/Nu7//zDT//805f//KK/P/yakxP8w0vr/N/D//y3G5f8AAAD/AAAA/wAAAP8BBAP/L83s/zbq
        //8x1v//M9///zPg//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEk
        pe4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8qvdL/Nu7//zHW
        //8x1Pz/MNL0/zbs//849P//L87//zTj//805f//I5i0/yu63v8w0f7/PP///xt5h/8AAAD/AAAA/wAA
        AP8AAAD/HoST/zv///8w0///M9///zPg//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8pHoz/Nym6/zEkpe4xJKXuNym6/ygdi/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wEA
        Av8svNf/Nu3//zDT//8y2f//NOP//zLZ//8x1///OPf//zn1//8acHz/IpS2/zHR/P8y2v//Nu3//wgm
        KP8AAAD/AAAA/wAAAP8AAAD/CzA1/zj0//8x2P//M97//zPf//8IJCf/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe4qHpruMSSy/yQbhP8AAAD/AAAA/wAAAP8CAgf/CQcf/xAM
        N/8aE1f/IhRw/yQNdP8v1/D/N////zn6//85+///Ofv//zr7//837v//LsfO/w9AQv8CCw3/OPT//zr+
        //9C////K7vV/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/y7H5P9B////Ov///zb///8JKiz/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe5HNcTuUj7Y/0k3xf8lHIX/KR6M/ywg
        lP8vIp3/NCaw/zkqvv86K8X/OCW6/y8dnP8uYrf/HG6G/xBeWv8XZXP/F2Vy/xRVYP8MNDL/AAAA/wAA
        AP8EERT/GGt5/xhmc/8bdnb/Ci4z/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/ww0Of8adnH/FWNr/yJr
        lv8BDwv/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEkpe5gSeruZUzv/1dB
        3v8zJbT/Nie5/zYotv81J7L/MyWq/zEkpf8wJKP/MSWj/zAloP8tBYz/JgBx/wUABP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/FAA4/y8Bkf8EAA7/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8pHoz/Nym6/zEk
        pe5ZQ9/uX0fn/1E91P8tIZ//MCOk/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSk/zEkpP8wJKD/NCew/zYn
        tP8aElb/AQAC/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wEAA/8jGXT/OCm8/zkswv8oHoj/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8pHoz/OCq7/y4ioO5ZQ9/uX0fn/1E91P8tIZ//MCOk/zEkpf8xJKX/MSSl/zEkpP8wJKP/MSSl/zMl
        qv82KLX/OCm9/z4uz/9DMeD/LCGV/wkHH/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/Ew4+/y8inv87K8f/MiWn/zAkov87LMf/Ixp2/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8kGoL/LiGt/zIlp+5ZQ9/uX0fn/1E91P8tIZ//MSOm/zMmrP81J7P/Nym6/zkq
        wf86K8P/OCm9/zUnsv8uIpv/Jx2B/xsUW/8QDDj/DAkp/wQDDP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8BAQL/CAYc/xcRTv8qH4z/OSrA/zcpuv8wI6H/MSSl/zEkpP8xJKX/OivE/ysg
        kv8RDTr/AgEG/wAAAP8AAAD/AAAA/wAAAP8vI5b/SzjX/1lD3u5gSeruZ03w/1hC4f80Jrf/Nie3/zMl
        q/8uIpv/Kh6M/yEYcf8bFFv/Eg08/woHIv8BAQX/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wgGHP8mG33/Ixp1/yUbfP8tIZb/NCav/zorxf84Kbz/MSSl/zAko/8xJKX/MSSl/zEk
        pf8xJKT/MCOi/zgpvP85Kr7/LiKa/yQaeP8hGG//Ixp2/ycdjf9VQNz/aE71/1xF5O5EM8DuSTfQ/zor
        qv8PCzb/DQks/wcFGP8BAQT/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/Dgow/zYouP89Lc//OSrA/zgqv/82KLb/MyWr/zEko/8xJKT/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zAko/8xJKb/NSe0/zkqwP85KsL/OCm//zIlsf9SPtb/Xkbl/1lD
        3+4pHpruMCOx/yIZf/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8UD0T/OSrB/zcpuP8vI5//MSSk/zEkpP8xJKX/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpP8xJKT/MCOj/y0h
        n/9RPdT/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/xoTWf87LMn/NSey/zAjof8xJKX/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEk
        pf8xJKX/MCOk/y0hn/9RPdT/X0fn/1lD3+4xJKXuNym6/ykejP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/IRhw/z0tzf8zJa3/MCOi/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEkpf8xJKX/MSSl/zEk
        pf8xJKX/MSSl/zEkpf8xJKX/MCOk/y0hn/9RPdT/X0fn/1lD3+4xJKXuNym6/ykei/8AAAD/AAAA/wAA
        AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8mHIL/PCzK/zEk
        pv8wI6L/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAj
        pP8wI6T/MCOk/zAjpP8wI6T/MCOk/zAjpP8wI6T/LyKj/ywgnv9RPdT/X0fn/1lD3+4xJKXuOCm8/yke
        iv8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAM/ygd
        jv84KcT/LSGd/ywhnv8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0h
        n/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LSGf/y0hn/8tIZ//LCCe/ygdmP9QPNP/YEjo/1lD
        3+4xJKXuMiWp/zAjoP8pHov/KR6L/ykejP8pHoz/KR6M/ykejP8pHoz/KR6M/ykejP8qHoz/Kx+N/yEX
        f/8rIIz/Uz7U/1tE8P9QPdD/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E9
        1P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E91P9RPdT/UT3U/1E9
        0/9YQt3/WkTh/1lD3+4xJKX/MCOi/zIlqP83Kbv/Nym7/zcpuv83Kbr/Nym6/zcpuv83Kbr/Nym6/zcp
        uv84Kbv/LyKu/zwswf9jSvv/Zk33/11H4/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H
        5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H5/9fR+f/X0fn/19H
        5/9fR+f/X0fn/19I6P9aROH/WELe/1lD3/8xJKXfMSSl8jEkpe4xJKXuMSSl7jEkpe4xJKXuMSSl7jEk
        pe4xJKXuMSSl7jEkpe4sIJ3uOyyz7mBJ6e5fR+fuWELd7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD
        3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD
        3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf8llD398AAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAA=
 </value>
  </data>
  <data name="$this.ToolTip" xml:space="preserve">
    <value />
  </data>
 </root>
--- a/app/DD_PM_WINDREAM/frmMain.resx
+++ b/app/DD_PM_WINDREAM/frmMain.resx
--- a/app/DD_PM_WINDREAM/frmMain.vb
+++ b/app/DD_PM_WINDREAM/frmMain.vb
--- a/app/DD_PM_WINDREAM/frmMain.zh-Hans.resx
+++ b/app/DD_PM_WINDREAM/frmMain.zh-Hans.resx
--- a/app/DD_PM_WINDREAM/frmSQL_DESIGNER.Designer.vb
+++ b/app/DD_PM_WINDREAM/frmSQL_DESIGNER.Designer.vb
@@ -1,447 +0,0 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
 Partial Class frmSQL_DESIGNER
    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()
        Me.components = New System.ComponentModel.Container()
        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSQL_DESIGNER))
        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
        Me.TBDD_CONNECTIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter()
        Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
        Me.btnShowConnections = New System.Windows.Forms.Button()
        Me.Label14 = New System.Windows.Forms.Label()
        Me.cmbConnection = New System.Windows.Forms.ComboBox()
        Me.SQL_COMMANDTextBox = New System.Windows.Forms.TextBox()
        Me.Label4 = New System.Windows.Forms.Label()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.Label5 = New System.Windows.Forms.Label()
        Me.dgvResult = New System.Windows.Forms.DataGridView()
        Me.dgvPlaceholders = New System.Windows.Forms.DataGridView()
        Me.colPlaceholder = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.colReplace = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.btnTestSQL = New System.Windows.Forms.Button()
        Me.lbIndexe = New System.Windows.Forms.Label()
        Me.cmbIndexe = New System.Windows.Forms.ComboBox()
        Me.btnAddIndex = New System.Windows.Forms.Button()
        Me.btnSaveSQLCommand = New System.Windows.Forms.Button()
        Me.lblSaveFinalIndex = New System.Windows.Forms.Label()
        Me.btnAddControl = New System.Windows.Forms.Button()
        Me.lblControls = New System.Windows.Forms.Label()
        Me.cmbControls = New System.Windows.Forms.ComboBox()
        Me.cmbStatic = New System.Windows.Forms.ComboBox()
        Me.btnAddStatic = New System.Windows.Forms.Button()
        Me.Label2 = New System.Windows.Forms.Label()
        Me.cmbUser = New System.Windows.Forms.ComboBox()
        Me.Label3 = New System.Windows.Forms.Label()
        Me.btnAddUser = New System.Windows.Forms.Button()
        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.dgvResult, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.dgvPlaceholders, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'DD_DMSLiteDataSet
        '
        Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
        Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
        '
        'TableAdapterManager
        '
        Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
        Me.TableAdapterManager.Connection = Nothing
        Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
        Me.TableAdapterManager.TBDD_EMAIL_TEMPLATETableAdapter = Nothing
        Me.TableAdapterManager.TBDD_GUI_LANGUAGE_PHRASETableAdapter = Nothing
        Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
        Me.TableAdapterManager.TBPM_CONTROL_TABLETableAdapter = Nothing
        Me.TableAdapterManager.TBPM_ERROR_LOGTableAdapter = Nothing
        Me.TableAdapterManager.TBPM_KONFIGURATIONTableAdapter = Nothing
        Me.TableAdapterManager.TBPM_PROFILE_CONTROLSTableAdapter = Nothing
        Me.TableAdapterManager.TBPM_PROFILE_FILESTableAdapter = Nothing
        Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
        Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
        Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
        '
        'TBDD_CONNECTIONTableAdapter
        '
        Me.TBDD_CONNECTIONTableAdapter.ClearBeforeFill = True
        '
        'TBDD_CONNECTIONBindingSource
        '
        Me.TBDD_CONNECTIONBindingSource.DataMember = "TBDD_CONNECTION"
        Me.TBDD_CONNECTIONBindingSource.DataSource = Me.DD_DMSLiteDataSet
        '
        'btnShowConnections
        '
        Me.btnShowConnections.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.btnShowConnections.Image = Global.DD_ProcessManager.My.Resources.Resources.database_go1
        Me.btnShowConnections.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnShowConnections.Location = New System.Drawing.Point(220, 31)
        Me.btnShowConnections.Name = "btnShowConnections"
        Me.btnShowConnections.Size = New System.Drawing.Size(111, 24)
        Me.btnShowConnections.TabIndex = 82
        Me.btnShowConnections.Text = "Connections"
        Me.btnShowConnections.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnShowConnections.UseVisualStyleBackColor = True
        '
        'Label14
        '
        Me.Label14.AutoSize = True
        Me.Label14.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label14.Location = New System.Drawing.Point(12, 9)
        Me.Label14.Name = "Label14"
        Me.Label14.Size = New System.Drawing.Size(76, 16)
        Me.Label14.TabIndex = 81
        Me.Label14.Text = "Connection:"
        '
        'cmbConnection
        '
        Me.cmbConnection.DataSource = Me.TBDD_CONNECTIONBindingSource
        Me.cmbConnection.DisplayMember = "BEZEICHNUNG"
        Me.cmbConnection.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cmbConnection.FormattingEnabled = True
        Me.cmbConnection.Location = New System.Drawing.Point(12, 31)
        Me.cmbConnection.Name = "cmbConnection"
        Me.cmbConnection.Size = New System.Drawing.Size(200, 24)
        Me.cmbConnection.TabIndex = 80
        Me.cmbConnection.ValueMember = "GUID"
        '
        'SQL_COMMANDTextBox
        '
        Me.SQL_COMMANDTextBox.AcceptsReturn = True
        Me.SQL_COMMANDTextBox.AcceptsTab = True
        Me.SQL_COMMANDTextBox.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
            Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.SQL_COMMANDTextBox.Font = New System.Drawing.Font("Courier New", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.SQL_COMMANDTextBox.Location = New System.Drawing.Point(15, 125)
        Me.SQL_COMMANDTextBox.Multiline = True
        Me.SQL_COMMANDTextBox.Name = "SQL_COMMANDTextBox"
        Me.SQL_COMMANDTextBox.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
        Me.SQL_COMMANDTextBox.Size = New System.Drawing.Size(905, 186)
        Me.SQL_COMMANDTextBox.TabIndex = 86
        '
        'Label4
        '
        Me.Label4.AutoSize = True
        Me.Label4.Location = New System.Drawing.Point(9, 109)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(81, 13)
        Me.Label4.TabIndex = 85
        Me.Label4.Text = "SQL-Command:"
        '
        'Label1
        '
        Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.Label1.ImeMode = System.Windows.Forms.ImeMode.NoControl
        Me.Label1.Location = New System.Drawing.Point(13, 331)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(65, 15)
        Me.Label1.TabIndex = 91
        Me.Label1.Text = "Platzhalter:"
        '
        'Label5
        '
        Me.Label5.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.Label5.AutoSize = True
        Me.Label5.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.Label5.ImeMode = System.Windows.Forms.ImeMode.NoControl
        Me.Label5.Location = New System.Drawing.Point(365, 331)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(55, 15)
        Me.Label5.TabIndex = 90
        Me.Label5.Text = "Ergebnis:"
        '
        'dgvResult
        '
        Me.dgvResult.AllowUserToAddRows = False
        Me.dgvResult.AllowUserToDeleteRows = False
        DataGridViewCellStyle1.BackColor = System.Drawing.Color.Cyan
        Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
        Me.dgvResult.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.dgvResult.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.dgvResult.Location = New System.Drawing.Point(368, 349)
        Me.dgvResult.Name = "dgvResult"
        Me.dgvResult.ReadOnly = True
        Me.dgvResult.Size = New System.Drawing.Size(552, 134)
        Me.dgvResult.TabIndex = 89
        '
        'dgvPlaceholders
        '
        Me.dgvPlaceholders.AllowUserToAddRows = False
        Me.dgvPlaceholders.AllowUserToDeleteRows = False
        DataGridViewCellStyle2.BackColor = System.Drawing.Color.Cyan
        Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
        Me.dgvPlaceholders.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.dgvPlaceholders.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.dgvPlaceholders.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.colPlaceholder, Me.colReplace})
        Me.dgvPlaceholders.Enabled = False
        Me.dgvPlaceholders.Location = New System.Drawing.Point(16, 349)
        Me.dgvPlaceholders.Name = "dgvPlaceholders"
        Me.dgvPlaceholders.Size = New System.Drawing.Size(338, 133)
        Me.dgvPlaceholders.TabIndex = 88
        '
        'colPlaceholder
        '
        Me.colPlaceholder.HeaderText = "Platzhalter"
        Me.colPlaceholder.Name = "colPlaceholder"
        Me.colPlaceholder.ReadOnly = True
        '
        'colReplace
        '
        Me.colReplace.HeaderText = "Ersetzung"
        Me.colReplace.Name = "colReplace"
        '
        'btnTestSQL
        '
        Me.btnTestSQL.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.btnTestSQL.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle))
        Me.btnTestSQL.Image = CType(resources.GetObject("btnTestSQL.Image"), System.Drawing.Image)
        Me.btnTestSQL.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnTestSQL.ImeMode = System.Windows.Forms.ImeMode.NoControl
        Me.btnTestSQL.Location = New System.Drawing.Point(752, 314)
        Me.btnTestSQL.Name = "btnTestSQL"
        Me.btnTestSQL.Size = New System.Drawing.Size(168, 29)
        Me.btnTestSQL.TabIndex = 87
        Me.btnTestSQL.Text = "Teste SQL-Command"
        Me.btnTestSQL.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnTestSQL.UseVisualStyleBackColor = True
        '
        'lbIndexe
        '
        Me.lbIndexe.AutoSize = True
        Me.lbIndexe.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.lbIndexe.Location = New System.Drawing.Point(678, 13)
        Me.lbIndexe.Name = "lbIndexe"
        Me.lbIndexe.Size = New System.Drawing.Size(203, 16)
        Me.lbIndexe.TabIndex = 93
        Me.lbIndexe.Text = "Index  (zur Laufzeit ausgewertet):"
        '
        'cmbIndexe
        '
        Me.cmbIndexe.FormattingEnabled = True
        Me.cmbIndexe.Location = New System.Drawing.Point(681, 32)
        Me.cmbIndexe.Name = "cmbIndexe"
        Me.cmbIndexe.Size = New System.Drawing.Size(194, 21)
        Me.cmbIndexe.TabIndex = 92
        '
        'btnAddIndex
        '
        Me.btnAddIndex.Image = CType(resources.GetObject("btnAddIndex.Image"), System.Drawing.Image)
        Me.btnAddIndex.Location = New System.Drawing.Point(881, 32)
        Me.btnAddIndex.Name = "btnAddIndex"
        Me.btnAddIndex.Size = New System.Drawing.Size(32, 23)
        Me.btnAddIndex.TabIndex = 94
        Me.btnAddIndex.UseVisualStyleBackColor = True
        '
        'btnSaveSQLCommand
        '
        Me.btnSaveSQLCommand.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.btnSaveSQLCommand.DialogResult = System.Windows.Forms.DialogResult.OK
        Me.btnSaveSQLCommand.Image = CType(resources.GetObject("btnSaveSQLCommand.Image"), System.Drawing.Image)
        Me.btnSaveSQLCommand.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnSaveSQLCommand.Location = New System.Drawing.Point(825, 489)
        Me.btnSaveSQLCommand.Name = "btnSaveSQLCommand"
        Me.btnSaveSQLCommand.Size = New System.Drawing.Size(95, 30)
        Me.btnSaveSQLCommand.TabIndex = 95
        Me.btnSaveSQLCommand.Text = "Speichern"
        Me.btnSaveSQLCommand.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnSaveSQLCommand.UseVisualStyleBackColor = True
        '
        'lblSaveFinalIndex
        '
        Me.lblSaveFinalIndex.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.lblSaveFinalIndex.AutoSize = True
        Me.lblSaveFinalIndex.BackColor = System.Drawing.Color.Yellow
        Me.lblSaveFinalIndex.Location = New System.Drawing.Point(367, 489)
        Me.lblSaveFinalIndex.Name = "lblSaveFinalIndex"
        Me.lblSaveFinalIndex.Size = New System.Drawing.Size(38, 13)
        Me.lblSaveFinalIndex.TabIndex = 96
        Me.lblSaveFinalIndex.Text = "Label4"
        Me.lblSaveFinalIndex.Visible = False
        '
        'btnAddControl
        '
        Me.btnAddControl.Image = CType(resources.GetObject("btnAddControl.Image"), System.Drawing.Image)
        Me.btnAddControl.Location = New System.Drawing.Point(643, 32)
        Me.btnAddControl.Name = "btnAddControl"
        Me.btnAddControl.Size = New System.Drawing.Size(32, 23)
        Me.btnAddControl.TabIndex = 99
        Me.btnAddControl.UseVisualStyleBackColor = True
        '
        'lblControls
        '
        Me.lblControls.AutoSize = True
        Me.lblControls.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.lblControls.Location = New System.Drawing.Point(442, 13)
        Me.lblControls.Name = "lblControls"
        Me.lblControls.Size = New System.Drawing.Size(215, 16)
        Me.lblControls.TabIndex = 98
        Me.lblControls.Text = "Controls (zur Laufzeit ausgewertet):"
        '
        'cmbControls
        '
        Me.cmbControls.FormattingEnabled = True
        Me.cmbControls.Location = New System.Drawing.Point(445, 31)
        Me.cmbControls.Name = "cmbControls"
        Me.cmbControls.Size = New System.Drawing.Size(194, 21)
        Me.cmbControls.TabIndex = 97
        '
        'cmbStatic
        '
        Me.cmbStatic.FormattingEnabled = True
        Me.cmbStatic.Items.AddRange(New Object() {"USERNAME", "MACHINE", "DOMAIN", "DATE"})
        Me.cmbStatic.Location = New System.Drawing.Point(445, 86)
        Me.cmbStatic.Name = "cmbStatic"
        Me.cmbStatic.Size = New System.Drawing.Size(194, 21)
        Me.cmbStatic.TabIndex = 97
        '
        'btnAddStatic
        '
        Me.btnAddStatic.Image = CType(resources.GetObject("btnAddStatic.Image"), System.Drawing.Image)
        Me.btnAddStatic.Location = New System.Drawing.Point(643, 86)
        Me.btnAddStatic.Name = "btnAddStatic"
        Me.btnAddStatic.Size = New System.Drawing.Size(32, 23)
        Me.btnAddStatic.TabIndex = 99
        Me.btnAddStatic.UseVisualStyleBackColor = True
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label2.Location = New System.Drawing.Point(442, 67)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(112, 16)
        Me.Label2.TabIndex = 98
        Me.Label2.Text = "Umgebungsdaten:"
        '
        'cmbUser
        '
        Me.cmbUser.FormattingEnabled = True
        Me.cmbUser.Items.AddRange(New Object() {"PRENAME", "SURNAME", "SHORTNAME", "LANGUAGE", "EMAIL", "USER_ID", "PROFILE_ID", "PROFILE_TITLE"})
        Me.cmbUser.Location = New System.Drawing.Point(681, 86)
        Me.cmbUser.Name = "cmbUser"
        Me.cmbUser.Size = New System.Drawing.Size(194, 21)
        Me.cmbUser.TabIndex = 97
        '
        'Label3
        '
        Me.Label3.AutoSize = True
        Me.Label3.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label3.Location = New System.Drawing.Point(678, 67)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(118, 16)
        Me.Label3.TabIndex = 98
        Me.Label3.Text = "Anwendungsdaten:"
        '
        'btnAddUser
        '
        Me.btnAddUser.Image = CType(resources.GetObject("btnAddUser.Image"), System.Drawing.Image)
        Me.btnAddUser.Location = New System.Drawing.Point(881, 84)
        Me.btnAddUser.Name = "btnAddUser"
        Me.btnAddUser.Size = New System.Drawing.Size(32, 23)
        Me.btnAddUser.TabIndex = 99
        Me.btnAddUser.UseVisualStyleBackColor = True
        '
        'frmSQL_DESIGNER
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(930, 523)
        Me.Controls.Add(Me.btnAddUser)
        Me.Controls.Add(Me.btnAddStatic)
        Me.Controls.Add(Me.btnAddControl)
        Me.Controls.Add(Me.Label3)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.lblControls)
        Me.Controls.Add(Me.cmbUser)
        Me.Controls.Add(Me.cmbStatic)
        Me.Controls.Add(Me.cmbControls)
        Me.Controls.Add(Me.lblSaveFinalIndex)
        Me.Controls.Add(Me.btnSaveSQLCommand)
        Me.Controls.Add(Me.btnAddIndex)
        Me.Controls.Add(Me.lbIndexe)
        Me.Controls.Add(Me.cmbIndexe)
        Me.Controls.Add(Me.Label1)
        Me.Controls.Add(Me.Label5)
        Me.Controls.Add(Me.dgvResult)
        Me.Controls.Add(Me.dgvPlaceholders)
        Me.Controls.Add(Me.btnTestSQL)
        Me.Controls.Add(Me.SQL_COMMANDTextBox)
        Me.Controls.Add(Me.Label4)
        Me.Controls.Add(Me.btnShowConnections)
        Me.Controls.Add(Me.Label14)
        Me.Controls.Add(Me.cmbConnection)
        Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.MinimumSize = New System.Drawing.Size(937, 392)
        Me.Name = "frmSQL_DESIGNER"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "SQL - Designer"
        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.dgvResult, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.dgvPlaceholders, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()
    End Sub
    Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
    Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
    Friend WithEvents TBDD_CONNECTIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter
    Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource
    Friend WithEvents btnShowConnections As System.Windows.Forms.Button
    Friend WithEvents Label14 As System.Windows.Forms.Label
    Friend WithEvents cmbConnection As System.Windows.Forms.ComboBox
    Friend WithEvents SQL_COMMANDTextBox As System.Windows.Forms.TextBox
    Friend WithEvents Label4 As System.Windows.Forms.Label
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents Label5 As System.Windows.Forms.Label
    Friend WithEvents dgvResult As System.Windows.Forms.DataGridView
    Friend WithEvents dgvPlaceholders As System.Windows.Forms.DataGridView
    Friend WithEvents colPlaceholder As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents colReplace As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents btnTestSQL As System.Windows.Forms.Button
    Friend WithEvents lbIndexe As System.Windows.Forms.Label
    Friend WithEvents cmbIndexe As System.Windows.Forms.ComboBox
    Friend WithEvents btnAddIndex As System.Windows.Forms.Button
    Friend WithEvents btnSaveSQLCommand As System.Windows.Forms.Button
    Friend WithEvents lblSaveFinalIndex As System.Windows.Forms.Label
    Friend WithEvents btnAddControl As Button
    Friend WithEvents lblControls As Label
    Friend WithEvents cmbControls As ComboBox
    Friend WithEvents cmbStatic As ComboBox
    Friend WithEvents btnAddStatic As Button
    Friend WithEvents Label2 As Label
    Friend WithEvents cmbUser As ComboBox
    Friend WithEvents Label3 As Label
    Friend WithEvents btnAddUser As Button
 End Class
--- a/app/DD_PM_WINDREAM/frmSQL_DESIGNER.resx
+++ b/app/DD_PM_WINDREAM/frmSQL_DESIGNER.resx
@@ -1,313 +0,0 @@
 <?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>
  <metadata name="DD_DMSLiteDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>255, 17</value>
  </metadata>
  <metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>1032, 17</value>
  </metadata>
  <metadata name="TBDD_CONNECTIONTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>17, 17</value>
  </metadata>
  <metadata name="TBDD_CONNECTIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>1205, 17</value>
  </metadata>
  <metadata name="colPlaceholder.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>True</value>
  </metadata>
  <metadata name="colReplace.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>True</value>
  </metadata>
  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
  <data name="btnTestSQL.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
        wwAADsMBx2+oZAAAAKhJREFUOE+dkb0RAiEQhSnFIgyMyckNLMI6zB0zS0FruBKugdMACFdWecoBw49v
        5ku43W8eh7DWkmcxxhzFP2HB4bqnaZ7IS27OuU341BcW7E7bN5f7ebxNLGCG26QCENo0qQq01qSUIill
        kaIAV+Dz0lJMJkhr89BjeRZZCeIfh8UamcDzfbphQRoIMITKYFhQoykogUUQ1n7pFYTxPBDUaAp6+EwL
        8QKzYQ6as7QBdAAAAABJRU5ErkJggg==
 </value>
  </data>
  <data name="btnAddIndex.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="btnSaveSQLCommand.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
        xAAADsQBlSsOGwAAAFRJREFUOE9j+P//P0UYTHz79u0/Cfg9EBswAAGKAU5OTnD84f1HOEYWA9FtbW1w
        Q8gyAIRhhpBtAAiD9BBlADJGVkNbA4jBowYMSgPIwXADyMf/GQC4A6rkpAjLjQAAAABJRU5ErkJggg==
 </value>
  </data>
  <data name="btnAddControl.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="btnAddStatic.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="btnAddUser.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="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        AAABAAMAICAQAAEABADoAgAANgAAACAgAAABAAgAqAgAAB4DAAAgIAAAAQAgAKgQAADGCwAAKAAAACAA
        AABAAAAAAQAEAAAAAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
        AACAgIAAwMDAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAAAAP///////wAAAAAAAAAAD///
        ////////8AAAAAAAD//4d3d3d3d3j//wAAAAD/+Hd3d3d3d3d3d4//AAAA/3d3d3d3d3d3d3d3/wAAD/
        d3d3d3d3d3d3d3d3/wAA/3d3d3d3d3d3d3d3d/8AAP93d3d3d3d3d3d3d3f/AAD/d3d3d3d3d3d3d3d3
        /wAA/3d3d3d3d3d3d3d3d/8AAP93d3d3d3d3d3d3d3f/AAD/d3d3d3d3d3d3d3d3/wAA/3d3d3d3d3d3
        d3d3d/8AAP93d3d3d3d3d3d3d3f/AAD/d3d3d3d3d3d3d3d3/wAA/3d3d3d3d3d3d3d3d/8AAP93d3d3
        d3d3d3d3d3f/AAD/d3d3d3d3d3d3d3d3/wAA/3d3d3d3d3d3d3d3d/8AAP93d3d3d3d3d3d3d3f/AAD/
        d3d3d3d3d3d3d3d3/wAA/3d3d3d3d3d3d3d3d/8AAP93d3eI/////4h3d3f/AAD/d3f//////////3d3
        /wAA/3eP///////////4d/8AAP93j///////////+Hf/AAD/d3f//////////3d3/wAAD/d3d4j/////
        iHd3f/AAAA//h3d3d3d3d3d3eP/wAAAAD//4d3d3d3d3j//wAAAAAAAP///////////wAAAAAAAAAAD/
        //////8AAAAAAP/AA//+AAB/+AAAH+AAAAfgAAAHwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AA
        AAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA+AA
        AAfgAAAH+AAAH/4AAH//wAP/KAAAACAAAABAAAAAAQAIAAAAAAAABAAAAAAAAAAAAAAAAQAAAAEAAAAA
        AABCQkIATU1NAG9vbwB5eXkAhoaGAJGRkQCamZkApKOkALOzswDFxMUAycnJANDPzwDm5OUA6+vrAPHv
        8AD29vYA+Pj4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP//
        /wAAAAAAAAAAAAAAEREQEBAQEBAQEBERAAAAAAAAAAAAAAAAAAAAAAAQEBAQEBAQEBAQEBAQEBAQEBAA
        AAAAAAAAAAAAAAAQEBAOCQYDAQEBAQEBAQIDBgkOEBAQAAAAAAAAAAAREBALBAEBAQEBAQEBAQEBAQEB
        AQEECxAQEQAAAAAAABAQBQEBAQEBAQEBAQEBAQEBAQEBAQEBBRAQAAAAAAAQEAUBAQEBAQEBAQEBAQEB
        AQEBAQEBAQEBBRAQAAAAABAQAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBEBAAAAAAEBABAQEBAQEBAQEB
        AQEBAQEBAQEBAQEBAQEQEAAAAAAQEAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARAQAAAAABAQAQEBAQEB
        AQEBAQEBAQEBAQEBAQEBAQEBEBAAAAAAEBABAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEQEAAAAAAQEAEB
        AQEBAQEBAQEBAQEBAQEBAQEBAQEBARAQAAAAABAQAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBEBAAAAAA
        EBABAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEQEAAAAAAQEAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARAQ
        AAAAABAQAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBEBAAAAAAEBABAQEBAQEBAQEBAQEBAQEBAQEBAQEB
        AQEQEAAAAAAQEAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARAQAAAAABAQAQEBAQEBAQEBAQEBAQEBAQEB
        AQEBAQEBEBAAAAAAEBABAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEQEAAAAAAQEAEBAQEBAQEBAQEBAQEB
        AQEBAQEBAQEBARAQAAAAABAQAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBEBAAAAAAEBABAQEBAQQICg0P
        Dw8PDw8NCggEAQEBAQEQEAAAAAAQEAEBAgcNDw8PDw8PDw8PDw8PDw8NBwIBARAQAAAAABAOAQEMDw8P
        Dw8PDw8PDw8PDw8PDw8PDAEBEBAAAAAAEA4BAQwPDw8PDw8PDw8PDw8PDw8PDw8MAQEQEAAAAAAQEAUB
        AgcNDw8PDw8PDw8PDw8PDw8NBwIBBRAQAAAAAAAQDgUBAQEECAoNDw8PDw8PDQoIBAEBAQUOEAAAAAAA
        ABEQEAsEAQEBAQEBAQEBAQEBAQEBAQQLEBARAAAAAAAAAAAQEBAOCQYDAQEBAQEBAQEDBgkOEBAQAAAA
        AAAAAAAAAAAAEBAQEBAQEBAQEBAQEBAQEBAQAAAAAAAAAAAAAAAAAAAAAAARERAQEBAQEBAQEREAAAAA
        AAAAAAAA/8AD//4AAH/4AAAf4AAAB+AAAAfAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AA
        AAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAAD4AAAB+AA
        AAf4AAAf/gAAf//AA/8oAAAAIAAAAEAAAAABACAAAAAAAIAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD29vYg9vb2cPb29p/29va/9vb2//b29v/29vb/9vb2//b2
        9v/29vb/9vb2//b29v/29va/9vb2n/b29nD29vYgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAPb29hD29vZw9vb23/b29v/29vb/9vb2//b29v/29vb/9vb2//b2
        9v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vbf9vb2cPb29hAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD29vZQ9vb27/b29v/29vb/6+vr/7Ozs/+RkZH/b29v/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9NTU3/b29v/5GRkf+zs7P/6+vr//b29v/29vb/9vb27/b2
        9lAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA9vb2n/b29v/29vb/ycnJ/3p6ev9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/enp6/8nJ
        yf/29vb/9vb2//b29p8AAAAAAAAAAAAAAAAAAAAAAAAAAPb29nD29vb/9vb2/4aGhv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/4aGhv/29vb/9vb2//b29nAAAAAAAAAAAAAAAAAAAAAA9vb23/b29v+Ghob/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/4aGhv/29vb/9vb23wAAAAAAAAAAAAAAAAAAAAD29vb/9vb2/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC//b29v/29vb/AAAAAAAAAAAAAAAAAAAAAPb2
        9v/29vb/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/9vb2//b29v8AAAAAAAAAAAAA
        AAAAAAAA9vb2//b29v9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv/29vb/9vb2/wAA
        AAAAAAAAAAAAAAAAAAD29vb/9vb2/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC//b2
        9v/29vb/AAAAAAAAAAAAAAAAAAAAAPb29v/29vb/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/9vb2//b29v8AAAAAAAAAAAAAAAAAAAAA9vb2//b29v9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv/29vb/9vb2/wAAAAAAAAAAAAAAAAAAAAD29vb/9vb2/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC//b29v/29vb/AAAAAAAAAAAAAAAAAAAAAPb29v/29vb/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/9vb2//b29v8AAAAAAAAAAAAAAAAAAAAA9vb2//b2
        9v9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv/29vb/9vb2/wAAAAAAAAAAAAAAAAAA
        AAD29vb/9vb2/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC//b29v/29vb/AAAAAAAA
        AAAAAAAAAAAAAPb29v/29vb/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/9vb2//b2
        9v8AAAAAAAAAAAAAAAAAAAAA9vb2//b29v9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv/29vb/9vb2/wAAAAAAAAAAAAAAAAAAAAD29vb/9vb2/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC//b29v/29vb/AAAAAAAAAAAAAAAAAAAAAPb29v/29vb/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/9vb2//b29v8AAAAAAAAAAAAAAAAAAAAA9vb2//b29v9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv/29vb/9vb2/wAAAAAAAAAAAAAAAAAAAAD29vb/9vb2/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC//b29v/29vb/AAAAAAAAAAAAAAAAAAAAAPb2
        9v/29vb/QkJC/0JCQv9CQkL/QkJC/0JCQv95eHj/pKOk/8XExf/m5OX/8e/w//Hv8P/x7/D/8e/w//Hv
        8P/x7/D/5uTl/8XExf+ko6T/eXh4/0JCQv9CQkL/QkJC/0JCQv9CQkL/9vb2//b29v8AAAAAAAAAAAAA
        AAAAAAAA9vb2//b29v9CQkL/QkJC/01NTf+amZn/5uTl//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv
        8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/5uTl/5qZmf9NTU3/QkJC/0JCQv/29vb/9vb2/wAA
        AAAAAAAAAAAAAAAAAAD29vb/6+vr/0JCQv9CQkL/0M/P//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv
        8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w/9DPz/9CQkL/QkJC//b2
        9v/29vb/AAAAAAAAAAAAAAAAAAAAAPb29v/r6+v/QkJC/0JCQv/Qz8//8e/w//Hv8P/x7/D/8e/w//Hv
        8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/0M/P/0JC
        Qv9CQkL/9vb2//b29v8AAAAAAAAAAAAAAAAAAAAA9vb23/b29v+Ghob/QkJC/01NTf+amZn/5uTl//Hv
        8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/5uTl/5qZ
        mf9NTU3/QkJC/4aGhv/29vb/9vb23wAAAAAAAAAAAAAAAAAAAAD29vZw9vb2/+vr6/+Ghob/QkJC/0JC
        Qv9CQkL/eXh4/6SjpP/FxMX/5uTl//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w/+bk5f/FxMX/pKOk/3l4
        eP9CQkL/QkJC/0JCQv+Ghob/6+vr//b29v/29vZwAAAAAAAAAAAAAAAAAAAAAAAAAAD29vaf9vb2//b2
        9v/Jycn/enp6/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/QkJC/0JCQv96enr/ycnJ//b29v/29vb/9vb2nwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAD29vZQ9vb27/b29v/29vb/6+vr/7Ozs/+RkZH/b29v/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JC
        Qv9CQkL/b29v/5GRkf+zs7P/6+vr//b29v/29vb/9vb27/b29lAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAD29vYQ9vb2cPb29t/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b2
        9v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb23/b29nD29vYQAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPb29iD29vZw9vb2n/b29r/29vb/9vb2//b2
        9v/29vb/9vb2//b29v/29vb/9vb2//b29r/29vaf9vb2cPb29iAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAP8AAP/4AAAf8AAAD+AAAAfAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AA
        AAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AA
        AAPgAAAH8AAAD/gAAB//AAD/
 </value>
  </data>
 </root>
--- a/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb
+++ b/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb
@@ -1,292 +0,0 @@
 Imports System.Text.RegularExpressions
 Imports Oracle.ManagedDataAccess.Client
 Imports DD_LIB_Standards
 Public Class frmSQL_DESIGNER
    Dim CurrentPosition As Integer = 0
    Dim CurrentPlaceholders As New Placeholders()
    Dim CurrentTableType As String
    Dim AtPlaceholderPattern As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}" '"\[%[0-9A-Za-z_-]{1,}\]"
    Public Class Placeholders
        Public Property RecordId As Integer
        Public Property ParentRecordId As Integer
        Public Property FormId As Integer
    End Class
    Public Property SQLCommand() As String
        Get
            Return SQL_COMMANDTextBox.Text
        End Get
        Set(value As String)
            SQL_COMMANDTextBox.Text = value
        End Set
    End Property
    Public Property ConnectionID As Integer
    Private Sub TBPM_PROFILE_FINAL_INDEXINGBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)
        Validate()
        TableAdapterManager.UpdateAll(Me.DD_DMSLiteDataSet)
    End Sub
    Private Sub frmSQL_FINAL_INDICES_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Try
            lblSaveFinalIndex.Visible = False
            TBDD_CONNECTIONTableAdapter.Connection.ConnectionString = CONNECTION_STRING_ECM
            TBDD_CONNECTIONTableAdapter.Fill(DD_DMSLiteDataSet.TBDD_CONNECTION)
            If CURRENT_DESIGN_TYPE = "INPUT_INDEX" Then
                CURRENT_DT_SQL_CONFIG_TABLE = Database_ECM.GetDatatable(String.Format("SELECT T.CONNECTION_ID,T1.BEZEICHNUNG AS 'CON_STRING',ISNULL(T.SQL_UEBERPRUEFUNG,'') AS 'SQL_COMMAND' FROM TBPM_PROFILE_CONTROLS T, TBDD_CONNECTION T1 WHERE T.CONNECTION_ID = T1.GUID AND T.GUID = {0}", CURRENT_CONTROL_ID)) ', "frmSQL_FINAL_INDICES_Load1")
            ElseIf CURRENT_DESIGN_TYPE = "FINAL_INDEX" Then
                CURRENT_DT_SQL_CONFIG_TABLE = Database_ECM.GetDatatable(String.Format("SELECT T.CONNECTION_ID,T1.BEZEICHNUNG AS 'CON_STRING',ISNULL(T.SQL_COMMAND,'') AS 'SQL_COMMAND' FROM TBPM_PROFILE_FINAL_INDEXING T, TBDD_CONNECTION T1 WHERE T.CONNECTION_ID = T1.GUID AND T.GUID = {0} ORDER BY T.SEQUENCE", CURRENT_INDEX_ID)) ', "frmSQL_FINAL_INDICES_Load2")
            ElseIf CURRENT_DESIGN_TYPE = "SQL_SOURCE_TABLE_COLUMN" Then
                CURRENT_DT_SQL_CONFIG_TABLE = Database_ECM.GetDatatable(String.Format("SELECT T.CONNECTION_ID,T1.BEZEICHNUNG AS 'CON_STRING',ISNULL(T.SQL_COMMAND,'') AS 'SQL_COMMAND' FROM TBPM_CONTROL_TABLE T, TBDD_CONNECTION T1 WHERE T.CONNECTION_ID = T1.GUID AND T.GUID = {0}", CURRENT_INDEX_ID)) ', "frmSQL_FINAL_INDICES_Load2")
            End If
            If CURRENT_DESIGN_TYPE = "SQL_OVERVIEW" Then
                cmbConnection.Enabled = False
                btnShowConnections.Enabled = False
            Else
                cmbConnection.Enabled = True
                btnShowConnections.Enabled = True
            End If
            If (CURRENT_DESIGN_TYPE = "INPUT_INDEX") Or CURRENT_DESIGN_TYPE = "FINAL_INDEX" Or CURRENT_DESIGN_TYPE = "SQL_BTNFINISH" Or CURRENT_DESIGN_TYPE = "SQL_SOURCE_TABLE_COLUMN" Then
                If Not IsNothing(CURRENT_DT_SQL_CONFIG_TABLE) Then
                    If CURRENT_DT_SQL_CONFIG_TABLE.Rows.Count = 1 Then
                        cmbConnection.SelectedValue = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CONNECTION_ID")
                        cmbConnection.FindStringExact(CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CON_STRING"))
                    End If
                End If
                Dim oSQL = String.Format("SELECT NAME FROM TBPM_PROFILE_CONTROLS WHERE PROFIL_ID = {0} AND CTRL_TYPE <> 'LBL' ORDER BY NAME", CURRENT_ProfilGUID)
                Dim oDatatable As DataTable = Database_ECM.GetDatatable(oSQL) ', "frmSQL_FINAL_INDICES_Load3")
                    cmbControls.DataSource = oDatatable
                    cmbControls.DisplayMember = oDatatable.Columns(0).ColumnName
                    cmbControls.Visible = True
                    lblControls.Visible = True
                    btnAddControl.Visible = True
                    cmbIndexe.Items.Clear()
                If IDB_ACTIVE = False Then
                    If MyIndicies IsNot Nothing Then
                        For Each index As String In MyIndicies
                            cmbIndexe.Items.Add(index)
                        Next
                        cmbIndexe.SelectedIndex = -1
                    End If
                    'cmbIndexe.Enabled = True
                    'lbIndexe.Enabled = True
                    'btnAddIndex.Enabled = True
                Else
                    Dim oAttributes = IDBData.GetIndicesByBE(CURRENT_OBJECTTYPE)
                    If oAttributes IsNot Nothing Then
                        For Each oAttribute As String In oAttributes
                            cmbIndexe.Items.Add(oAttribute)
                        Next
                        cmbIndexe.SelectedIndex = -1
                    End If
                    'cmbIndexe.Enabled = False
                    'lbIndexe.Enabled = False
                    'btnAddIndex.Enabled = False
                End If
            Else
                cmbControls.Visible = False
                lblControls.Visible = False
                btnAddControl.Visible = False
                cmbIndexe.Visible = False
                lbIndexe.Visible = False
                btnAddIndex.Visible = False
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            MsgBox("Unexpected Error while loading form: " & ex.Message, MsgBoxStyle.Critical)
        End Try
    End Sub
    Private Sub SQL_COMMANDTextBox_TextChanged(sender As Object, e As EventArgs) Handles SQL_COMMANDTextBox.TextChanged, SQL_COMMANDTextBox.Click
        CurrentPosition = SQL_COMMANDTextBox.SelectionStart
        If SQL_COMMANDTextBox.Text.Trim().Count = 0 Then
            dgvPlaceholders.Enabled = False
        Else
            dgvPlaceholders.Enabled = True
        End If
        CheckForPlaceholders()
    End Sub
    Private Sub CheckForPlaceholders()
        Dim text As String = SQL_COMMANDTextBox.Text
        dgvPlaceholders.Rows.Clear()
        Dim patterns As List(Of clsPatterns.Pattern) = clsPatterns.GetAllPatterns(text)
        For Each pattern In patterns
            dgvPlaceholders.Rows.Add({pattern.ToString, ""})
        Next
        'Dim count As Integer = 0
        'Dim text As String = Me.Value
        'Dim atPlaceholderRegex = New Regex(AtPlaceholderPattern, RegexOptions.IgnoreCase)
        'Dim matches As MatchCollection = atPlaceholderRegex.Matches(text)
        'dgvPlaceholders.Rows.Clear()
        'For Each match As Match In matches
        '    dgvPlaceholders.Rows.Add({match.Value, ""})
        'Next
    End Sub
    Private Sub btnTestSQL_Click(sender As Object, e As EventArgs) Handles btnTestSQL.Click
        Dim query As String = SQL_COMMANDTextBox.Text
        For Each row As DataGridViewRow In dgvPlaceholders.Rows
            Dim placeholder As String = row.Cells(0).Value
            Dim replacement As String = row.Cells(1).Value
            ' Wenn Ersetzung ausgefüllt wurde, Platzhalter damit ersetzen
            If Not String.IsNullOrEmpty(replacement) Then
                Dim pattern As New clsPatterns.Pattern(placeholder)
                query = clsPatterns.ReplacePattern(query, pattern.Type, replacement)
            Else
                MsgBox("Bitte geben Sie für den Platzhalter " & placeholder & " einen Wert an!", MsgBoxStyle.Exclamation, "Fehlende Platzhalter Ersetzung")
                Exit Sub
            End If
        Next
        Dim ds As DataSet = ExecuteWithConnection(cmbConnection.SelectedValue, query)
        If ds IsNot Nothing Then
            dgvResult.DataSource = ds.Tables(0)
        End If
    End Sub
    Private Function ExecuteWithConnection(connectionId As Integer, sql As String) As DataSet
        Try
            Dim connectionString As String
            connectionString = ClassDatabase.Get_ConnectionString(connectionId)
            If connectionString <> "" Then
                If connectionString.StartsWith("Server=") And connectionString.Contains("Database=") Then
                    Dim sqlConnection As SqlClient.SqlConnection
                    Dim sqlCommand As SqlClient.SqlCommand
                    Dim sqlAdapter As New SqlClient.SqlDataAdapter
                    Dim dataset As New DataSet
                    sqlConnection = New SqlClient.SqlConnection(connectionString)
                    sqlConnection.Open()
                    sqlCommand = New SqlClient.SqlCommand(sql, sqlConnection)
                    sqlAdapter.SelectCommand = sqlCommand
                    sqlAdapter.Fill(dataset)
                    Return dataset
                ElseIf connectionString.Contains("dsn=") Then 'ODBC-Connection
                    Dim sqlConnection As Odbc.OdbcConnection
                    Dim sqlCommand As Odbc.OdbcCommand
                    Dim sqlAdapter As New Odbc.OdbcDataAdapter
                    Dim dataset As New DataSet
                    sqlConnection = New Odbc.OdbcConnection(connectionString)
                    sqlConnection.Open()
                    sqlCommand = New Odbc.OdbcCommand(sql, sqlConnection)
                    sqlAdapter.SelectCommand = sqlCommand
                    sqlAdapter.Fill(dataset)
                    Return dataset
                Else
                    If DEBUG = True Then LOGGER.Info(" >> It's an Oracle-Connection (ExecuteWithConnection)", False)
                    Dim sqlConnection As OracleConnection
                    Dim sqlCommand As OracleCommand
                    Dim sqlAdapter As New OracleDataAdapter
                    Dim dataset As New DataSet
                    sqlConnection = New OracleConnection(connectionString)
                    sqlConnection.Open()
                    sqlCommand = New OracleCommand(sql, sqlConnection)
                    sqlAdapter.SelectCommand = sqlCommand
                    sqlAdapter.Fill(dataset)
                    Return dataset
                End If
            Else
                MsgBox("Keine gültige ConnectionID", MsgBoxStyle.Exclamation)
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info(" - Unvorhergesehener Fehler bei TestSQL - Fehler: " & vbNewLine & ex.Message)
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei TestSQL:")
            Return Nothing
        End Try
    End Function
    Private Sub btnSaveSQLCommand_Click(sender As Object, e As EventArgs) Handles btnSaveSQLCommand.Click
        If CURRENT_DESIGN_TYPE = "FINAL_INDEX" Then
            ' SQL wird nicht hier, sondern in frmAdministration gespeichert
            lblSaveFinalIndex.Visible = True
            lblSaveFinalIndex.Text = "SQL für finalen Index wurde erfolgreich gespeichert! " & Now.ToString
        End If
        SQLCommand = SQL_COMMANDTextBox.Text
        ConnectionID = cmbConnection.SelectedValue
        CURRENT_CONN_ID = ConnectionID
    End Sub
    Private Sub btnAddControl_Click(sender As Object, e As EventArgs) Handles btnAddControl.Click
        If cmbControls.SelectedIndex <> -1 Then
            Dim value As String = clsPatterns.WrapPatternValue(clsPatterns.PATTERN_CTRL, cmbControls.Text)
            InsertAtSelection(value)
        End If
    End Sub
    Private Sub btnAddStatic_Click(sender As Object, e As EventArgs) Handles btnAddStatic.Click
        If cmbStatic.SelectedIndex <> -1 Then
            Dim value As String = clsPatterns.WrapPatternValue(clsPatterns.PATTERN_INT, cmbStatic.Text)
            InsertAtSelection(value)
        End If
    End Sub
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnAddIndex.Click
        If cmbIndexe.SelectedIndex <> -1 Then
            Dim oValue As String
            If IDB_ACTIVE = False Then
                oValue = clsPatterns.WrapPatternValue(clsPatterns.PATTERN_WMI, cmbIndexe.Text)
            Else
                oValue = clsPatterns.WrapPatternValue(clsPatterns.PATTERN_IDBA, cmbIndexe.Text)
            End If
            InsertAtSelection(oValue)
        End If
    End Sub
    Private Sub btnAddUser_Click(sender As Object, e As EventArgs) Handles btnAddUser.Click
        If cmbUser.SelectedIndex <> -1 Then
            Dim value As String = clsPatterns.WrapPatternValue(clsPatterns.PATTERN_USER, cmbUser.Text)
            InsertAtSelection(value)
        End If
    End Sub
    Private Sub InsertAtSelection(str As String)
        Dim altePosition As Integer = SQL_COMMANDTextBox.SelectionStart()
        SQL_COMMANDTextBox.Text = SQL_COMMANDTextBox.Text.Insert(altePosition, str)
        SQL_COMMANDTextBox.SelectionStart = altePosition + str.Length
    End Sub
    Private Sub btnShowConnections_Click(sender As Object, e As EventArgs) Handles btnShowConnections.Click
        frmConnection.ShowDialog()
    End Sub
    Private Sub cmbConnection_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbConnection.SelectedIndexChanged
    End Sub
 End Class
--- a/app/DD_PM_WINDREAM/frmSplash.resx
+++ b/app/DD_PM_WINDREAM/frmSplash.resx
--- a/app/DD_PM_WINDREAM/frmValidator.vb
+++ b/app/DD_PM_WINDREAM/frmValidator.vb
--- a/app/DD_PM_WINDREAM/frmValidatorSearch.en-US.resx
+++ b/app/DD_PM_WINDREAM/frmValidatorSearch.en-US.resx
@@ -1,599 +0,0 @@
 <?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.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <assembly alias="DevExpress.Data.v19.2" name="DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <assembly alias="DevExpress.XtraEditors.v19.2" name="DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <assembly alias="DevExpress.Utils.v19.2" name="DevExpress.Utils.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="ToolStripButtonRefreshSearches.Size" type="System.Drawing.Size, System.Drawing">
    <value>115, 22</value>
  </data>
  <data name="ToolStripButtonRefreshSearches.Text" xml:space="preserve">
    <value>Refresh Searches</value>
  </data>
  <data name="EigenschaftenDateiToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAZCAYAAABQDyyRAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6
        JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAAACXBIWXMAAAsTAAALEwEAmpwYAAACkUlE
        QVRIS8XQXUhTYRwGcAkiqBuDhKAi6ia8kZp3QeS6iGjqnBtT0UqDNAtSJoKNokFuIUpG0kxKCVtWY5lE
        IFmBmuG0D20jQ/Nrs0UzV2Yy9/307uSpA/317pwO/HjPeQ7v/33OSQDwX5GhlMhQSmQoJTKUEhmupMNq
        XmtraRh71m6aNlaVHHp8xxC53WjALbMBTfV6NBgrYCjPj5lr9Xq1TX6J6abmCJHhajqtrW1L06a209oD
        E/h6BryQW4fFDyUYf65BrU6FmpulML42si30HB4ZrsZyw5RaliN3wXcS7ddzucODLh2WJk5hYUgLX78C
        oa6daGs9BvYH2BZ6Do8Mhc43T4Fn7RqDzVKP4MwFXKtWI15CuXc3/B9L8dORC9+LNMw+3YO5extRdyUL
        8hYZG0HP5ZGhUPxgy0vgyYCHO9zvuojyIgXcb/QoKczmSmTtk2PqkQz2pm3oa0jC5eOboCpOw/7GZDaC
        nssjQ6F4gc7BH9zhHqeJO7zm6l22HsZkTxHyMnKA4e1I3ZWE9esSkbJjDU5olcivyoOsbjMbQc/lkaFQ
        j/0dWwCv143qyqPwfJrint8O9nIlRu6nYEviBhQWHIG52RJ/xe1LLt56lvnzvBIyFOILIBr+bfmKxGKw
        PeiArkAO5+gMZnzAwUxN/BU5ZyVkKNTd/2+BKDs8EI5hwR/Fl/kIZ9wrUoHeASdbgNaHfZyY4F5oxCNS
        gR67gy3sWv4DEdYgEIri+2IYn7+FMekNweEOYNgtcgH+S4Osh/DLea8mo+IUsA+NsoVdy3/Az255c0HA
        NQ+8nwUcjCgFKirPQaHIRIZS85dKi/QsNRTKbKQz8VWRqRKngNjIUEpkKCUylBIZSokMpYOEXxgRTAe1
        DBDPAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="DateiÖffnenToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAACH
        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/gUDmPP8usTo0wAAAAlwSFlzAAALEwAACxMBAJqcGAAAAZRJREFUOE+VkO0vQmEY
        xvsn/Cn8Az4x1gd8s7GxUeYbG4sNy5BqpZeZkkoyNQ2NNpppGH0wNrJ5X1MtpSWV3rs8p5a0jtNc2/Xc
        57l337+d52IBoPW03NA4KTViZE6HGYUJPKF2jG6uqlFy95ACbRxRJ/U9OKqpmyKwYf5KR9eQnLTKcxVL
        TObyFlvbB0RgcyTkWu4XDqVhD3RWrO7CYHXOUzNtXDHY/VK09MnIlQZApwXtDhqae38gdC4cfwHEagv2
        T29KECFp/Q8gWNwoLJdMRA+Q662kVCuXz2N58wRq8zEzQKLZIqVSZBeJVAahyBcsR3eob+qh2vQA4ZKZ
        lEol01mEowl4Ap8w213MgFnFOillpTNZRGIp+N6juH8NwWi7ZAbwpXpSisrkcojGU/CHYnj0hHH18Abd
        9jkzYEKkIYWElssjnkgjEI7jxfeB66cgzm68UJkczIBxgYqElkciWQzN7Y/g9jkIp8uLwws3lGv22gAq
        NCptKjDqzVry2yqzA0rjAWR6W+0nUAO1/HuxaLC+AebHD8Ec7JqWAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        AAABAAIAEBAQAAEABAAoAQAAJgAAABAQAAABAAgAaAUAAE4BAAAoAAAAEAAAACAAAAABAAQAAAAAAIAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAICAgADAwMAAAAD/AAD/
        AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAAAAD/////////8Pd3d3d3d3fw9//3//f/9/D3//f/9/
        /38Pd3d3d3d3fw9//3//f/9/D3//f/9//38Pd3d3d3d3fw9//3//f/9/D3//f/9//38Pd3d3d3d3fw93
        d3d3d3d/D3d3d3d3d38P/////////wAAAAAAAAAA//8AAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAIAA
        AACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAA//8AACgAAAAQAAAAIAAAAAEACAAAAAAAAAEAAAAA
        AAAAAAAAAAEAAAABAAAAAAAAQkJCAPHv8AD29vYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAD///8AAAAAAAAAAAAAAAAAAAAAAAADAwMDAwMDAwMDAwMDAwMAAwEBAQEBAQEB
        AQEBAQEDAAMBAgICAQICAgECAgIBAwADAQICAgECAgIBAgICAQMAAwEBAQEBAQEBAQEBAQEDAAMBAgIC
        AQICAgECAgIBAwADAQICAgECAgIBAgICAQMAAwEBAQEBAQEBAQEBAQEDAAMBAgICAQICAgECAgIBAwAD
        AQICAgECAgIBAgICAQMAAwEBAQEBAQEBAQEBAQEDAAMBAQEBAQEBAQEBAQEBAwADAQEBAQEBAQEBAQEB
        AQMAAwMDAwMDAwMDAwMDAwMDAAAAAAAAAAAAAAAAAAAAAP//AACAAAAAgAAAAIAAAACAAAAAgAAAAIAA
        AACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAP//AAA=
 </value>
  </data>
 </root>
--- a/app/DD_PM_WINDREAM/frmValidatorSearch.fr-FR.resx
+++ b/app/DD_PM_WINDREAM/frmValidatorSearch.fr-FR.resx
@@ -1,593 +0,0 @@
 <?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.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <assembly alias="DevExpress.Data.v19.2" name="DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <assembly alias="DevExpress.XtraEditors.v19.2" name="DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <assembly alias="DevExpress.Utils.v19.2" name="DevExpress.Utils.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
  <data name="GridControlDocSearch1.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch1.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch2.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch3.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch4.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlDocSearch5.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch1.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch2.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch3.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch4.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v19.2">
    <value>Default</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>Top, Left</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>Tile</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>Inherit</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
    <value>0, 0</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v19.2">
    <value>Center</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.ToolTip" xml:space="preserve">
    <value />
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v19.2">
    <value>None</value>
  </data>
  <data name="GridControlSearch5.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
    <value />
  </data>
  <data name="EigenschaftenDateiToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAZCAYAAABQDyyRAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6
        JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAAACXBIWXMAAAsTAAALEwEAmpwYAAACkUlE
        QVRIS8XQXUhTYRwGcAkiqBuDhKAi6ia8kZp3QeS6iGjqnBtT0UqDNAtSJoKNokFuIUpG0kxKCVtWY5lE
        IFmBmuG0D20jQ/Nrs0UzV2Yy9/307uSpA/317pwO/HjPeQ7v/33OSQDwX5GhlMhQSmQoJTKUEhmupMNq
        XmtraRh71m6aNlaVHHp8xxC53WjALbMBTfV6NBgrYCjPj5lr9Xq1TX6J6abmCJHhajqtrW1L06a209oD
        E/h6BryQW4fFDyUYf65BrU6FmpulML42si30HB4ZrsZyw5RaliN3wXcS7ddzucODLh2WJk5hYUgLX78C
        oa6daGs9BvYH2BZ6Do8Mhc43T4Fn7RqDzVKP4MwFXKtWI15CuXc3/B9L8dORC9+LNMw+3YO5extRdyUL
        8hYZG0HP5ZGhUPxgy0vgyYCHO9zvuojyIgXcb/QoKczmSmTtk2PqkQz2pm3oa0jC5eOboCpOw/7GZDaC
        nssjQ6F4gc7BH9zhHqeJO7zm6l22HsZkTxHyMnKA4e1I3ZWE9esSkbJjDU5olcivyoOsbjMbQc/lkaFQ
        j/0dWwCv143qyqPwfJrint8O9nIlRu6nYEviBhQWHIG52RJ/xe1LLt56lvnzvBIyFOILIBr+bfmKxGKw
        PeiArkAO5+gMZnzAwUxN/BU5ZyVkKNTd/2+BKDs8EI5hwR/Fl/kIZ9wrUoHeASdbgNaHfZyY4F5oxCNS
        gR67gy3sWv4DEdYgEIri+2IYn7+FMekNweEOYNgtcgH+S4Osh/DLea8mo+IUsA+NsoVdy3/Az255c0HA
        NQ+8nwUcjCgFKirPQaHIRIZS85dKi/QsNRTKbKQz8VWRqRKngNjIUEpkKCUylBIZSokMpYOEXxgRTAe1
        DBDPAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="DateiÖffnenToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAACH
        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/gUDmPP8usTo0wAAAAlwSFlzAAALEwAACxMBAJqcGAAAAZRJREFUOE+VkO0vQmEY
        xvsn/Cn8Az4x1gd8s7GxUeYbG4sNy5BqpZeZkkoyNQ2NNpppGH0wNrJ5X1MtpSWV3rs8p5a0jtNc2/Xc
        57l337+d52IBoPW03NA4KTViZE6HGYUJPKF2jG6uqlFy95ACbRxRJ/U9OKqpmyKwYf5KR9eQnLTKcxVL
        TObyFlvbB0RgcyTkWu4XDqVhD3RWrO7CYHXOUzNtXDHY/VK09MnIlQZApwXtDhqae38gdC4cfwHEagv2
        T29KECFp/Q8gWNwoLJdMRA+Q662kVCuXz2N58wRq8zEzQKLZIqVSZBeJVAahyBcsR3eob+qh2vQA4ZKZ
        lEol01mEowl4Ap8w213MgFnFOillpTNZRGIp+N6juH8NwWi7ZAbwpXpSisrkcojGU/CHYnj0hHH18Abd
        9jkzYEKkIYWElssjnkgjEI7jxfeB66cgzm68UJkczIBxgYqElkciWQzN7Y/g9jkIp8uLwws3lGv22gAq
        NCptKjDqzVry2yqzA0rjAWR6W+0nUAO1/HuxaLC+AebHD8Ec7JqWAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        AAABAAIAEBAQAAEABAAoAQAAJgAAABAQAAABAAgAaAUAAE4BAAAoAAAAEAAAACAAAAABAAQAAAAAAIAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAICAgADAwMAAAAD/AAD/
        AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAAAAD/////////8Pd3d3d3d3fw9//3//f/9/D3//f/9/
        /38Pd3d3d3d3fw9//3//f/9/D3//f/9//38Pd3d3d3d3fw9//3//f/9/D3//f/9//38Pd3d3d3d3fw93
        d3d3d3d/D3d3d3d3d38P/////////wAAAAAAAAAA//8AAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAIAA
        AACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAA//8AACgAAAAQAAAAIAAAAAEACAAAAAAAAAEAAAAA
        AAAAAAAAAAEAAAABAAAAAAAAQkJCAPHv8AD29vYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
        AAAAAAAAAAAAAAAAAAD///8AAAAAAAAAAAAAAAAAAAAAAAADAwMDAwMDAwMDAwMDAwMAAwEBAQEBAQEB
        AQEBAQEDAAMBAgICAQICAgECAgIBAwADAQICAgECAgIBAgICAQMAAwEBAQEBAQEBAQEBAQEDAAMBAgIC
        AQICAgECAgIBAwADAQICAgECAgIBAgICAQMAAwEBAQEBAQEBAQEBAQEDAAMBAgICAQICAgECAgIBAwAD
        AQICAgECAgIBAgICAQMAAwEBAQEBAQEBAQEBAQEDAAMBAQEBAQEBAQEBAQEBAwADAQEBAQEBAQEBAQEB
        AQMAAwMDAwMDAwMDAwMDAwMDAAAAAAAAAAAAAAAAAAAAAP//AACAAAAAgAAAAIAAAACAAAAAgAAAAIAA
        AACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAP//AAA=
 </value>
  </data>
 </root>
--- a/app/DD_PM_WINDREAM/frmValidatorSearch.vb
+++ b/app/DD_PM_WINDREAM/frmValidatorSearch.vb
@@ -1,717 +0,0 @@
 Imports System.ComponentModel
 Imports System.IO
 Imports System.Runtime.InteropServices
 Imports DevExpress.Utils
 Imports DevExpress.XtraGrid
 Imports DevExpress.XtraGrid.Columns
 Imports DevExpress.XtraGrid.Views.Base
 Imports DevExpress.XtraGrid.Views.Grid
 Imports DevExpress.XtraTab
 Public Class frmValidatorSearch
    <DllImport("Shell32", CharSet:=CharSet.Auto, SetLastError:=True)>
    Public Shared Function ShellExecuteEx(ByRef lpExecInfo As SHELLEXECUTEINFO) As Boolean
    End Function
    Public Structure SHELLEXECUTEINFO
        Public cbSize As Integer
        Public fMask As Integer
        Public hwnd As IntPtr
        <MarshalAs(UnmanagedType.LPTStr)> Public lpVerb As String
        <MarshalAs(UnmanagedType.LPTStr)> Public lpFile As String
        <MarshalAs(UnmanagedType.LPTStr)> Public lpParameters As String
        <MarshalAs(UnmanagedType.LPTStr)> Public lpDirectory As String
        Dim nShow As Integer
        Dim hInstApp As IntPtr
        Dim lpIDList As IntPtr
        <MarshalAs(UnmanagedType.LPTStr)> Public lpClass As String
        Public hkeyClass As IntPtr
        Public dwHotKey As Integer
        Public hIcon As IntPtr
        Public hProcess As IntPtr
    End Structure
 #Region "Laufzeitvariablen & Konstanten"
    Private Const SEE_MASK_INVOKEIDLIST = &HC
    Private Const SEE_MASK_NOCLOSEPROCESS = &H40
    Private Const SEE_MASK_FLAG_NO_UI = &H400
    Public Const SW_SHOW As Short = 5
 #End Region
    Public formLoaded As Boolean = False
    Public _DTDocSearches As DataTable
    Public _DTSQLSearches As DataTable
    Private _frmValidator As frmValidator 'You need a reference to Form1
    Private Shared BW_DocPath As String
    Private Shared BW_DocID As Integer
    Public Sub TabPreload(Panel1Collapsed As Boolean, Panel2Collapsed As Boolean, TabCountSQL As Integer, TabCountDoc As Integer, DTSQL As DataTable, DTDOC As DataTable)
        Try
            If Me.InvokeRequired() Then
                Me.Invoke(Sub() TabPreload(Panel1Collapsed, Panel2Collapsed, TabCountSQL, TabCountDoc, DTSQL, DTDOC))
            Else
                '#### SQL Tabs Design Laden
                SplitContainerSearches.Panel1Collapsed = Panel1Collapsed
                SplitContainerSearches.Panel2Collapsed = Panel2Collapsed
                If DTSQL.Rows.Count > 0 Then
                    For p As Integer = 0 To XtraTabControlSQL.TabPages.Count - 1
                        If XtraTabControlSQL.TabPages(p).TabIndex >= TabCountSQL Then
                            XtraTabControlSQL.TabPages(p).PageVisible = False
                        End If
                    Next
                    For p As Integer = 0 To XtraTabControlSQL.TabPages.Count - 1
                        If XtraTabControlSQL.TabPages(p).TabIndex >= TabCountSQL Then
                            Exit For
                        End If
                        XtraTabControlSQL.TabPages(p).Text = DTSQL.Rows(p).Item("TAB_TITLE")
                    Next
                End If
                If DTDOC.Rows.Count > 0 Then
                    '#### Doc Tabs Design Laden
                    For p As Integer = 0 To XtraTabControlDocs.TabPages.Count - 1
                        If XtraTabControlDocs.TabPages(p).TabIndex >= TabCountDoc Then
                            XtraTabControlDocs.TabPages(p).PageVisible = False
                        End If
                    Next
                    For p As Integer = 0 To XtraTabControlDocs.TabPages.Count - 1
                        If XtraTabControlDocs.TabPages(p).TabIndex >= TabCountDoc Then
                            Exit For
                        End If
                        XtraTabControlDocs.TabPages(p).Text = DTDOC.Rows(p).Item("TAB_TITLE")
                    Next
                End If
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
    End Sub
    Public Sub RefreshTabSQL(ConID As Integer, SQLCommand As String, TabIndex As Integer, TabCaption As String)
        If Me.InvokeRequired() Then
            Me.Invoke(Sub() RefreshTabSQL(ConID, SQLCommand, TabIndex, TabCaption))
        Else
            'Code to refresh your textbox here
            Refresh_Load_GridSQL(ConID, SQLCommand, TabIndex, TabCaption)
        End If
    End Sub
    Public Sub RefreshTabDoc(ConID As Integer, SQLCommand As String, TabIndex As Integer, TabCaption As String)
        If Me.InvokeRequired() Then
            Me.Invoke(Sub() RefreshTabDoc(ConID, SQLCommand, TabIndex, TabCaption))
        Else
            'Code to refresh your textbox here
            Refresh_Load_GridDoc(ConID, SQLCommand, TabIndex, TabCaption)
        End If
    End Sub
    Sub Refresh_Load_GridSQL(ConID As Integer, SQLCommand As String, TabIndex As Integer, TabCaption As String)
        Try
            Dim myGridControl As DevExpress.XtraGrid.GridControl
            Dim myGridview As DevExpress.XtraGrid.Views.Grid.GridView
            Select Case TabIndex
                Case 0
                    GridControlSearch1.DataSource = Nothing
                    GridViewSearch1.Columns.Clear()
                    myGridview = GridViewSearch1
                    myGridControl = GridControlSearch1
                Case 1
                    GridControlSearch2.DataSource = Nothing
                    GridViewSearch2.Columns.Clear()
                    myGridview = GridViewSearch2
                    myGridControl = GridControlSearch2
                Case 2
                    GridControlSearch3.DataSource = Nothing
                    GridViewSearch3.Columns.Clear()
                    myGridview = GridViewSearch3
                    myGridControl = GridControlSearch3
                Case 3
                    GridControlSearch4.DataSource = Nothing
                    GridViewSearch4.Columns.Clear()
                    myGridview = GridViewSearch4
                    myGridControl = GridControlSearch4
                Case 4
                    GridControlSearch5.DataSource = Nothing
                    GridViewSearch5.Columns.Clear()
                    myGridview = GridViewSearch5
                    myGridControl = GridControlSearch5
            End Select
            myGridControl.ContextMenuStrip = ContextMenuStripSQL
            Dim oDatatable As DataTable = ClassDatabase.Return_Datatable_ConId(SQLCommand, ConID)
            If Not IsNothing(oDatatable) Then
                XtraTabControlSQL.TabPages(TabIndex).Text = $"{TabCaption} ({oDatatable.Rows.Count})"
                Select Case TabIndex
                    Case 0
                        GridControlSearch1.DataSource = oDatatable
                        GridViewSearch1.BestFitColumns(True)
                    Case 1
                        GridControlSearch2.DataSource = oDatatable
                        GridViewSearch2.BestFitColumns(True)
                    Case 2
                        GridControlSearch3.DataSource = oDatatable
                        GridViewSearch3.BestFitColumns(True)
                    Case 3
                        GridControlSearch4.DataSource = oDatatable
                        GridViewSearch4.BestFitColumns(True)
                    Case 4
                        GridControlSearch5.DataSource = oDatatable
                        GridViewSearch5.BestFitColumns(True)
                End Select
                tsslblSQL.Text = $"Tab {TabCaption} refreshed - {Now}"
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
    End Sub
    Sub Refresh_Load_GridDoc(ConID As Integer, SQLCommand As String, TabIndex As Integer, TabCaption As String)
        Try
            Dim myGridControl As DevExpress.XtraGrid.GridControl
            Dim myGridview As DevExpress.XtraGrid.Views.Grid.GridView
            Select Case TabIndex
                Case 0
                    GridControlDocSearch1.DataSource = Nothing
                    GridViewDocSearch1.Columns.Clear()
                    myGridview = GridViewDocSearch1
                    myGridControl = GridControlDocSearch1
                Case 1
                    GridControlDocSearch2.DataSource = Nothing
                    GridViewDocSearch2.Columns.Clear()
                    myGridview = GridViewDocSearch2
                    myGridControl = GridControlDocSearch2
                Case 2
                    GridControlDocSearch3.DataSource = Nothing
                    GridViewDocSearch3.Columns.Clear()
                    myGridview = GridViewDocSearch3
                    myGridControl = GridControlDocSearch3
                Case 3
                    GridControlDocSearch4.DataSource = Nothing
                    GridViewDocSearch4.Columns.Clear()
                    myGridControl = GridControlDocSearch4
                    myGridview = GridViewDocSearch4
                Case 4
                    GridControlDocSearch5.DataSource = Nothing
                    GridViewDocSearch5.Columns.Clear()
                    myGridControl = GridControlDocSearch5
                    myGridview = GridViewDocSearch5
            End Select
            myGridControl.ContextMenuStrip = ContextMenuStripWMFile
            Dim oDatatable As DataTable = ClassDatabase.Return_Datatable_ConId(SQLCommand, ConID)
            If Not IsNothing(oDatatable) Then
                XtraTabControlDocs.TabPages(TabIndex).Text = $"{TabCaption} ({oDatatable.Rows.Count})"
                clsWMDocGrid.DTDocuments = oDatatable
                'Select Case TabIndex
                '    Case 0
                '        GridControlDocSearch1.DataSource = oDatatable
                '    Case 1
                '        GridControlDocSearch2.DataSource = oDatatable
                '    Case 2
                '        GridControlDocSearch3.DataSource = oDatatable
                '    Case 3
                '        GridControlDocSearch4.DataSource = oDatatable
                '    Case 4
                '        GridControlDocSearch5.DataSource = oDatatable
                'End Select
                Create_GridControl(myGridview, oDatatable)
                Dim oxmlPath As String = ""
                oxmlPath = Get_DocGrid_Layout_Filename(XtraTabControlDocs.SelectedTabPageIndex)
                If File.Exists(oxmlPath) Then
                    myGridview.RestoreLayoutFromXml(oxmlPath)
                    myGridview.GuessAutoFilterRowValuesFromFilter()
                End If
                tslblState.Text = $"Tab {TabCaption} refreshed - {Now}"
            Else
                clsWMDocGrid.DTDocuments = Nothing
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
    End Sub
    Private Function Create_GridControl(MyGridView As GridView, _datatable As DataTable) As GridView
        Dim oMyDocDatatable As New DataTable
        Try
            'Die Icon Colum erstellen und konfigurieren
            Dim oColIcon As New System.Data.DataColumn()
            oColIcon.DataType = GetType(Image)
            oColIcon.ColumnName = "ICON"
            oColIcon.Caption = ""
            oMyDocDatatable.Columns.Add(oColIcon)
            Dim oColPath As New System.Data.DataColumn()
            oColPath.DataType = GetType(String)
            oColPath.ColumnName = "FULL_FILENAME"
            oColPath.Caption = "Fullpath"
            oMyDocDatatable.Columns.Add(oColPath)
            Dim oColDocID As New System.Data.DataColumn()
            oColDocID.DataType = GetType(Int32)
            oColDocID.ColumnName = "DocID"
            oColDocID.Caption = "DocID"
            oMyDocDatatable.Columns.Add(oColDocID)
            Dim oRestColArray As New List(Of String)
            For Each oCol As DataColumn In _datatable.Columns
                Dim onewColumn As New System.Data.DataColumn()
                If oCol.ColumnName <> "DocID" And oCol.ColumnName <> "FULL_FILENAME" And oCol.ColumnName <> "Filename" Then
                    onewColumn.DataType = GetType(String)
                    onewColumn.ColumnName = oCol.ColumnName
                    onewColumn.Caption = oCol.Caption
                    oMyDocDatatable.Columns.Add(onewColumn)
                    oRestColArray.Add(onewColumn.ColumnName)
                End If
            Next
            For Each FILE_ROW As DataRow In _datatable.Rows
                Dim oFullpath = FILE_ROW.Item("FULL_FILENAME")
                Dim oDocID = FILE_ROW.Item("DocID")
                'Dim Folderpath = Path.GetDirectoryName(fullpath)
                Dim oFilename = Path.GetFileName(oFullpath)
                Dim oFileextension = Path.GetExtension(oFullpath)
                Dim oNewRow As DataRow
                oNewRow = oMyDocDatatable.NewRow()
                'Icon zuweisen
                Select Case oFileextension.ToUpper
                    Case ".csv".ToUpper
                        oNewRow.Item(0) = My.Resources.doc_excel_csv
                    Case ".txt".ToUpper
                        oNewRow.Item(0) = My.Resources.txt
                    Case ".pdf".ToUpper
                        oNewRow.Item(0) = My.Resources.pdf
                    Case ".doc".ToUpper
                        oNewRow.Item(0) = My.Resources.doc
                    Case ".docx".ToUpper
                        oNewRow.Item(0) = My.Resources.doc
                    Case ".xls".ToUpper
                        oNewRow.Item(0) = My.Resources.xls
                    Case ".xlsx".ToUpper
                        oNewRow.Item(0) = My.Resources.xls
                    Case ".xlsm".ToUpper
                        oNewRow.Item(0) = My.Resources.xls
                    Case ".ppt".ToUpper
                        oNewRow.Item(0) = My.Resources.ppt
                    Case ".pptx".ToUpper
                        oNewRow.Item(0) = My.Resources.ppt
                    Case ".dwg".ToUpper
                        oNewRow.Item(0) = My.Resources.dwg
                    Case ".dxf".ToUpper
                        oNewRow.Item(0) = My.Resources.dxf
                    Case ".msg".ToUpper
                        oNewRow.Item(0) = My.Resources.email_go
                    Case ".msg".ToUpper
                        oNewRow.Item(0) = My.Resources.email_go
                    Case Else
                        oNewRow.Item(0) = My.Resources._blank
                End Select
                'Den Filepath mitgeben
                oNewRow.Item(1) = oFullpath
                oNewRow.Item(2) = oDocID
                Dim i = 3 'Fängt bei 3 an, um die definierten Spalten zu überspringen
                For Each Colname As String In oRestColArray
                    Dim oRowValue
                    oRowValue = FILE_ROW.Item(Colname)
                    oNewRow.Item(i) = oRowValue.ToString
                    i += 1
                Next
                oMyDocDatatable.Rows.Add(oNewRow)
            Next
            Dim sdsd As String = ""
            Dim oGridControl As GridControl = MyGridView.GridControl
            oGridControl.DataSource = oMyDocDatatable
            oGridControl.ForceInitialize()
            Try
                MyGridView.Columns.Item("DocID").Visible = False
            Catch ex As Exception
            End Try
            Try
                MyGridView.Columns.Item("FULL_FILENAME").Visible = False
            Catch ex As Exception
            End Try
            Dim created, changed As String
            If USER_LANGUAGE <> "de-DE" Then
                changed = "Changed"
                created = "Created"
            Else
                changed = "Geändert"
                created = "Erstellt"
            End If
            Dim createdColumn = MyGridView.Columns(created)
            If Not IsNothing(createdColumn) Then
                createdColumn.DisplayFormat.FormatType = FormatType.DateTime
                createdColumn.DisplayFormat.FormatString = USER_DATE_FORMAT & " HH:MM:ss"
            End If
            Dim changedColumn = MyGridView.Columns(changed)
            If Not IsNothing(changedColumn) Then
                changedColumn.DisplayFormat.FormatType = FormatType.DateTime
                changedColumn.DisplayFormat.FormatString = USER_DATE_FORMAT & " HH:MM:ss"
            End If
            ' Alle Spalten aus ReadOnly setzen, danach werden alle passenden auf nicht ReadOnly gesetzt
            For Each column As GridColumn In MyGridView.Columns
                column.OptionsColumn.AllowEdit = False
            Next
            MyGridView.Columns.Item("ICON").MaxWidth = 24
            MyGridView.Columns.Item("ICON").MinWidth = 24
            MyGridView.OptionsView.BestFitMaxRowCount = -1
            MyGridView.BestFitColumns(True)
            Return MyGridView
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
    End Function
    Private Sub frmValidatorSearch_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
        Try
            DocumentViewer1.Done()
        Catch ex As Exception
            LOGGER.Warn($"Unexpected error in DocumentViewerValSearch.Done: {ex.Message}")
        End Try
        Try
            ' Position und Größe speichern
            My.Settings.frmValidatorSearchSize = Me.Size
            My.Settings.frmValidatorSearchPosition = Me.Location
            My.Settings.frmValSearchSplitterDistance = SplitContainerSearches.SplitterDistance
            My.Settings.Save()
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Error in Save FormLayout: " & ex.Message)
        End Try
    End Sub
    Private Sub frmValidatorSearch_Load(sender As Object, e As EventArgs) Handles Me.Load
        Try
            DocumentViewer1.Init(LOGCONFIG, GDPICTURE_LICENSE)
        Catch ex As Exception
            LOGGER.Warn("Error initializing DocViewDocsValdiatorSearch: " & ex.Message)
        End Try
        SplitContainerSearches.Panel1Collapsed = True
        If My.Settings.frmValidatorSearchPosition.IsEmpty = False Then
            If My.Settings.frmValidatorSearchPosition.X > 0 And My.Settings.frmValidatorSearchPosition.Y > 0 Then
                Location = My.Settings.frmValidatorSearchPosition
            End If
        End If
        If My.Settings.frmValidatorSearchSize.IsEmpty = False Then
            Size = My.Settings.frmValidatorSearchSize
        End If
        SplitContainerSearches.SplitterDistance = My.Settings.frmValSearchSplitterDistance
        _frmValidator = frmValidator
        ToolStripDropDownButtonFile.Visible = False
    End Sub
    Private Sub frmValidatorSearch_Shown(sender As Object, e As EventArgs) Handles Me.Shown
        formLoaded = True
    End Sub
    Private Sub XtraTabControlSQL_SelectedPageChanged(sender As Object, e As TabPageChangedEventArgs) Handles XtraTabControlSQL.SelectedPageChanged
        If IsNothing(_DTSQLSearches) Then Exit Sub
        Dim oConID = _DTSQLSearches.Rows(XtraTabControlSQL.SelectedTabPageIndex).Item("CONN_ID")
        Dim oCommand = _DTSQLSearches.Rows(XtraTabControlSQL.SelectedTabPageIndex).Item("SQL_COMMAND")
        oCommand = clsPatterns.ReplaceAllValues(oCommand, _frmValidator.PanelValidatorControl, True)
        Dim oTabIndex = _DTSQLSearches.Rows(XtraTabControlSQL.SelectedTabPageIndex).Item("TAB_INDEX")
        Dim oTabCaption = _DTSQLSearches.Rows(XtraTabControlSQL.SelectedTabPageIndex).Item("TAB_TITLE")
        RefreshTabSQL(oConID, oCommand, oTabIndex, oTabCaption)
    End Sub
    Private Sub XtraTabControlDocs_SelectedPageChanged_1(sender As Object, e As TabPageChangedEventArgs) Handles XtraTabControlDocs.SelectedPageChanged
        If IsNothing(_DTDocSearches) Then Exit Sub
        Dim oConID = _DTDocSearches.Rows(XtraTabControlDocs.SelectedTabPageIndex).Item("CONN_ID")
        Dim oCommand = _DTDocSearches.Rows(XtraTabControlDocs.SelectedTabPageIndex).Item("SQL_COMMAND")
        oCommand = clsPatterns.ReplaceAllValues(oCommand, _frmValidator.PanelValidatorControl, True)
        Dim oTabIndex = _DTDocSearches.Rows(XtraTabControlDocs.SelectedTabPageIndex).Item("TAB_INDEX")
        Dim oTabCaption = _DTDocSearches.Rows(XtraTabControlDocs.SelectedTabPageIndex).Item("TAB_TITLE")
        RefreshTabDoc(oConID, oCommand, oTabIndex, oTabCaption)
    End Sub
    Private Sub EigenschaftenDateiToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EigenschaftenDateiToolStripMenuItem.Click
        Show_File_Properties()
    End Sub
    Sub Show_File_Properties()
        If IsNothing(clsWMDocGrid.DTDocuments) Then
            MsgBox("Could not read file Parameters!", MsgBoxStyle.Exclamation)
            Exit Sub
        End If
        For Each oRow As DataRow In clsWMDocGrid.DTDocuments.Rows
            If oRow.Item("DOC_PATH") <> "" Then
                Cursor = Cursors.WaitCursor
                Dim sei As New SHELLEXECUTEINFO
                sei.cbSize = Marshal.SizeOf(sei)
                sei.lpVerb = "properties"
                sei.lpFile = oRow.Item("DOC_PATH")
                sei.nShow = SW_SHOW
                sei.fMask = SEE_MASK_INVOKEIDLIST
                If Not ShellExecuteEx(sei) Then
                    Dim ex As New System.ComponentModel.Win32Exception(System.Runtime.InteropServices.Marshal.GetLastWin32Error())
                    MsgBox("Error in Open file propertys: " & ex.Message, MsgBoxStyle.Critical)
                    LOGGER.Error(ex)
                End If
            End If
            Cursor = Cursors.Default
        Next
    End Sub
    Sub Refresh_DocID(myGrid As GridView)
        clsWMDocGrid.ActiveDocGrid = myGrid
        clsWMDocGrid.ActiveDocGrid.EndSelection()
        clsWMDocGrid.GetDocItems()
        If ToolStripDropDownButtonFile.Visible = False Then
            ToolStripDropDownButtonFile.Visible = True
        End If
        If clsWMDocGrid.SELECTED_DOC_ID <> 0 Then
            Dim msg = "Doc-ID: " & clsWMDocGrid.SELECTED_DOC_ID.ToString
            tslblDocID.Text = msg
            ToolStripDropDownButtonFile.Enabled = True
            If Not IsNothing(clsWMDocGrid.SELECTED_DOC_PATH) And Not IsNothing(DocumentViewer1) Then
                If clsWMDocGrid.SELECTED_DOC_PATH <> "" Then
                    DocumentViewer1.LoadFile(clsWMDocGrid.SELECTED_DOC_PATH)
                    DocumentViewer1.RightViewOnly(USER_RIGHT_VIEW_ONLY)
                    If USER_RIGHT_VIEW_ONLY = True Then
                        ToolStripDropDownButtonFile.Visible = False
                    Else
                        ToolStripDropDownButtonFile.Visible = True
                    End If
                End If
            End If
            Else
                tslblDocID.Text = "DocRow not selected"
            ToolStripDropDownButtonFile.Enabled = False
        End If
    End Sub
    Private Sub GridViewDocSearch1_FocusedRowChanged(sender As Object, e As Views.Base.FocusedRowChangedEventArgs) Handles GridViewDocSearch1.FocusedRowChanged
        Refresh_DocID(GridViewDocSearch1)
    End Sub
    Private Sub GridViewDocSearch2_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles GridViewDocSearch2.FocusedRowChanged
        Refresh_DocID(GridViewDocSearch2)
    End Sub
    Private Sub GridViewDocSearch3_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles GridViewDocSearch3.FocusedRowChanged
        Refresh_DocID(GridViewDocSearch3)
    End Sub
    Private Sub GridViewDocSearch4_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles GridViewDocSearch4.FocusedRowChanged
        Refresh_DocID(GridViewDocSearch4)
    End Sub
    Private Sub GridViewDocSearch5_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles GridViewDocSearch5.FocusedRowChanged
        Refresh_DocID(GridViewDocSearch5)
    End Sub
    Private Sub GridViewDocSearch1_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch1.FocusedColumnChanged
        Refresh_DocID(GridViewDocSearch1)
    End Sub
    Private Sub GridViewDocSearch2_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch2.FocusedColumnChanged
        Refresh_DocID(GridViewDocSearch2)
    End Sub
    Private Sub GridViewDocSearch3_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch3.FocusedColumnChanged
        Refresh_DocID(GridViewDocSearch3)
    End Sub
    Private Sub GridViewDocSearch4_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch4.FocusedColumnChanged
        Refresh_DocID(GridViewDocSearch4)
    End Sub
    Private Sub GridViewDocSearch5_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDocSearch5.FocusedColumnChanged
        Refresh_DocID(GridViewDocSearch5)
    End Sub
    Private Sub DateiÖffnenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DateiÖffnenToolStripMenuItem.Click
        FileShow()
    End Sub
    Sub FileShow()
        Try
            If IsNothing(clsWMDocGrid.SELECTED_DOC_PATH) Then
                MsgBox("Could not read fileparameters(5)!", MsgBoxStyle.Exclamation)
                Exit Sub
            End If
            File_SYSOPEN(clsWMDocGrid.SELECTED_DOC_PATH, clsWMDocGrid.SELECTED_DOC_ID)
        Catch ex As Exception
        End Try
    End Sub
    Private Shared Sub File_SYSOPEN(RESULT_DOC_PATH As Object, DocID As String)
        Try
            If RESULT_DOC_PATH <> Nothing Then
                If File.Exists(RESULT_DOC_PATH) Then
                    BW_DocPath = RESULT_DOC_PATH
                    BW_DocID = DocID
                    Dim BWFileHandler As New BackgroundWorker
                    AddHandler BWFileHandler.DoWork, AddressOf BWFileHandler_DoWork
                    BWFileHandler.RunWorkerAsync()
                Else
                    MsgBox("Document is not existing or accessible!", MsgBoxStyle.Exclamation)
                End If
            Else
                LOGGER.Warn("Attention: RESULT_DOC_PATH is nothing")
            End If
        Catch ex As Exception
            MsgBox("Unexpected Error in File_SYSOPEN:" & vbNewLine & ex.Message & vbNewLine & RESULT_DOC_PATH & vbNewLine & "DocID: " & DocID, MsgBoxStyle.Critical)
            LOGGER.Error(ex)
        End Try
    End Sub
    Private Shared Sub BWFileHandler_DoWork()
        Try
            Dim oMyProcess = New Process()
            Try
                'Dim oPSI As New ProcessStartInfo(BW_DocPath)
                oMyProcess.StartInfo.FileName = BW_DocPath
                oMyProcess.StartInfo.UseShellExecute = True
                oMyProcess.StartInfo.RedirectStandardOutput = False
                oMyProcess.Start()
                'oMyProcess.WaitForExit()
            Catch ex As Exception
                LOGGER.Error(ex)
                Exit Sub
            End Try
        Catch ex As Exception
            LOGGER.Error(ex)
            Try
                Process.Start(BW_DocPath)
            Catch ex1 As Exception
                LOGGER.Error(ex)
            End Try
        End Try
    End Sub
    Private Sub DateiÖffnenToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles DateiÖffnenToolStripMenuItem1.Click
        FileShow()
    End Sub
    Private Sub EigenschaftenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EigenschaftenToolStripMenuItem.Click
        Show_File_Properties()
    End Sub
    Private Function Get_DocGrid_Layout_Filename(oIndex As Integer)
        Dim oUserConfigPath = CONFIG.UserConfigPath.Replace("UserConfig.xml", "")
        Dim oFilename As String = String.Format("GridViewDoc_Search-{0}-{1}-UserLayout.xml", oIndex, CURRENT_ProfilGUID)
        Dim oPath = System.IO.Path.Combine(oUserConfigPath, oFilename)
        Return oPath
    End Function
    Private Sub GridControlDocSearch_Leave(sender As Object, e As EventArgs) Handles GridControlDocSearch1.Leave, GridControlDocSearch2.Leave, GridControlDocSearch3.Leave, GridControlDocSearch4.Leave, GridControlDocSearch5.Leave
        SaveDocGridLayout()
    End Sub
    Sub SaveDocGridLayout()
        Dim oXMLPath = Get_DocGrid_Layout_Filename(XtraTabControlDocs.SelectedTabPageIndex)
        If File.Exists(oXMLPath) Then
            clsWMDocGrid.ActiveDocGrid.SaveLayoutToXml(oXMLPath)
        End If
    End Sub
    Private Sub ToolStripButtonRefreshSearches_Click(sender As Object, e As EventArgs) Handles ToolStripButtonRefreshSearches.Click
        If BASEDATA_DT_PROFILE_SEARCHES_SQL.Rows.Count > 0 Then
            _DTSQLSearches = BASEDATA_DT_PROFILE_SEARCHES_SQL
            Dim oConID = BASEDATA_DT_PROFILE_SEARCHES_SQL.Rows(0).Item("CONN_ID")
            Dim oCommand = BASEDATA_DT_PROFILE_SEARCHES_SQL.Rows(0).Item("SQL_COMMAND")
            oCommand = clsPatterns.ReplaceAllValues(oCommand, _frmValidator.PanelValidatorControl, True)
            XtraTabControlSQL.SelectedTabPageIndex = 0
            Refresh_Load_GridSQL(oConID, oCommand, 0, BASEDATA_DT_PROFILE_SEARCHES_SQL.Rows(0).Item("TAB_TITLE"))
        End If
        If BASEDATA_DT_PROFILE_SEARCHES_DOC.Rows.Count > 0 Then
            _DTDocSearches = BASEDATA_DT_PROFILE_SEARCHES_DOC
            Dim oConID = BASEDATA_DT_PROFILE_SEARCHES_DOC.Rows(0).Item("CONN_ID")
            Dim oCommand = BASEDATA_DT_PROFILE_SEARCHES_DOC.Rows(0).Item("SQL_COMMAND")
            oCommand = clsPatterns.ReplaceAllValues(oCommand, _frmValidator.PanelValidatorControl, True)
            XtraTabControlDocs.SelectedTabPageIndex = 0
            RefreshTabDoc(oConID, oCommand, 0, BASEDATA_DT_PROFILE_SEARCHES_DOC.Rows(0).Item("TAB_TITLE"))
        End If
    End Sub
    Private Sub GridViewDocSearch_ColumnWidthChanged(sender As Object, e As ColumnEventArgs) Handles GridViewDocSearch1.ColumnWidthChanged, GridViewDocSearch2.ColumnWidthChanged, GridViewDocSearch3.ColumnWidthChanged, GridViewDocSearch4.ColumnWidthChanged, GridViewDocSearch5.ColumnWidthChanged
        SaveDocGridLayout()
    End Sub
    Private Sub ToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem1.Click
        ReLoad_Active_DocTab()
    End Sub
    Sub ReLoad_Active_DocTab()
        Dim oTabIndex = XtraTabControlDocs.SelectedTabPageIndex
        Dim oConID = BASEDATA_DT_PROFILE_SEARCHES_DOC.Rows(oTabIndex).Item("CONN_ID")
        Dim oCommand = BASEDATA_DT_PROFILE_SEARCHES_DOC.Rows(oTabIndex).Item("SQL_COMMAND")
        oCommand = clsPatterns.ReplaceAllValues(oCommand, _frmValidator.PanelValidatorControl, True)
        RefreshTabDoc(oConID, oCommand, oTabIndex, BASEDATA_DT_PROFILE_SEARCHES_DOC.Rows(oTabIndex).Item("TAB_TITLE"))
    End Sub
    Private Sub LayoutZurücksetzenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles LayoutZurücksetzenToolStripMenuItem.Click
        Set_DoclayoutBack()
    End Sub
    Sub Set_DoclayoutBack()
        Dim oXMLPath = Get_DocGrid_Layout_Filename(XtraTabControlDocs.SelectedTabPageIndex)
        Try
            If File.Exists(oXMLPath) Then
                File.Delete(oXMLPath)
                ReLoad_Active_DocTab()
                tslblState.Text = "Layout has been set back!"
            Else
                tslblState.Text = ""
            End If
        Catch ex As Exception
            tslblState.Text = ""
        End Try
    End Sub
    Private Sub ToolStripMenuItem4_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem4.Click
        ReLoad_Active_SQLTab()
    End Sub
    Sub ReLoad_Active_SQLTab()
        Dim oTabIndex = XtraTabControlSQL.SelectedTabPageIndex
        Dim oConID = BASEDATA_DT_PROFILE_SEARCHES_SQL.Rows(oTabIndex).Item("CONN_ID")
        Dim oCommand = BASEDATA_DT_PROFILE_SEARCHES_SQL.Rows(oTabIndex).Item("SQL_COMMAND")
        oCommand = clsPatterns.ReplaceAllValues(oCommand, _frmValidator.PanelValidatorControl, True)
        RefreshTabSQL(oConID, oCommand, oTabIndex, BASEDATA_DT_PROFILE_SEARCHES_SQL.Rows(oTabIndex).Item("TAB_TITLE"))
    End Sub
    Private Sub GridControlDocSearch1_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch1.DoubleClick
        Refresh_DocID(GridViewDocSearch1)
        FileShow()
    End Sub
    Private Sub GridControlDocSearch2_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch2.DoubleClick
        Refresh_DocID(GridViewDocSearch2)
        FileShow()
    End Sub
    Private Sub GridControlDocSearch3_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch3.DoubleClick
        Refresh_DocID(GridViewDocSearch3)
        FileShow()
    End Sub
    Private Sub GridControlDocSearch4_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch4.DoubleClick
        Refresh_DocID(GridViewDocSearch4)
        FileShow()
    End Sub
    Private Sub GridControlDocSearch5_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch5.DoubleClick
        Refresh_DocID(GridViewDocSearch5)
        FileShow()
    End Sub
    Private Sub GridControlDocSearch1_Click(sender As Object, e As EventArgs) Handles GridControlDocSearch1.Click
        Refresh_DocID(GridViewDocSearch1)
    End Sub
    Private Sub GridControlDocSearch2_Click(sender As Object, e As EventArgs) Handles GridControlDocSearch2.Click
        Refresh_DocID(GridViewDocSearch2)
    End Sub
    Private Sub GridControlDocSearch3_Click(sender As Object, e As EventArgs) Handles GridControlDocSearch3.Click
        Refresh_DocID(GridViewDocSearch3)
    End Sub
    Private Sub GridControlDocSearch4_Click(sender As Object, e As EventArgs) Handles GridControlDocSearch4.Click
        Refresh_DocID(GridViewDocSearch4)
    End Sub
    Private Sub GridControlDocSearch5_Click(sender As Object, e As EventArgs) Handles GridControlDocSearch5.Click
        Refresh_DocID(GridViewDocSearch5)
    End Sub
 End Class
--- a/app/DD_PM_WINDREAM/packages.config
+++ b/app/DD_PM_WINDREAM/packages.config
@@ -1,4 +0,0 @@
 <?xml version="1.0" encoding="utf-8"?>
 <packages>
  <package id="NLog" version="4.7.10" targetFramework="net461" />
 </packages>
--- a/app/README.md
+++ b/app/README.md
@@ -0,0 +1,62 @@
 Here's the improved `README.md` file incorporating the new content while maintaining the existing structure and coherence:
 # Project Title
 ## Overview
 Provide a brief description of the project, its purpose, and its main features.
 ## Installation
 Instructions on how to install and set up the project.
 ## Usage
 How to use the project, including code examples and explanations.
 ## DataColumn.Expression (Formelsprachen-Übersicht)
 Die dynamischen Grid-Formeln verwenden die ADO.NET **`DataColumn.Expression`**-Sprache. Spalten werden immer über den **Spaltennamen** referenziert (in eckigen Klammern).
 ### Grundoperatoren
 | Typ | Ausdruck | Beispiel |
 |---|---|---|
 | Arithmetik | `+ - * /` | `[A] * [B]` |
 | Vergleich | `= <> > >= < <=` | `[MENGE] > 0` |
 | Logik | `AND OR NOT` | `[A] > 0 AND [B] < 10` |
 | Klammern | `(...)` | `([A] + [B]) * 2` |
 ### String-Verkettung
 | Ausdruck | Beispiel |
 |---|---|
 | `+` | `[VORNAME] + ' - ' + [NACHNAME]` |
 | `Convert` | `Convert([NUMMER], 'System.String')` |
 ### Bedingungen
 | Ausdruck | Beispiel |
 |---|---|
 | `IIF` | `IIF([A] = 'Harry', 'Blume', 'Tier')` |
 ### Häufige Funktionen
 | Funktion | Beispiel |
 |---|---|
 | `Len` | `Len([TEXT])` |
 | `Trim` | `Trim([TEXT])` |
 | `Substring` | `Substring([TEXT], 0, 3)` |
 | `IsNull` | `IsNull([WERT], 0)` |
 | `Convert` | `Convert([WERT], 'System.Double')` |
 ### Beispiele (FORMULA_EXPRESSION)
 - **Multiplikation:** `[MENGE] * [PREIS]`
 - **Addieren:** `[A] + [B]`
 - **Division:** `[A] / [B]`
 - **Text zusammensetzen:** `[SAKNR] + ' - ' + [KST]`
 - **Bedingung:** `IIF([STATUS] = 'X', 'OK', 'NOK')`
 ## Contributing
 Guidelines for contributing to the project.
 ## License
 Information about the project's license.
 ## Contact
 How to contact the project maintainers for questions or support.
--- a/app/SetupVS19/Config.wxi
+++ b/app/SetupVS19/Config.wxi
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="utf-8"?>
 <Include>
-  <?define ProgramName="DD_PM_WINDREAM"?>
+  <?define ProgramName="taskFLOW"?>
-  <?define ProductName="Process Manager"?>
+  <?define ProductName="taskFLOW"?>
  <?define Manufacturer="Digital Data"?>
  <?define Description="Beschreibung des Programms"?>
  <?define Comments="Kommentar wie Copyright-Hinweis"?>
--- a/app/SetupVS19/Product.wxs
+++ b/app/SetupVS19/Product.wxs
@@ -1,5 +1,5 @@
-<?define ProgramName="DD_ProcessManager"?>
+<?define ProgramName="taskFLOW"?>
-<?define ProductName="Process Manager"?>
+<?define ProductName="taskFLOW"?>
 <?define Manufacturer="Digital Data"?>
 <?define Description="Beschreibung des Programms"?>
 <?define Comments="Kommentar wie Copyright-Hinweis"?>
@@ -42,7 +42,7 @@
 		</Upgrade>
 		<!-- Legt das Icon fest -->
-    <Icon Id="AppIcon.exe" SourceFile="..\DD_PM_WINDREAM\bin\$(var.Configuration)\$(var.ProgramName).exe" />
+		<Icon Id="AppIcon.exe" SourceFile="..\taskFLOW\bin\$(var.Configuration)\$(var.ProgramName).exe" />
 		<!-- Zeige Icon in Systemsteuerung > Programme entfernen -->
 		<Property Id="ARPPRODUCTICON" Value="AppIcon.exe" />
@@ -85,152 +85,199 @@
 		<DirectoryRef Id="INSTALLDIR">
 			<Component Id="MainApplicationExe" Guid="71B06048-F595-40CE-B429-79C2F2D6001B" KeyPath="yes">
-        <File Id="MainApplicationExe" Source="..\DD_PM_WINDREAM\bin\$(var.Configuration)\$(var.ProgramName).exe" Name="$(var.ProgramName).exe" KeyPath="no" Checksum="yes" />
+				<File Id="MainApplicationExe" Source="..\taskFLOW\bin\$(var.Configuration)\$(var.ProgramName).exe" Name="$(var.ProgramName).exe" KeyPath="no" Checksum="yes" />
-        <File Id="MainApplicationExeConfig" Source="..\DD_PM_WINDREAM\bin\$(var.Configuration)\$(var.ProgramName).exe.config" Name="$(var.ProgramName).exe.config" KeyPath="no" Checksum="yes" />
+				<File Id="MainApplicationExeConfig" Source="..\taskFLOW\bin\$(var.Configuration)\$(var.ProgramName).exe.config" Name="$(var.ProgramName).exe.config" KeyPath="no" Checksum="yes" />
 				<!--
        <Shortcut Id="DesktopShortcut" Directory="DesktopFolder" Name="$(var.ProductName)" WorkingDirectory="INSTALLDIR" Icon="AppIcon.exe" IconIndex="0" Advertise="no" Target="[#MainApplicationExe]" />
        <Shortcut Id="StartMenuShortcut" Directory="ProgramMenuDir" Name="$(var.ProductName)" WorkingDirectory="INSTALLDIR" Icon="AppIcon.exe" IconIndex="0" Advertise="no" Target="[#MainApplicationExe]" />
        -->
 			</Component>
-      <Component Id="ReleaseNotes" Guid="D1496E4D-98C2-4849-9914-DB47D47CC6BE">
+			<!--<Component Id="ReleaseNotes" Guid="D1496E4D-98C2-4849-9914-DB47D47CC6BE">
 				<File Id="ReleaseNote" Name="Release Notes.txt" Source="P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DD_MODULE\DD Process Manager\Release_Notes.txt" KeyPath="yes">
 				</File>
-      </Component>
+			</Component>-->
 			<Component Id="WindreamLibs" Guid="4D11FC99-50D9-4E54-B18A-8885C9112646">
-        <File Id="WINDREAMLibDLL" Name="Interop.WINDREAMLib.dll" Source="P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll" KeyPath="yes"/>
+				<File Id="WINDREAMLibDLL" Name="Interop.WINDREAMLib.dll" Source="M:\Bibliotheken\3rdParty\windream\Interop.WINDREAMLib.dll" KeyPath="yes"/>
-        <File Id="WMOTOOLLib" Name="Interop.WMOTOOLLib.dll" Source="P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOTOOLLib.dll"/>
+				<File Id="WMOTOOLLib" Name="Interop.WMOTOOLLib.dll" Source="M:\Bibliotheken\3rdParty\windream\Interop.WMOTOOLLib.dll"/>
-        <File Id="WMOSRCHLib" Name="Interop.WMOSRCHLib.dll" Source="P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOSRCHLib.dll"/>
+				<File Id="WMOSRCHLib" Name="Interop.WMOSRCHLib.dll" Source="M:\Bibliotheken\3rdParty\windream\Interop.WMOSRCHLib.dll"/>
-        <File Id="WMOBRWSLib" Name="Interop.WMOBRWSLib.dll" Source="P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOBRWSLib.dll"/>
+				<File Id="WMOBRWSLib" Name="Interop.WMOBRWSLib.dll" Source="M:\Bibliotheken\3rdParty\windream\Interop.WMOBRWSLib.dll"/>
 			</Component>
 			<Component Id="FormsUtilsLibs" Guid="51c183a7-af21-481a-bd34-0e547e6f6e1c">
-        <File Id="FormsUtilsLib" Name="FormsUtils.dll" Source="P:\Visual Studio Projekte\Bibliotheken\FormsUtils.dll" KeyPath="yes" />
+				<File Id="FormsUtilsLib" Name="FormsUtils.dll" Source="M:\Bibliotheken\3rdParty\FormsUtils.dll" KeyPath="yes" />
      </Component>
      <Component Id="IndependentsoftLibs" Guid="C3B3BB48-DB41-4419-A4B8-0E4DC5E8856B">
        <File Id="MSGLib" Name="Independentsoft.Msg.dll" Source="P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\22_11_19\Independentsoft.Msg.dll" KeyPath="yes"/>
 			</Component>
 			<Component Id="DDLibs" Guid="BA2979E3-3778-48B8-B0D8-4B77825B9293">
        <File Id="DLLLicenseManager" Name="DLLLicenseManager.dll" Source="P:\Visual Studio Projekte\Bibliotheken\DLLLicenseManager.dll" KeyPath="yes"/>
        <File Id="DDLibStandards" Name="DD_LIB_Standards.dll" Source="P:\Visual Studio Projekte\Bibliotheken\DD_LIB_Standards.dll"/>
 				<File Id="LookupGrid" Name="DigitalData.Controls.LookupGrid.dll" Source="DigitalData.Controls.LookupGrid.dll"/>
 				<File Id="DDSnapPanel" Name="DigitalData.Controls.SnapPanel.dll" Source="DigitalData.Controls.SnapPanel.dll"/>
 				<File Id="DDCommonGUIs" Name="DigitalData.GUIs.Common.dll" Source="DigitalData.GUIs.Common.dll"/>
 				<File Id="DDConfig" Name="DigitalData.Modules.Config.dll" Source="DigitalData.Modules.Config.dll"/>
 				<File Id="DDLogging" Name="DigitalData.Modules.Logging.dll" Source="DigitalData.Modules.Logging.dll"/>
-        <File Id="DDLanguage" Name="DigitalData.Modules.Language.dll" Source="DigitalData.Modules.Language.dll"/>
+				<File Id="DDInterfaces" Name="DigitalData.Modules.Interfaces.dll" Source="DigitalData.Modules.Interfaces.dll"/>
 				<File Id="DDBase" Name="DigitalData.Modules.Base.dll" Source="DigitalData.Modules.Base.dll"/>
 				<File Id="DDFilesystem" Name="DigitalData.Modules.Filesystem.dll" Source="DigitalData.Modules.Filesystem.dll"/>
 				<File Id="DDEncryption" Name="DigitalData.Modules.Encryption.dll" Source="DigitalData.Modules.Encryption.dll"/>
 				<File Id="DDWindream" Name="DigitalData.Modules.Windream.dll" Source="DigitalData.Modules.Windream.dll"/>
 				<File Id="DDWindows" Name="DigitalData.Modules.Windows.dll" Source="DigitalData.Modules.Windows.dll"/>
 				<File Id="DDZooflow" Name="DigitalData.Modules.Zooflow.dll" Source="DigitalData.Modules.Zooflow.dll"/>
 				<File Id="DDDatabase" Name="DigitalData.Modules.Database.dll" Source="DigitalData.Modules.Database.dll"/>
 				<File Id="DDPatterns" Name="DigitalData.Modules.Patterns.dll" Source="DigitalData.Modules.Patterns.dll"/>
 				<File Id="DDEDMIAPI" Name="DigitalData.Modules.EDMI.API.dll" Source="DigitalData.Modules.EDMI.API.dll"/>
 				<File Id="DDDocumentViewer" Name="DigitalData.Controls.DocumentViewer.dll" Source="DigitalData.Controls.DocumentViewer.dll"/>
        <File Id="DDChatControl" Name="DigitalData.Controls.ChatControl.dll" Source="DigitalData.Controls.ChatControl.dll"/>
        <File Id="DDNewConv" Name="DigitalData.Controls.ChatNewConv.dll" Source="DigitalData.Controls.ChatNewConv.dll"/>
 				<File Id="Messaging" Name="DigitalData.Modules.Messaging.dll" Source="DigitalData.Modules.Messaging.dll" KeyPath="no" />
 				<File Id="Messaging.License" Name="MailLicense.xml" Source="MailLicense.xml" KeyPath="no" />
 				<File Id="Limilabs.Mail" Name="Mail.dll" Source="Mail.dll" KeyPath="no" />
 				<File Id="NLog" Name="NLog.dll" Source="NLog.dll"/>
 			</Component>
-
+      <Component Id="RuntimeLibs" Guid="F7170744-3DB5-4275-ACCD-7F3B9BDE1D6E">
-      <Component Id="Oracle" Guid="CF76DB5D-3263-450F-96C6-F02F5447A0A1">
+        <File Id="Newtonsoft.Json" Name="Newtonsoft.Json.dll" Source="Newtonsoft.Json.dll" KeyPath="yes" />
-        <File Id="Oracle.ManagedDataAccess" Name="Oracle.ManagedDataAccess.dll" Source="P:\Visual Studio Projekte\Bibliotheken\Oracle.ManagedDataAccess.dll" KeyPath="yes"/>
+        <File Id="System.Text.Json" Name="System.Text.Json.dll" Source="System.Text.Json.dll" />
-      </Component>
+        <File Id="FirebirdSql.Data.FirebirdClient" Name="FirebirdSql.Data.FirebirdClient.dll" Source="FirebirdSql.Data.FirebirdClient.dll" />
-      
+        <File Id="EntityFramework" Name="EntityFramework.dll" Source="EntityFramework.dll" />
-       <Component Id="PDFsharp" Guid="9cd1cfb7-3f84-4a8b-aa51-642b723fcd70">
+        <File Id="EntityFramework.SqlServer" Name="EntityFramework.SqlServer.dll" Source="EntityFramework.SqlServer.dll" />
-        <File Id="PdfSharpgdi" Name="PdfSharp-gdi.dll" Source="P:\Visual Studio Projekte\Bibliotheken\PdfSharp-gdi.dll" KeyPath="yes"/>
+        <File Id="EntityFramework.Firebird" Name="EntityFramework.Firebird.dll" Source="EntityFramework.Firebird.dll" />
      </Component>
 			<Component Id="GDPictureLibs" Guid="9ea5ab43-58ff-4813-9a8b-f854784f0275">
-        <File Id="GdPicture.NET.14" Name="GdPicture.NET.14.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll" KeyPath="yes" />
+        <File Id="GdPicture.NET.14" Name="GdPicture.NET.14.dll" KeyPath="yes" />
-        <File Id="GdPicture.NET.14.filters" Name="GdPicture.NET.14.filters.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.filters.dll" />
+        <File Id="GdPicture.NET.14.CAD" Name="GdPicture.NET.14.CAD.dll" />
-        <File Id="GdPicture.NET.14.filters64" Name="GdPicture.NET.14.filters.64.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.filters.64.dll" />
+        <File Id="GdPicture.NET.14.CAD.DWG" Name="GdPicture.NET.14.CAD.DWG.dll" />
-        <File Id="GdPicture.NET.14.image" Name="GdPicture.NET.14.image.gdimgplug.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.image.gdimgplug.dll" />
+        <File Id="GdPicture.NET.14.filters" Name="GdPicture.NET.14.filters.dll" />
-        <File Id="GdPicture.NET.14.image64" Name="GdPicture.NET.14.image.gdimgplug.64.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.image.gdimgplug.64.dll" />
+        <File Id="GdPicture.NET.14.filters64" Name="GdPicture.NET.14.filters.64.dll" />
-        <File Id="GdPicture.NET.14.Imaging" Name="GdPicture.NET.14.Imaging.Rendering.Skia.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.Imaging.Rendering.Skia.dll" />
+        <File Id="GdPicture.NET.14.image" Name="GdPicture.NET.14.image.gdimgplug.dll" />
-        <File Id="GdPicture.NET.14.Imaging64" Name="GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" />
+        <File Id="GdPicture.NET.14.image64" Name="GdPicture.NET.14.image.gdimgplug.64.dll" />
        <File Id="GdPicture.NET.14.Imaging.Formats" Name="GdPicture.NET.14.Imaging.Formats.dll" />
        <File Id="GdPicture.NET.14.Imaging.Rendering" Name="GdPicture.NET.14.Imaging.Rendering.dll" />
        <File Id="GdPicture.NET.14.Imaging.Rendering.Skia" Name="GdPicture.NET.14.Imaging.Rendering.Skia.dll" />
        <File Id="GdPicture.NET.14.Rendering.Skia.64" Name="GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" />
        <File Id="GdPicture.NET.14.Imaging" Name="GdPicture.NET.14.Imaging.dll" />
        <File Id="GdPicture.NET.14.Imaging.ML.64" Name="GdPicture.NET.14.Imaging.ML.64.dll" />
        <File Id="GdPicture.NET.14.Imaging.ML" Name="GdPicture.NET.14.Imaging.ML.dll" />
        <File Id="GdPicture.NET.14.Imaging.Formats.Conversion" Name="GdPicture.NET.14.Imaging.Formats.Conversion.dll" />
        <File Id="GdPicture.NET.14.Common" Name="GdPicture.NET.14.Common.dll" />
        <File Id="GdPicture.NET.14.Document" Name="GdPicture.NET.14.Document.dll" />
        <File Id="GdPicture.NET.14.PDF" Name="GdPicture.NET.14.PDF.dll" />
        <File Id="GdPicture.NET.14.RTF" Name="GdPicture.NET.14.RTF.dll" />
        <File Id="GdPicture.NET.14.SVG" Name="GdPicture.NET.14.SVG.dll" />
        <File Id="GdPicture.NET.14.OpenDocument" Name="GdPicture.NET.14.OpenDocument.dll" />
        <File Id="GdPicture.NET.14.OpenXML" Name="GdPicture.NET.14.OpenXML.dll" />
        <File Id="GdPicture.NET.14.Email" Name="GdPicture.NET.14.Email.dll" />
        <File Id="GdPicture.NET.14.HTML" Name="GdPicture.NET.14.HTML.dll" />
        <File Id="GdPicture.NET.14.MSOfficeBinary" Name="GdPicture.NET.14.MSOfficeBinary.dll"/>
        <File Id="BouncyCastle.Cryptography" Name="BouncyCastle.Cryptography.dll"/>
        <File Id="DocumentFormat.OpenXml" Name="DocumentFormat.OpenXml.dll" />
        <File Id="DocumentFormat.OpenXml.Framework" Name="DocumentFormat.OpenXml.Framework.dll" />
        <File Id="Microsoft.Bcl.AsyncInterfaces" Name="Microsoft.Bcl.AsyncInterfaces.dll" />
        <File Id="OpenMcdf" Name="OpenMcdf.dll" />
        <File Id="protobufnet.Core" Name="protobuf-net.Core.dll" />
        <File Id="protobufnet" Name="protobuf-net.dll" />
        <File Id="RtfPipe" Name="RtfPipe.dll" />
        <File Id="System.Buffers" Name="System.Buffers.dll" />
        <File Id="System.CodeDom" Name="System.CodeDom.dll" />
        <File Id="System.Collections.Immutable" Name="System.Collections.Immutable.dll" />
        <File Id="System.IO.Packaging" Name="System.IO.Packaging.dll" />
        <File Id="System.Memory" Name="System.Memory.dll" />
        <File Id="System.Numerics.Vectors" Name="System.Numerics.Vectors.dll" />
        <File Id="System.Runtime.CompilerServices.Unsafe" Name="System.Runtime.CompilerServices.Unsafe.dll" />
        <File Id="System.Security.Cryptography.Pkcs" Name="System.Security.Cryptography.Pkcs.dll" />
        <File Id="System.Text.Encodings.Web" Name="System.Text.Encodings.Web.dll" />
        <File Id="System.Threading.Tasks.Extensions" Name="System.Threading.Tasks.Extensions.dll" />
        <File Id="System.ValueTuple" Name="System.ValueTuple.dll" />
      </Component>
 			<Component Id="DevExpressLibs" Guid="CB40DAAE-348E-4BD3-B275-9A526EB8F191">
-        <File Id="DevExpress.Images.v19.2" Name="DevExpress.Images.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Images.v19.2.dll" KeyPath="yes"/>
+				<File Id="DevExpress.Images.v21.2" Name="DevExpress.Images.v21.2.dll" KeyPath="yes"/>
-        <File Id="DevExpress.Data.v19.2" Name="DevExpress.Data.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Data.v19.2.dll"/>
+				<File Id="DevExpress.Data.v21.2" Name="DevExpress.Data.v21.2.dll"/>
-        <File Id="DevExpress.DataAccess.v19.2" Name="DevExpress.DataAccess.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.DataAccess.v19.2.dll"/>
+				<File Id="DevExpress.Xpf.Core.v21.2" Name="DevExpress.Xpf.Core.v21.2.dll"/>
-        <File Id="DevExpress.DataAccess.v19.2.UI" Name="DevExpress.DataAccess.v19.2.UI.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.DataAccess.v19.2.UI.dll"/>
+				<File Id="DevExpress.Xpf.Docking.v21.2" Name="DevExpress.Xpf.Docking.v21.2.dll"/>
-        <File Id="DevExpress.Dialogs.v19.2.Core" Name="DevExpress.Dialogs.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Dialogs.v19.2.Core.dll"/>
+				<File Id="DevExpress.Xpf.DocumentViewer.v21.2.Core" Name="DevExpress.Xpf.DocumentViewer.v21.2.Core.dll"/>
-        <File Id="DevExpress.Pdf.v19.2.Core" Name="DevExpress.Pdf.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Pdf.v19.2.Core.dll"/>
+				<File Id="DevExpress.Xpf.Grid.v21.2.Core" Name="DevExpress.Xpf.Grid.v21.2.Core.dll"/>
-        <File Id="DevExpress.Pdf.v19.2.Drawing" Name="DevExpress.Pdf.v19.2.Drawing.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Pdf.v19.2.Drawing.dll" />
+				<File Id="DevExpress.Xpf.Grid.v21.2" Name="DevExpress.Xpf.Grid.v21.2.dll"/>
-        <File Id="DevExpress.Charts.v19.2.Core" Name="DevExpress.Charts.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Charts.v19.2.Core.dll"/>
+				<File Id="DevExpress.Xpf.Layout.v21.2.Core" Name="DevExpress.Xpf.Layout.v21.2.Core.dll"/>
-        <File Id="DevExpress.Printing.v19.2.Core" Name="DevExpress.Printing.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Printing.v19.2.Core.dll"/>
+				<File Id="DevExpress.Xpf.Ribbon.v21.2" Name="DevExpress.Xpf.Ribbon.v21.2.dll"/>
-        <File Id="DevExpress.Utils.v19.2" Name="DevExpress.Utils.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Utils.v19.2.dll"/>
+				<File Id="DevExpress.XtraTreeMap.v21.2" Name="DevExpress.XtraTreeMap.v21.2.dll"/>
-        <File Id="DevExpress.Utils.v19.2.UI" Name="DevExpress.Utils.v19.2.UI.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Utils.v19.2.UI.dll"/>
+				<File Id="DevExpress.XtraPivotGrid.v21.2" Name="DevExpress.XtraPivotGrid.v21.2.dll"/>
-        <File Id="DevExpress.XtraBars.v19.2" Name="DevExpress.XtraBars.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraBars.v19.2.dll"/>
+				<File Id="DevExpress.TreeMap.v21.2.Core" Name="DevExpress.TreeMap.v21.2.Core.dll"/>
-        <File Id="DevExpress.XtraCharts.v19.2" Name="DevExpress.XtraCharts.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraCharts.v19.2.dll"/>
+				<File Id="DevExpress.DataAccess.v21.2" Name="DevExpress.DataAccess.v21.2.dll"/>
-        <File Id="DevExpress.XtraCharts.v19.2.Wizard" Name="DevExpress.XtraCharts.v19.2.Wizard.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraCharts.v19.2.Wizard.dll"/>
+				<File Id="DevExpress.DataAccess.v21.2.UI" Name="DevExpress.DataAccess.v21.2.UI.dll"/>
-        <File Id="DevExpress.XtraCharts.v19.2.Extensions" Name="DevExpress.XtraCharts.v19.2.Extensions.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraCharts.v19.2.Extensions.dll"/>
+				<File Id="DevExpress.Data.Desktop.v21.2" Name="DevExpress.Data.Desktop.v21.2.dll"/>
-        <File Id="DevExpress.XtraCharts.v19.2.UI" Name="DevExpress.XtraCharts.v19.2.UI.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraCharts.v19.2.UI.dll"/>
+				<File Id="DevExpress.DataVisualization.v21.2.Core" Name="DevExpress.DataVisualization.v21.2.Core.dll"/>
-        <File Id="DevExpress.XtraDialogs.v19.2" Name="DevExpress.XtraDialogs.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraDialogs.v19.2.dll"/>
+				<File Id="DevExpress.Dialogs.v21.2.Core" Name="DevExpress.Dialogs.v21.2.Core.dll" />
-        <File Id="DevExpress.XtraEditors.v19.2" Name="DevExpress.XtraEditors.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraEditors.v19.2.dll"/>
+				<File Id="DevExpress.Pdf.v21.2.Core" Name="DevExpress.Pdf.v21.2.Core.dll" />
-        <File Id="DevExpress.XtraGrid.v19.2" Name="DevExpress.XtraGrid.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraGrid.v19.2.dll"/>
+				<File Id="DevExpress.Pdf.v21.2.Drawing" Name="DevExpress.Pdf.v21.2.Drawing.dll"  />
-        <File Id="DevExpress.XtraLayout.v19.2" Name="DevExpress.XtraLayout.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraLayout.v19.2.dll"/>
+				<File Id="DevExpress.Charts.v21.2.Core" Name="DevExpress.Charts.v21.2.Core.dll" />
-        <File Id="DevExpress.XtraNavBar.v19.2" Name="DevExpress.XtraNavBar.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraNavBar.v19.2.dll"/>
+				<File Id="DevExpress.Printing.v21.2.Core" Name="DevExpress.Printing.v21.2.Core.dll" />
-        <File Id="DevExpress.XtraPdfViewer.v19.2" Name="DevExpress.XtraPdfViewer.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraPdfViewer.v19.2.dll"/>
+				<File Id="DevExpress.Utils.v21.2" Name="DevExpress.Utils.v21.2.dll" />
-        <File Id="DevExpress.XtraPrinting.v19.2" Name="DevExpress.XtraPrinting.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraPrinting.v19.2.dll"/>
+				<File Id="DevExpress.Utils.v21.2.UI" Name="DevExpress.Utils.v21.2.UI.dll" />
-        <File Id="DevExpress.XtraTreeList.v19.2" Name="DevExpress.XtraTreeList.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraTreeList.v19.2.dll"/>
+				<File Id="DevExpress.XtraBars.v21.2" Name="DevExpress.XtraBars.v21.2.dll" />
-        <File Id="DevExpress.CodeParser.v19.2" Name="DevExpress.CodeParser.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.CodeParser.v19.2.dll"/>
+				<File Id="DevExpress.Mvvm.v21.2" Name="DevExpress.Mvvm.v21.2.dll" />
-        <File Id="DevExpress.Diagram.v19.2.Core" Name="DevExpress.Diagram.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Diagram.v19.2.Core.dll"/>
+				<File Id="DevExpress.XtraCharts.v21.2" Name="DevExpress.XtraCharts.v21.2.dll" />
-        <File Id="DevExpress.Office.v19.2.Core" Name="DevExpress.Office.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Office.v19.2.Core.dll"/>
+				<File Id="DevExpress.XtraCharts.v21.2.Wizard" Name="DevExpress.XtraCharts.v21.2.Wizard.dll" />
-        <File Id="DevExpress.PivotGrid.v19.2.Core" Name="DevExpress.PivotGrid.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.PivotGrid.v19.2.Core.dll"/>
+				<File Id="DevExpress.XtraCharts.v21.2.Extensions" Name="DevExpress.XtraCharts.v21.2.Extensions.dll" />
-        <File Id="DevExpress.RichEdit.v19.2.Core" Name="DevExpress.RichEdit.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.RichEdit.v19.2.Core.dll"/>
+				<File Id="DevExpress.XtraCharts.v21.2.UI" Name="DevExpress.XtraCharts.v21.2.UI.dll" />
-        <File Id="DevExpress.RichEdit.v19.2.Export" Name="DevExpress.RichEdit.v19.2.Export.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.RichEdit.v19.2.Export.dll"/>
+				<File Id="DevExpress.XtraDialogs.v21.2" Name="DevExpress.XtraDialogs.v21.2.dll" />
-        <File Id="DevExpress.XtraRichEdit.v19.2" Name="DevExpress.XtraRichEdit.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraRichEdit.v19.2.dll"/>
+				<File Id="DevExpress.XtraEditors.v21.2" Name="DevExpress.XtraEditors.v21.2.dll" />
-        <File Id="DevExpress.XtraSpreadsheet.v19.2" Name="DevExpress.XtraSpreadsheet.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraSpreadsheet.v19.2.dll"/>
+				<File Id="DevExpress.XtraGrid.v21.2" Name="DevExpress.XtraGrid.v21.2.dll" />
-        <File Id="DevExpress.Spreadsheet.v19.2.Core" Name="DevExpress.Spreadsheet.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Spreadsheet.v19.2.Core.dll"/>
+				<File Id="DevExpress.XtraLayout.v21.2" Name="DevExpress.XtraLayout.v21.2.dll" />
-        <File Id="DevExpress.Sparkline.v19.2.Core" Name="DevExpress.Sparkline.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Sparkline.v19.2.Core.dll"/>
+				<File Id="DevExpress.XtraNavBar.v21.2" Name="DevExpress.XtraNavBar.v21.2.dll" />
-        <File Id="DevExpress.Xpf.PdfViewer.v19.2" Name="DevExpress.Xpf.PdfViewer.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Xpf.PdfViewer.v19.2.dll"/>
+				<File Id="DevExpress.XtraPdfViewer.v21.2" Name="DevExpress.XtraPdfViewer.v21.2.dll" />
-        <File Id="DevExpress.Xpo.v19.2" Name="DevExpress.Xpo.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.Xpo.v19.2.dll"/>
+				<File Id="DevExpress.XtraPrinting.v21.2" Name="DevExpress.XtraPrinting.v21.2.dll" />
-        <File Id="DevExpress.XtraGauges.v19.2.Core" Name="DevExpress.XtraGauges.v19.2.Core.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraGauges.v19.2.Core.dll"/>
+				<File Id="DevExpress.XtraTreeList.v21.2" Name="DevExpress.XtraTreeList.v21.2.dll" />
-        <File Id="DevExpress.XtraReports.v19.2" Name="DevExpress.XtraReports.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraReports.v19.2.dll"/>
+				<File Id="DevExpress.CodeParser.v21.2" Name="DevExpress.CodeParser.v21.2.dll" />
-        <File Id="DevExpress.XtraReports.v19.2.Extensions" Name="DevExpress.XtraReports.v19.2.Extensions.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraReports.v19.2.Extensions.dll"/>
+				<File Id="DevExpress.Diagram.v21.2.Core" Name="DevExpress.Diagram.v21.2.Core.dll" />
-        <File Id="DevExpress.XtraVerticalGrid.v19.2" Name="DevExpress.XtraVerticalGrid.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraVerticalGrid.v19.2.dll"/>
+				<File Id="DevExpress.Office.v21.2.Core" Name="DevExpress.Office.v21.2.Core.dll" />
-        <File Id="DevExpress.XtraDiagram.v19.2" Name="DevExpress.XtraDiagram.v19.2.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraDiagram.v19.2.dll"/>
+				<File Id="DevExpress.PivotGrid.v21.2.Core" Name="DevExpress.PivotGrid.v21.2.Core.dll"/>
 				<File Id="DevExpress.RichEdit.v21.2.Core" Name="DevExpress.RichEdit.v21.2.Core.dll" />
 				<File Id="DevExpress.RichEdit.v21.2.Export" Name="DevExpress.RichEdit.v21.2.Export.dll" />
 				<File Id="DevExpress.XtraRichEdit.v21.2" Name="DevExpress.XtraRichEdit.v21.2.dll" />
 				<File Id="DevExpress.XtraSpreadsheet.v21.2" Name="DevExpress.XtraSpreadsheet.v21.2.dll" />
 				<File Id="DevExpress.Spreadsheet.v21.2.Core" Name="DevExpress.Spreadsheet.v21.2.Core.dll" />
 				<File Id="DevExpress.Sparkline.v21.2.Core" Name="DevExpress.Sparkline.v21.2.Core.dll" />
 				<File Id="DevExpress.Xpf.PdfViewer.v21.2" Name="DevExpress.Xpf.PdfViewer.v21.2.dll" />
 				<File Id="DevExpress.Xpo.v21.2" Name="DevExpress.Xpo.v21.2.dll" />
 				<File Id="DevExpress.XtraGauges.v21.2.Core" Name="DevExpress.XtraGauges.v21.2.Core.dll" />
 				<File Id="DevExpress.XtraReports.v21.2" Name="DevExpress.XtraReports.v21.2.dll" />
 				<File Id="DevExpress.XtraReports.v21.2.Extensions" Name="DevExpress.XtraReports.v21.2.Extensions.dll" />
 				<File Id="DevExpress.XtraVerticalGrid.v21.2" Name="DevExpress.XtraVerticalGrid.v21.2.dll" />
 				<File Id="DevExpress.XtraDiagram.v21.2" Name="DevExpress.XtraDiagram.v21.2.dll" />
 			</Component>
 			<Directory Id="resources.de" Name="de">
 				<Component Id="Devexpress.Locales.de" Guid="6be5ff05-af76-4249-862a-5b13e3c56c2a">
-          <File Id="DevExpress.Data.v19.2.resources" Name="DevExpress.Data.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Data.v19.2.resources.dll"/>
+					<File Id="DevExpress.Data.v21.2.resources" Name="DevExpress.Data.v21.2.resources.dll" />
-          <File Id="DevExpress.DataAccess.v19.2.resources" Name="DevExpress.DataAccess.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.DataAccess.v19.2.resources.dll"/>
+					<File Id="DevExpress.DataAccess.v21.2.resources" Name="DevExpress.DataAccess.v21.2.resources.dll" />
-          <File Id="DevExpress.DataAccess.v19.2.UI.resources" Name="DevExpress.DataAccess.v19.2.UI.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.DataAccess.v19.2.UI.resources.dll"/>
+					<File Id="DevExpress.DataAccess.v21.2.UI.resources" Name="DevExpress.DataAccess.v21.2.UI.resources.dll" />
-          <File Id="DevExpress.Dialogs.v19.2.Core.resources" Name="DevExpress.Dialogs.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Dialogs.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.Dialogs.v21.2.Core.resources" Name="DevExpress.Dialogs.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.Pdf.v19.2.Core.resources" Name="DevExpress.Pdf.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Pdf.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.Pdf.v21.2.Core.resources" Name="DevExpress.Pdf.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.Printing.v19.2.Core.resources" Name="DevExpress.Printing.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Printing.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.Printing.v21.2.Core.resources" Name="DevExpress.Printing.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.Utils.v19.2.resources" Name="DevExpress.Utils.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Utils.v19.2.resources.dll"/>
+					<File Id="DevExpress.Utils.v21.2.resources" Name="DevExpress.Utils.v21.2.resources.dll" />
-          <File Id="DevExpress.Utils.v19.2.UI.resources" Name="DevExpress.Utils.v19.2.UI.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Utils.v19.2.UI.resources.dll"/>
+					<File Id="DevExpress.Utils.v21.2.UI.resources" Name="DevExpress.Utils.v21.2.UI.resources.dll" />
-          <File Id="DevExpress.XtraBars.v19.2.resources" Name="DevExpress.XtraBars.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraBars.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraBars.v21.2.resources" Name="DevExpress.XtraBars.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraCharts.v19.2.resources" Name="DevExpress.XtraCharts.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraCharts.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraCharts.v21.2.resources" Name="DevExpress.XtraCharts.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraCharts.v19.2.Wizard.resources" Name="DevExpress.XtraCharts.v19.2.Wizard.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraCharts.v19.2.Wizard.resources.dll"/>
+					<File Id="DevExpress.XtraCharts.v21.2.Wizard.resources" Name="DevExpress.XtraCharts.v21.2.Wizard.resources.dll" />
-          <File Id="DevExpress.XtraEditors.v19.2.resources" Name="DevExpress.XtraEditors.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraEditors.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraEditors.v21.2.resources" Name="DevExpress.XtraEditors.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraGrid.v19.2.resources" Name="DevExpress.XtraGrid.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraGrid.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraGrid.v21.2.resources" Name="DevExpress.XtraGrid.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraLayout.v19.2.resources" Name="DevExpress.XtraLayout.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraLayout.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraLayout.v21.2.resources" Name="DevExpress.XtraLayout.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraNavBar.v19.2.resources" Name="DevExpress.XtraNavBar.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraNavBar.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraNavBar.v21.2.resources" Name="DevExpress.XtraNavBar.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraPdfViewer.v19.2.resources" Name="DevExpress.XtraPdfViewer.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraPdfViewer.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraPdfViewer.v21.2.resources" Name="DevExpress.XtraPdfViewer.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraPrinting.v19.2.resources" Name="DevExpress.XtraPrinting.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraPrinting.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraPrinting.v21.2.resources" Name="DevExpress.XtraPrinting.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraTreeList.v19.2.resources" Name="DevExpress.XtraTreeList.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraTreeList.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraTreeList.v21.2.resources" Name="DevExpress.XtraTreeList.v21.2.resources.dll" />
-          <File Id="DevExpress.Diagram.v19.2.Core.resources" Name="DevExpress.Diagram.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Diagram.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.Diagram.v21.2.Core.resources" Name="DevExpress.Diagram.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.Office.v19.2.Core.resources" Name="DevExpress.Office.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Office.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.Office.v21.2.Core.resources" Name="DevExpress.Office.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.PivotGrid.v19.2.Core.resources" Name="DevExpress.PivotGrid.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.PivotGrid.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.PivotGrid.v21.2.Core.resources" Name="DevExpress.PivotGrid.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.RichEdit.v19.2.Core.resources" Name="DevExpress.RichEdit.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.RichEdit.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.RichEdit.v21.2.Core.resources" Name="DevExpress.RichEdit.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.XtraRichEdit.v19.2.resources" Name="DevExpress.XtraRichEdit.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraRichEdit.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraRichEdit.v21.2.resources" Name="DevExpress.XtraRichEdit.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraSpreadsheet.v19.2.resources" Name="DevExpress.XtraSpreadsheet.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraSpreadsheet.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraSpreadsheet.v21.2.resources" Name="DevExpress.XtraSpreadsheet.v21.2.resources.dll" />
-          <File Id="DevExpress.Spreadsheet.v19.2.Core.resources" Name="DevExpress.Spreadsheet.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Spreadsheet.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.Spreadsheet.v21.2.Core.resources" Name="DevExpress.Spreadsheet.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.Sparkline.v19.2.Core.resources" Name="DevExpress.Sparkline.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Sparkline.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.Sparkline.v21.2.Core.resources" Name="DevExpress.Sparkline.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.Xpf.PdfViewer.v19.2.resources" Name="DevExpress.Xpf.PdfViewer.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Xpf.PdfViewer.v19.2.resources.dll"/>
+					<File Id="DevExpress.Xpf.PdfViewer.v21.2.resources" Name="DevExpress.Xpf.PdfViewer.v21.2.resources.dll" />
-          <File Id="DevExpress.Xpo.v19.2.resources" Name="DevExpress.Xpo.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.Xpo.v19.2.resources.dll"/>
+					<File Id="DevExpress.Xpo.v21.2.resources" Name="DevExpress.Xpo.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraGauges.v19.2.Core.resources" Name="DevExpress.XtraGauges.v19.2.Core.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraGauges.v19.2.Core.resources.dll"/>
+					<File Id="DevExpress.XtraGauges.v21.2.Core.resources" Name="DevExpress.XtraGauges.v21.2.Core.resources.dll" />
-          <File Id="DevExpress.XtraReports.v19.2.resources" Name="DevExpress.XtraReports.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraReports.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraReports.v21.2.resources" Name="DevExpress.XtraReports.v21.2.resources.dll" />
-          <File Id="DevExpress.XtraReports.v19.2.Extensions.resources" Name="DevExpress.XtraReports.v19.2.Extensions.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraReports.v19.2.Extensions.resources.dll"/>
+					<File Id="DevExpress.XtraReports.v21.2.Extensions.resources" Name="DevExpress.XtraReports.v21.2.Extensions.resources.dll" />
-          <File Id="DevExpress.XtraVerticalGrid.v19.2.resources" Name="DevExpress.XtraVerticalGrid.v19.2.resources.dll" Source="D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\de\DevExpress.XtraVerticalGrid.v19.2.resources.dll"/>
+					<File Id="DevExpress.XtraVerticalGrid.v21.2.resources" Name="DevExpress.XtraVerticalGrid.v21.2.resources.dll" />
 				</Component>
 			</Directory>
@@ -243,23 +290,21 @@
 					</RegistryKey>
 				</RegistryKey>
-        <util:RemoveFolderEx Id="RemoveApplicationFolder" On="uninstall" Property="APPLICATIONFOLDER" />
+				<util:RemoveFolderEx Id="RemoveApplicationFolder" On="uninstall" Property="INSTALLDIR" />
 			</Component>
 		</DirectoryRef>
 		<Feature Id="MainApplication" Title="Main Application" Level="1">
 			<ComponentRef Id="MainApplicationExe" />
 			<ComponentRef Id="RegistryKeys" />
      <ComponentRef Id="ReleaseNotes" />
 			<ComponentRef Id="WindreamLibs" />
 			<ComponentRef Id="FormsUtilsLibs"/>
 			<ComponentRef Id="DDLibs" />
-      <ComponentRef Id="Oracle" />
+			<ComponentRef Id="RuntimeLibs" />
      <ComponentRef Id="PDFsharp" />
      <ComponentRef Id="IndependentsoftLibs" />
 			<ComponentRef Id="DevExpressLibs" />
 			<ComponentRef Id="GDPictureLibs" />
 			<ComponentRef Id="Devexpress.Locales.de" />
      <ComponentRef Id="ProtocolHandlerMachine" />
 		</Feature>
 		<Feature Id="DesktopShortcut" Title="Desktop Shortcut">
@@ -271,7 +316,28 @@
 			<Condition Level="0">DISABLE_STARTMENU_ICON</Condition>
 			<ComponentRef Id="ApplicationShortcut_StartMenu" />
 		</Feature>
    <!-- #######################-->
    <!-- Beginn Aufruf über Link-->
    <!-- Per-user ProtocolHandler (HKCU) -->
    <Component Id="ProtocolHandlerMachine" Guid="F2817163-DAAA-4EB2-A8D9-A9EF00E910C0" Directory="INSTALLDIR">
      <!-- Basis-Schlüssel -->
      <RegistryKey Root="HKLM" Key="Software\Classes\DDtaskFLOW" ForceCreateOnInstall="yes" ForceDeleteOnUninstall="yes">
        <RegistryValue Type="string" Value="URL:ddtaskflow Protocol" KeyPath="yes"/>
        <RegistryValue Type="string" Name="URL Protocol" Value="" />
      </RegistryKey>
      <!-- Icon -->
      <RegistryKey Root="HKLM" Key="Software\Classes\DDtaskFLOW\DefaultIcon" ForceCreateOnInstall="yes" ForceDeleteOnUninstall="yes">
        <RegistryValue Type="string" Value="[INSTALLDIR]taskFLOW.exe,1" />
      </RegistryKey>
      <!-- Kommando -->
      <RegistryKey Root="HKLM" Key="Software\Classes\DDtaskFLOW\shell\open\command" ForceCreateOnInstall="yes" ForceDeleteOnUninstall="yes">
        <RegistryValue Type="string" Value="&quot;[INSTALLDIR]taskFLOW.exe&quot; &quot;%1&quot;" />
      </RegistryKey>
    </Component>
    <!-- Ende Aufruf über Link-->
    <!-- #######################-->
 		<!-- Legt das Standard-Installationsverzeichnis fest-->
 		<Property Id="WIXUI_INSTALLDIR" Value="INSTALLDIR" />
 		<Property Id="_BrowseProperty" Value="INSTALLDIR" />
--- a/app/SetupVS19/SetupVS19.wixproj
+++ b/app/SetupVS19/SetupVS19.wixproj
@@ -13,12 +13,12 @@
    <OutputPath>bin\$(Configuration)\</OutputPath>
    <IntermediateOutputPath>obj\$(Configuration)\</IntermediateOutputPath>
    <DefineConstants>Debug</DefineConstants>
-    <LinkerAdditionalOptions>-b "$(SolutionDir)DD_PM_WINDREAM\bin\$(Configuration)"</LinkerAdditionalOptions>
+    <LinkerAdditionalOptions>-b "$(SolutionDir)taskFLOW\bin\$(Configuration)"</LinkerAdditionalOptions>
  </PropertyGroup>
  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
    <OutputPath>bin\$(Configuration)\</OutputPath>
    <IntermediateOutputPath>obj\$(Configuration)\</IntermediateOutputPath>
-    <LinkerAdditionalOptions>-b "$(SolutionDir)DD_PM_WINDREAM\bin\$(Configuration)"</LinkerAdditionalOptions>
+    <LinkerAdditionalOptions>-b "$(SolutionDir)taskFLOW\bin\$(Configuration)"</LinkerAdditionalOptions>
  </PropertyGroup>
  <ItemGroup>
    <Compile Include="Product.wxs" />
@@ -43,7 +43,7 @@
  </Target>
  <Target Name="BeforeBuild">
    <!-- Get the programs assembly version from the .exe file -->
-    <GetAssemblyIdentity AssemblyFiles="..\DD_PM_WINDREAM\bin\$(Configuration)\DD_ProcessManager.exe">
+    <GetAssemblyIdentity AssemblyFiles="..\taskFLOW\bin\$(Configuration)\TaskFlow.exe">
      <Output TaskParameter="Assemblies" ItemName="AsmInfo" />
    </GetAssemblyIdentity>
    <!-- Store the assembly version number in ProductVersion preprocessor variable -->
--- a/app/DD_PM_WINDREAM.sln
+++ b/app/DD_PM_WINDREAM.sln
@@ -1,41 +1,66 @@
 Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio Version 16
+# Visual Studio Version 17
-VisualStudioVersion = 16.0.29728.190
+VisualStudioVersion = 17.3.32929.385
 MinimumVisualStudioVersion = 10.0.40219.1
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DD_PM_WINDREAM", "DD_PM_WINDREAM\DD_PM_WINDREAM.vbproj", "{6ACA1432-09A2-47EF-A704-C0AA73905756}"
 EndProject
 Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "SetupVS19", "SetupVS19\SetupVS19.wixproj", "{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}"
 EndProject
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "taskFLOW", "TaskFlow\taskFLOW.vbproj", "{6ACA1432-09A2-47EF-A704-C0AA73905756}"
 EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
 		CD_ROM|Any CPU = CD_ROM|Any CPU
 		CD_ROM|x86 = CD_ROM|x86
 		Debug|Any CPU = Debug|Any CPU
 		Debug|x86 = Debug|x86
 		DVD-5|Any CPU = DVD-5|Any CPU
 		DVD-5|x86 = DVD-5|x86
 		Release|Any CPU = Release|Any CPU
 		Release|x86 = Release|x86
 		SingleImage|Any CPU = SingleImage|Any CPU
 		SingleImage|x86 = SingleImage|x86
 	EndGlobalSection
 	GlobalSection(ProjectConfigurationPlatforms) = postSolution
-		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.ActiveCfg = Release|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|Any CPU.ActiveCfg = Debug|x86
-		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.Build.0 = Release|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|Any CPU.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.ActiveCfg = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.ActiveCfg = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.Build.0 = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|x86.ActiveCfg = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|x86.Build.0 = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|Any CPU.ActiveCfg = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|Any CPU.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.ActiveCfg = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|Any CPU.ActiveCfg = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|Any CPU.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|x86.ActiveCfg = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|x86.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|Any CPU.ActiveCfg = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|Any CPU.Build.0 = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.ActiveCfg = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.Build.0 = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|Any CPU.ActiveCfg = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|Any CPU.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.ActiveCfg = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|Any CPU.ActiveCfg = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|Any CPU.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|Any CPU.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|Any CPU.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|Any CPU.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|Any CPU.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|Any CPU.ActiveCfg = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|Any CPU.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.ActiveCfg = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|Any CPU.ActiveCfg = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|Any CPU.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.Build.0 = Debug|x86
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE
--- a/app/TaskFlow/App.config
+++ b/app/TaskFlow/App.config
@@ -0,0 +1,259 @@
 <?xml version="1.0" encoding="utf-8"?>
 <configuration>
  <configSections>
    <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
      <section name="taskFLOW.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
      <section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection" requirePermission="false" />
    </sectionGroup>
    <!-- For more information on Entity Framework configuration, visit http://go.microsoft.com/fwlink/?LinkID=237468 -->
    <!-- For more information on Entity Framework configuration, visit http://go.microsoft.com/fwlink/?LinkID=237468 -->
    <section name="entityFramework" type="System.Data.Entity.Internal.ConfigFile.EntityFrameworkSection, EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
    <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
      <section name="taskFLOW.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
    </sectionGroup>
    <section name="oracle.manageddataaccess.client" type="OracleInternal.Common.ODPMSectionHandler, Oracle.ManagedDataAccess, Version=4.122.21.1, Culture=neutral, PublicKeyToken=89b483f429c47342" />
  </configSections>
  <applicationSettings>
    <taskFLOW.My.MySettings>
      <setting name="UseAppConfigConString" serializeAs="String">
        <value>False</value>
      </setting>
      <setting name="UserConfig_Prefix" serializeAs="String">
        <value>TEST</value>
      </setting>
      <setting name="GDPICTURE_VERSION" serializeAs="String">
        <value>11.2024</value>
      </setting>
    </taskFLOW.My.MySettings>
    <DevExpress.LookAndFeel.Design.AppSettings>
      <setting name="DefaultAppSkin" serializeAs="String">
        <value>Skin/Office 2019 White</value>
      </setting>
      <setting name="DefaultPalette" serializeAs="String">
        <value>Custom/Digital Data</value>
      </setting>
      <setting name="TouchUI" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="TouchScaleFactor" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="DirectX" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="RegisterUserSkins" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="FontBehavior" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="DefaultAppFont" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="DPIAwarenessMode" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="CompactUI" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="RegisterBonusSkins" serializeAs="String">
        <value>
        </value>
      </setting>
      <setting name="CustomPaletteCollection" serializeAs="Xml">
        <value>
          <CustomPaletteCollection>
            <Skin Name="Office 2019 White">
              <SvgPalette Name="Digital Data">
                <SvgColor Name="Paint" Value="White" />
                <SvgColor Name="Paint High" Value="White" />
                <SvgColor Name="Paint Shadow" Value="240,240,240" />
                <SvgColor Name="Paint Deep Shadow" Value="230,230,230" />
                <SvgColor Name="Brush" Value="72,70,68" />
                <SvgColor Name="Brush High" Value="72,70,68" />
                <SvgColor Name="Brush Light" Value="119,119,119" />
                <SvgColor Name="Brush Major" Value="171,171,171" />
                <SvgColor Name="Brush Minor" Value="225,225,225" />
                <SvgColor Name="Accent Paint" Value="165,36,49" />
                <SvgColor Name="Accent Paint Dark" Value="133,28,38" />
                <SvgColor Name="Accent Paint Light" Value="250,220,221" />
                <SvgColor Name="Accent Paint Lighter" Value="251,233,234" />
                <SvgColor Name="Accent Brush" Value="255,255,255" />
                <SvgColor Name="Accent Brush Light" Value="218,175,176" />
                <SvgColor Name="Red" Value="237,61,59" />
                <SvgColor Name="Green" Value="48,144,72" />
                <SvgColor Name="Blue" Value="30,139,205" />
                <SvgColor Name="Yellow" Value="251,152,59" />
                <SvgColor Name="Black" Value="87,87,85" />
                <SvgColor Name="Gray" Value="169,168,168" />
                <SvgColor Name="White" Value="255,255,255" />
              </SvgPalette>
            </Skin>
          </CustomPaletteCollection>
        </value>
      </setting>
    </DevExpress.LookAndFeel.Design.AppSettings>
  </applicationSettings>
  <connectionStrings>
    <add name="taskFLOW.My.MySettings.ConnectionString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=False" providerName="System.Data.SqlClient" />
  </connectionStrings>
  <startup>
    <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2" />
  </startup>
  <runtime>
    <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
      <dependentAssembly>
        <assemblyIdentity name="NLog" publicKeyToken="5120e14c03d0593c" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-5.0.0.0" newVersion="5.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="GdPicture.NET.14" publicKeyToken="f52a2e60ad468dbb" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-14.3.3.0" newVersion="14.3.3.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="Newtonsoft.Json" publicKeyToken="30ad4fe6b2a6aeed" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-13.0.0.0" newVersion="13.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Memory" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-4.0.2.0" newVersion="4.0.2.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Runtime.CompilerServices.Unsafe" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-6.0.1.0" newVersion="6.0.1.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Buffers" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-4.0.4.0" newVersion="4.0.4.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Collections.Immutable" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Numerics.Vectors" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-4.1.5.0" newVersion="4.1.5.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="GdPicture.NET.14.Common" publicKeyToken="f52a2e60ad468dbb" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-14.3.3.0" newVersion="14.3.3.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="GdPicture.NET.14.Imaging" publicKeyToken="f52a2e60ad468dbb" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-14.3.1.0" newVersion="14.3.1.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Security.Cryptography.Pkcs" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.IO.Packaging" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Text.Json" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="FirebirdSql.Data.FirebirdClient" publicKeyToken="3750abcc3150b00c" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-7.5.0.0" newVersion="7.5.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="protobuf-net" publicKeyToken="257b51d87d2e4d67" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-3.0.0.0" newVersion="3.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.ValueTuple" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-4.0.3.0" newVersion="4.0.3.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Threading.Tasks.Extensions" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-4.2.0.1" newVersion="4.2.0.1" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="DocumentFormat.OpenXml.Framework" publicKeyToken="8fb06cb64d019a17" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-3.2.0.0" newVersion="3.2.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="DocumentFormat.OpenXml" publicKeyToken="8fb06cb64d019a17" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-3.2.0.0" newVersion="3.2.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Text.Encodings.Web" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="Microsoft.Bcl.AsyncInterfaces" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
      </dependentAssembly>
      <dependentAssembly>
        <assemblyIdentity name="System.Formats.Asn1" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
      </dependentAssembly>
    </assemblyBinding>
  </runtime>
  <entityFramework>
    <providers>
      <provider invariantName="System.Data.SqlClient" type="System.Data.Entity.SqlServer.SqlProviderServices, EntityFramework.SqlServer" />
      <provider invariantName="FirebirdSql.Data.FirebirdClient" type="EntityFramework.Firebird.FbProviderServices, EntityFramework.Firebird" />
    </providers>
    <defaultConnectionFactory type="EntityFramework.Firebird.FbConnectionFactory, EntityFramework.Firebird" />
  </entityFramework>
  <userSettings>
    <taskFLOW.My.MySettings>
      <setting name="IntervallReminder" serializeAs="String">
        <value>5</value>
      </setting>
      <setting name="frmMainSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmMainPosition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorPosition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmMassValidatorSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmMassValidatorposition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorSearchPosition" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValSearchSplitterDistance" serializeAs="String">
        <value>346</value>
      </setting>
      <setting name="frmMainWindowState" serializeAs="String">
        <value>Normal</value>
      </setting>
      <setting name="frmTableColumns_Position" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorSearchSize" serializeAs="String">
        <value>0, 0</value>
      </setting>
      <setting name="frmValidatorWindowState" serializeAs="String">
        <value>Normal</value>
      </setting>
    </taskFLOW.My.MySettings>
  </userSettings>
  <system.data>
    <DbProviderFactories>
      <remove invariant="Oracle.ManagedDataAccess.Client" />
      <add name="ODP.NET, Managed Driver" invariant="Oracle.ManagedDataAccess.Client" description="Oracle Data Provider for .NET, Managed Driver" type="Oracle.ManagedDataAccess.Client.OracleClientFactory, Oracle.ManagedDataAccess, Version=4.122.21.1, Culture=neutral, PublicKeyToken=89b483f429c47342" />
    </DbProviderFactories>
  </system.data>
 </configuration>
--- a/app/DD_PM_WINDREAM/ApplicationEvents.vb
+++ b/app/DD_PM_WINDREAM/ApplicationEvents.vb
@@ -1,4 +1,7 @@
-Imports Microsoft.VisualBasic.ApplicationServices
+Imports DigitalData.Modules.Database
 Imports DigitalData.Modules.EDMI.API
 Imports DigitalData.Modules.ZooFlow
 Imports Microsoft.VisualBasic.ApplicationServices
 Namespace My
    ' Für MyApplication sind folgende Ereignisse verfügbar:
@@ -8,6 +11,8 @@ Namespace My
    ' StartupNextInstance: Wird beim Starten einer Einzelinstanzanwendung ausgelöst, wenn die Anwendung bereits aktiv ist. 
    ' NetworkAvailabilityChanged: Wird beim Herstellen oder Trennen der Netzwerkverbindung ausgelöst.
    Partial Friend Class MyApplication
        Private Sub MyApplication_UnhandledException(sender As Object, e As UnhandledExceptionEventArgs) Handles Me.UnhandledException
            Dim oMessage = "Application encountered an unhandled error!" & vbNewLine & vbNewLine &
                "The errormessage was:" & vbNewLine & e.Exception.Message & vbNewLine &
@@ -19,16 +24,17 @@ Namespace My
                If DEBUG = True Then
                    Dim oLogMessage = LOGCONFIG.Logs.Last()
                    Dim oLogSplit As String() = oLogMessage.Split("|")
-                    Dim oDBMessage = PrepareLogMessage(oLogMessage) & $" [Machinename: {Environment.MachineName}]"
+                    Dim oDBMessage = PrepareLogMessage(oLogMessage) & $" [Machinename: {System.Environment.MachineName}]"
                    Dim oSQL = $"INSERT INTO [dbo].[TBPM_LOG_DEBUG] ([USERID], [LOGMSG], [ADDED_WHEN], DATE_STR) VALUES({USER_ID},'{oDBMessage}',GETDATE(),'{Now}')"
-                    Database_ECM.ExecuteNonQuery(oSQL)
+                    DatabaseFallback.ExecuteNonQueryECM(oSQL)
                End If
            Catch ex As Exception
                LOGGER.Error(ex)
            End Try
-
+            MsgBox(oMessage, MsgBoxStyle.Critical, "Flow Task")
            MsgBox(oMessage, MsgBoxStyle.Critical, "Process Manager")
        End Sub
    End Class
 End Namespace
--- a/app/TaskFlow/Changelog.md
+++ b/app/TaskFlow/Changelog.md
@@ -0,0 +1,16 @@
 # CHANGELOG
 ## 2.4.7.0
 ### Features
 - Modernisierung von verschiedenen Elementen (Validator, Startseite)
 - Format Strings für Textboxen (Währung, Fließkommazahlen, Datum & Uhrzeit)
 - Tabellen Filter im Hauptfenster speichern 
 ### Bugfixes
 - Anzeige-/Indexierungsfehler bei Mehrzeiligen Textboxen
 - Formatierungsfehler bei Fließkomma-Indexen
 - Fehlerhafte Verkettung von Werten bei abhängigen Controls
--- a/app/DD_PM_WINDREAM/ClassAllgemeineFunktionen.vb
+++ b/app/DD_PM_WINDREAM/ClassAllgemeineFunktionen.vb
@@ -2,9 +2,12 @@
 Imports System.Data.OracleClient
 Imports System.IO
 Imports WINDREAMLib
 Imports DevExpress.Utils.CommonDialogs
 Imports System.Runtime.InteropServices
 Public Class ClassAllgemeineFunktionen
    Public Shared Function GUI_LANGUAGE_INFO(pTITLE As String)
        Try
            Dim oFilteredDatatable As DataTable = BASEDATA_DT_GUI_LANGUAGE_PHRASES.Clone()
            Dim oExpression = $"LANGUAGE ='{USER_LANGUAGE}' AND TITLE = '{pTITLE}'"
            BASEDATA_DT_GUI_LANGUAGE_PHRASES.Select(oExpression).CopyToDataTable(oFilteredDatatable, LoadOption.PreserveChanges)
@@ -20,11 +23,29 @@ Public Class ClassAllgemeineFunktionen
                End If
            Else
                If oFilteredDatatable.Rows.Count = 0 Then 'KEIN EINTRAG FÜR SPRACHE
                    oExpression = $"LANGUAGE ='de-DE' AND TITLE = '{pTITLE}'"
                    BASEDATA_DT_GUI_LANGUAGE_PHRASES.Select(oExpression).CopyToDataTable(oFilteredDatatable, LoadOption.PreserveChanges)
                    Try
                        Return oFilteredDatatable.Rows(0).Item("STRING1")
                    Catch ex As Exception
                        Return $"ERR-LANG(NoTranslationFor [{oExpression}]"
                    End Try
                Else
                    Return oFilteredDatatable
                End If
            End If
        Catch ex As Exception
            LOGGER.Info($"Unexpected error in GUI_LANGUAGE_INFO FOR [{pTITLE}]...")
            LOGGER.Error(ex)
        End Try
    End Function
    Public Shared Function GUI_LANGUAGE_MSGBOX(pTITLE As String)
        Try
            Dim oFilteredDatatable As DataTable = BASEDATA_DT_GUI_LANGUAGE_PHRASES.Clone()
            Dim oExpression = $"LANGUAGE = '{USER_LANGUAGE}' AND TITLE = '{pTITLE}'"
            BASEDATA_DT_GUI_LANGUAGE_PHRASES.Select(oExpression).CopyToDataTable(oFilteredDatatable, LoadOption.PreserveChanges)
@@ -33,6 +54,11 @@ Public Class ClassAllgemeineFunktionen
            Else
                Return ""
            End If
        Catch ex As Exception
            LOGGER.Info($"Unexpected error in GUI_LANGUAGE_MSGBOX FOR [{pTITLE}]...")
            LOGGER.Error(ex)
        End Try
    End Function
    Public Shared Function LoginOut(LoginorOut As String) As Boolean
        Try
@@ -41,18 +67,19 @@ Public Class ClassAllgemeineFunktionen
            End If
            Dim oSql As String
            If LoginorOut = "LOGIN" Then
-                oSql = String.Format("INSERT INTO TBDD_USER_MODULE_LOG_IN (USER_ID,CLIENT_ID,MODULE,VERSION_CLIENT,MACHINE_NAME) VALUES ({0},{1},'Process-Manager','{2}','{3}')", USER_ID, 1, My.Application.Info.Version.ToString, Environment.MachineName)
+                oSql = String.Format($"INSERT INTO TBDD_USER_MODULE_LOG_IN (USER_ID,CLIENT_ID,MODULE,VERSION_CLIENT,MACHINE_NAME,LANGUAGE_OVERRIDE) VALUES 
                    ({USER_ID},1,'{MODULE_PM}','{My.Application.Info.Version.ToString}','{Environment.MachineName}','')")
            Else
                If INACTIVITYRecognized = True Then
-                    oSql = $"UPDATE TBDD_USER_LOGIN_OUT SET COMMENT = 'Inactivity Detected',LOGOUT = GETDATE() WHERE USER_ID = {USER_ID} AND UPPER(MODULE) = UPPER('Process-Manager') AND LOGOUT IS NULL"
+                    oSql = $"UPDATE TBDD_USER_LOGIN_OUT SET COMMENT = 'Inactivity Detected',LOGOUT = GETDATE() WHERE USER_ID = {USER_ID} AND MODULE = '{MODULE_PM}' AND LOGOUT IS NULL"
-                    If Database_ECM.ExecuteNonQuery(oSql, "Inactivity insert") = True Then
+                    If DatabaseFallback.ExecuteNonQueryECM(oSql) = True Then
                    End If
                End If
-                    oSql = $"DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = {USER_ID} AND UPPER(MODULE) = UPPER('Process-Manager')"
+                oSql = $"DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = {USER_ID} AND MODULE = '{MODULE_PM}'"
            End If
-            If Database_ECM.ExecuteNonQuery(oSql) = True Then
+            If DatabaseFallback.ExecuteNonQueryECM(oSql) = True Then
                LOGGER.Debug($"{LoginorOut} of User successfully!")
                Return True
            Else
@@ -66,20 +93,6 @@ Public Class ClassAllgemeineFunktionen
        End Try
    End Function
    Public Function Insert_LogEntry(ERR_MSG As String)
        Try
            ERR_MSG = ERR_MSG.Replace("'", "''")
            Dim insert As String = $"INSERT INTO TBPM_LOG_DEBUG (USERID, LOGMSG) VALUES ({USER_ID},'{ERR_MSG}')"
            If ExecuteonMSSQL(insert, CONNECTION_STRING_ECM) <> "" Then
                LOGGER.Warn("...Eintrag in Log-Tabelle konnte nicht erstellt werden!!", True)
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Error in Insert_LogEntry: " & ex.Message)
        End Try
    End Function
    Public Function ExecuteonMSSQL(ByVal sqlcommand As String, ConString As String)
        Try
            ' die nötigen Variablen definieren
@@ -156,41 +169,6 @@ Public Class ClassAllgemeineFunktionen
        End If
    End Sub
    'Public Function Delete_xffres(originFile As String, clsWD As ClassWindream_allgemein)
    '    Try
    '        Dim Stammname As String = System.IO.Path.GetFileNameWithoutExtension(originFile)
    '        Dim Path As String = System.IO.Path.GetDirectoryName(originFile)
    '        Dim xffres As String = Path & "\" & Stammname & ".xffres"
    '        If file_exists(xffres, clsWD) = True Then
    '            System.IO.File.Delete(xffres)
    '            LOGGER.Info("Datei " & xffres & " erfolgreich gelöscht")
    '            Return True
    '        Else
    '            Return Nothing
    '        End If
    '    Catch ex As Exception
    '        LOGGER.Error(ex)
    '        LOGGER.Info(" Fehler bei Delete_xffres", True)
    '        LOGGER.Info("Fehlermeldung: " & ex.Message)
    '    End Try
    'End Function
    'Public Function Delete_File(originFile As String)
    '    Try
    '        If file_exists(originFile, False) = True Then
    '            System.IO.File.Delete(originFile)
    '            LOGGER.Info("Manuelles Löschen: Datei " & originFile & " erfolgreich gelöscht", False)
    '            Return True
    '        Else
    '            MsgBox("Die Datei konnte nicht gelsöcht werden. File NOT EXISTS", MsgBoxStyle.Exclamation)
    '            Return False
    '        End If
    '    Catch ex As Exception
    '        LOGGER.Info(" Fehler bei Delete_File", True)
    '        LOGGER.Info("Fehlermeldung: " & ex.Message)
    '    End Try
    'End Function
    Public Function Move2Folder(ByVal vMove_File As String, ByVal vZiel_Pfad As String, Profile_ID As Integer, clsWD As ClassWindream_allgemein)
        Try
@@ -205,7 +183,7 @@ Public Class ClassAllgemeineFunktionen
                Do While Check_File_exists(_Ziel, clsWD) = True
                    Dim neuername As String = Stammname & "~" & version & extension
                    _Ziel = neuername
-                    version = version + 1
+                    version += 1
                Loop
                My.Computer.FileSystem.MoveFile(vMove_File, _Ziel)
                LOGGER.Info("Datei erfolgreich verschoben - Ziel: " & _Ziel)
@@ -219,7 +197,6 @@ Public Class ClassAllgemeineFunktionen
            LOGGER.Info("Fehler bei Move2Folder", True)
            LOGGER.Info("Fehlermeldung")
            LOGGER.Info(ex.Message)
            Insert_LogEntry($"ERROR {ex.Message}")
            Return ex.Message
        End Try
    End Function
@@ -271,7 +248,7 @@ Public Class ClassAllgemeineFunktionen
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
-            MsgBox("Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei checkValue_Exists:")
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error checkValue_Exists:")
            LOGGER.Info(" - Unvorhergesehener Fehler bei checkValue_Exists - Fehler: " & vbNewLine & ex.Message)
            Return False
        End Try
@@ -304,8 +281,7 @@ Public Class ClassAllgemeineFunktionen
        Catch ex As Exception
            LOGGER.Error(ex)
-            MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:")
+            MsgBox("Unexpected error Execute_Scalar_SQLServer" & vbNewLine & "Automatic Index (j/n): " & check.ToString & vbNewLine & "ERROR:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error Execute_Scalar_SQL sql:")
            Insert_LogEntry($"ERROR Execute_Scalar_SQLServer{ex.Message}")
            LOGGER.Info(" - Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
            LOGGER.Info(" - SQL: " & vsql_statement)
            LOGGER.Info(" - Connection: " & vconnectionString)
@@ -338,12 +314,108 @@ Public Class ClassAllgemeineFunktionen
            cnn.Close()
        Catch ex As Exception
            LOGGER.Error(ex)
-            MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:")
+            MsgBox("Unexpected error Execute_Scalar_Oracle" & vbNewLine & "Automatic Index (y/n): " & check.ToString & vbNewLine & "Error:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error Execute_Scalar_oracle sql:")
            Insert_LogEntry($"ERROR Execute_Scalar_Oracle{ex.Message}")
            LOGGER.Info(" - Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
            LOGGER.Info(" - SQL: " & vsql_statement)
            LOGGER.Info(" - Connection: " & vconnectionString)
            Return 99
        End Try
    End Function
    Public Shared Sub Save_Logfiles()
        Try
            Dim saveFileDialog1 As New SaveFileDialog()
            If File.Exists(LOGCONFIG.LogFile) Then
                saveFileDialog1.Filter = "log file|*.log"
                saveFileDialog1.FileName = Path.GetFileName(LOGCONFIG.LogFile)
                If saveFileDialog1.ShowDialog() = DialogResult.OK Then
                    If File.Exists(saveFileDialog1.FileName) Then
                        File.Delete(saveFileDialog1.FileName)
                    End If
                    File.Copy(LOGCONFIG.LogFile, saveFileDialog1.FileName)
                End If
            End If
            If DEBUG = True Then
                Dim oDebuglogFilename_only = Path.GetFileNameWithoutExtension(LOGCONFIG.LogFile) + "-Debug.log"
                Dim oDebuglogFilename = LOGCONFIG.LogDirectory + "\" + oDebuglogFilename_only
                If File.Exists(oDebuglogFilename) Then
                    saveFileDialog1.Filter = "log file|*.log"
                    saveFileDialog1.FileName = oDebuglogFilename_only
                    If saveFileDialog1.ShowDialog() = DialogResult.OK Then
                        If File.Exists(saveFileDialog1.FileName) Then
                            File.Delete(saveFileDialog1.FileName)
                        End If
                        File.Copy(oDebuglogFilename, saveFileDialog1.FileName)
                    End If
                End If
            End If
            Dim oErrorlogFilename_only = Path.GetFileNameWithoutExtension(LOGCONFIG.LogFile) + "-Error.log"
            Dim oErrorlogFilename = LOGCONFIG.LogDirectory + "\" + oErrorlogFilename_only
            If File.Exists(oErrorlogFilename) Then
                saveFileDialog1.Filter = "log file|*.log"
                saveFileDialog1.FileName = oErrorlogFilename_only
                If saveFileDialog1.ShowDialog() = DialogResult.OK Then
                    If File.Exists(saveFileDialog1.FileName) Then
                        File.Delete(saveFileDialog1.FileName)
                    End If
                    File.Copy(oErrorlogFilename, saveFileDialog1.FileName)
                End If
            End If
            Dim oMSG = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("ExportLogFiles_Result")
            MsgBox(oMSG, MsgBoxStyle.Information, ADDITIONAL_TITLE)
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error saving log file")
        End Try
    End Sub
    Public Shared Function NotNull(Of T)(value As Object, defaultValue As T) As T
        If value Is Nothing OrElse Convert.IsDBNull(value) Then
            Return defaultValue
        End If
        ' Versuche den Wert in den gewünschten Typ zu konvertieren
        Try
            Return CType(value, T)
        Catch ex As InvalidCastException
            ' Falls die Konvertierung fehlschlägt, gib den Default zurück
            Return defaultValue
        End Try
    End Function
    Public Shared Function NotNullNullable(Of T As Structure)(value As Object, defaultValue As Nullable(Of T)) As Nullable(Of T)
        If value Is Nothing OrElse Convert.IsDBNull(value) Then
            Return defaultValue
        End If
        Try
            ' Direkte Casts sind robust, wandeln aber DBNull nicht – das ist bereits oben abgefangen.
            Return DirectCast(value, Nullable(Of T))
        Catch
            Try
                ' Fallback: in T casten und zu Nullable machen
                Return New Nullable(Of T)(DirectCast(value, T))
            Catch
                Return defaultValue
            End Try
        End Try
    End Function
    Public Shared Function NotNullString(value As Object, defaultValue As Object) As String
        If value Is Nothing OrElse Convert.IsDBNull(value) Then Return defaultValue
        Return CStr(value)
    End Function
    Public Shared Function NotNullDate(value As Object, defaultValue As DateTime) As DateTime?
        If value Is Nothing OrElse Convert.IsDBNull(value) Then Return defaultValue
        Return DirectCast(value, DateTime)
    End Function
    Public Shared Function NewShortGuid() As String
        ' Neue GUID erzeugen
        Dim g As Guid = Guid.NewGuid()
        ' In Base64 umwandeln
        Dim b64 As String = Convert.ToBase64String(g.ToByteArray())
        ' Unerwünschte Zeichen ersetzen/entfernen
        b64 = b64.Replace("=", "").Replace("+", "-").Replace("/", "_")
        ' Ergebnis zurückgeben
        Return b64
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ClassConfig.vb
+++ b/app/DD_PM_WINDREAM/ClassConfig.vb
@@ -1,4 +1,5 @@
 Imports DigitalData.Modules.Config.ConfigAttributes
 Imports DigitalData.Modules.Logging
 Public Class ClassConfig
    ' Global Settings (from computerconfig, overridable by userconfig)
@@ -29,8 +30,31 @@ Public Class ClassConfig
    ' Misc Settings
    Public Property DEBUG As Boolean = False
    Public Property ReminderTimer As Integer = 5
    Public Property OverviewRefresh_Intervall As Integer = 2
    Public Property MainTreeList_Width As Integer = 250
    Public Property MonitorSplitter1_Distance As Integer = 510
    Public Property MonitorSplitter2_Distance As Integer = 270
    Public Property MonitorSplitter3_Distance As Integer = 400
    Public Property frmValidatorWindowState As String = "Normal"
    Public Property LastExportPath As String = ""
    Public Property ADDITIONAL_SEARCHES_LOAD_ONCLICK As Boolean = True
    Public Property NOTES_ONCLICK As Boolean = True
    Public Property GridFontSizeDelta As Integer = 0
    Public Property ProfileConfig As New ProfileUserConfig
    Public Property InvDashboardSplitterPositions As New List(Of InvDashboardSplitterPosition)
    Public Class InvDashboardSplitterPosition
        Public Property CockpitChartId As Integer
        Public Property SplitterPosition As Integer
    End Class
    Public Class ProfileUserConfig
        Public Property ProfileID As Integer
        Public Property ShowFile As Boolean = True
        Public Property ShowSearchesDirect As Boolean = True
    End Class
 End Class
--- a/app/TaskFlow/ClassConstants.vb
+++ b/app/TaskFlow/ClassConstants.vb
@@ -0,0 +1,12 @@
 Public Class ClassConstants
    Public Const OpModeFS_PWM = "PURE_WM"
    Public Const OpModeFS_IDBWM = "IDB_WM"
    Public Const OpModeFS_ZF = "ZOOFLOW"
    Public Const CAT_INFORMATION = "Information"
    Public Const CAT_GENERAL = "Allgemein"
    Public Const CAT_DISPLAY = "Anzeige"
    Public Const CAT_BEHAVIOUR = "Verhalten"
    Public Const CAT_DATA = "Daten"
    Public Const CAT_VALIDATION = "Validierung"
 End Class
--- a/app/TaskFlow/ClassControlCreator.vb
+++ b/app/TaskFlow/ClassControlCreator.vb
--- a/app/DD_PM_WINDREAM/ClassDragDrop.vb
+++ b/app/DD_PM_WINDREAM/ClassDragDrop.vb
--- a/app/DD_PM_WINDREAM/ClassEmail.vb
+++ b/app/DD_PM_WINDREAM/ClassEmail.vb
@@ -48,17 +48,17 @@ Public Class ClassEmail
                '*Send the message */
                emailClient.Send(message)
                If test = True Then
-                    MsgBox("Die Test-Email wurde erfolgreich versendet!", MsgBoxStyle.Information, "Erfolgsmeldung:")
+                    MsgBox("TestMail sent successfully!", MsgBoxStyle.Information, "Success:")
                End If
                If Log = True Then
-                    MsgBox("Die Support-Email wurde erfolgreich versendet!", MsgBoxStyle.Information, "Erfolgsmeldung:")
+                    MsgBox("The Support-Email has been sent successfully!", MsgBoxStyle.Information, "Success:")
                End If
                'LOGGER.Info(">> Support/Log Email erfolgreich an " & _mailempfaenger & " versendet!", False)
            Next
            Return True
        Catch ex As Exception
            LOGGER.Error(ex)
-            LOGGER.Info("### Fehler im Mailversand: " & ex.Message)
+            LOGGER.Info("### Error in Mailversand: " & ex.Message)
            Return False
        End Try
    End Function
--- a/app/DD_PM_WINDREAM/ClassEncryption.vb
+++ b/app/DD_PM_WINDREAM/ClassEncryption.vb
--- a/app/DD_PM_WINDREAM/ClassFinalIndex.vb
+++ b/app/DD_PM_WINDREAM/ClassFinalIndex.vb
@@ -114,12 +114,12 @@ Public Class ClassFinalIndex
            props.VectorIndex = isVector
            If type = INDEX_TYPE_STRING Or type = INDEX_TYPE_VECTOR_STRING Then
-                value = NotNull(value, "")
+                value = ClassAllgemeineFunktionen.NotNullString(value, "")
                props.StringValue = value
            ElseIf type = INDEX_TYPE_INTEGER Or type = INDEX_TYPE_INTEGER64 Or type = INDEX_TYPE_VECTOR_INTEGER_64 Then
                Try
-                    value = NotNull(Of Integer)(value, 0)
+                    value = ClassAllgemeineFunktionen.NotNullString(value, 0)
                    If value = String.Empty Then
                        props.IntegerValue = 0
                    Else
@@ -138,7 +138,7 @@ Public Class ClassFinalIndex
                If value = "SQL-Command" Then
                    props.FloatValue = 0
                Else
-                    value = NotNull(Of Double)(value, 0)
+                    value = ClassAllgemeineFunktionen.NotNullString(value, 0)
                    If value = String.Empty Then
                        props.FloatValue = 0
@@ -148,7 +148,7 @@ Public Class ClassFinalIndex
                End If
            ElseIf type = INDEX_TYPE_BOOLEAN Or type = INDEX_TYPE_VECTOR_BOOLEAN Then
-                value = NotNull(value, "False")
+                value = ClassAllgemeineFunktionen.NotNullString(value, "False")
                If value = "1" Or value.ToLower = "true" Then
                    props.BoolValue = True
@@ -168,7 +168,7 @@ Public Class ClassFinalIndex
        Return LIST_VECTOR_INDICIES.Contains(type)
    End Function
-    Public Shared Function GetIndexType(indexName As String, indicies As List(Of String), types As List(Of Integer))
+    Public Function GetIndexType(indexName As String, indicies As List(Of String), types As List(Of Integer)) As Integer
        Try
            Dim position As Integer = indicies.IndexOf(indexName)
            Dim type As Integer = types.Item(position)
@@ -176,6 +176,7 @@ Public Class ClassFinalIndex
            Return type
        Catch ex As Exception
            MsgBox(ex.Message & vbNewLine & $"Please check whether attribute {indexName} exists in AtributesList!", MsgBoxStyle.Critical)
            Return Nothing
        End Try
    End Function
--- a/app/DD_PM_WINDREAM/ClassFinalizeDoc.vb
+++ b/app/DD_PM_WINDREAM/ClassFinalizeDoc.vb
@@ -1,19 +1,29 @@
-Public Class ClassFinalizeDoc
+Imports DevExpress.DataAccess.Native.Json
 Imports DigitalData.Modules.EDMI.API.Constants
 Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
 Public Class ClassFinalizeDoc
    Public Shared Function Write_Final_Metadata(WMObject As WINDREAMLib.WMObject)
        Try
            Dim _error As Boolean = False
            If CURRENT_DT_FINAL_INDEXING Is Nothing Then
-                CURRENT_DT_FINAL_INDEXING = Database_ECM.GetDatatable(String.Format("select * from  TBPM_PROFILE_FINAL_INDEXING where PROFIL_ID = {0}", CURRENT_ProfilGUID)) ', "Write_Final_Metadata")
+                Dim oSQL = String.Format("select * from  TBPM_PROFILE_FINAL_INDEXING where PROFIL_ID = {0}", CURRENT_ProfilGUID)
                'CURRENT_DT_FINAL_INDEXING = DatabaseFallback.GetDatatableECM(oSQL) ', "Write_Final_Metadata")
                CURRENT_DT_FINAL_INDEXING = DatabaseFallback.GetDatatable("TBPM_PROFILE_FINAL_INDEXING", New GetDatatableOptions(oSQL, DatabaseType.ECM) With {
                    .FilterExpression = $"PROFIL_ID = {CURRENT_ProfilGUID}"
                })
            End If
            If CURRENT_DT_FINAL_INDEXING.Rows.Count > 0 Then
                'Jetzt finale Indexe setzen
                LOGGER.Debug("working final indices for doc: " & WMObject.aName)
                For Each dr As DataRow In CURRENT_DT_FINAL_INDEXING.Rows
-                    Dim value As String = dr.Item("VALUE").ToString
+                    Dim ovalueString As String = dr.Item("VALUE").ToString
                    Dim INDEXNAME = dr.Item("INDEXNAME").ToString
                    Dim oContinueOnIndifferentState As Boolean = CBool(dr.Item("CONTINUE_INDETERMINED"))
-                    If value.ToUpper = "SQL-Command".ToUpper Then '###### Indexierung mit variablen SQL ###
+                    Dim VektorBeahaviour = dr.Item("IF_VEKTOR_BEHAVIOUR").ToString
                    If ovalueString.ToUpper = "SQL-Command".ToUpper Then '###### Indexierung mit variablen SQL ###
                        LOGGER.Debug("indexing with dynamic sql...")
                        'Dim SQL_COMMAND = dr.Item("SQL_COMMAND")
                        '' Regulären Ausdruck zum Auslesen der Indexe definieren
@@ -42,34 +52,34 @@
                        sql_Statement = clsPatterns.ReplaceInternalValues(sql_Statement)
                        sql_Statement = clsPatterns.ReplaceWindreamIndicies(sql_Statement, WMObject, True)
                        LOGGER.Debug("sql after ReplaceAllValues: " & sql_Statement)
-                        Dim oDynamic_value = Database_ECM.GetScalarValue(sql_Statement) ', CONNECTION_STRING_ECM, "Write_Final_Metadata/dynamic_value")
+                        Dim oDynamic_value = DatabaseFallback.GetScalarValueECM(sql_Statement) ', CONNECTION_STRING_ECM, "Write_Final_Metadata/dynamic_value")
                        If Not IsNothing(oDynamic_value) Then
-                            value = oDynamic_value
+                            ovalueString = oDynamic_value
                        Else
                            Continue For
                        End If
                    Else
-                        If value.StartsWith("v") Then
+                        If ovalueString.StartsWith("v") Then
                            Select Case dr.Item("VALUE").ToString
                                Case "vDate"
-                                    value = Now.ToShortDateString
+                                    ovalueString = Now.ToShortDateString
                                Case "vUserName"
-                                    value = USER_USERNAME
+                                    ovalueString = USER_USERNAME
                                Case Else
-                                    value = dr.Item("VALUE")
+                                    ovalueString = dr.Item("VALUE")
                            End Select
                        End If
                    End If
                    Dim result() As String
                    ReDim Preserve result(0)
-                    result(0) = value
+                    result(0) = ovalueString
                    Dim oIndexType = WINDREAM.GetTypeOfIndex(INDEXNAME)
                    LOGGER.Debug($"oIndexType {oIndexType.ToString}")
                    If oIndexType > 4000 And oIndexType < 5000 Then
                        'Hier muss nun separat als Vektorfeld indexiert werden
-                        If Indexiere_VektorfeldPM(value, INDEXNAME, WMObject) = True Then
+                        If Indexiere_VektorfeldPM(ovalueString, INDEXNAME, WMObject) = True Then
                            LOGGER.Debug("FINALER INDEX '" & INDEXNAME.Replace("[%VKT", "") & "' WURDE ERFOLGREICH GESETZT")
                        Else
@@ -79,12 +89,13 @@
                        End If
                    Else
                        LOGGER.Debug("now indexing..")
-                        If Indexiere_File(INDEXNAME, result, WMObject) = True Then
+
                        If WINDREAM_MOD.SetFileIndex(CURRENT_DOC_PATH, INDEXNAME, ovalueString, CURRENT_WMObjecttype) = True Then 'Indexiere_File(INDEXNAME, result, WMObject) = True Then
                            LOGGER.Debug("FINALER INDEX '" & INDEXNAME & "' WURDE ERFOLGREICH GESETZT")
                            LOGGER.Debug("")
                            'Nun das Logging
                            If CURRENT_PROFILE_LOG_INDEX <> "" Then
-                                Dim logstr = Return_LOGString(value, "DDFINALINDEX", INDEXNAME)
+                                Dim logstr = Return_LOGString(ovalueString, "DDFINALINDEX", INDEXNAME)
                                Indexiere_VektorfeldPM(logstr, CURRENT_PROFILE_LOG_INDEX, WMObject)
                            End If
@@ -112,39 +123,73 @@
        End Try
    End Function
-    Private Shared Function Indexiere_File(idxxname As String, idxvalue As Object, WMObject As WINDREAMLib.WMObject)
+    Private Shared Function Indexiere_File(pIndexName As String, pIndexValues As Object, WMObject As WINDREAMLib.WMObject) As Boolean
-        Dim File_indexiert As Boolean = False
+        LOGGER.Debug("### Indexiere_File Begin ###")
        Dim indexierung_erfolgreich As Boolean = False
        Try
            Dim oIndexType As Integer = WINDREAM_MOD.GetIndexType(pIndexName)
            If oIndexType > 4095 Then
                LOGGER.Debug("Es Handelt sich um einen VektorIndex...")
                Dim oExistingItems = WINDREAM_MOD.GetIndexValue(CURRENT_DOC_PATH, pIndexName)
                Dim oListofString As New List(Of String)
                If pIndexValues.Length = 0 Then
                    LOGGER.Debug("oSplitArray.Length = 0")
                    oListofString.Add(pIndexValues(0))
                Else
                    LOGGER.Debug($"pIndexValues.Length is > 0 [{pIndexValues.length}] ...")
                    For Each oStr In pIndexValues
                        LOGGER.Debug("pIndexValues - oString : {0}", oStr)
                        oListofString.Add(oStr)
                    Next
                End If
                If oExistingItems.Count > 0 Then
                    LOGGER.Debug("oOverwrite = False and WMObject already contains [{0}] values in attribute,Values will be concatted", oExistingItems.Count)
                    oListofString = oExistingItems.Concat(oListofString).ToList()
                End If
                oListofString = oListofString.Distinct().ToList()
                indexierung_erfolgreich = WINDREAM_MOD.SetFileIndexLoS(CURRENT_DOC_PATH, pIndexName, oListofString, CURRENT_WMObjecttype)
            Else
                Dim oStringValue As String = pIndexValues(0).ToString
                indexierung_erfolgreich = WINDREAM_MOD.SetFileIndex(CURRENT_DOC_PATH, pIndexName, oStringValue, CURRENT_WMObjecttype)
            End If
            Return indexierung_erfolgreich
        Catch ex As Exception
            LOGGER.Warn("⚠️ Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString)
            Return False
        End Try
        ' Try
-        'Die Arrays vorbereiten
+        ''Die Arrays vorbereiten
-        Dim arrIndex() As String = Nothing
+        'Dim arrIndex() As String = Nothing
-        Dim arrValue() As String = Nothing
+        'Dim arrValue() As String = Nothing
-        arrIndex = Nothing
+        'arrIndex = Nothing
-        arrValue = Nothing
+        'arrValue = Nothing
-        'Den Indexnamen übergeben
+        ''Den Indexnamen übergeben
-        ReDim Preserve arrIndex(0)
+        'ReDim Preserve arrIndex(0)
-        arrIndex(0) = idxxname
+        'arrIndex(0) = idxxname
-        'Das Array der Idnexwerte überprüfen
+        ''Das Array der Idnexwerte überprüfen
-        If idxvalue Is Nothing = False Then
+        'If idxvalue Is Nothing = False Then
-            If idxvalue.Length() > 1 Then
+        '    If idxvalue.Length() > 1 Then
-                LOGGER.Debug("Indexing Index '" & idxxname & "' with Arrayvalue")
+        '        LOGGER.Debug("Indexing Index '" & idxxname & "' with Arrayvalue")
-                Dim anzahl As Integer = 0
+        '        Dim anzahl As Integer = 0
-                For Each indexvalue As String In idxvalue
+        '        For Each indexvalue As String In idxvalue
-                    ReDim Preserve arrValue(anzahl)
+        '            ReDim Preserve arrValue(anzahl)
-                    arrValue(anzahl) = indexvalue
+        '            arrValue(anzahl) = indexvalue
-                    anzahl += 1
+        '            anzahl += 1
-                Next
+        '        Next
-            Else
+        '    Else
-                LOGGER.Debug("Indexing Index '" & idxxname & "' with value '" & idxvalue(0) & "'")
+        '        LOGGER.Debug("Indexing Index '" & idxxname & "' with value '" & idxvalue(0) & "'")
-                ReDim Preserve arrValue(0)
+        '        ReDim Preserve arrValue(0)
-                arrValue(0) = idxvalue(0).ToString
+        '        arrValue(0) = idxvalue(0).ToString
-            End If
+        '    End If
-            'Dim _windreamPM As New ClassPMWindream
+        '    'Dim _windreamPM As New ClassPMWindream
-            'Jetzt das eigentliche Indexieren der Datei
+        '    'Jetzt das eigentliche Indexieren der Datei
-            File_indexiert = WINDREAM.RunIndexing(WMObject, arrIndex, arrValue)
+        'File_indexiert = WINDREAM.RunIndexing(WMObject, arrIndex, arrValue)
-            Return File_indexiert
+        'Return File_indexiert
-        End If
+        ' End If
        'Catch ex As Exception
        '    LOGGER.Info("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString, True)
--- a/app/TaskFlow/ClassFormat.vb
+++ b/app/TaskFlow/ClassFormat.vb
@@ -0,0 +1,217 @@
 Imports System.Globalization
 Imports DevExpress.CodeParser
 Imports DevExpress.Data.Controls
 Imports DevExpress.XtraPrinting
 Public Class ClassFormat
    Public Const CURRENCY_FORMAT = "C2"
    Public Const DECIMAL_FORMAT = "F"
    Public Const DATE_FORMAT = "d"
    Public Const DATETIME_FORMAT = "G"
    Public Shared Function GetFormatString(pFormatString As String) As String
        Select Case pFormatString
            Case ClassControlCreator.CONTROL_TYPE_CURRENCY
                Return CURRENCY_FORMAT
            Case ClassControlCreator.CONTROL_TYPE_DOUBLE
                Return DECIMAL_FORMAT
            Case ClassControlCreator.CONTROL_TYPE_DATE
                Return DATE_FORMAT
            Case ClassControlCreator.CONTROL_TYPE_DATETIME
                Return DATETIME_FORMAT
            Case Else
                Return String.Empty
        End Select
    End Function
    ''' <summary>
    ''' Normalisiert einen numerischen String für die invariante Kultur-Konvertierung.
    ''' Entfernt Tausendertrennzeichen und ersetzt Dezimaltrennzeichen durch Punkt.
    ''' </summary>
    Private Shared Function NormalizeNumericString(pValue As String) As String
        If String.IsNullOrWhiteSpace(pValue) Then
            Return pValue
        End If
        Dim normalized As String = pValue.Trim()
        LOGGER.Debug($"[NormalizeNumericString] Input: [{pValue}]")
        ' Entferne Währungssymbole und Leerzeichen
        normalized = System.Text.RegularExpressions.Regex.Replace(normalized, "[€$£¥\s]", "")
        Dim hasDot As Boolean = normalized.Contains(".")
        Dim hasComma As Boolean = normalized.Contains(",")
        LOGGER.Debug($"[NormalizeNumericString] After cleanup: [{normalized}], HasDot={hasDot}, HasComma={hasComma}")
        If hasDot AndAlso hasComma Then
            ' Beide vorhanden: Das letzte ist der Dezimaltrenner
            Dim lastDotPos As Integer = normalized.LastIndexOf(".")
            Dim lastCommaPos As Integer = normalized.LastIndexOf(",")
            LOGGER.Debug($"[NormalizeNumericString] Both separators found: LastDotPos={lastDotPos}, LastCommaPos={lastCommaPos}")
            If lastDotPos > lastCommaPos Then
                normalized = normalized.Replace(",", "")
            Else
                normalized = normalized.Replace(".", "").Replace(",", ".")
            End If
        ElseIf hasComma Then
            Dim commaCount As Integer = normalized.Count(Function(c) c = ","c)
            LOGGER.Debug($"[NormalizeNumericString] Only comma found: CommaCount={commaCount}")
            If commaCount = 1 Then
                Dim lastCommaPos As Integer = normalized.LastIndexOf(",")
                Dim digitsAfterComma As Integer = normalized.Length - lastCommaPos - 1
                LOGGER.Debug($"[NormalizeNumericString] Single comma: DigitsAfterComma={digitsAfterComma}")
                If digitsAfterComma <= 3 Then
                    normalized = normalized.Replace(",", ".")
                Else
                    normalized = normalized.Replace(",", "")
                End If
            Else
                normalized = normalized.Replace(",", "")
            End If
        ElseIf hasDot Then
            Dim dotCount As Integer = normalized.Count(Function(c) c = "."c)
            LOGGER.Debug($"[NormalizeNumericString] Only dot found: DotCount={dotCount}")
            If dotCount = 1 Then
                Dim lastDotPos As Integer = normalized.LastIndexOf(".")
                Dim digitsAfterDot As Integer = normalized.Length - lastDotPos - 1
                LOGGER.Debug($"[NormalizeNumericString] Single dot: DigitsAfterDot={digitsAfterDot}")
                ' ✅ KRITISCHE ÄNDERUNG: Prüfe auch Stellen VOR dem Punkt
                Dim digitsBeforeDot As Integer = lastDotPos
                ' Heuristik: Wenn <= 3 Stellen nach Punkt UND >= 1 Stelle davor → Dezimaltrenner
                ' Wenn > 3 Stellen davor UND <= 3 Stellen nach Punkt → unklar, vermutlich Dezimal
                ' Wenn > 3 Stellen nach Punkt → definitiv KEIN Dezimaltrenner
                If digitsAfterDot > 3 Then
                    LOGGER.Warn($"⚠️ [NormalizeNumericString] Dot with {digitsAfterDot} digits after → treating as THOUSAND separator!")
                    normalized = normalized.Replace(".", "")
                ElseIf digitsAfterDot >= 1 AndAlso digitsAfterDot <= 3 Then
                    ' Wahrscheinlich Dezimaltrenner (z.B. 5464.17 oder 120.5)
                    LOGGER.Debug($"[NormalizeNumericString] Dot treated as decimal separator ({digitsBeforeDot} digits before, {digitsAfterDot} after)")
                Else
                    ' digitsAfterDot = 0 → Punkt am Ende, vermutlich Fehler
                    LOGGER.Warn($"⚠️ [NormalizeNumericString] Dot at end of string → removing")
                    normalized = normalized.Replace(".", "")
                End If
            Else
                ' Mehrere Punkte → Tausendertrenner
                LOGGER.Debug($"[NormalizeNumericString] Multiple dots → removing all")
                normalized = normalized.Replace(".", "")
            End If
        Else
            LOGGER.Debug($"[NormalizeNumericString] No separators found → integer or already normalized")
        End If
        LOGGER.Debug($"[NormalizeNumericString] Output: [{normalized}]")
        Return normalized
    End Function
    ''' <summary>
    ''' Converts a string according to the type information, using the invariant culture
    ''' </summary>
    ''' <param name="pValue"></param>
    ''' <param name="pType"></param>
    ''' <returns></returns>
    Public Shared Function GetConvertedValue(pValue As Object, pType As String) As Object
        Dim oConvertedValue
        LOGGER.Debug($"GetConvertedValue: {pType}")
        Select Case pType
            Case ClassControlCreator.CONTROL_TYPE_DOUBLE
                Try
                    ' ✅ IMMER normalisieren – auch für DB-Werte!
                    Dim normalizedValue As String = NormalizeNumericString(pValue?.ToString())
                    If Double.TryParse(normalizedValue, NumberStyles.Float, CultureInfo.InvariantCulture, oConvertedValue) Then
                        Return oConvertedValue
                    End If
                Catch ex As Exception
                    LOGGER.Error(ex)
                End Try
            Case ClassControlCreator.CONTROL_TYPE_CURRENCY
                Try
                    ' ✅ KRITISCH: Normalisierung VOR Konvertierung
                    Dim normalizedValue As String = NormalizeNumericString(pValue?.ToString())
                    LOGGER.Debug($"GetConvertedValue CURRENCY: Original=[{pValue}], Normalized=[{normalizedValue}]")
                    If Double.TryParse(normalizedValue, NumberStyles.Float, CultureInfo.InvariantCulture, oConvertedValue) Then
                        Return oConvertedValue
                    End If
                Catch ex As Exception
                    LOGGER.Error($"Currency conversion failed for [{pValue}]: {ex.Message}")
                    LOGGER.Error(ex)
                End Try
            Case ClassControlCreator.CONTROL_TYPE_INTEGER
                Try
                    Dim normalizedValue As String = NormalizeNumericString(pValue?.ToString())
                    If Integer.TryParse(normalizedValue, NumberStyles.Integer, CultureInfo.InvariantCulture, oConvertedValue) Then
                        Return oConvertedValue
                    End If
                Catch ex As Exception
                    LOGGER.Error(ex)
                End Try
            Case Else
                LOGGER.Debug($"GetConvertedValue - Case ELSE - pType is {pType}")
                Try
                    oConvertedValue = pValue.ToString
                Catch ex As Exception
                    LOGGER.Warn($"Error in GetConvertedValue:  pType is {pType} - converting value to String")
                    oConvertedValue = ""
                End Try
        End Select
        Return oConvertedValue
    End Function
    ''' <summary>
    ''' Converts values to their respective data type and then back to string 
    ''' using INVARIANT culture for consistency across systems.
    ''' </summary>
    ''' <param name="pValue"></param>
    ''' <returns></returns>
    Public Shared Function GetStringValue(pValue As Object) As String
        ' ✅ FIX: Immer InvariantCulture verwenden für DB-Speicherung
        Select Case pValue.GetType
            Case GetType(Single)
                ' ✅ NEU: InvariantCulture statt CurrentCulture
                Return DirectCast(pValue, Single).ToString(CultureInfo.InvariantCulture)
            Case GetType(Double)
                ' ✅ NEU: InvariantCulture statt CurrentCulture
                Return DirectCast(pValue, Double).ToString(CultureInfo.InvariantCulture)
            Case GetType(Decimal)
                ' ✅ NEU: InvariantCulture statt CurrentCulture
                Return DirectCast(pValue, Decimal).ToString(CultureInfo.InvariantCulture)
            Case GetType(Date)
                ' Datum: ISO 8601 Format für Culture-Unabhängigkeit
                Return DirectCast(pValue, Date).ToString("yyyy-MM-dd", CultureInfo.InvariantCulture)
            Case GetType(DateTime)
                ' DateTime: ISO 8601 Format
                Return DirectCast(pValue, DateTime).ToString("yyyy-MM-dd HH:mm:ss", CultureInfo.InvariantCulture)
            Case Else
                Return pValue.ToString
        End Select
    End Function
 End Class
--- a/app/TaskFlow/ClassIDBData.vb
+++ b/app/TaskFlow/ClassIDBData.vb
@@ -0,0 +1,349 @@
 Public Class ClassIDBData
    Public DTVWIDB_BE_ATTRIBUTE As DataTable
    Public IDBSystemIndices As List(Of String)
    ''' <summary>
    ''' Wenn True, werden SQL-Statements nicht sofort ausgeführt,
    ''' sondern in <see cref="_sqlBatch"/> gesammelt.
    ''' </summary>
    Public Property BatchMode As Boolean = False
    Private _sqlBatch As New List(Of String)
    ''' <summary>
    ''' Startet den Batch-Sammelmodus.
    ''' </summary>
    Public Sub BeginBatch()
        _sqlBatch.Clear()
        BatchMode = True
    End Sub
    ''' <summary>
    ''' Führt alle gesammelten SQL-Statements als einen einzigen String
    ''' an ExecuteNonQueryIDB weiter. Jeder Block wird in BEGIN...END
    ''' gekapselt, damit DECLARE-Variablen nicht kollidieren.
    ''' </summary>
    ''' <returns>True wenn erfolgreich</returns>
    Public Function CommitBatch() As Boolean
        BatchMode = False
        If _sqlBatch.Count = 0 Then Return True
        Try
            Dim oStatements = _sqlBatch.
                Where(Function(s) Not String.IsNullOrWhiteSpace(s)).
                ToList()
            ' @NEW_OBJ_MD_ID pro Statement eindeutig umbenennen → kein Namenskonflikt im Batch
            Dim oNumberedStatements As New List(Of String)
            Dim oIndex As Integer = 0
            For Each oStatement As String In oStatements
                Dim oNumbered = oStatement.Replace("@NEW_OBJ_MD_ID", $"@NEW_OBJ_MD_ID_{oIndex}")
                oNumberedStatements.Add(oNumbered)
                oIndex += 1
            Next
            Dim oBatchSQL = String.Join(vbNewLine, oNumberedStatements)
            LOGGER.Debug($"⚡ CommitBatch - Executing {oStatements.Count} statements as one batch:{vbNewLine}{oBatchSQL}")
            Dim oResult = DatabaseFallback.ExecuteNonQueryIDB(oBatchSQL)
            _sqlBatch.Clear()
            Return oResult
        Catch ex As Exception
            LOGGER.Error(ex)
            _sqlBatch.Clear()
            Return False
        End Try
    End Function
    ''' <summary>
    ''' Verwirft alle gesammelten Statements ohne Ausführung.
    ''' </summary>
    Public Sub RollbackBatch()
        _sqlBatch.Clear()
        BatchMode = False
    End Sub
    ''' <summary>
    ''' Führt ein SQL-Statement aus – sofort oder gesammelt je nach BatchMode.
    ''' </summary>
    Private Function ExecuteOrQueue(oSQL As String) As Boolean
        If BatchMode Then
            _sqlBatch.Add(oSQL)
            LOGGER.Debug($"BatchMode - Queued statement: {oSQL}")
            Return True
        Else
            Return DatabaseFallback.ExecuteNonQueryIDB(oSQL)
        End If
    End Function
    ''' <summary>
    ''' Gets all indices by BusinessEntity.
    ''' </summary>
    ''' <param name="BusinessEntity">Title of Business Entity</param>
    ''' <returns>Array with all Indices</returns>
    ''' <remarks></remarks>
    ''' 
    Public Function Init() As Boolean
        Dim oSQL = $"SELECT DISTINCT ATTR_TITLE, TYP_ID, TYP_ID as [TYPE_ID] FROM VWIDB_BE_ATTRIBUTE WHERE SYS_ATTRIBUTE = 0 ORDER BY ATTR_TITLE"
        DTVWIDB_BE_ATTRIBUTE = DatabaseFallback.GetDatatableIDB(oSQL)
        If IsNothing(DTVWIDB_BE_ATTRIBUTE) Then
            oSQL = $"SELECT DISTINCT ATTR_TITLE, TYP_ID, TYP_ID as [TYPE_ID] FROM VWIDB_BE_ATTRIBUTE ORDER BY ATTR_TITLE "
            DTVWIDB_BE_ATTRIBUTE = DatabaseFallback.GetDatatableIDB(oSQL)
        End If
        Return True
    End Function
    Public Function GetIndicesByBE(ByVal BusinessEntity As String) As String()
        Try
            Dim aNames(4) As String
            aNames(0) = "ObjectID"
            aNames(1) = "IDBCreatedWhen"
            aNames(2) = "IDBCreatedWho"
            aNames(3) = "IDBChangedWhen"
            aNames(4) = "IDBChangedWho"
            IDBSystemIndices = aNames.ToList
            ' Array für Indizes vorbereiten
            Dim aIndexNames(DTVWIDB_BE_ATTRIBUTE.Rows.Count + 4) As String
            Dim oCount As Integer = 0
            aIndexNames(oCount) = "ObjectID"
            oCount += 1
            aIndexNames(oCount) = "IDBCreatedWhen"
            oCount += 1
            aIndexNames(oCount) = "IDBCreatedWho"
            oCount += 1
            aIndexNames(oCount) = "IDBChangedWhen"
            oCount += 1
            aIndexNames(oCount) = "IDBChangedWho"
            For Each oRow As DataRow In DTVWIDB_BE_ATTRIBUTE.Rows
                oCount += 1
                aIndexNames(oCount) = oRow.Item("ATTR_TITLE")
            Next
            ' Indexarray sortiert zurückgeben
            Array.Sort(aIndexNames)
            ' Indexarray zurückgeben
            Return aIndexNames
        Catch ex As Exception
            LOGGER.Error(ex)
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error getting the IDB Indicies")
            Return Nothing
        End Try
    End Function
    Public Function GetTypeOfIndex(ByVal indexname As String) As Integer
        Try
            For Each oRow As DataRow In DTVWIDB_BE_ATTRIBUTE.Rows
                If oRow.Item("ATTR_TITLE") = indexname Then
                    Try
                        Dim oType = oRow.Item("TYP_ID")
                        Return oType
                    Catch ex As Exception
                        Try
                            Dim oType = oRow.Item("TYP_ID")
                            Return oType
                        Catch ex1 As Exception
                            LOGGER.Error(ex)
                            Return Nothing
                        End Try
                    End Try
                End If
            Next
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    Public Function GetVariableValue(oAttributeName As String, Optional oIDBTyp As Integer = 0, Optional FromIDB As Boolean = False) As Object
        Try
            ' Bestimme, ob es sich um ein Single-Value-Attribut handelt (nicht Typ 8 oder 9)
            Dim oIsSingleAttribute As Boolean = (oIDBTyp <> 8 AndAlso oIDBTyp <> 9)
            LOGGER.Debug($"IDBData - GetVariableValue - Attribute: [{oAttributeName}] - IsSingleAttribute: [{oIsSingleAttribute}] - FromIDB: [{FromIDB}]")
            ' Schnellpfad: Direkt aus gecachter DataTable holen
            If oIsSingleAttribute AndAlso IDB_DT_DOC_DATA.Rows.Count = 1 AndAlso Not FromIDB Then
                Try
                    Dim oMappedName As String = MapSystemAttributeName(oAttributeName)
                    Dim oValue As Object = IDB_DT_DOC_DATA.Rows(0).Item(oMappedName)
                    LOGGER.Debug($"IDBData - GetVariableValue - Retrieved from cache: Attribute=[{oAttributeName}] MappedName=[{oMappedName}] Value=[{oValue}]")
                    Return oValue
                Catch ex As Exception
                    LOGGER.Debug($"Error getting Attribute from IDB_DT_DOC_DATA: {ex.Message}")
                    ' Fallthrough zum Datenbank-Fallback
                End Try
            End If
            ' Fallback: Wert aus Datenbank über Funktion holen
            LOGGER.Debug($"Retrieving value for attribute [{oAttributeName}] via FNIDB_PM_GET_VARIABLE_VALUE")
            Dim oSQL As String = $"SELECT * FROM [dbo].[FNIDB_PM_GET_VARIABLE_VALUE] ({CURRENT_DOC_ID},'{oAttributeName}','{USER_LANGUAGE}',CONVERT(BIT,'{IDB_USES_WMFILESTORE}'))"
            LOGGER.Debug($"SQL: {oSQL}")
            Dim oResultTable As DataTable = DatabaseFallback.GetDatatableIDB(oSQL)
            If oResultTable IsNot Nothing AndAlso oResultTable.Rows.Count = 1 Then
                Dim oValue As Object = oResultTable.Rows(0).Item(0)
                LOGGER.Debug($"IDBData - GetVariableValue - Retrieved from DB: [{oValue}]")
                Return oValue
            Else
                LOGGER.Info($"IDBData - GetVariableValue - No value found in DB for attribute [{oAttributeName}] - SQL [{oSQL}]")
            End If
            Return oResultTable
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    ''' <summary>
    ''' Mappt System-Attributnamen auf interne Spaltennamen.
    ''' </summary>
    Private Function MapSystemAttributeName(attributeName As String) As String
        Select Case attributeName
            Case "IDBCreatedWhen"
                Return "ADDED_WHEN"
            Case "IDBCreatedWho"
                Return "ADDED_WHO"
            Case "IDBChangedWhen"
                Return "CHANGED_WHEN"
            Case "IDBChangedWho"
                Return "CHANGED_WHO"
            Case Else
                Return attributeName
        End Select
    End Function
    Public Function Delete_Term_Object_From_Metadata(oAttributeName As String, oTerm2Delete As String) As Object
        Try
            Dim oID_IS_FOREIGN As Integer
            oID_IS_FOREIGN = 0
            If IDB_USES_WMFILESTORE Then
                oID_IS_FOREIGN = 1
            End If
            oTerm2Delete = oTerm2Delete.Replace("'", "''")
            Dim oDELSQL = $"EXEC PRIDB_DELETE_TERM_OBJECT_METADATA {CURRENT_DOC_ID},'{oAttributeName}','{oTerm2Delete}','{USER_USERNAME}','{USER_LANGUAGE}',{oID_IS_FOREIGN};"
            LOGGER.Debug($"Delete_Term_Object_From_Metadata: {oDELSQL}")
            'DatabaseFallback.ExecuteNonQueryIDB(oDELSQL)
            Return ExecuteOrQueue(oDELSQL)
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    Public Function Delete_AttributeData(pIDB_OBJID As Int64, pAttributeName As String) As Object
        Try
            Dim oDELSQL = $"EXEC PRIDB_DELETE_ATTRIBUTE_DATA {pIDB_OBJID},'{pAttributeName}','{USER_USERNAME}';"
            LOGGER.Debug($"Delete_Attribute_Data: {oDELSQL}")
            ' DatabaseFallback.ExecuteNonQueryIDB(oDELSQL)
            Return ExecuteOrQueue(oDELSQL)
        Catch ex As Exception
            LOGGER.Error(ex)
            Return Nothing
        End Try
    End Function
    Public Function SetVariableValue(oAttributeName As String, oNewValue As Object, Optional CheckDeleted As Boolean = False, Optional oIDBTyp As Integer = 0)
        Try
            Dim omsg = $"IDBData - SetVariableValue - Attribute: [{oAttributeName}] - NewValue: [{oNewValue}] - CheckDeleted: [{CheckDeleted.ToString}] - oIDBTyp: [{oIDBTyp}]"
            LOGGER.Debug(omsg)
            Dim omytype = oNewValue.GetType.ToString
            If omytype = "System.Data.DataTable" Then
                Dim oDTMyNewValues As DataTable = oNewValue
                Dim oAttributeResultFromDB
                Dim oTypeOldResult
                ' Für DataTable (Mehrfachauswahl/Vektor) IMMER auf gelöschte Werte prüfen,
                ' unabhängig vom übergebenen CheckDeleted-Parameter.
                Dim oEffectiveCheckDeleted As Boolean = True
                If oEffectiveCheckDeleted = True Then
                    oAttributeResultFromDB = GetVariableValue(oAttributeName, oIDBTyp)
                    oTypeOldResult = oAttributeResultFromDB.GetType.ToString
                    If TypeOf oAttributeResultFromDB Is DataTable Then
                        Dim myOldValues As DataTable = oAttributeResultFromDB
                        If myOldValues.Rows.Count >= 1 Then
                            'now Checking whether the old row still remains in Vector? If not it will be deleted as it cannot be replaced in multivalues
                            For Each oOldValueRow As DataRow In myOldValues.Rows
                                Dim oExists As Boolean = False
                                For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
                                    Dim oInfo1 = $"Checking oldValue[{oOldValueRow.Item(0)}] vs NewValue [{oNewValueRow.Item(1)}]"
                                    If oNewValueRow.Item(1).ToString.ToUpper = oOldValueRow.Item(0).ToString.ToUpper Then
                                        oExists = True
                                        Exit For
                                    End If
                                Next
                                If oExists = False Then
                                    Dim oInfo = $"Value [{oOldValueRow.Item(0)}] no longer existing in Vector-Attribute [{oAttributeName}] - will be deleted!"
                                    LOGGER.Debug(oInfo)
                                    'SetVariableValue(CURRENT_PROFILE_LOG_INDEX, oInfo)
                                    Delete_Term_Object_From_Metadata(oAttributeName, oOldValueRow.Item(0))
                                End If
                            Next
                        End If
                    Else
                        '### Old Value is a single value ###
                        If oDTMyNewValues.Rows.Count > 1 Then
                            '### there is more than one new value ###
                            Dim oExists As Boolean = False
                            For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
                                LOGGER.Debug($"Checking oldValue[{oAttributeResultFromDB}] vs NewValue [{oNewValueRow.Item(1)}]")
                                If oNewValueRow.Item(1).ToString.ToUpper = oAttributeResultFromDB.ToString.ToUpper Then
                                    oExists = True
                                    Exit For  ' ← sobald gefunden, abbrechen
                                End If
                            Next
                            If oExists = False Then
                                LOGGER.Debug($"Value [{oAttributeResultFromDB}] no longer existing in Attribute [{oAttributeName}] - will be deleted!")
                                'SetVariableValue(CURRENT_PROFILE_LOG_INDEX, oInfo2)
                                Delete_Term_Object_From_Metadata(oAttributeName, oAttributeResultFromDB)
                            End If
                        Else
                            '### there is only ONE new value ###
                            If oDTMyNewValues.Rows(0).Item(1) <> oAttributeResultFromDB Then
                                Dim oInfo = $"Value [{oAttributeResultFromDB}] of Attribute [{oAttributeName}] obviously was updated during runtime - will be deleted!"
                                LOGGER.Debug(oInfo)
                                SetVariableValue(CURRENT_PROFILE_LOG_INDEX, oInfo)
                                Delete_Term_Object_From_Metadata(oAttributeName, oAttributeResultFromDB)
                            Else
                                LOGGER.Debug($"Attributvalue of [{oAttributeName}] did not change!")
                            End If
                        End If
                    End If
                End If
                For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
                    'Dim oSuccess As Boolean = False
                    Dim oVALUE = oNewValueRow.Item(1).ToString
                    oVALUE = oVALUE.Replace("'", "''")
                    Dim oPRSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oVALUE}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT;"
                    LOGGER.Debug(oPRSQL)
                    'oSuccess = DatabaseFallback.ExecuteNonQueryIDB(oPRSQL)
                    If Not ExecuteOrQueue(oPRSQL) Then Return False
                    'If oSuccess = False Then
                    '    Return False
                    'End If
                Next
                Return True
            Else
                'oNewValue = oNewValue.Replace("'", "' + NCHAR(39) + '")
                oNewValue = oNewValue.Replace("'", "''")
                Dim oPRIDB_NEW_OBJ_DATA = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oNewValue}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT;"
                LOGGER.Debug(oPRIDB_NEW_OBJ_DATA)
                ' Return DatabaseFallback.ExecuteNonQueryIDB(oPRIDB_NEW_OBJ_DATA)
                Return ExecuteOrQueue(oPRIDB_NEW_OBJ_DATA)
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            Return False
        End Try
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ClassImageSelector.vb
+++ b/app/DD_PM_WINDREAM/ClassImageSelector.vb
@@ -1,6 +1,6 @@
 Imports System.ComponentModel
 Imports System.Drawing.Design
-Imports DD_ProcessManager.InputProperties
+Imports taskFLOW.InputProperties
 Public Class ClassImageSelector
    Inherits UITypeEditor
--- a/app/DD_PM_WINDREAM/ClassImageValue.vb
+++ b/app/DD_PM_WINDREAM/ClassImageValue.vb
--- a/app/DD_PM_WINDREAM/ClassIndexListConverter.vb
+++ b/app/DD_PM_WINDREAM/ClassIndexListConverter.vb
--- a/app/TaskFlow/ClassInit.vb
+++ b/app/TaskFlow/ClassInit.vb
@@ -0,0 +1,647 @@
 Imports System.Windows.Forms.VisualStyles.VisualStyleElement
 Imports DigitalData.Modules.Config
 Imports DigitalData.Modules.Database
 Imports DigitalData.Modules.EDMI.API
 Imports DigitalData.Modules.EDMI.API.Constants
 Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
 Imports DigitalData.Modules.Logging
 Imports DLLLicenseManager
 Imports DocumentFormat.OpenXml.Spreadsheet
 Public Class ClassInit
    Public _lizenzManager As ClassLicenseManager
    'Private DataASorDB As ClassDataASorDB
    <STAThread()>
    Public Sub InitLogger()
        Dim oLocalUserAppDataPath As String = Application.LocalUserAppDataPath
        LOGCONFIG = New LogConfig(LogConfig.PathType.CustomPath,
                                       oLocalUserAppDataPath & "\Log",
                                       My.Settings.UserConfig_Prefix,
                                        My.Application.Info.CompanyName,
                                        My.Application.Info.ProductName)
        LOGGER = LOGCONFIG.GetLogger("taskFLOW")
        LOGGER.Info("## taskFLOW started - {0}", Now)
        Try
            Dim directory As New IO.DirectoryInfo(Application.LocalUserAppDataPath & "\Log")
            For Each file As IO.FileInfo In directory.GetFiles
                If (Now - file.CreationTime).Days > 29 Then
                    file.Delete()
                Else
                    Exit For
                End If
            Next
        Catch ex As Exception
        End Try
    End Sub
    <STAThread()>
    Public Sub InitUserConfig()
        Try
            Dim oUserAppDataPath As String = Application.UserAppDataPath
            If My.Settings.UserConfig_Prefix <> String.Empty Then
                oUserAppDataPath += "\" + My.Settings.UserConfig_Prefix
            End If
            Dim oCommonAppDataPath = Application.CommonAppDataPath
            Dim oStartupPath = Application.StartupPath
            ' If AppConfig from Startup Path should be forced, rewrite the common app data path
            If My.Settings.UseAppConfigConString = True Then
                ' UserAppDataPath = StartupPath
                oCommonAppDataPath = oStartupPath
            End If
            CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, oUserAppDataPath, oCommonAppDataPath, oStartupPath)
            LOGGER.Info("ConfigManager loaded")
            LOGGER.Info($"oUserAppDataPath will be: {oUserAppDataPath}")
            If oStartupPath <> oCommonAppDataPath Then
                LOGGER.Info($"oCommonAppDataPath will be: {oCommonAppDataPath}")
                LOGGER.Info($"oStartupPath will be: {oStartupPath}")
            Else
                LOGGER.Info($"oStartupPath is the same as oCommonAppDataPath: {oCommonAppDataPath}")
            End If
            Try
                If CONFIG.Config.ConnectionStringTest <> String.Empty And CONFIG.Config.TestMode = True Then
                    LOGGER.Debug("Test Connection String loaded")
                    CONNECTION_STRING_ECM = DecryptConnectionString(CONFIG.Config.ConnectionStringTest)
                Else
                    LOGGER.Debug("Connection String loaded")
                    CONNECTION_STRING_ECM = DecryptConnectionString(CONFIG.Config.ConnectionString)
                End If
            Catch ex As Exception
                LOGGER.Error(ex, "Unexpected Error Getting CONFIG.TestMode or CONFIG.ConnectionStringTest")
            End Try
            Try
                If CONFIG.Config.EDMIAppServer <> String.Empty Then
                    Try
                        LOGGER.Info($"Configuration EDMIAppServer  [{CONFIG.Config.EDMIAppServer}] will be used...")
                        _Client = New Client(LOGCONFIG, CONFIG.Config.EDMIAppServer)
                        If Not IsNothing(_Client) Then
                            If _Client.Connect() Then
                                EDMIAppServerActive = True
                                EDMIService.Client = _Client
                                EDMIService.Address = CONFIG.Config.EDMIAppServer
                                LOGGER.Info($"EDMIAppServer [{CONFIG.Config.EDMIAppServer}] is active!")
                            Else
                                LOGGER.Warn($"#### ⚠️ !!! Could not Connect to APPServer [{CONFIG.Config.EDMIAppServer}]!!! ###")
                            End If
                        End If
                    Catch ex As Exception
                        LOGGER.Warn($"⚠️ Could not initialize the AppServer: {ex.Message}")
                    End Try
                Else
                    LOGGER.Debug("No EDMI Server Address. (String.empty).")
                End If
            Catch ex As Exception
                LOGGER.Error(ex, "Unexpected Error Getting CONFIG.EDMIAppServer")
            End Try
            INDEX_DMS_ERSTELLT = CONFIG.Config.IndexDmsErstellt
            INDEX_DMS_ERSTELLT_ZEIT = CONFIG.Config.IndexDmsErstelltZeit
            USER_CONFIG_DEBUG = CONFIG.Config.DEBUG
            If USER_CONFIG_DEBUG = True Then
                DEBUG = True
                LOGCONFIG.Debug = True
            End If
            USER_CONFIG_DIRECTORY = CONFIG.UserConfigPath.Replace("UserConfig.xml", "")
            If USER_LANGUAGE <> String.Empty Then
                USER_CONFIG_DIRECTORY = System.IO.Path.Combine(USER_CONFIG_DIRECTORY, USER_LANGUAGE)
            End If
            Try
                If Not System.IO.Directory.Exists(USER_CONFIG_DIRECTORY) Then
                    System.IO.Directory.CreateDirectory(USER_CONFIG_DIRECTORY)
                End If
            Catch ex As Exception
                LOGGER.Error(ex)
            End Try
        Catch ex As Exception
            LOGGER.Error(ex)
        End Try
    End Sub
    Private Function DecryptConnectionString(EncryptedConnectionString As String) As String
        Dim oBuilder As New SqlClient.SqlConnectionStringBuilder With {
            .ConnectionString = EncryptedConnectionString
        }
        If oBuilder.ConnectionString.Contains("Password=") Then
            Dim oPlaintextPassword As String
            Dim oDecryptor As New ClassEncryption("!35452didalog=")
            Try
                oPlaintextPassword = oDecryptor.DecryptData(oBuilder.Password)
            Catch ex As Exception
                LOGGER.Error(ex)
                LOGGER.Debug("Password {0} could not be decrypted. Assuming plaintext password.")
                oPlaintextPassword = oBuilder.Password
            End Try
            Return EncryptedConnectionString.Replace(oBuilder.Password, oPlaintextPassword)
        Else
            Return EncryptedConnectionString
        End If
    End Function
    <STAThread()>
    Public Function InitDatabase(GetCSFromAppServ As Boolean)
        If GetCSFromAppServ = True Then
            LOGGER.Info("Getting DatabaseInfo from ApplicationServer...")
        End If
        Dim Database_ECM As MSSQLServer = Nothing
        Dim Database_IDB As MSSQLServer = Nothing
        If GetCSFromAppServ = False Then
            If CONNECTION_STRING_ECM = String.Empty Then
                MsgBox("No Databaseconnection configured. (First Start or Appdata not accessible)" & vbNewLine & "Basic-Config will be loaded.", MsgBoxStyle.Information)
                ERROR_STATE = "NO DB-CONNECTION"
                frmKonfig.ShowDialog()
            End If
        End If
        Dim oCSECM As String
        If GetCSFromAppServ = False Then
            oCSECM = CONNECTION_STRING_ECM
        Else
            oCSECM = EDMIService.Client.ClientConfig.ConnectionStringECM
            CONNECTION_STRING_ECM = oCSECM
        End If
        Database_ECM = New MSSQLServer(LOGCONFIG, oCSECM)
        If Database_ECM.DBInitialized = True Then
            dbECMInitialized = True
            DatabaseECM = Database_ECM
        Else
            dbECMInitialized = False
        End If
        If dbECMInitialized = False Then
            ERROR_STATE = "FAILED DBCONNECTION"
            MsgBox("Error in InitDatabase. (Connection DD_ECM failed) More information in the logfile.", MsgBoxStyle.Critical)
            Return False
        End If
        If GetCSFromAppServ = True Or (GetCSFromAppServ = False And CONNECTION_STRING_IDB <> String.Empty) Then
            Dim oCSIDB As String
            If GetCSFromAppServ = False Then
                oCSIDB = CONNECTION_STRING_IDB
            Else
                oCSIDB = EDMIService.Client.ClientConfig.ConnectionStringIDB
            End If
            Database_IDB = New MSSQLServer(LOGCONFIG, oCSIDB)
            If Database_IDB.DBInitialized = True Then
                CONNECTION_STRING_IDB = oCSIDB
                DatabaseIDB = Database_IDB
                dbIDBInitialized = True
                IDB_ACTIVE = True
                LOGGER.Info("IDB is active via Config")
            End If
        End If
        ' We initialize the Class in anycase.
        ' If there is no client, it will fall back to the db by itself
        DatabaseFallback = New DatabaseWithFallback(LOGCONFIG, _Client, Database_ECM, Database_IDB)
        If dbECMInitialized = True And CONNECTION_STRING_IDB = String.Empty Then
            Return True
        ElseIf dbECMInitialized = True And CONNECTION_STRING_IDB <> String.Empty Then
            If dbIDBInitialized = True Then
                Return True
            Else
                MsgBox("Error in InitDatabase. (Connection IDB failed) More information in the logfile.", MsgBoxStyle.Critical)
                Return False
            End If
        End If
    End Function
    <STAThread()>
    Sub Refresh_Licence()
        Dim oStopWatch As New RefreshHelper.SW("Refresh_Licence")
        Try
            Me._lizenzManager = New ClassLicenseManager("#DigitalData35452!#", "")
            Dim lic As String = BASEDATA_DT_CONFIG.Rows(0).Item("LIZENZEN")
            Dim licString = Me._lizenzManager.DecodeLicenseKey(lic)
            Dim split() = licString.ToString.Split("#")
            If lic <> "" Then
                LICENSE_COUNT = split(0)
            Else
                LICENSE_COUNT = 0
            End If
            If split.Length >= 2 Then
                LICENSE_VALID = True
            End If
            Dim oLICDATE As Date
            Try
                oLICDATE = CDate(split(1))
            Catch ex As Exception
                LOGGER.Warn($"⚠️ Error Converting Value {split(1)} to DATE")
                Try
                    Dim expenddt As Date = Date.ParseExact(split(1), "dd.MM.yyyy", System.Globalization.DateTimeFormatInfo.InvariantInfo)
                    oLICDATE = expenddt
                Catch ex1 As Exception
                    LOGGER.Warn($"⚠️Second Error Converting DATE with ParseExact - Setting Date = Today")
                    oLICDATE = Now.Date
                End Try
            End Try
            If oLICDATE < CDate(Now) Then
                MsgBox("Your license has expired!" & vbNewLine & "Last valid date: " & split(1) & vbNewLine & "Please contact Your sysadmin", MsgBoxStyle.Exclamation)
                LICENSE_EXPIRED = True
                LICENSE_COUNT = 0
            ElseIf LICENSE_VALID = False Then
                MsgBox("Your license is invalid!" & vbNewLine & "Please contact Your sysadmin", MsgBoxStyle.Exclamation)
                LICENSE_EXPIRED = True
                LICENSE_COUNT = 0
            End If
            LOGGER.Debug("license initialized....")
            LICENSE_PROFILES = split(2)
            Try
                Dim oMod = split(3)
                If Not IsNothing(split(3)) Then
                    LIC_MODULES = split(3)
                End If
            Catch ex As Exception
            End Try
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected error in Refresh license: " & ex.Message, True)
            MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Fehler bei Licensemanager:")
        End Try
        oStopWatch.Done()
    End Sub
    <STAThread()>
    Public Sub InitUserLogin()
        Dim oStopWatch As New RefreshHelper.SW("InitUserLogin")
        Dim oSQL As String
        Try
            If USER_GHOST_MODE_USRNAME <> String.Empty Then
                LOGGER.Info($"InitUserLogin with GhostUser [{USER_GHOST_MODE_USRNAME}]")
                USER_USERNAME = USER_GHOST_MODE_USRNAME
            Else
                USER_USERNAME = Environment.UserName
            End If
            Try
                oSQLLoginAttempt = String.Format($"INSERT INTO TBDD_USER_LOG_IN_ATTEMPT (USERNAME,MODULE,VERSION_CLIENT,MACHINE_NAME,OVERRIDE_LANGUAGE, APP_STARTUP_PATH) VALUES 
                    ('{USER_USERNAME}','{MODULE_PM}','{My.Application.Info.Version.ToString}','{Environment.MachineName}','','{Application.StartupPath}')")
                Dim oSQLSW As New RefreshHelper.SW("VWDD_USER_CLIENT")
                oSQL = $"SELECT * FROM VWDD_USER_CLIENT WHERE USERNAME = '{USER_USERNAME}'"
                DT_CLIENT_USER = DatabaseFallback.GetDatatable("VWDD_USER_CLIENT", New GetDatatableOptions(oSQL, DatabaseType.ECM) With {
                    .FilterExpression = $"USERNAME = '{USER_USERNAME}'"
                })
                'DT_CLIENT_USER = DataASorDB.GetDatatable("DD_ECM", oSQL, "VWDD_USER_CLIENT", $"USERNAME like '{USER_USERNAME}'")
                oSQLSW.Done()
                If DT_CLIENT_USER.Rows.Count > 1 Then
                    frmClientLogin.ShowDialog()
                ElseIf DT_CLIENT_USER.Rows.Count = 1 Then
                    CLIENT_SELECTED = DT_CLIENT_USER.Rows(0).Item("CLIENT_ID")
                Else
                    DatabaseECM.ExecuteNonQuery(oSQLLoginAttempt)
                    ERROR_STATE = "NO CLIENT"
                    Dim oDT As DataTable = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("No Client relation")
                    MsgBox(oDT.Rows(0).Item("STRING1") & vbNewLine & oDT.Rows(0).Item("STRING2") & vbNewLine & vbNewLine & oSQL, MsgBoxStyle.Exclamation)
                    Exit Sub
                End If
            Catch ex As Exception
                LOGGER.Error(ex)
                LOGGER.Info("Unexpected error in checking CLIENT: " & ex.Message)
                CLIENT_SELECTED = 1
            End Try
            LOGGER.Debug("Username: " & USER_USERNAME)
            Dim oFnct As New RefreshHelper.SW("FNDD_LOGIN_USER_MODULE")
            oSQL = String.Format("SELECT * FROM [dbo].[FNDD_LOGIN_USER_MODULE] ('{0}','PM',{1})", USER_USERNAME, CLIENT_SELECTED)
            Dim DT_CHECKUSER_MODULE As DataTable
            DT_CHECKUSER_MODULE = DatabaseFallback.GetDatatable("TBDD_USER_MODULE", New GetDatatableOptions(oSQL, DatabaseType.ECM) With {
                               .FilterExpression = $"USERNAME = '{USER_USERNAME.ToLower}' AND MODULE_SHORT = 'PM'"
                           })
            oFnct.Done()
            If DT_CHECKUSER_MODULE.Rows.Count = 0 Then
                DatabaseECM.ExecuteNonQuery(oSQLLoginAttempt)
                LOGGER.Info("DT_CHECKUSER_MODULE.Rows.Count = 0", True)
                ERROR_STATE = "NO USER"
                MsgBox("Sorry - Something went wrong in getting Your rights." & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
                Exit Sub
            End If
            If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
                LOGGER.Info($"Got a CheckUserDefintion for User [{USER_USERNAME}]")
                USER_ID = DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID")
                USER_SURNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME"))
                USER_PRENAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_PRENAME"))
                USER_SHORTNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SHORTNAME"))
                USER_EMAIL = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL"))
                USER_LANGUAGE = DT_CHECKUSER_MODULE.Rows(0).Item("USER_LANGUAGE")
                USER_MODULE_ID = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ID")
                USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS")
                If USER_IN_MODULE = True Then
                    USER_EXISTS = True
                Else
                    USER_EXISTS = False
                End If
                USER_IS_ADMIN = DT_CHECKUSER_MODULE.Rows(0).Item("IS_ADMIN")
                User.IsAdmin = USER_IS_ADMIN
                User.Surname = USER_SURNAME
                User.GivenName = USER_PRENAME
                User.Email = USER_EMAIL
                User.UserName = USER_USERNAME
                User.UserId = USER_ID
                User.Language = USER_LANGUAGE
                LOGGER.Debug("User Info:")
                LOGGER.Debug("Language: [{0}]", USER_LANGUAGE)
                LOGGER.Debug("Username: [{0}]", USER_USERNAME)
                LOGGER.Debug("Environment.MachineName: [{0}]", Environment.MachineName)
                Try
                    USER_RIGHT_FILE_DELETE = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT_FILE_DEL")), False, DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT_FILE_DEL"))
                Catch ex As Exception
                    LOGGER.Warn("⚠️ Error in USER_RIGHT_FILE_DELETE: " & ex.Message)
                    USER_RIGHT_FILE_DELETE = False
                End Try
                USER_DATE_FORMAT = DT_CHECKUSER_MODULE.Rows(0).Item("USER_DATE_FORMAT")
                ClassParamRefresh.Refresh_Params(DT_CHECKUSER_MODULE, "Load")
                FINALINDICES = New ClassFinalIndex()
                FINALINDICES.init()
                Try
                    USER_RIGHT_VIEW_ONLY = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT2")
                Catch ex As Exception
                    USER_RIGHT_VIEW_ONLY = False
                End Try
                Try
                    USER_RIGHT3 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT3")
                Catch ex As Exception
                    USER_RIGHT3 = False
                End Try
                Try
                    USER_RIGHT4 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT4")
                Catch ex As Exception
                    USER_RIGHT4 = False
                End Try
                LOGGER.Debug("User exists....")
                'Am System anmelden
                Refresh_Licence()
                'Check_User_Exists_in_PMGroups()
                'Dim Culture = CultureInfo.CreateSpecificCulture("en-US")
                '' The following line provides localization for the application's user interface. 
                'Thread.CurrentThread.CurrentUICulture = Culture
                '' The following line provides localization for data formats. 
                'Thread.CurrentThread.CurrentCulture = Culture
                '' Set this culture as the default culture for all threads in this application.  
                '' Note: The following properties are supported in the .NET Framework 4.5+ 
                'CultureInfo.DefaultThreadCurrentCulture = Culture
                'CultureInfo.DefaultThreadCurrentUICulture = Culture
                If ClassAllgemeineFunktionen.LoginOut("LOGIN") = True Then
                    USERCOUNT_LOGGED_IN += 1
                End If
                LOGGER.Debug("Count Users logged in: " & USERCOUNT_LOGGED_IN.ToString)
                If LICENSE_COUNT < USERCOUNT_LOGGED_IN And LICENSE_EXPIRED = False Then
                    MsgBox("Die Anzahl der aktuell angemeldeten User (" & USERCOUNT_LOGGED_IN.ToString & ") überschreitet die Anzahl der aktuellen Lizenzen!" & vbNewLine & "Anzahl der Lizenzen: " & LICENSE_COUNT.ToString & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
                    LOGGER.Info("Die Anzahl der aktuell angemeldeten User (" & USERCOUNT_LOGGED_IN.ToString & ") überschreitet die Anzahl der Lizenzen (" & LICENSE_COUNT & ") für Flow Task!")
                    If USER_IS_ADMIN = False Then
                        ClassAllgemeineFunktionen.LoginOut("LOGOUT")
                        DatabaseECM.ExecuteNonQuery(oSQLLoginAttempt)
                        ERROR_STATE = "START INCOMPLETE"
                    End If
                End If
                'Alles OK bis hierhin...nun die FolderwatchKonfig laden
                LOGGER.Debug("Init Userlogin successfull completed....")
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected Error in InitUserLogin: " & ex.Message, True)
            DatabaseECM.ExecuteNonQuery(oSQLLoginAttempt)
            ERROR_STATE = "START INCOMPLETE"
        End Try
        oStopWatch.Done()
    End Sub
    <STAThread()>
    Public Sub InitBasics()
        Dim oStep As String
        Try
            'If IsNothing(DataASorDB) Then
            '    DataASorDB = New ClassDataASorDB
            'End If
            Dim oStopWatch As New RefreshHelper.SW("InitBasics")
            Dim oSql = String.Format("select * from TBPM_KONFIGURATION WITH (NOLOCK) WHERE GUID = 1")
            oStep = "TBPM_KONFIGURATION"
            BASEDATA_DT_CONFIG = DatabaseFallback.GetDatatable("TBPM_KONFIGURATION", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
                .FilterExpression = $"GUID = 1"
            })
            WMSUFFIX = BASEDATA_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH")
            WMDRIVE_LETTER = BASEDATA_DT_CONFIG.Rows.Item(0).Item("WM_DRIVE_LETTER")
            Settings_LoadBasicConfig()
            oStep = "TBDD_CONNECTION"
            oSql = "select * from TBDD_CONNECTION WHERE AKTIV = 1"
            'BASEDATA_DT_TBDD_CONNECTION = DataASorDB.GetDatatable("DD_ECM", oSql, "TBDD_CONNECTION", "")
            BASEDATA_DT_TBDD_CONNECTION = DatabaseFallback.GetDatatable("TBDD_CONNECTION", New GetDatatableOptions(oSql, DatabaseType.ECM))
            oStep = "TBDD_CATALOG"
            oSql = "select CAT_TITLE,CAT_STRING from TBDD_CATALOG"
            BASEDATA_DT_TBDD_CATALOG = DatabaseFallback.GetDatatable("TBDD_CATALOG", New GetDatatableOptions(oSql, DatabaseType.ECM))
            For Each oROW As DataRow In BASEDATA_DT_TBDD_CATALOG.Rows
            Next
            oStep = "TBDD_3RD_PARTY_MODULES"
            oSql = "Select * FROM TBDD_3RD_PARTY_MODULES WHERE ACTIVE = 1"
            Dim oTBDD_3RD_PARTY_MODULES As DataTable
            'oTBDD_3RD_PARTY_MODULES = DataASorDB.GetDatatable("DD_ECM", oSql, "TBDD_3RD_PARTY_MODULES", "")
            oTBDD_3RD_PARTY_MODULES = DatabaseFallback.GetDatatable("TBDD_3RD_PARTY_MODULES", New GetDatatableOptions(oSql, DatabaseType.ECM))
            For Each oROW As DataRow In oTBDD_3RD_PARTY_MODULES.Rows
                If oROW.Item("NAME") = "GDPICTURE" And oROW.Item("VERSION") = My.Settings.GDPICTURE_VERSION Then
                    GDPICTURE_LICENSE = oROW.Item("LICENSE")
                End If
            Next
            If GDPICTURE_LICENSE = String.Empty Then
                LOGGER.Warn($"Keine GDPICTURE-Lizenz gefunden. Version Konfiguration: {My.Settings.GDPICTURE_VERSION} - Prüfe TBDD_3RD_PARTY_MODULES")
            End If
            oStep = "TBDD_SQL_COMMANDS"
            oSql = "Select * FROM TBDD_SQL_COMMANDS WITH (NOLOCK)"
            BASEDATA_DT_TBDD_SQL_COMMANDS = DatabaseFallback.GetDatatable("TBDD_SQL_COMMANDS", New GetDatatableOptions(oSql, DatabaseType.ECM))
            oStep = "TBDD_GUI_LANGUAGE_PHRASE"
            oSql = $"SELECT * FROM TBDD_GUI_LANGUAGE_PHRASE WITH (NOLOCK) WHERE MODULE IN ('PM','All Modules')"
            'BASEDATA_DT_GUI_LANGUAGE_PHRASES = DataASorDB.GetDatatable("DD_ECM", oSql, "TBDD_GUI_LANGUAGE_PHRASE", "")
            BASEDATA_DT_GUI_LANGUAGE_PHRASES = DatabaseFallback.GetDatatable("TBDD_GUI_LANGUAGE_PHRASE", New GetDatatableOptions(oSql, DatabaseType.ECM))
            oStep = "TBPM_PROFILE_SEARCH"
            oSql = "select * from TBPM_PROFILE_SEARCH WITH (NOLOCK) where TYPE = 'DOC' AND ACTIVE = 1 ORDER BY PROFILE_ID,TAB_INDEX"
            BASEDATA_DT_PROFILES_SEARCHES_DOC = DatabaseFallback.GetDatatable("TBPM_PROFILE_SEARCH", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
                .SortByColumn = "PROFILE_ID,TAB_INDEX"
            })
            DT_FILTERED_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Clone()
            oStep = "TBPM_MAIN_VIEW_GROUPS"
            oSql = "SELECT * FROM TBPM_MAIN_VIEW_GROUPS WITH (NOLOCK) WHERE ACTIVE = 1"
            BASEDATA_DTGRID_GROUPS = DatabaseFallback.GetDatatable("TBPM_MAIN_VIEW_GROUPS", New GetDatatableOptions(oSql, DatabaseType.ECM))
            oStep = "TBPM_CHART"
            oSql = "SELECT * FROM TBPM_CHART WITH (NOLOCK)"
            BASEDATA_DT_CHARTS = DatabaseFallback.GetDatatable("TBPM_CHART", New GetDatatableOptions(oSql, DatabaseType.ECM))
            oStep = "TBDD_GUI_LANGUAGE"
            oSql = "SELECT LANG_CODE FROM TBDD_GUI_LANGUAGE WITH (NOLOCK) WHERE ACTIVE = 1 ORDER BY LANG_CODE"
            BASEDATA_DT_LANGUAGE = DatabaseFallback.GetDatatable("TBDD_GUI_LANGUAGE", New GetDatatableOptions(oSql, DatabaseType.ECM))
            oSql = "SELECT * FROM TBDD_COLUMNS_FORMAT WITH (NOLOCK) WHERE MODULE = 'taskFLOW' AND GRIDVIEW = 'GridViewWorkflows'"
            BASEDATA_TBDD_COLUMNS_FORMAT = DatabaseFallback.GetDatatable("TBDD_COLUMNS_FORMAT", New GetDatatableOptions(oSql, DatabaseType.ECM))
            oStopWatch.Done()
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info($"Unexpected Error in InitBasics - last Step [{oStep}]: {ex.Message}", True)
            DatabaseECM.ExecuteNonQuery(oSQLLoginAttempt)
            ERROR_STATE = "Basics not initialized"
        End Try
    End Sub
    <STAThread()>
    Public Sub InitBasics2()
        Try
            Dim oStopWatch As New RefreshHelper.SW("InitBasics2")
            Dim oSql = String.Format("SELECT * FROM VWPM_PROFILE_USER WHERE USER_ID = {0}", USER_ID)
            BASEDATA_DT_VW_PROFILE_USER = DatabaseFallback.GetDatatable("VWPM_PROFILE_USER", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
                .FilterExpression = $"USER_ID = {USER_ID}"
            })
            If BASEDATA_DT_VW_PROFILE_USER.Rows.Count = 0 Then
                LOGGER.Warn($"no profiles for user: '{USER_USERNAME}' configured - Check SQL [{oSql}]!", False)
            End If
            oSql = "SELECT KEY_NAME, VALUE_TEXT1 
                             FROM TBDD_USER_KEY_VALUE_PAIR WITH (NOLOCK)
                             WHERE FK_USER_ID = " & USER_ID & " And [FK_MODULE_ID] = '" & USER_MODULE_ID & "'"
            Dim oDT_USER_KEY_VALUE_PAIR As DataTable = DatabaseFallback.GetDatatable(New GetDatatableOptions(oSql, DatabaseType.ECM))
            If UserInheritance_ConfirmationByColumn Is Nothing Then
                UserInheritance_ConfirmationByColumn = New List(Of UserInheritanceConfirmation)()
            End If
            If Not IsNothing(oDT_USER_KEY_VALUE_PAIR) Then
                For Each row As DataRow In oDT_USER_KEY_VALUE_PAIR.Rows
                    Dim keyName As String = row("KEY_NAME").ToString()
                    ' Prüfe ob es sich um einen Inheritance-Key handelt
                    If keyName.StartsWith("INHERITANCE_CONFIRM_") Then
                        Dim columnName As String = keyName.Replace("INHERITANCE_CONFIRM_", "")
                        Dim countValue As Integer = Integer.Parse(row("VALUE_TEXT1").ToString())
                        Dim existingEntry = UserInheritance_ConfirmationByColumn.FirstOrDefault(
                    Function(e) String.Equals(e.ColumnName, columnName, StringComparison.OrdinalIgnoreCase))
                        If existingEntry IsNot Nothing Then
                            existingEntry.Count = countValue
                        Else
                            UserInheritance_ConfirmationByColumn.Add(
                        New UserInheritanceConfirmation With {
                            .ColumnName = columnName,
                            .Count = countValue
                        })
                        End If
                        LOGGER.Debug("Loaded inheritance confirmation for column [{0}] with count [{1}]", columnName, countValue)
                    End If
                Next
            Else
                LOGGER.Warn("⚠️ oDT_USER_KEY_VALUE_PAIR is nothing")
            End If
            oStopWatch.Done()
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("Unexpected Error in InitBasics2: " & ex.Message, True)
            DatabaseECM.ExecuteNonQuery(oSQLLoginAttempt)
            ERROR_STATE = "Basics2 not initialized"
        End Try
    End Sub
    <STAThread()>
    Private Function Settings_LoadBasicConfig()
        Try
            Dim oSql As String = "select * from tbdd_Modules WITH (NOLOCK) where SHORT_NAME = 'PM'"
            Dim oDTtbdd_Modules As DataTable
            'oDTtbdd_Modules = DataASorDB.GetDatatable("DD_ECM", oSql, "tbdd_Modules", $" SHORT_NAME = 'PM'")
            oDTtbdd_Modules = DatabaseFallback.GetDatatable("TBDD_MODULES", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
                .FilterExpression = $" SHORT_NAME = 'PM'"
            })
            If oDTtbdd_Modules.Rows.Count = 1 Then
                Try
                    VERSION_DELIMITER = oDTtbdd_Modules.Rows(0).Item("VERSION_DELIMITER")
                    FILE_DELIMITER = oDTtbdd_Modules.Rows(0).Item("FILE_DELIMITER")
                    LICENSE_VALID = oDTtbdd_Modules.Rows(0).Item("LICENSE_VALID")
                    WMSESSION_STARTSTOP_STARTUP = oDTtbdd_Modules.Rows(0).Item("WMSESSION_STARTSTOP_STARTUP")
                Catch ex As Exception
                    LOGGER.Error(ex)
                    LOGGER.Info("Unexpected Error in Settings_LoadBasicConfig: " & ex.Message, True)
                End Try
            Else
                Return False
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            MsgBox("Error in Settings_LoadBasicConfig" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
            Return False
        End Try
        Return True
    End Function
 End Class
--- a/app/TaskFlow/ClassPMWindream.vb
+++ b/app/TaskFlow/ClassPMWindream.vb
@@ -0,0 +1,482 @@
 Imports WINDREAMLib
 Imports WMOSRCHLib
 Public Class ClassPMWindream
    Inherits ClassWindream_allgemein
    Dim clsWM As ClassWindream_allgemein
    'Private email As New ClassNIEmail
    Private allgFunk As New ClassAllgemeineFunktionen
 #Region "+++++ Konstanten +++++"
    Protected Const WMObjectEditModeObject = &H1F
    Protected Const WMObjectStreamOpenModeReadWrite = 2
    Protected Const WMEntityObjectType = 10
    Protected Const WMEntityDocument = 1
    Const WMObjectVariableValueTypeUndefined = 0
    Const WMObjectVariableValueTypeString = 1
    Const WMObjectVariableValueTypeInteger = 2
    Const WMObjectVariableValueTypeInteger64bit = 11
    Const WMObjectVariableValueTypeFloat = 3
    Const WMObjectVariableValueTypeBoolean = 4
    Const WMObjectVariableValueTypeDate = 5
    Const WMObjectVariableValueTypeFixedPoint = 6
    Const WMObjectVariableValueTypeTimeStamp = 7
    Const WMObjectVariableValueTypeCurrency = 8
    Const WMObjectVariableValueTypeTime = 9
    Const WMObjectVariableValueTypeVariant = 10
    Const WMObjectVariableValueTypeMask = &HFFF
    Const WMObjectVariableValueFlagMask = &HFFFFF000
    Const WMObjectVariableValueTypeVector = &H1000
    Const WMObjectVariableValueTypeFulltext = &H2000
    Const WMObjectVariableValueTypeDefaultValue = &H4000
    Const WMObjectEditModeIndexEdit = &H3DA
 #End Region
 #Region "+++++ Variablen +++++"
    'Private oController As New WMOSearchController
 #End Region
 #Region "+++++ Allgemeine Methoden und Funktionen +++++"
    Sub New()
        MyBase.New()
    End Sub
    Private Function IsNotEmpty(ByVal aValue As Object)
        If aValue IsNot Nothing Then
            Return True
        Else
            Return False
        End If
    End Function
    Public Function GetValuesfromAuswahlliste(ByVal listname As String)
        Try
            If listname = "" Then
                Return ""
            End If
            Dim oChoiceList = oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityChoiceList, listname)
            If Err.Number = 0 And TypeName(oChoiceList) <> "Nothing" Then
                Dim Values = oChoiceList
                Values = oChoiceList.GetVariableValue("vItems")
                Dim anz As Integer = 0
                For Each CLItem In Values
                    If oChoiceList.aName IsNot Nothing Then
                        anz += 1
                    End If
                Next
                Dim strListe(anz - 1)
                Dim zahl As Integer = 0
                For Each CLItem In Values
                    If oChoiceList.aName IsNot Nothing Then
                        strListe(zahl) = CLItem
                        zahl += 1
                    End If
                Next
                Return strListe
            Else
                MsgBox("Auswahlliste: " & listname & " nicht gefunden!", MsgBoxStyle.Critical, "Fehler:")
                Return Nothing
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            MsgBox(ex.Message, MsgBoxStyle.Critical, $"Error in GetValuesfromAuswahlliste ({listname}):")
            Return Nothing
        End Try
    End Function
    Public Function RunIndexing(ByVal oDocument As WMObject, ByVal Indizes() As String, ByVal aValues() As Object)
        Dim vType
        Try
            If Indizes IsNot Nothing And aValues IsNot Nothing Then
                If Not oDocument.aLocked Then
                    ' 02.07. Änderung der Lock Methode, um eine Validierung auch zuzulassen, wenn das Recht "Datei ändern"
                    ' nicht gesetzt ist
                    'oDocument.lock()
                    Try
                        oDocument.LockFor(WMObjectEditModeIndexEdit)
                    Catch ex As Exception
                        LOGGER.Error(ex)
                        frmValidator.idxerr_message = "Could not lock WMFile - Check Your rights and inform the admin!"
                        Return False
                    End Try
                    If oDocument.aObjectType.aName <> CURRENT_WMObjecttype Then
                        ' ihr den entsprechenden Dokumenttyp zuweisen
                        oDocument.aObjectType = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityObjectType, CURRENT_WMObjecttype)
                        ' WMObject.aObjectType = Me.selectedProfile.Dokumenttyp
                        LOGGER.Debug("Objekttyp '" & oDocument.aObjectType.aName & "' was changed to '" & CURRENT_WMObjecttype & "'.")
                        Try
                            oDocument.Save()
                        Catch ex As Exception
                            ' wenn es einen Fehler beim speichern gab, dann konnte auch kein Dokumenttyp gesetzt werden -> es kann also auch keine
                            ' Indexierung stattfinden und die Indexierung muss nicht fortgesetzt werden
                            Return False
                        End Try
                    End If
                    Dim i As Integer = 0
                    Dim indexname As String
                    If aValues.Length = 1 And aValues(0) = "" Then
                        LOGGER.Debug("Indexwert ist leer/Nothing - Keine Indexierung")
                    Else
                        'Jetzt jeden Indexwert durchlaufen
                        For Each aName As String In Indizes
                            indexname = aName
                            ' das entsprechende Attribut aus windream auslesen
                            Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, Indizes(i))
                            ' den Variablentyp (String, Integer, ...) auslesen 
                            vType = oAttribute.getVariableValue("dwAttrType")
                            ' wenn in aValues an Position i ein Wert steht
                            If IsNotEmpty(aValues(i)) Then
                                Dim _int As Boolean = False
                                Dim _date As Boolean = False
                                Dim _dbl As Boolean = False
                                Dim _bool As Boolean = False
                                'If indexname = "Tournr" Then
                                '    MsgBox("Index: " & indexname & vbNewLine & "wert: " & aValues(i), MsgBoxStyle.Information, "Index: " & aName.ToString)
                                'End If
                                LOGGER.Debug(" ### Indexierung von Index: " & indexname & " ####")
                                'MsgBox(oDocument.aName & vbNewLine & aValues(i) & vbNewLine & vType, MsgBoxStyle.Exclamation, "Zeile 87")
                                Dim value = aValues(i)
                                Dim convertValue
                                Dim vektor As Boolean = False
                                'Den Typ des Index-Feldes auslesen
                                'MsgBox(value.GetType.ToString)
                                Select Case vType
                                    Case WMObjectVariableValueTypeString
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeString")
                                        If value = "DeleteWMAttributeValue" Then
                                            LOGGER.Debug("DeleteWMAttributeValue - simpleAttribute with String.Empty")
                                            convertValue = CStr(String.Empty)
                                        Else
                                            convertValue = CStr(value)
                                        End If
                                    Case WMObjectVariableValueTypeInteger
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeInteger")
                                        If IsNumeric(value) = False Then
                                            If value = String.Empty Then
                                                LOGGER.Debug("Indexing WMObjectVariableValueTypeInteger with vbEmpty")
                                                convertValue = vbEmpty
                                            Else
                                                frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
                                                LOGGER.Debug("Achtung: Value " & value & " kann nicht in Zahl konvertiert werden!")
                                                oDocument.Save()
                                                oDocument.unlock()
                                                Return False
                                            End If
                                        Else
                                            convertValue = CInt(value)
                                        End If
                                        _int = True
                                    Case WMObjectVariableValueTypeInteger64bit
                                        LOGGER.Debug("Typ des windream-Indexes: Integer64bit")
                                        If IsNumeric(value) = False Then
                                            frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
                                            LOGGER.Debug("Achtung: Value " & value & " kann nicht in Zahl konvertiert werden!")
                                            oDocument.Save()
                                            oDocument.unlock()
                                            Return False
                                        End If
                                        convertValue = CInt(value)
                                        _int = True
                                    Case WMObjectVariableValueTypeFloat
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFloat")
                                        Try
                                            value = Replace(value, ".", ",")
                                            convertValue = Convert.ToDouble(value)
                                        Catch ex As Exception
                                            LOGGER.Error(ex)
                                            frmValidator.idxerr_message = "Could't convert value '" & value & "' to double!"
                                            oDocument.Save()
                                            oDocument.unlock()
                                            Return False
                                        End Try
                                    Case WMObjectVariableValueTypeFixedPoint
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFixedPoint")
                                        Try
                                            convertValue = CDbl(value)
                                        Catch ex As Exception
                                            LOGGER.Error(ex)
                                            frmValidator.idxerr_message = "Could't convert value '" & value & "' to double!"
                                            oDocument.Save()
                                            oDocument.unlock()
                                            Return False
                                        End Try
                                        _dbl = True
                                    Case WMObjectVariableValueTypeBoolean
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeBoolean")
                                        convertValue = CBool(value)
                                        _bool = True
                                    Case WMObjectVariableValueTypeDate
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeDate")
                                        _date = True
                                        'Dim _date As Date = value
                                        convertValue = value
                                    Case WMObjectVariableValueTypeTimeStamp
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeTimeStamp")
                                        convertValue = CInt(value)
                                    Case WMObjectVariableValueTypeCurrency
                                        LOGGER.Info(" >> Typ des windream-Indexes: WMObjectVariableValueTypeCurrency")
                                        'Wegen currency muß ein eigenes Objekt vom typ Variant erzeugt werden
                                        Dim aValueWrapper As System.Runtime.InteropServices.CurrencyWrapper = New System.Runtime.InteropServices.CurrencyWrapper(CDec(value))
                                        convertValue = aValueWrapper
                                    Case WMObjectVariableValueTypeTime
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeTime", False)
                                        'If ((value)) Then
                                        '    convertValue = CDate(value)
                                        'Else
                                        '    convertValue = ""
                                        'End If
                                        'Dim _date As Date = value
                                        convertValue = convertValue '*_date.ToShortTimeString
                                    Case WMObjectVariableValueTypeFloat
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFloat", False)
                                        convertValue = CStr(value)
                                    Case WMObjectVariableValueTypeVariant
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeVariant", False)
                                        convertValue = CStr(value)
                                    Case WMObjectVariableValueTypeFulltext
                                        LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFulltext", False)
                                        convertValue = CStr(value)
                                    Case 4100
                                        LOGGER.Debug("Typ des windream-Indexes: 4100 Vektor Boolean", False)
                                        vektor = True
                                    Case 4101
                                        LOGGER.Debug("Typ des windream-Indexes: 4101 Vektor Date", False)
                                        vektor = True
                                    Case 4104
                                        LOGGER.Debug("Typ des windream-Indexes: 4104 Vektor Currency", False)
                                        vektor = True
                                    Case 4097
                                        LOGGER.Debug("Typ des windream-Indexes: 4097 Vektor alphanumerisch", False)
                                        vektor = True
                                    Case 4098
                                        LOGGER.Debug("Typ des windream-Indexes: 4098 Vektor Numerisch", False)
                                        vektor = True
                                    Case 4099
                                        LOGGER.Debug("Typ des windream-Indexes: 4099 Vektor Kommazahl", False)
                                        vektor = True
                                    Case 36865
                                        LOGGER.Debug("Typ des windream-Indexes: 36865 Vektor alphanumerisch", False)
                                        vektor = True
                                    Case Else
                                        LOGGER.Debug("Typ des windream-Indexes konnte nicht bestimmt werden!", False)
                                        LOGGER.Debug("Versuch des Auslesens (vType): " & vType)
                                        'MsgBox(vType & vbNewLine & CStr(value), MsgBoxStyle.Exclamation, "Marlon-Case Else")
                                        convertValue = ""
                                End Select
                                If vektor = False Then
                                    If convertValue.ToString Is Nothing = False Then
                                        LOGGER.Debug("Konvertierter Wert: '" & convertValue.ToString & "'", False)
                                    End If
                                End If
                                '############################################################################################
                                '####################### Der eigentliche Indexierungsvorgang ################################
                                '############################################################################################
                                If vektor = False Then
                                    If convertValue.ToString Is Nothing = False Then
                                        Try
                                            LOGGER.Debug("Jetzt indexieren: oDocument.SetVariableValue(" & aName & ", " & convertValue.ToString & ")", False)
                                        Catch ex As Exception
                                            LOGGER.Error(ex)
                                            LOGGER.Info(" >> Unexpected Error in Logging SetVariableValue for " & aName & ": " & ex.Message, False)
                                        End Try
                                        If _int = True Then
                                            oDocument.SetVariableValue(aName, CInt(convertValue))
                                        ElseIf _date = True Then
                                            oDocument.SetVariableValue(aName, CDate(convertValue))
                                        ElseIf _bool Then
                                            oDocument.SetVariableValue(aName, CBool(convertValue))
                                        ElseIf _dbl Then
                                            oDocument.SetVariableValue(aName, CDbl(convertValue))
                                        Else
                                            oDocument.SetVariableValue(aName, convertValue)
                                        End If
                                        LOGGER.Debug("Index '" & aName & "' wurde geschrieben", False)
                                    Else
                                        LOGGER.Info(" >> Kein Indexwert vorhanden", False)
                                    End If
                                Else
                                    'VEKTORFELDER, ALSO ÜBERPRÜFEN OB ERGEBNIS-ARRAY GEFÜLLT IST
                                    LOGGER.Debug("VEKTORFELD: Vorbereiten des Arrays", False)
                                    If aValues(0).ToString.Contains("DeleteWMAttributeValue") Then
                                        'Variante um Vektorfeld zu leeren
                                        Dim myArray()
                                        ReDim myArray(aValues.Length - 1)
                                        myArray(0) = String.Empty
                                        LOGGER.Debug("Now Indexing vektor-attribute with String.Empty ...")
                                        oDocument.SetVariableValue(aName, myArray)
                                    Else
                                        Dim myArray()
                                        Select Case vType
                                            Case 4100
                                                'Vektortyp Boolean
                                                'Umwandeln in Boolean
                                                'Die Größe des Arrays festlegen
                                                ReDim myArray(aValues.Length - 1)
                                                Dim i1 As Integer = 0
                                                'Das Array durchlaufen und Werte für den Index in Array schreiben
                                                For Each obj In aValues
                                                    Select Case obj.ToString.ToLower
                                                        Case "falsch"
                                                            obj = False
                                                        Case "wahr"
                                                            obj = True
                                                        Case "nein"
                                                            obj = False
                                                        Case "ja"
                                                            obj = True
                                                        Case "0"
                                                            obj = False
                                                        Case "1"
                                                            obj = True
                                                    End Select
                                                    myArray(i1) = CBool(obj)
                                                    i1 = i1 + 1
                                                Next
                                            Case 4101
                                                'Vektortyp Date
                                                'Umwandeln in String
                                                'Die Größe des Arrays festlegen
                                                ReDim myArray(aValues.Length - 1)
                                                Dim i1 As Integer = 0
                                                'Das Array durchlaufen und Werte für den Index in Array schreiben
                                                For Each obj In aValues
                                                    myArray(i1) = CDate(obj)
                                                    i1 = i1 + 1
                                                Next
                                            Case 4104
                                                'Vektortyp Currency
                                                'Die Größe des Arrays festlegen
                                                ReDim myArray(aValues.Length - 1)
                                                Dim i1 As Integer = 0
                                                'Das Array durchlaufen und Werte für den Index in Array schreiben
                                                For Each obj In aValues
                                                    Dim aValueWrapper As System.Runtime.InteropServices.CurrencyWrapper = New System.Runtime.InteropServices.CurrencyWrapper(CDec(obj))
                                                    myArray(i1) = aValueWrapper
                                                    i1 = i1 + 1
                                                Next
                                            Case 4097
                                                'Vektortyp ALPHANUMERISCH
                                                'Umwandeln in String
                                                'Die Größe des Arrays festlegen
                                                ReDim myArray(aValues.Length - 1)
                                                Dim i1 As Integer = 0
                                                'Das Array durchlaufen und Werte für den Index in Array schreiben
                                                For Each obj In aValues
                                                    myArray(i1) = CStr(obj)
                                                    i1 = i1 + 1
                                                Next
                                            Case 4098
                                                'Umwandeln in Integer
                                                'Die Größe des Arrays festlegen
                                                ReDim myArray(aValues.Length - 1)
                                                Dim i1 As Integer = 0
                                                'Das Array durchlaufen und Werte für den Index in Array schreiben
                                                For Each obj In aValues
                                                    myArray(i1) = CInt(obj)
                                                    i1 = i1 + 1
                                                Next
                                            Case 4099
                                                'Umwandeln in Double
                                                'Die Größe des Arrays festlegen
                                                ReDim myArray(aValues.Length - 1)
                                                Dim i1 As Integer = 0
                                                'Das Array durchlaufen und Werte für den Index in Array schreiben
                                                For Each obj In aValues
                                                    Dim Str As String = obj
                                                    myArray(i1) = CDbl(Str.Replace(".", ","))
                                                    i1 = i1 + 1
                                                Next
                                            Case 36865
                                                'Umwandeln in String
                                                'Die Größe des Arrays festlegen
                                                ReDim myArray(aValues.Length - 1)
                                                Dim i1 As Integer = 0
                                                'Das Array durchlaufen und Werte für den Index in Array schreiben
                                                For Each obj In aValues
                                                    myArray(i1) = CStr(obj)
                                                    i1 = i1 + 1
                                                Next
                                            Case Else
                                                'Umwandeln in String
                                                'Die Größe des Arrays festlegen
                                                ReDim myArray(aValues.Length - 1)
                                                Dim i1 As Integer = 0
                                                'Das Array durchlaufen und Werte für den Index in Array schreiben
                                                For Each obj In aValues
                                                    myArray(i1) = CStr(obj)
                                                    i1 = i1 + 1
                                                Next
                                        End Select
                                        'Jetzt die Nachindexierung für Vektor-Felder
                                        LOGGER.Debug("Wert für Index vor Indexierung: [{0}]", myArray)
                                        'If vType = 4097 Or vType = 36865 Then
                                        '    If myArray(0) = "DeleteWMAttributeValue" Then
                                        '        'Variante um Vektorfeld zu leeren
                                        '        LOGGER.Debug("Now Indexing vektor-attribute with vbEmpty ...")
                                        '        oDocument.SetVariableValue(aName, vbEmpty)
                                        '    Else
                                        '        oDocument.SetVariableValue(aName, myArray)
                                        '    End If
                                        'Else
                                        oDocument.SetVariableValue(aName, myArray)
                                        'End If
                                    End If
                                    LOGGER.Debug("'SetVariableValue' für VEKTOR erfolgreich", False)
                                End If
                            End If
                            i += 1
                        Next
                    End If
                    ' oDocument.LockRights()
                    'SetRights(WMObject, User)
                    oDocument.Save()
                    oDocument.unlock()
                    LOGGER.Debug(" ### Indexierung erfolgreich beendet (Save und Unlock durchgeführt) ###", False)
                    Return True
                Else
                    LOGGER.Info(" ### Dokument ist gesperrt, Indexierung nicht möglich! ###", False)
                    frmValidator.idxerr_message = "Dokument " & oDocument.aName & " ist gesperrt, Indexierung nicht möglich"
                    Return False
                End If
            End If
        Catch ex As Exception
            LOGGER.Error(ex)
            LOGGER.Info("ClassSearchResult.RunIndexing - " & ex.Message, True)
            frmValidator.idxerr_message = "Unvorhergesehener Fehler in Indexing: " & ex.Message & vbNewLine & "vType: " & vType.ToString
            oDocument.Save()
            oDocument.unlock()
            Return False
        End Try
    End Function
 #End Region
 End Class
--- a/app/TaskFlow/ClassParamRefresh.vb
+++ b/app/TaskFlow/ClassParamRefresh.vb
@@ -0,0 +1,579 @@
 Imports DigitalData.Modules.Database
 Public Class ClassParamRefresh
    Public Shared Sub Refresh_Params(DT_CHECKUSER As DataTable, pMode As String)
        LOGGER.Debug("Refresh_Params starting ...")
        Dim oStopwatch As New RefreshHelper.SW("Refresh_Params")
        FORCE_LAYOUT_OVERVIEW = False
        SHOW_CHARTS = True
        Dim oLicenseoverSQL As Boolean = False
        If Not IsNothing(BASEDATA_DT_TBDD_SQL_COMMANDS) Then
            If BASEDATA_DT_TBDD_SQL_COMMANDS.Rows.Count > 0 Then
                For Each oRow As DataRow In BASEDATA_DT_TBDD_SQL_COMMANDS.Rows
                    If oRow.Item("TITLE") = "LICENSE_COUNT_PM" Then
                        Dim oSQL = oRow.Item("SQL_COMMAND")
                        USERCOUNT_LOGGED_IN = DatabaseFallback.GetScalarValueECM(oSQL)
                        oLicenseoverSQL = True
                    ElseIf oRow.Item("TITLE") = "PM_PROFILES_USER" Then
                        SQL_PROFILES_USER = oRow.Item("SQL_COMMAND")
                        LOGGER.Debug($"SQL FROM SQLCommands DD: {SQL_PROFILES_USER}")
                    ElseIf oRow.Item("TITLE") = "PM_VALIDATOR_SEARCH_DEF" Then
                        SQL_VALIDATOR_SEARCHES = oRow.Item("SQL_COMMAND")
                        LOGGER.Debug($"VALIDATOR-SQL FROM SQLCommands DD: {SQL_VALIDATOR_SEARCHES}")
                    ElseIf oRow.Item("TITLE") = "TF_WORKFLOW_MESSAGE" Then
                        SQL_WF_MESSAGES = oRow.Item("SQL_COMMAND")
                        LOGGER.Debug($"WF_MESSAGES-SQL FROM SQLCommands DD: {SQL_WF_MESSAGES}")
                    End If
                Next
            End If
        End If
        LOGGER.Debug("Refresh_Params BASEDATA_DT_TBDD_SQL_COMMANDS done!")
        If DT_CHECKUSER.Rows.Count = 1 Then
            If oLicenseoverSQL = False Then
                USERCOUNT_LOGGED_IN = DT_CHECKUSER.Rows(0).Item("USERCOUNT_LOGGED_IN")
                LOGGER.Debug(String.Format("Refresh_Params USERCOUNT_LOGGED_IN {0}", USERCOUNT_LOGGED_IN.ToString))
            End If
            Try
                WORKING_MODE = DT_CHECKUSER.Rows(0).Item("WORKING_MODE")
                LOGGER.Debug(String.Format("Refresh_Params WORKING_MODE {0}", WORKING_MODE.ToString))
            Catch ex As Exception
                WORKING_MODE = ""
            End Try
            Try
                ADDITIONAL_TITLE = DT_CHECKUSER.Rows(0).Item("ADDITIONAL_TITLE")
                If ADDITIONAL_TITLE = String.Empty Then
                    ADDITIONAL_TITLE = My.Application.Info.ProductName
                End If
                LOGGER.Debug(String.Format("Refresh_Params ADDITIONAL_TITLE {0}", ADDITIONAL_TITLE.ToString))
            Catch ex As Exception
                ADDITIONAL_TITLE = My.Application.Info.ProductName
            End Try
            TITLE_NOTIFICATIONS = ADDITIONAL_TITLE
            Dim oSplitWorkMode As String() = WORKING_MODE.Split("#")
            ' Use For Each loop over words and display them.
            Dim oMode As String
            For Each oMode In oSplitWorkMode
                ProcessWorkingModeParameter(oMode, pMode)
                'LOGGER.Debug($"oWorkingMode Parameter: {oMode}")
                'If oMode = "PM.FORCE_LAYOUT_OVERVIEW" Then
                '    FORCE_LAYOUT_OVERVIEW = True
                '    LOGGER.Debug($"FORCE_LAYOUT_OVERVIEW [{FORCE_LAYOUT_OVERVIEW}]")
                'ElseIf oMode = "PM.NO_MASS_VALIDATOR" Then
                '    SHOW_MASS_VALIDATOR = False
                '    LOGGER.Info($"SHOW_MASS_VALIDATOR [{SHOW_MASS_VALIDATOR}]")
                'ElseIf oMode = "PM.NO_CHARTS" Then
                '    SHOW_CHARTS = False
                '    LOGGER.Debug($"SHOW_CHARTS [{SHOW_CHARTS}]")
                'ElseIf oMode = "PM.DEBUG_LOG" Then
                '    DEBUG = True
                '    LOGCONFIG.Debug = True
                'ElseIf oMode = "PM.LOG_HOTSPOTS" Then
                '    LOG_HOTSPOTS = True
                'ElseIf oMode.StartsWith("OPERATION_MODE_FS") Then
                '    OPERATION_MODE_FS = oMode.Replace("OPERATION_MODE_FS=", "")
                '    If OPERATION_MODE_FS = ClassConstants.OpModeFS_IDBWM Then
                '        IDB_USES_WMFILESTORE = True
                '    End If
                '    LOGGER.Info("OPERATION_MODE_FS: " + OPERATION_MODE_FS)
                'ElseIf oMode = "PM.IDBWITHWMFS" Then
                '    IDB_USES_WMFILESTORE = True
                'ElseIf oMode = "PM.NO_BASICCONF" Then
                '    BASIC_CONF_VISIBLE = False
                '    LOGGER.Info($"BASIC_CONF_VISIBLE [{BASIC_CONF_VISIBLE}]")
                'ElseIf oMode = "PM.SYS_LOCKED_MAINTENANCE" Then
                '    SYS_LOCKED_MAINTENANCE = True
                'ElseIf oMode.StartsWith("PM.IDB_CONID!") Then
                '    If CONNECTION_STRING_IDB <> "" And dbIDBInitialized = True Then
                '        IDB_ACTIVE = True
                '        Continue For
                '    Else
                '        Dim Database_IDB As MSSQLServer = Nothing
                '        Dim CON_ID = oMode.Replace("PM.IDB_CONID!", "")
                '        Dim oConString = DatabaseFallback.GetConnectionString(CON_ID)
                '        CONNECTION_STRING_IDB = oConString
                '        Database_IDB = New MSSQLServer(LOGCONFIG, CONNECTION_STRING_IDB)
                '        If Database_IDB.DBInitialized = True Then
                '            IDB_ACTIVE = True
                '            LOGGER.Info($"IDB is active - IDB-Connection [{CON_ID}]!")
                '            DatabaseFallback.InitializeIDB(Database_IDB)
                '        Else
                '            IDB_ACTIVE = False
                '        End If
                '    End If
                'ElseIf oMode = "PM.EXCEL_OVERVIEW" Then
                '    EXCEL_OVERVIEW = True
                '    LOGGER.Info($"EXCEL_OVERVIEW [{EXCEL_OVERVIEW}]")
                'ElseIf oMode = "PM.MONITORING" Then
                '    MONITORING_ACTIVE = True
                '    LOGGER.Debug($"MONITORING_ACTIVE [{MONITORING_ACTIVE}]")
                'ElseIf oMode = "PM.GHOSTMODE" Then
                '    GHOSTMODE_ACTIVE = True
                '    LOGGER.Info($"GHOSTMODE_ACTIVE [{GHOSTMODE_ACTIVE}]")
                'ElseIf oMode.StartsWith("PM.COLORSCHEME") Then
                '    Dim oColorScheme = oMode.Replace("PM.COLORSCHEME=", "")
                '    RIBBON_COLOR_SCHEME = oColorScheme.ToUpper
                '    LOGGER.Debug($"RIBBON_COLOR_SCHEME [{RIBBON_COLOR_SCHEME}]")
                'ElseIf oMode.StartsWith("PM.NO_DETAIL_PROFILES") Then
                '    NO_DETAIL_PROFILES = True
                '    LOGGER.Debug($"NO_DETAIL_PROFILES [{NO_DETAIL_PROFILES}]")
                'ElseIf oMode = "PM.NO_POPUP" Then
                '    POPUP_REMINDER_ACTIVE = False
                '    LOGGER.Debug($"POPUP_REMINDER_ACTIVE [{POPUP_REMINDER_ACTIVE}]")
                'ElseIf oMode.StartsWith("PM.POPUP_TIMELAPS_OVERRIDE") Then
                '    Dim oTimeLapse = oMode.Replace("PM.POPUP_TIMELAPS_OVERRIDE=", "")
                '    LOGGER.Info($"CENTRAL POPUP_TIMELAPS_OVERRIDE [{oTimeLapse}]")
                '    Try
                '        CONFIG.Config.ReminderTimer = oTimeLapse
                '    Catch ex As Exception
                '    End Try
                'ElseIf oMode.StartsWith("PM.CONV_IDENTIFICATION") Then
                '    Dim oIdent = oMode.Replace("PM.CONV_IDENTIFICATION=", "")
                '    CONV_IDENTIFICATION = oIdent
                'ElseIf oMode.StartsWith("PM.INACTIVITY_DURATION") Then
                '    Dim oInactivityDuration = oMode.Replace("PM.INACTIVITY_DURATION=", "")
                '    Try
                '        INACTIVITY_DURATION = CInt(oInactivityDuration)
                '        LOGGER.Debug($"InactivityDuration [{INACTIVITY_DURATION}]")
                '    Catch ex As Exception
                '        LOGGER.Warn($"INACTIVITY_DURATION = 0 - {ex.Message}")
                '        INACTIVITY_DURATION = 0
                '    End Try
                'ElseIf oMode.StartsWith("PM.COL_LAST_EDITED") Then
                '    Dim oLEDITEDCOL = oMode.Replace("PM.COL_LAST_EDITED=", "")
                '    Try
                '        LAST_EDITED_COLUMN = oLEDITEDCOL
                '        LOGGER.Debug($"LAST_EDITED_COLUMN: {oLEDITEDCOL}")
                '    Catch ex As Exception
                '        LAST_EDITED_COLUMN = ""
                '    End Try
                'ElseIf oMode.StartsWith("PM.COL_LAST_ADDED") Then
                '    Dim oLEDITEDCOL = oMode.Replace("PM.COL_LAST_ADDED=", "")
                '    Try
                '        LAST_ADDED_COLUMN = oLEDITEDCOL
                '        LOGGER.Debug($"LAST_ADDED_COLUMN: {oLEDITEDCOL}")
                '    Catch ex As Exception
                '        LAST_ADDED_COLUMN = ""
                '    End Try
                'ElseIf oMode.StartsWith("PM.MON_COL_CHANGED_WHEN") Then
                '    Dim oLEDITEDCOL = oMode.Replace("PM.MON_COL_CHANGED_WHEN=", "")
                '    Try
                '        MON_EDITED_COLUMN = oLEDITEDCOL
                '        LOGGER.Debug($"MON_EDITED_COLUMN: {oLEDITEDCOL}")
                '    Catch ex As Exception
                '    End Try
                'ElseIf oMode.StartsWith("PM.MON_COL_ADDED_WHEN") Then
                '    Dim oLEDITEDCOL = oMode.Replace("PM.MON_COL_ADDED_WHEN=", "")
                '    Try
                '        MON_ADDED_COLUMN = oLEDITEDCOL
                '        LOGGER.Debug($"MON_COL_ADDED_WHEN: {oLEDITEDCOL}")
                '    Catch ex As Exception
                '    End Try
                'ElseIf oMode.StartsWith("PM.USE_APPSERVER") Then
                '    Dim oUSE_APPSERVER = oMode.Replace("PM.USE_APPSERVER=", "")
                '    Try
                '        USE_APPSERVER = CBool(oUSE_APPSERVER)
                '    Catch ex As Exception
                '        USE_APPSERVER = False
                '    End Try
                'ElseIf oMode.StartsWith("PM.COPYWM2TEMP") Then
                '    Dim oCOPYWM2TEMP = oMode.Replace("PM.COPYWM2TEMP=", "")
                '    Try
                '        COPY_WMFILE_2TEMP = CBool(oCOPYWM2TEMP)
                '    Catch ex As Exception
                '        COPY_WMFILE_2TEMP = False
                '    End Try
                'ElseIf oMode.StartsWith("PM.MAP_SHARE_DRIVE") Then
                '    Dim oMAP_SHARE_DRIVE = oMode.Replace("PM.MAP_SHARE_DRIVE=", "")
                '    Try
                '        MAP_SHARE_DRIVE = oMAP_SHARE_DRIVE
                '    Catch ex As Exception
                '        oMAP_SHARE_DRIVE = String.Empty
                '    End Try
                'ElseIf oMode.StartsWith("PM.MAP_BLACKLIST") Then
                '    Dim oMAP_BLACKLIST = oMode.Replace("PM.MAP_BLACKLIST=", "")
                '    Try
                '        MAP_BLACKLIST = oMAP_BLACKLIST
                '    Catch ex As Exception
                '        MAP_BLACKLIST = String.Empty
                '    End Try
                'ElseIf oMode.StartsWith("PM.SEARCH1") Then
                '    Dim oSearch1 = oMode.Replace("PM.SEARCH1=", "")
                '    Try
                '        SEARCH1 = oSearch1
                '    Catch ex As Exception
                '        SEARCH1 = ""
                '    End Try
                'ElseIf oMode.StartsWith("PM.SEARCH2") Then
                '    Dim oSearch2 = oMode.Replace("PM.SEARCH2=", "")
                '    Try
                '        SEARCH2 = oSearch2
                '    Catch ex As Exception
                '        SEARCH2 = ""
                '    End Try
                'ElseIf oMode.StartsWith("PM.TRAFFICLIGHT_ICON") Then
                '    Dim oParam = oMode.Replace("PM.TRAFFICLIGHT_ICON=", "")
                '    Try
                '        TL_ICON = CBool(oParam)
                '    Catch ex As Exception
                '        TL_ICON = False
                '    End Try
                'ElseIf oMode.StartsWith("PM.TITLE_NOTIFICATIONS") Then
                '    Dim oParam = oMode.Replace("PM.TITLE_NOTIFICATIONS=", "")
                '    Try
                '        TITLE_NOTIFICATIONS = oParam
                '    Catch ex As Exception
                '        TITLE_NOTIFICATIONS = ""
                '    End Try
                'ElseIf oMode.StartsWith("TF.InheritanceMsgAmount") And pMode = "Load" Then
                '    Dim oParam = oMode.Replace("TF.InheritanceMsgAmount=", "")
                '    Try
                '        InheritanceMsgAmount = oParam
                '    Catch ex As Exception
                '    End Try
                'ElseIf oMode.StartsWith("TF.InheritanceCalcReset") And pMode = "Load" Then
                '    Dim oParam = oMode.Replace("TF.InheritanceCalcReset=", "")
                '    Try
                '        If CBool(oParam) = True Then
                '            LOGGER.Info("Inheritance_Counts werden  auf 0 zurückgesetzt bzw gelöscht")
                '            Dim oDELETESQL = "DELETE FROM TBDD_USER_KEY_VALUE_PAIR 
                '             WHERE FK_USER_ID = " & USER_ID & " And [FK_MODULE_ID] = '" & USER_MODULE_ID & "' AND KEY_NAME LIKE 'INHERITANCE_CONFIRM_%'"
                '            DatabaseECM.ExecuteNonQuery(oDELETESQL)
                '            UserInheritance_ConfirmationByColumn = Nothing
                '            CONFIG.Save()
                '        End If
                '    Catch ex As Exception
                '    End Try
                'ElseIf oMode.StartsWith("PM.START_CW") Then
                '    Dim oAfterReplace = oMode.Replace("PM.START_CW=", "")
                '    Try
                '        START_CW = True
                '        LOGGER.Debug("PM.START_CW = True")
                '        Dim oSplit As String() = oAfterReplace.Split("~")
                '        START_CW_CAPTION = oSplit(0)
                '        Try
                '            START_CW_LOC_VARIANT = oSplit(1)
                '        Catch ex As Exception
                '            START_CW_LOC_VARIANT = "-1"
                '            LOGGER.Warn($"Could not read START_CW_LOCVARIANT : {ex.Message}")
                '        End Try
                '    Catch ex As Exception
                '        LOGGER.Warn($"Could not read START_CW Param: {ex.Message}")
                '        START_CW = False
                '    End Try
                'ElseIf oMode.StartsWith("PM.RibbonPageCustTitle") Then
                '    Dim oAfterReplace = oMode.Replace("PM.RibbonPageCustTitle=", "")
                '    RibbonPageCustTitle = oAfterReplace
                'ElseIf oMode.StartsWith("PM.RibbonPageCustItm1") Then
                '    Dim oAfterReplace = oMode.Replace("PM.RibbonPageCustItm1=", "")
                '    RibbonPageCustItm1 = oAfterReplace
                'ElseIf oMode.StartsWith("PM.ButtonExport2FolderCaption") Then
                '    Dim oAfterReplace = oMode.Replace("PM.ButtonExport2FolderCaption=", "")
                '    ButtonExport2Folder_Caption = oAfterReplace
                'ElseIf oMode.StartsWith("PM.ButtonExport2Folder_Mode") Then
                '    Dim oAfterReplace = oMode.Replace("PM.ButtonExport2Folder_Mode=", "")
                '    ButtonExport2Folder_Mode = oAfterReplace
                'ElseIf oMode.StartsWith("PM.ButtonExport2Folder_RootFolder") Then
                '    Dim oAfterReplace = oMode.Replace("PM.ButtonExport2Folder_RootFolder=", "")
                '    ButtonExport2Folder_RootFolder = oAfterReplace
                'ElseIf oMode = "MAINFORM_ALLOW_LOGFILES" Then
                '    MAINFORM_CREATE_LOG_FILES = True
                'Else
                '    LOGGER.Info($"Wrong oMode: {oMode}")
                'End If
            Next
            'If IDB_ACTIVE Then
            '    If CONNECTION_STRING_APP_SERVER <> String.Empty Then
            '        If USE_APPSERVER = True Then
            '            CONNECTION_STRING_IDB_READ = CONNECTION_STRING_APP_SERVER
            '        Else
            '            CONNECTION_STRING_IDB_READ = CONNECTION_STRING_IDB
            '        End If
            '    Else
            '        CONNECTION_STRING_IDB_READ = CONNECTION_STRING_IDB
            '    End If
            '    CONNECTION_STRING_IDB_WRITE = CONNECTION_STRING_IDB
            'End If
        End If
        oStopwatch.Done()
    End Sub
    Private Shared Sub ProcessWorkingModeParameter(oMode As String, pMode As String)
        LOGGER.Debug($"Processing Working Mode Parameter: {oMode}")
        Select Case True
            Case oMode = "PM.FORCE_LAYOUT_OVERVIEW"
                SetBooleanParameter(FORCE_LAYOUT_OVERVIEW, True, "FORCE_LAYOUT_OVERVIEW")
            Case oMode = "PM.NO_MASS_VALIDATOR"
                SetBooleanParameter(SHOW_MASS_VALIDATOR, False, "SHOW_MASS_VALIDATOR", LogLevel.Info)
            Case oMode = "PM.NO_CHARTS"
                SetBooleanParameter(SHOW_CHARTS, False, "SHOW_CHARTS")
            Case oMode = "PM.DEBUG_LOG"
                DEBUG = True
                LOGCONFIG.Debug = True
                LOGGER.Debug($"DEBUG_LOG = True")
            Case oMode = "PM.LOG_HOTSPOTS"
                SetBooleanParameter(LOG_HOTSPOTS, True, "LOG_HOTSPOTS")
            Case oMode.StartsWith("OPERATION_MODE_FS")
                OPERATION_MODE_FS = ExtractParameterValue(oMode, "OPERATION_MODE_FS")
                If OPERATION_MODE_FS = ClassConstants.OpModeFS_IDBWM Then
                    IDB_USES_WMFILESTORE = True
                End If
                LOGGER.Info($"OPERATION_MODE_FS = {OPERATION_MODE_FS}")
            Case oMode = "PM.IDBWITHWMFS"
                SetBooleanParameter(IDB_USES_WMFILESTORE, True, "IDB_USES_WMFILESTORE", LogLevel.Info)
            Case oMode = "PM.NO_BASICCONF"
                SetBooleanParameter(BASIC_CONF_VISIBLE, False, "BASIC_CONF_VISIBLE", LogLevel.Info)
            Case oMode = "PM.SYS_LOCKED_MAINTENANCE"
                SetBooleanParameter(SYS_LOCKED_MAINTENANCE, True, "SYS_LOCKED_MAINTENANCE")
            Case oMode.StartsWith("PM.IDB_CONID!")
                ProcessIDBConnection(oMode)
            Case oMode = "PM.EXCEL_OVERVIEW"
                SetBooleanParameter(EXCEL_OVERVIEW, True, "EXCEL_OVERVIEW", LogLevel.Info)
            Case oMode = "PM.MONITORING"
                SetBooleanParameter(MONITORING_ACTIVE, True, "MONITORING_ACTIVE")
            Case oMode = "PM.GHOSTMODE"
                SetBooleanParameter(GHOSTMODE_ACTIVE, True, "GHOSTMODE_ACTIVE", LogLevel.Info)
            Case oMode.StartsWith("PM.COLORSCHEME")
                RIBBON_COLOR_SCHEME = ExtractParameterValue(oMode, "PM.COLORSCHEME").ToUpper
                LOGGER.Debug($"RIBBON_COLOR_SCHEME = {RIBBON_COLOR_SCHEME}")
            Case oMode.StartsWith("PM.NO_DETAIL_PROFILES")
                SetBooleanParameter(NO_DETAIL_PROFILES, True, "NO_DETAIL_PROFILES")
            Case oMode = "PM.NO_POPUP"
                SetBooleanParameter(POPUP_REMINDER_ACTIVE, False, "POPUP_REMINDER_ACTIVE")
            Case oMode.StartsWith("PM.POPUP_TIMELAPS_OVERRIDE")
                ProcessPopupTimeLapse(oMode)
            Case oMode.StartsWith("PM.CONV_IDENTIFICATION")
                CONV_IDENTIFICATION = ExtractParameterValue(oMode, "PM.CONV_IDENTIFICATION")
                LOGGER.Debug($"CONV_IDENTIFICATION = {CONV_IDENTIFICATION}")
            Case oMode.StartsWith("PM.INACTIVITY_DURATION")
                ProcessIntegerParameter(oMode, "PM.INACTIVITY_DURATION", INACTIVITY_DURATION, "InactivityDuration")
            Case oMode.StartsWith("PM.COL_LAST_EDITED")
                LAST_EDITED_COLUMN = ExtractParameterValue(oMode, "PM.COL_LAST_EDITED")
                LOGGER.Debug($"LAST_EDITED_COLUMN = {LAST_EDITED_COLUMN}")
            Case oMode.StartsWith("PM.COL_LAST_ADDED")
                LAST_ADDED_COLUMN = ExtractParameterValue(oMode, "PM.COL_LAST_ADDED")
                LOGGER.Debug($"LAST_ADDED_COLUMN = {LAST_ADDED_COLUMN}")
            Case oMode.StartsWith("PM.MON_COL_CHANGED_WHEN")
                MON_EDITED_COLUMN = ExtractParameterValue(oMode, "PM.MON_COL_CHANGED_WHEN")
                LOGGER.Debug($"MON_EDITED_COLUMN = {MON_EDITED_COLUMN}")
            Case oMode.StartsWith("PM.MON_COL_ADDED_WHEN")
                MON_ADDED_COLUMN = ExtractParameterValue(oMode, "PM.MON_COL_ADDED_WHEN")
                LOGGER.Debug($"MON_ADDED_COLUMN = {MON_ADDED_COLUMN}")
            Case oMode.StartsWith("PM.USE_APPSERVER")
                ProcessBooleanParameter(oMode, "PM.USE_APPSERVER", USE_APPSERVER, "USE_APPSERVER")
            Case oMode.StartsWith("PM.COPYWM2TEMP")
                ProcessBooleanParameter(oMode, "PM.COPYWM2TEMP", COPY_WMFILE_2TEMP, "COPY_WMFILE_2TEMP")
            Case oMode.StartsWith("PM.MAP_SHARE_DRIVE")
                MAP_SHARE_DRIVE = ExtractParameterValue(oMode, "PM.MAP_SHARE_DRIVE")
                LOGGER.Debug($"MAP_SHARE_DRIVE = {MAP_SHARE_DRIVE}")
            Case oMode.StartsWith("PM.MAP_BLACKLIST")
                MAP_BLACKLIST = ExtractParameterValue(oMode, "PM.MAP_BLACKLIST")
                LOGGER.Debug($"MAP_BLACKLIST = {MAP_BLACKLIST}")
            Case oMode.StartsWith("PM.SEARCH1")
                SEARCH1 = ExtractParameterValue(oMode, "PM.SEARCH1")
                LOGGER.Debug($"SEARCH1 = {SEARCH1}")
            Case oMode.StartsWith("PM.SEARCH2")
                SEARCH2 = ExtractParameterValue(oMode, "PM.SEARCH2")
                LOGGER.Debug($"SEARCH2 = {SEARCH2}")
            Case oMode.StartsWith("PM.TRAFFICLIGHT_ICON")
                ProcessBooleanParameter(oMode, "PM.TRAFFICLIGHT_ICON", TL_ICON, "TL_ICON")
            Case oMode.StartsWith("PM.TITLE_NOTIFICATIONS")
                TITLE_NOTIFICATIONS = ExtractParameterValue(oMode, "PM.TITLE_NOTIFICATIONS")
                LOGGER.Debug($"TITLE_NOTIFICATIONS = {TITLE_NOTIFICATIONS}")
            Case oMode.StartsWith("TF.InheritanceMsgAmount") AndAlso pMode = "Load"
                InheritanceMsgAmount = ExtractParameterValue(oMode, "TF.InheritanceMsgAmount")
                LOGGER.Debug($"InheritanceMsgAmount = {InheritanceMsgAmount}")
            Case oMode.StartsWith("TF.InheritanceCalcReset") AndAlso pMode = "Load"
                ProcessInheritanceReset(oMode)
            Case oMode.StartsWith("PM.START_CW")
                ProcessStartCW(oMode)
            Case oMode.StartsWith("PM.RibbonPageCustTitle")
                RibbonPageCustTitle = ExtractParameterValue(oMode, "PM.RibbonPageCustTitle")
                LOGGER.Debug($"RibbonPageCustTitle = {RibbonPageCustTitle}")
            Case oMode.StartsWith("PM.RibbonPageCustItm1")
                RibbonPageCustItm1 = ExtractParameterValue(oMode, "PM.RibbonPageCustItm1")
                LOGGER.Debug($"RibbonPageCustItm1 = {RibbonPageCustItm1}")
            Case oMode.StartsWith("PM.ButtonExport2FolderCaption")
                ButtonExport2Folder_Caption = ExtractParameterValue(oMode, "PM.ButtonExport2FolderCaption")
                LOGGER.Debug($"ButtonExport2FolderCaption = {ButtonExport2Folder_Caption}")
            Case oMode.StartsWith("PM.ButtonExport2Folder_Mode")
                ButtonExport2Folder_Mode = ExtractParameterValue(oMode, "PM.ButtonExport2Folder_Mode")
                LOGGER.Debug($"ButtonExport2Folder_Mode = {ButtonExport2Folder_Mode}")
            Case oMode.StartsWith("PM.ButtonExport2Folder_RootFolder")
                ButtonExport2Folder_RootFolder = ExtractParameterValue(oMode, "PM.ButtonExport2Folder_RootFolder")
                LOGGER.Debug($"ButtonExport2Folder_RootFolder = {ButtonExport2Folder_RootFolder}")
            Case oMode = "MAINFORM_ALLOW_LOGFILES"
                SetBooleanParameter(MAINFORM_CREATE_LOG_FILES, True, "MAINFORM_CREATE_LOG_FILES")
            Case Else
                LOGGER.Info($"Unknown Working Mode Parameter: {oMode}")
        End Select
    End Sub
    Private Shared Function ExtractParameterValue(parameterString As String, prefix As String) As String
        Return parameterString.Replace($"{prefix}=", "")
    End Function
    Private Shared Sub SetBooleanParameter(ByRef target As Boolean, value As Boolean, paramName As String, Optional logLevel As LogLevel = LogLevel.Debug)
        target = value
        LogParameterValue(paramName, value.ToString(), logLevel)
    End Sub
    Private Shared Sub ProcessBooleanParameter(oMode As String, prefix As String, ByRef target As Boolean, paramName As String)
        Dim value = ExtractParameterValue(oMode, prefix)
        Try
            target = CBool(value)
            LOGGER.Debug($"{paramName} = {target}")
        Catch ex As Exception
            target = False
            LOGGER.Warn($"Failed to parse {paramName}: {ex.Message}")
        End Try
    End Sub
    Private Shared Sub ProcessIntegerParameter(oMode As String, prefix As String, ByRef target As Integer, paramName As String)
        Dim value = ExtractParameterValue(oMode, prefix)
        Try
            target = CInt(value)
            LOGGER.Debug($"{paramName} = {target}")
        Catch ex As Exception
            LOGGER.Warn($"Failed to parse {paramName}: {ex.Message}. Setting to 0")
            target = 0
        End Try
    End Sub
    Private Shared Sub ProcessIDBConnection(oMode As String)
        Dim Database_IDB As MSSQLServer = Nothing
        Dim CON_ID = oMode.Replace("PM.IDB_CONID!", "")
        Dim oConString = DatabaseFallback.GetConnectionString(CON_ID)
        CONNECTION_STRING_IDB = oConString
        Database_IDB = New MSSQLServer(LOGCONFIG, CONNECTION_STRING_IDB)
        If Database_IDB.DBInitialized = True Then
            IDB_ACTIVE = True
            LOGGER.Info($"IDB is active - IDB-Connection [{CON_ID}]")
            DatabaseFallback.InitializeIDB(Database_IDB)
        Else
            IDB_ACTIVE = False
            LOGGER.Warn($"Failed to initialize IDB with Connection [{CON_ID}]")
        End If
        If CONNECTION_STRING_IDB <> "" AndAlso Database_IDB.DBInitialized = True Then
            IDB_ACTIVE = True
            LOGGER.Debug("IDB already initialized and active")
            Return
        End If
    End Sub
    Private Shared Sub ProcessPopupTimeLapse(oMode As String)
        Dim oTimeLapse = ExtractParameterValue(oMode, "PM.POPUP_TIMELAPS_OVERRIDE")
        LOGGER.Info($"POPUP_TIMELAPS_OVERRIDE = {oTimeLapse}")
        Try
            CONFIG.Config.ReminderTimer = oTimeLapse
        Catch ex As Exception
            LOGGER.Warn($"Failed to set ReminderTimer: {ex.Message}")
        End Try
    End Sub
    Private Shared Sub ProcessInheritanceReset(oMode As String)
        Dim oParam = ExtractParameterValue(oMode, "TF.InheritanceCalcReset")
        Try
            If CBool(oParam) = True Then
                LOGGER.Info("Inheritance_Counts werden auf 0 zurückgesetzt bzw gelöscht")
                Dim oDELETESQL = "DELETE FROM TBDD_USER_KEY_VALUE_PAIR 
                             WHERE FK_USER_ID = " & USER_ID & " And [FK_MODULE_ID] = '" & USER_MODULE_ID & "' AND KEY_NAME LIKE 'INHERITANCE_CONFIRM_%'"
                DatabaseECM.ExecuteNonQuery(oDELETESQL)
                UserInheritance_ConfirmationByColumn = Nothing
                CONFIG.Save()
            End If
        Catch ex As Exception
            LOGGER.Warn($"Failed to process InheritanceCalcReset: {ex.Message}")
        End Try
    End Sub
    Private Shared Sub ProcessStartCW(oMode As String)
        Dim oAfterReplace = ExtractParameterValue(oMode, "PM.START_CW")
        Try
            START_CW = True
            LOGGER.Debug("PM.START_CW = True")
            Dim oSplit As String() = oAfterReplace.Split("~")
            START_CW_CAPTION = oSplit(0)
            Try
                START_CW_LOC_VARIANT = oSplit(1)
                LOGGER.Debug($"START_CW_LOC_VARIANT = {START_CW_LOC_VARIANT}")
            Catch ex As Exception
                START_CW_LOC_VARIANT = "-1"
                LOGGER.Warn($"Could not read START_CW_LOC_VARIANT: {ex.Message}")
            End Try
        Catch ex As Exception
            LOGGER.Warn($"Could not read START_CW Param: {ex.Message}")
            START_CW = False
        End Try
    End Sub
    Private Shared Sub LogParameterValue(paramName As String, value As String, logLevel As LogLevel)
        Select Case logLevel
            Case LogLevel.Info
                LOGGER.Info($"{paramName} = {value}")
            Case Else
                LOGGER.Debug($"{paramName} = {value}")
        End Select
    End Sub
    Private Enum LogLevel
        Debug
        Info
    End Enum
 End Class
--- a/app/DD_PM_WINDREAM/ClassRefreshHelper.vb
+++ b/app/DD_PM_WINDREAM/ClassRefreshHelper.vb
@@ -29,6 +29,8 @@ Public Class RefreshHelper
    Private Property _VisibleRowIndex As Integer = -1
    Private Property _CurrentFilter As String
    Private ReadOnly Property ExpansionViewInfoList() As New List(Of RowInfo)
    Private ReadOnly Property SelectionViewInfoList() As New List(Of RowInfo)
    Private ReadOnly Property ExpandedMasterRowList() As New List(Of Object)
@@ -45,6 +47,7 @@ Public Class RefreshHelper
            SaveExpansionViewInfo()
            SaveSelectionViewInfo()
            SaveVisibleIndex()
            SaveGridFilter()
        Catch ex As Exception
            _Logger.Error(ex)
        End Try
@@ -56,6 +59,7 @@ Public Class RefreshHelper
            LoadExpansionViewInfo()
            LoadSelectionViewInfo()
            LoadVisibleIndex()
            LoadGridFilter()
        Catch ex As Exception
            _Logger.Error(ex)
        End Try
@@ -64,6 +68,11 @@ Public Class RefreshHelper
    Private Function FindParentRowHandle(pRowInfo As RowInfo, oRowHandle As Integer) As Integer
        Dim oParentRowHandle As Integer = _View.GetParentRowHandle(oRowHandle)
        ' Fixes endless loop when parent row handle is below zero
        If oParentRowHandle < 0 Then
            Return oParentRowHandle
        End If
        Do While _View.GetRowLevel(oParentRowHandle) <> pRowInfo.Level
            oParentRowHandle = _View.GetParentRowHandle(oParentRowHandle)
        Loop
@@ -176,6 +185,14 @@ Public Class RefreshHelper
        Next
    End Sub
    Private Sub SaveGridFilter()
        '_CurrentFilter = _View.ActiveFilterString
    End Sub
    Private Sub LoadGridFilter()
        '_View.ActiveFilterString = _CurrentFilter
    End Sub
    Private Sub SaveVisibleIndex()
        _VisibleRowIndex = _View.GetVisibleIndex(_View.FocusedRowHandle) - _View.TopRowIndex
    End Sub
@@ -183,7 +200,10 @@ Public Class RefreshHelper
    Private Sub LoadVisibleIndex()
        Try
            _View.MakeRowVisible(_View.FocusedRowHandle, True)
            If _View.FocusedRowHandle <> -1 Then
                _View.TopRowIndex = _View.GetVisibleIndex(_View.FocusedRowHandle) - _VisibleRowIndex
            End If
        Catch ex As Exception
            _Logger.Error(ex)
        End Try
--- a/app/DD_PM_WINDREAM/ClassRegexEditor.vb
+++ b/app/DD_PM_WINDREAM/ClassRegexEditor.vb
@@ -12,7 +12,7 @@ Public Class ClassRegexEditor
    Public Overrides Function EditValue(context As ITypeDescriptorContext, provider As IServiceProvider, value As Object) As Object
        Dim oService As IWindowsFormsEditorService = TryCast(provider.GetService(GetType(IWindowsFormsEditorService)), IWindowsFormsEditorService)
-        Dim oRegexString As String = NotNull(value, String.Empty)
+        Dim oRegexString As String = ClassAllgemeineFunktionen.NotNullString(value, String.Empty)
        If oService IsNot Nothing Then
            Using oform As New frmRegexEditor()
--- a/app/TaskFlow/ClassSQLEditor.vb
+++ b/app/TaskFlow/ClassSQLEditor.vb
@@ -0,0 +1,51 @@
 Imports System.ComponentModel
 Imports System.Drawing.Design
 Imports System.Windows.Forms.Design
 Imports taskFLOW.InputProperties
 Imports DigitalData.GUIs.Common
 Public Class ClassSQLEditor
    Inherits UITypeEditor
    Public Overrides Function GetEditStyle(context As ITypeDescriptorContext) As UITypeEditorEditStyle
        Return UITypeEditorEditStyle.Modal
    End Function
    Public Overrides Function EditValue(context As ITypeDescriptorContext, provider As IServiceProvider, value As Object) As Object
        Dim oService As IWindowsFormsEditorService = TryCast(provider.GetService(GetType(IWindowsFormsEditorService)), IWindowsFormsEditorService)
        Dim oValueObject = DirectCast(value, SQLValue)
        Dim oSQLString As String = oValueObject.Value
        'Dim oSQLConnection As Integer = oValueObject.ConnectionId
        If oService IsNot Nothing AndAlso oSQLString IsNot Nothing Then
            'CURRENT_DESIGN_TYPE = "INPUT_INDEX"
            Using oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM)
                oForm.SQLCommand = oSQLString
                oForm.SQLConnection = 0 'oSQLConnection
                oForm.PlaceholdersManualPrefix = "CTRL"
                oForm.PlaceholdersManualTitle = "Controls"
                oForm.PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.
                    ToDictionary(Function(name) name, Function(name) name)
                If IDB_ACTIVE = False Then
                    oForm.ATTRIBUTE_STORE = "WM"
                    oForm.PlaceholdersWindream = MVSource_AllIndicies
                Else
                    oForm.ATTRIBUTE_STORE = "IDB"
                End If
                If oService.ShowDialog(oForm) = DialogResult.OK Then
                    Dim sql As New SQLValue(oForm.SQLCommand) ', oForm.SQLConnection
                    ' CURRENT_CONN_ID_FINAL_INDEX = oForm.SQLConnection
                    ' CURRENT_CONN_ID = oForm.SQLConnection
                    value = sql
                End If
            End Using
        End If
        Return value
    End Function
 End Class
--- a/app/DD_PM_WINDREAM/ClassSQLTypeConverter.vb
+++ b/app/DD_PM_WINDREAM/ClassSQLTypeConverter.vb
--- a/app/DD_PM_WINDREAM/ClassSQLValue.vb
+++ b/app/DD_PM_WINDREAM/ClassSQLValue.vb
@@ -7,12 +7,18 @@ Imports System.Drawing.Design
 <TypeConverter(GetType(SQLTypeConverter))>
 Public Class SQLValue
    Public Property Value As String
    'Public Property ConnectionId As Integer
    Public Sub New()
-        Me.Value = ""
+        Value = ""
    End Sub
-    Public Sub New(value As String)
+    'Public Sub New(value As String)
-        Me.Value = value
+    '    Me.Value = value
    'End Sub
    Public Sub New(pValue As String) ', pConnectionId As Integer)
        Value = pValue
        ' ConnectionId = pConnectionId
    End Sub
 End Class
--- a/app/TaskFlow/ClassValidator.vb
+++ b/app/TaskFlow/ClassValidator.vb
@@ -0,0 +1,3 @@
 Public Class ClassValidator
 End Class
--- a/app/DD_PM_WINDREAM/ClassVectorBehaviourListConverter.vb
+++ b/app/DD_PM_WINDREAM/ClassVectorBehaviourListConverter.vb
--- a/app/DD_PM_WINDREAM/ClassWindream_allgemein.vb
+++ b/app/DD_PM_WINDREAM/ClassWindream_allgemein.vb
@@ -30,14 +30,7 @@ Public Class ClassWindream_allgemein
    ''' </summary>
    ''' <remarks></remarks>
    Sub New()
        ' wenn ein Fehler bei der Initialisierung auftrat
        'If Not Me.Init() Then
        '    ' Nachricht ausgeben
        '    MsgBox("Es trat ein Fehler bei der Initialisierung der Klasse windream auf. Bitte prüfen Sie ob der windream-Server aktiv ist und alle Dienste gestartet sind.", MsgBoxStyle.Exclamation, "Fehler bei Initialisierung")
        '    ' das Programm "abschießen"
        '    Process.GetCurrentProcess.Kill()
        'End If
    End Sub
@@ -121,13 +114,9 @@ Public Class ClassWindream_allgemein
            Return True
        Catch ex As Exception
-LOGGER.Error(ex)
+            LOGGER.Error(ex)
-            If Err.Number = -2147220985 Then
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error Login on windream")
-                MsgBox("Die installierte windream-Version ist nicht ausreichend für den Betrieb der Tool Collection für windream." & vbNewLine &
+
                       "Bitte kontaktieren Sie Digital Data." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & Err.Description, MsgBoxStyle.Exclamation, "Unzureichende windream-Version")
            Else
                MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Login an windream")
            End If
            Return False
        End Try
@@ -135,8 +124,8 @@ LOGGER.Error(ex)
    Public Function Start_WMCC_andCo()
        Try
            ' 04.10.18: Überprüft, ob der Benutzer Mitglied der SERVER_USER Gruppe ist
-            Dim sql = "SELECT T.GUID FROM TBDD_GROUPS_USER T INNER JOIN TBDD_GROUPS T1 on T1.GUID = T.GROUP_ID WHERE T1.NAME = 'SERVER_USER' AND T.USER_ID = " & USER_ID
+            Dim sql = "SELECT T.GUID FROM TBDD_GROUPS_USER T WITH (NOLOCK) INNER JOIN TBDD_GROUPS T1 WITH (NOLOCK) on T1.GUID = T.GROUP_ID WHERE T1.NAME = 'SERVER_USER' AND T.USER_ID = " & USER_ID
-            Dim userExistsInServerUserGroup = Database_ECM.GetScalarValue(sql) ', CONNECTION_STRING_ECM, "StartWMCC-userExistsInServerUserGroup")
+            Dim userExistsInServerUserGroup = DatabaseFallback.GetScalarValueECM(sql) ', CONNECTION_STRING_ECM, "StartWMCC-userExistsInServerUserGroup")
            If WMSESSION_STARTSTOP_STARTUP = True Then
                'And userExistsInServerUserGroup Is Nothing
@@ -159,7 +148,7 @@ LOGGER.Error(ex)
        Try
            ' 04.10.18: Überprüft, ob der Benutzer Mitglied der SERVER_USER Gruppe ist
            Dim sql = "SELECT T.GUID FROM TBDD_GROUPS_USER T INNER JOIN TBDD_GROUPS T1 on T1.GUID = T.GROUP_ID WHERE T1.NAME = 'SERVER_USER' AND T.USER_ID = " & USER_ID
-            Dim userExistsInServerUserGroup = Database_ECM.GetScalarValue(sql) ', CONNECTION_STRING_ECM, "StopWMCC-userExistsInServerUserGroup")
+            Dim userExistsInServerUserGroup = DatabaseFallback.GetScalarValueECM(sql) ', CONNECTION_STRING_ECM, "StopWMCC-userExistsInServerUserGroup")
            If WMSESSION_STARTSTOP_STARTUP = True Then 'And userExistsInServerUserGroup Is Nothing
                Dim owindreamControlCenter = CreateObject("Wmcc.ControlCenter")
@@ -222,7 +211,7 @@ LOGGER.Error(ex)
    Public Function GetTypeOfIndex(ByVal indexname As String) As Integer
        Try
            If IsNothing(Me.oSession) Then
-                LOGGER.Warn("GetTypeOfIndex: WMSession is nothing")
+                LOGGER.Warn("⚠️ GetTypeOfIndex: WMSession is nothing")
                Return Nothing
            End If
            Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, indexname)
@@ -236,16 +225,20 @@ LOGGER.Error(ex)
    End Function
-    Public Function NormalizePath(Path As String)
+    Public Function NormalizePath(pPath As String)
        Dim oNormalizedPath As String
-        If Path.StartsWith("\\windream") Then
+        If pPath.StartsWith(WMSUFFIX) Then
-            oNormalizedPath = Path.Replace("\\windream\objects\", "")
+            oNormalizedPath = pPath.Replace(WMSUFFIX, "")
-        ElseIf Path.StartsWith("\\") Then
+        ElseIf pPath.StartsWith("\\") Then
-            oNormalizedPath = Path.Substring(1)
+            oNormalizedPath = pPath.Substring(1)
-        ElseIf Path.StartsWith("\") Then
+        ElseIf pPath.StartsWith("\") Then
-            Return Path
+            Return pPath
        ElseIf pPath.StartsWith(WMDRIVE_LETTER) Then
            oNormalizedPath = pPath.Replace(WMDRIVE_LETTER & ":", "")
        ElseIf pPath.StartsWith("\") = False Then
            oNormalizedPath = "\" & pPath
        Else
-            oNormalizedPath = "\" & Path
+            oNormalizedPath = pPath
        End If
        Return oNormalizedPath
@@ -279,7 +272,7 @@ LOGGER.Error(ex)
    Public Function GetIndicesByObjecttype(ByVal Objecttype_name As String) As String()
        Try
            If IsNothing(Me.oSession) Then
-                LOGGER.Warn("GetIndicesByObjecttype: WMSession is nothing")
+                LOGGER.Warn("⚠️ GetIndicesByObjecttype: WMSession is nothing")
                Return Nothing
            End If
            Dim oObjectType As WMObject
@@ -329,30 +322,30 @@ LOGGER.Error(ex)
    ''' <param name="objekttypName">Name des Objekttyps</param>
    ''' <returns>Objekttyp als WMObject</returns>
    ''' <remarks></remarks>
-    Public Function GetObjecttypeByName(ByVal objekttypName As String) As WMObject
+    'Public Function GetObjecttypeByName(ByVal objekttypName As String) As WMObject
-        Try
+    '    Try
-            If IsNothing(Me.oSession) Then
+    '        If IsNothing(Me.oSession) Then
-                LOGGER.Warn("GetObjecttypeByName: WMSession is nothing")
+    '            LOGGER.Warn("⚠️ GetObjecttypeByName: WMSession is nothing")
-                Return Nothing
+    '            Return Nothing
-            End If
+    '        End If
-            ' alle Objekttypen auslesen
+    '        ' alle Objekttypen auslesen
-            Dim oObjectTypes As WMObjects = Me.oSession.GetWMObjectTypes(WINDREAMLib.WMEntity.WMEntityDocument)
+    '        Dim oObjectTypes As WMObjects = Me.oSession.GetWMObjectTypes(WINDREAMLib.WMEntity.WMEntityDocument)
-            ' alle Objekttypen durchlaufen und nach dem mit dem angegebenen Namen suchen
+    '        ' alle Objekttypen durchlaufen und nach dem mit dem angegebenen Namen suchen
-            For Each oObjectType As WMObject In oObjectTypes
+    '        For Each oObjectType As WMObject In oObjectTypes
-                If oObjectType.aName = objekttypName Then
+    '            If oObjectType.aName = objekttypName Then
-                    Return oObjectType
+    '                Return oObjectType
-                End If
+    '            End If
-            Next
+    '        Next
-            Return Nothing
+    '        Return Nothing
-        Catch ex As Exception
+    '    Catch ex As Exception
-            LOGGER.Error(ex)
+    '        LOGGER.Error(ex)
-            MsgBox("Es konnte ein Objekttyp nicht erstellt werden." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Exclamation, "Objekttyp konnte nicht erstellt werden")
+    '        MsgBox("Es konnte ein Objekttyp nicht erstellt werden." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Exclamation, "Objekttyp konnte nicht erstellt werden")
-            Return Nothing
+    '        Return Nothing
-        End Try
+    '    End Try
-    End Function
+    'End Function
    ''' <summary>
    ''' Überprüft ob der angegebene Index im Objekttyp existiert
@@ -366,13 +359,14 @@ LOGGER.Error(ex)
            Dim indexnamen() As String = Me.GetIndicesByObjecttype(objekttyp)
            If indexnamen Is Nothing Then Return False
            MVSource_AllIndicies = MyIndicies
            For Each index As String In indexnamen
                If index = indexname Then Return True
            Next
        Catch ex As Exception
-LOGGER.Error(ex)
+            LOGGER.Error(ex)
            MsgBox("Beim Prüfen ob ein Index für einen Objekttypen existiert, ist ein Fehler aufgetreten." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Prüfen auf Existenz eines Index in einem Objekttyp")
        End Try
--- a/app/DD_PM_WINDREAM/ClassWorkDoc.vb
+++ b/app/DD_PM_WINDREAM/ClassWorkDoc.vb
--- a/app/TaskFlow/ControlCreator/Constants.vb
+++ b/app/TaskFlow/ControlCreator/Constants.vb
@@ -0,0 +1,21 @@
 Namespace ControlCreator
    Public Class Constants
        Public Const CONTROL_TYPE_TEXT = "TEXT"
        Public Const CONTROL_TYPE_INTEGER = "INTEGER"
        Public Const CONTROL_TYPE_BOOLEAN = "BOOLEAN"
        Public Const CONTROL_TYPE_DOUBLE = "DOUBLE"
        Public Const CONTROL_TYPE_CURRENCY = "CURRENCY"
        Public Const CONTROL_TYPE_DATE = "DATE"
        Public Const CONTROL_TYPE_DATETIME = "DATETIME"
        Public Const AGGREGATE_NONE = "NONE"
        Public Const AGGREGATE_TOTAL_INTEGER = "TOTAL_INTEGER"
        Public Const AGGREGATE_TOTAL_FLOAT = "TOTAL_FLOAT"
        Public Const AGGREGATE_TOTAL_CURRENCY = "TOTAL_CURRENCY"
        Public Const AGGREGATE_TOTAL_MIN = "TOTAL_MIN"
        Public Const AGGREGATE_TOTAL_MAX = "TOTAL_MAX"
        Public Const AGGREGATE_TOTAL_AVG = "TOTAL_AVG"
        Public Const AGGREGATE_TOTAL_COUNT = "TOTAL_COUNT"
    End Class
 End Namespace
--- a/app/TaskFlow/ControlCreator/GridControl.vb
+++ b/app/TaskFlow/ControlCreator/GridControl.vb
--- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb
+++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb
--- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.vb
+++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.vb
@@ -29,6 +29,9 @@ Partial Public Class DD_DMSLiteDataSet
 End Class
 Namespace DD_DMSLiteDataSetTableAdapters
    Partial Public Class VWPM_CHART_INVOICE_MONITORTableAdapter
    End Class
    Partial Public Class TBPM_PROFILETableAdapter
        Private Sub TBPM_PROFILETableAdapter_Disposed(sender As Object, e As EventArgs) Handles Me.Disposed
@@ -41,3 +44,13 @@ Namespace DD_DMSLiteDataSetTableAdapters
    Partial Public Class TBPM_PROFILE_INDEXETableAdapter
    End Class
 End Namespace
 Namespace DD_DMSLiteDataSetTableAdapters
    Partial Public Class VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter
    End Class
 End Namespace
 Namespace DD_DMSLiteDataSetTableAdapters
    Partial Public Class VWPM_CHART_TOP5TableAdapter
    End Class
 End Namespace
--- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsc
+++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsc
@@ -70,6 +70,11 @@
              <BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
            </ControlSetting></ControlSettings>
        </ColumnUISetting>
        <ColumnUISetting Name="TYPE_COLUMN">
          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
              <BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
            </ControlSetting></ControlSettings>
        </ColumnUISetting>
      </ColumnUISettings>
    </TableUISetting>
    <TableUISetting Name="TBDD_EMAIL_TEMPLATE">
@@ -115,5 +120,14 @@
        </ColumnUISetting>
      </ColumnUISettings>
    </TableUISetting>
    <TableUISetting Name="TBPM_PROFILE">
      <ColumnUISettings>
        <ColumnUISetting Name="TYPE">
          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
              <BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
            </ControlSetting></ControlSettings>
        </ColumnUISetting>
      </ColumnUISettings>
    </TableUISetting>
  </TableUISettings>
 </DataSetUISetting>
--- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd
+++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd
--- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss
+++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss
@@ -4,44 +4,43 @@
     Changes to this file may cause incorrect behavior and will be lost if
     the code is regenerated.
 </autogenerated>-->
-<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="801" ViewPortY="-97" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
+<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="472" ViewPortY="-96" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
  <Shapes>
    <Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="14" X="1688" Y="-74" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
-    <Shape ID="DesignTable:TBPM_KONFIGURATION" ZOrder="2" X="-17" Y="232" Height="262" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
+    <Shape ID="DesignTable:TBPM_KONFIGURATION" ZOrder="4" X="-17" Y="232" Height="262" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
-    <Shape ID="DesignTable:TBDD_USER" ZOrder="18" X="608" Y="444" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
+    <Shape ID="DesignTable:TBDD_USER" ZOrder="17" X="608" Y="444" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
-    <Shape ID="DesignTable:TBPM_TYPE" ZOrder="19" X="17" Y="113" Height="203" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
+    <Shape ID="DesignTable:TBPM_TYPE" ZOrder="18" X="17" Y="113" Height="203" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
-    <Shape ID="DesignTable:TBPM_ERROR_LOG" ZOrder="21" X="443" Y="-87" Height="111" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="21" />
+    <Shape ID="DesignTable:TBPM_ERROR_LOG" ZOrder="20" X="443" Y="-87" Height="111" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="21" />
-    <Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="4" X="408" Y="-78" Height="379" Width="178" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="273" />
+    <Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="6" X="408" Y="-78" Height="379" Width="178" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="273" />
-    <Shape ID="DesignTable:TBPROFILE_USER" ZOrder="15" X="509" Y="-80" Height="267" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
+    <Shape ID="DesignTable:TBPROFILE_USER" ZOrder="2" X="1041" Y="-53" Height="267" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
-    <Shape ID="DesignTable:TBPM_PROFILE_FILES" ZOrder="3" X="1391" Y="-70" Height="229" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" />
+    <Shape ID="DesignTable:TBPM_PROFILE_FILES" ZOrder="5" X="1391" Y="-70" Height="229" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" />
-    <Shape ID="DesignTable:TBWH_CHECK_PROFILE_CONTROLS" ZOrder="23" X="0" Y="-72" Height="168" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="78" />
+    <Shape ID="DesignTable:TBWH_CHECK_PROFILE_CONTROLS" ZOrder="22" X="0" Y="-72" Height="168" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="78" />
-    <Shape ID="DesignTable:TBPM_PROFILE_CONTROLS" ZOrder="12" X="949" Y="399" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBPM_PROFILE_CONTROLS" ZOrder="12" X="947" Y="404" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
-    <Shape ID="DesignTable:TBPM_CONTROL_TABLE" ZOrder="1" X="1300" Y="326" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBPM_CONTROL_TABLE" ZOrder="3" X="1297" Y="391" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
-    <Shape ID="DesignTable:TBDD_GROUPS" ZOrder="17" X="19" Y="320" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
+    <Shape ID="DesignTable:TBDD_GROUPS" ZOrder="16" X="19" Y="320" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
    <Shape ID="DesignTable:TBPROFILE_GROUP" ZOrder="13" X="1054" Y="47" Height="286" Width="277" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
-    <Shape ID="DesignTable:FNPM_GET_FREE_USER_FOR_PROFILE" ZOrder="16" X="807" Y="155" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
+    <Shape ID="DesignTable:FNPM_GET_FREE_USER_FOR_PROFILE" ZOrder="15" X="807" Y="155" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
-    <Shape ID="DesignTable:TBDD_EMAIL_TEMPLATE" ZOrder="7" X="1645" Y="598" Height="267" Width="287" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" />
+    <Shape ID="DesignTable:TBDD_EMAIL_TEMPLATE" ZOrder="9" X="1645" Y="598" Height="267" Width="287" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" />
    <Shape ID="DesignTable:TBDD_GUI_LANGUAGE_PHRASE" ZOrder="11" X="1427" Y="251" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
-    <Shape ID="DesignTable:VWPM_CHART_INVOICE_MONITOR" ZOrder="10" X="1828" Y="457" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
+    <Shape ID="DesignTable:VWPM_CHART_INVOICE_MONITOR" ZOrder="1" X="1828" Y="457" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
-    <Shape ID="DesignTable:VWPM_CHART_INVOICE_MONITOR_SERIES" ZOrder="9" X="1903" Y="311" Height="153" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
+    <Shape ID="DesignTable:VWPM_CHART_INVOICE_MONITOR_SERIES" ZOrder="10" X="1908" Y="274" Height="153" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
-    <Shape ID="DesignTable:VWPM_CHART_TOP5" ZOrder="8" X="1302" Y="15" Height="153" Width="267" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
+    <Shape ID="DesignTable:TBPM_PROFILE" ZOrder="8" X="862" Y="-66" Height="305" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
-    <Shape ID="DesignTable:TBPM_PROFILE" ZOrder="6" X="858" Y="-68" Height="305" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBWH_CONNECTION" ZOrder="23" X="625" Y="114" Height="276" Width="189" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="272" />
    <Shape ID="DesignTable:TBWH_CONNECTION" ZOrder="24" X="625" Y="114" Height="276" Width="189" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="272" />
  </Shapes>
  <Connectors>
-    <Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL1" ZOrder="22" LineWidth="11">
+    <Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL1" ZOrder="21" LineWidth="11">
      <RoutePoints>
        <Point>
-          <X>1249</X>
+          <X>1247</X>
-          <Y>541</Y>
+          <Y>611</Y>
        </Point>
        <Point>
-          <X>1300</X>
+          <X>1297</X>
-          <Y>541</Y>
+          <Y>611</Y>
        </Point>
      </RoutePoints>
    </Connector>
-    <Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL" ZOrder="20" LineWidth="11">
+    <Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL" ZOrder="19" LineWidth="11">
      <RoutePoints>
        <Point>
          <X>141</X>
@@ -49,23 +48,23 @@
        </Point>
        <Point>
          <X>141</X>
-          <Y>343</Y>
+          <Y>408</Y>
        </Point>
        <Point>
-          <X>1300</X>
+          <X>1297</X>
-          <Y>343</Y>
+          <Y>408</Y>
        </Point>
      </RoutePoints>
    </Connector>
-    <Connector ID="DesignRelation:FK_TBPM_PROFILE_CONTROLS_PROFILE" ZOrder="5" LineWidth="11">
+    <Connector ID="DesignRelation:FK_TBPM_PROFILE_CONTROLS_PROFILE" ZOrder="7" LineWidth="11">
      <RoutePoints>
        <Point>
-          <X>963</X>
+          <X>965</X>
-          <Y>237</Y>
+          <Y>239</Y>
        </Point>
        <Point>
-          <X>963</X>
+          <X>965</X>
-          <Y>399</Y>
+          <Y>404</Y>
        </Point>
      </RoutePoints>
    </Connector>
--- a/app/DD_PM_WINDREAM/DD_Icons_ICO_PMANAGER_48px.ico
+++ b/app/DD_PM_WINDREAM/DD_Icons_ICO_PMANAGER_48px.ico
--- a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj
+++ b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj
@@ -341,10 +341,10 @@
    <Compile Include="frmConnection.vb">
      <SubType>Form</SubType>
    </Compile>
-    <Compile Include="frmControl_Detail.Designer.vb">
+    <Compile Include="frmColumn_Detail.Designer.vb">
-      <DependentUpon>frmControl_Detail.vb</DependentUpon>
+      <DependentUpon>frmColumn_Detail.vb</DependentUpon>
    </Compile>
-    <Compile Include="frmControl_Detail.vb">
+    <Compile Include="frmColumn_Detail.vb">
      <SubType>Form</SubType>
    </Compile>
    <Compile Include="frmDesignerLayout.Designer.vb">
@@ -567,8 +567,8 @@
      <DependentUpon>frmConnection.vb</DependentUpon>
      <SubType>Designer</SubType>
    </EmbeddedResource>
-    <EmbeddedResource Include="frmControl_Detail.resx">
+    <EmbeddedResource Include="frmColumn_Detail.resx">
-      <DependentUpon>frmControl_Detail.vb</DependentUpon>
+      <DependentUpon>frmColumn_Detail.vb</DependentUpon>
    </EmbeddedResource>
    <EmbeddedResource Include="frmDesignerLayout.resx">
      <DependentUpon>frmDesignerLayout.vb</DependentUpon>
--- a/app/TaskFlow/DD_taskFLOW_ICON.ico
+++ b/app/TaskFlow/DD_taskFLOW_ICON.ico
--- a/app/TaskFlow/DataColumnExpression.txt
+++ b/app/TaskFlow/DataColumnExpression.txt
@@ -0,0 +1,73 @@
 ADO.NET DataColumn.Expression – Kompakte Übersicht
 Spalten werden über den Spaltennamen referenziert, z. B. [MENGE].
 GRUNDOPERATOREN
 - Arithmetik: +  -  *  /
  Beispiel: [A] * [B]
 - Vergleich: =  <>  >  >=  <  <=
  Beispiel: [MENGE] > 0
 - Logik: AND  OR  NOT
  Beispiel: [A] > 0 AND [B] < 10
 - Klammern: (...)
  Beispiel: ([A] + [B]) * 2
 STRING-VERKETTUNG
 - Verkettung: +
  Beispiel: [VORNAME] + ' - ' + [NACHNAME]
 - Typkonvertierung: Convert
  Beispiel: Convert([NUMMER], 'System.String')
 BEDINGUNGEN
 - IIF(Bedingung, True, False)
  Beispiel: IIF([A] = 'Harry', 'Blume', 'Tier')
 HÄUFIGE FUNKTIONEN
 - Len([TEXT])
 - Trim([TEXT])
 - Substring([TEXT], 0, 3)
 - IsNull([WERT], 0)
 - Convert([WERT], 'System.Double')
 BEISPIELE (FORMULA_EXPRESSION)
 - Multiplikation: [MENGE] * [PREIS]
 - Addieren: [A] + [B]
 - Division: [A] / [B]
 - Text zusammensetzen: [SAKNR] + ' - ' + [KST]
 - Bedingung: IIF([STATUS] = 'X', 'OK', 'NOK')ADO.NET DataColumn.Expression – Kompakte Übersicht
 Spalten werden über den Spaltennamen referenziert, z. B. [MENGE].
 GRUNDOPERATOREN
 - Arithmetik: +  -  *  /
  Beispiel: [A] * [B]
 - Vergleich: =  <>  >  >=  <  <=
  Beispiel: [MENGE] > 0
 - Logik: AND  OR  NOT
  Beispiel: [A] > 0 AND [B] < 10
 - Klammern: (...)
  Beispiel: ([A] + [B]) * 2
 STRING-VERKETTUNG
 - Verkettung: +
  Beispiel: [VORNAME] + ' - ' + [NACHNAME]
 - Typkonvertierung: Convert
  Beispiel: Convert([NUMMER], 'System.String')
 BEDINGUNGEN
 - IIF(Bedingung, True, False)
  Beispiel: IIF([A] = 'Harry', 'Blume', 'Tier')
 HÄUFIGE FUNKTIONEN
 - Len([TEXT])
 - Trim([TEXT])
 - Substring([TEXT], 0, 3)
 - IsNull([WERT], 0)
 - Convert([WERT], 'System.Double')
 BEISPIELE (FORMULA_EXPRESSION)
 - Multiplikation: [MENGE] * [PREIS]
 - Addieren: [A] + [B]
 - Division: [A] / [B]
 - Text zusammensetzen: [SAKNR] + ' - ' + [KST]
 - Bedingung: IIF([STATUS] = 'X', 'OK', 'NOK')
--- a/app/DD_PM_WINDREAM/FinalIndexDataSet.Designer.vb
+++ b/app/DD_PM_WINDREAM/FinalIndexDataSet.Designer.vb
@@ -30,7 +30,7 @@ Partial Public Class FinalIndexDataSet
    Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Public Sub New()
        MyBase.New
        Me.BeginInit
@@ -42,7 +42,7 @@ Partial Public Class FinalIndexDataSet
    End Sub
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
        MyBase.New(info, context, false)
        If (Me.IsBinarySerialized(info, context) = true) Then
@@ -77,7 +77,7 @@ Partial Public Class FinalIndexDataSet
    End Sub
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property TBPM_PROFILE_FINAL_INDEXING() As TBPM_PROFILE_FINAL_INDEXINGDataTable
@@ -87,7 +87,7 @@ Partial Public Class FinalIndexDataSet
    End Property
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
     Global.System.ComponentModel.BrowsableAttribute(true),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)>  _
    Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
@@ -100,7 +100,7 @@ Partial Public Class FinalIndexDataSet
    End Property
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)>  _
    Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
        Get
@@ -109,7 +109,7 @@ Partial Public Class FinalIndexDataSet
    End Property
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)>  _
    Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
        Get
@@ -118,7 +118,7 @@ Partial Public Class FinalIndexDataSet
    End Property
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Protected Overrides Sub InitializeDerivedDataSet()
        Me.BeginInit
        Me.InitClass
@@ -126,7 +126,7 @@ Partial Public Class FinalIndexDataSet
    End Sub
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Public Overrides Function Clone() As Global.System.Data.DataSet
        Dim cln As FinalIndexDataSet = CType(MyBase.Clone,FinalIndexDataSet)
        cln.InitVars
@@ -135,19 +135,19 @@ Partial Public Class FinalIndexDataSet
    End Function
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Protected Overrides Function ShouldSerializeTables() As Boolean
        Return false
    End Function
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Protected Overrides Function ShouldSerializeRelations() As Boolean
        Return false
    End Function
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
        If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
            Me.Reset
@@ -171,7 +171,7 @@ Partial Public Class FinalIndexDataSet
    End Sub
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
        Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
        Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
@@ -180,13 +180,13 @@ Partial Public Class FinalIndexDataSet
    End Function
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Friend Overloads Sub InitVars()
        Me.InitVars(true)
    End Sub
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Friend Overloads Sub InitVars(ByVal initTable As Boolean)
        Me.tableTBPM_PROFILE_FINAL_INDEXING = CType(MyBase.Tables("TBPM_PROFILE_FINAL_INDEXING"),TBPM_PROFILE_FINAL_INDEXINGDataTable)
        If (initTable = true) Then
@@ -197,7 +197,7 @@ Partial Public Class FinalIndexDataSet
    End Sub
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Private Sub InitClass()
        Me.DataSetName = "FinalIndexDataSet"
        Me.Prefix = ""
@@ -209,13 +209,13 @@ Partial Public Class FinalIndexDataSet
    End Sub
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Private Function ShouldSerializeTBPM_PROFILE_FINAL_INDEXING() As Boolean
        Return false
    End Function
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
        If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
            Me.InitVars
@@ -223,7 +223,7 @@ Partial Public Class FinalIndexDataSet
    End Sub
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Public Shared Function GetTypedDataSetSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
        Dim ds As FinalIndexDataSet = New FinalIndexDataSet()
        Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
@@ -272,7 +272,7 @@ Partial Public Class FinalIndexDataSet
        Return type
    End Function
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Public Delegate Sub TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler(ByVal sender As Object, ByVal e As TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent)
    '''<summary>
@@ -318,7 +318,7 @@ Partial Public Class FinalIndexDataSet
        Private columnCONTINUE_INDETERMINED As Global.System.Data.DataColumn
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "TBPM_PROFILE_FINAL_INDEXING"
@@ -328,7 +328,7 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
@@ -346,14 +346,14 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnGUID
@@ -361,7 +361,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property PROFIL_IDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPROFIL_ID
@@ -369,7 +369,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property CONNECTION_IDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCONNECTION_ID
@@ -377,7 +377,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property SQL_COMMANDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSQL_COMMAND
@@ -385,7 +385,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property INDEXNAMEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnINDEXNAME
@@ -393,7 +393,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property VALUEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnVALUE
@@ -401,7 +401,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property ADDED_WHOColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnADDED_WHO
@@ -409,7 +409,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property ADDED_WHENColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnADDED_WHEN
@@ -417,7 +417,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property CHANGED_WHOColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCHANGED_WHO
@@ -425,7 +425,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property CHANGED_WHENColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCHANGED_WHEN
@@ -433,7 +433,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property DESCRIPTIONColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDESCRIPTION
@@ -441,7 +441,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property ACTIVEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnACTIVE
@@ -449,7 +449,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property PREVENT_DUPLICATESColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPREVENT_DUPLICATES
@@ -457,7 +457,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property ALLOW_NEW_VALUESColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnALLOW_NEW_VALUES
@@ -465,7 +465,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property IF_VEKTOR_BEHAVIOURColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIF_VEKTOR_BEHAVIOUR
@@ -473,7 +473,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property SEQUENCEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSEQUENCE
@@ -481,7 +481,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property CONTINUE_INDETERMINEDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCONTINUE_INDETERMINED
@@ -489,7 +489,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
@@ -498,33 +498,33 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As TBPM_PROFILE_FINAL_INDEXINGRow
            Get
                Return CType(Me.Rows(index),TBPM_PROFILE_FINAL_INDEXINGRow)
            End Get
        End Property
-        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Event TBPM_PROFILE_FINAL_INDEXINGRowChanging As TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler
-        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Event TBPM_PROFILE_FINAL_INDEXINGRowChanged As TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler
-        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Event TBPM_PROFILE_FINAL_INDEXINGRowDeleting As TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler
-        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Event TBPM_PROFILE_FINAL_INDEXINGRowDeleted As TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Overloads Sub AddTBPM_PROFILE_FINAL_INDEXINGRow(ByVal row As TBPM_PROFILE_FINAL_INDEXINGRow)
            Me.Rows.Add(row)
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Overloads Function AddTBPM_PROFILE_FINAL_INDEXINGRow( _
                    ByVal PROFIL_ID As Integer,  _
                    ByVal CONNECTION_ID As Short,  _
@@ -550,13 +550,13 @@ Partial Public Class FinalIndexDataSet
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Function FindByGUID(ByVal GUID As Integer) As TBPM_PROFILE_FINAL_INDEXINGRow
            Return CType(Me.Rows.Find(New Object() {GUID}),TBPM_PROFILE_FINAL_INDEXINGRow)
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As TBPM_PROFILE_FINAL_INDEXINGDataTable = CType(MyBase.Clone,TBPM_PROFILE_FINAL_INDEXINGDataTable)
            cln.InitVars
@@ -564,13 +564,13 @@ Partial Public Class FinalIndexDataSet
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New TBPM_PROFILE_FINAL_INDEXINGDataTable()
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Friend Sub InitVars()
            Me.columnGUID = MyBase.Columns("GUID")
            Me.columnPROFIL_ID = MyBase.Columns("PROFIL_ID")
@@ -592,7 +592,7 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Sub InitClass()
            Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnGUID)
@@ -660,25 +660,25 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Function NewTBPM_PROFILE_FINAL_INDEXINGRow() As TBPM_PROFILE_FINAL_INDEXINGRow
            Return CType(Me.NewRow,TBPM_PROFILE_FINAL_INDEXINGRow)
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New TBPM_PROFILE_FINAL_INDEXINGRow(builder)
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(TBPM_PROFILE_FINAL_INDEXINGRow)
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.TBPM_PROFILE_FINAL_INDEXINGRowChangedEvent) Is Nothing) Then
@@ -687,7 +687,7 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.TBPM_PROFILE_FINAL_INDEXINGRowChangingEvent) Is Nothing) Then
@@ -696,7 +696,7 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.TBPM_PROFILE_FINAL_INDEXINGRowDeletedEvent) Is Nothing) Then
@@ -705,7 +705,7 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.TBPM_PROFILE_FINAL_INDEXINGRowDeletingEvent) Is Nothing) Then
@@ -714,13 +714,13 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Sub RemoveTBPM_PROFILE_FINAL_INDEXINGRow(ByVal row As TBPM_PROFILE_FINAL_INDEXINGRow)
            Me.Rows.Remove(row)
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
@@ -795,14 +795,14 @@ Partial Public Class FinalIndexDataSet
        Private tableTBPM_PROFILE_FINAL_INDEXING As TBPM_PROFILE_FINAL_INDEXINGDataTable
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableTBPM_PROFILE_FINAL_INDEXING = CType(Me.Table,TBPM_PROFILE_FINAL_INDEXINGDataTable)
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property GUID() As Integer
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.GUIDColumn),Integer)
@@ -813,7 +813,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property PROFIL_ID() As Integer
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.PROFIL_IDColumn),Integer)
@@ -824,7 +824,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property CONNECTION_ID() As Short
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.CONNECTION_IDColumn),Short)
@@ -835,7 +835,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property SQL_COMMAND() As String
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.SQL_COMMANDColumn),String)
@@ -846,7 +846,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property INDEXNAME() As String
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.INDEXNAMEColumn),String)
@@ -857,7 +857,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property VALUE() As String
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.VALUEColumn),String)
@@ -868,7 +868,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property ADDED_WHO() As String
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ADDED_WHOColumn),String)
@@ -879,7 +879,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property ADDED_WHEN() As Date
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ADDED_WHENColumn),Date)
@@ -890,7 +890,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property CHANGED_WHO() As String
            Get
                Try 
@@ -906,7 +906,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property CHANGED_WHEN() As Date
            Get
                Try 
@@ -922,7 +922,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property DESCRIPTION() As String
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.DESCRIPTIONColumn),String)
@@ -933,7 +933,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property ACTIVE() As Boolean
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn),Boolean)
@@ -944,7 +944,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property PREVENT_DUPLICATES() As Boolean
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.PREVENT_DUPLICATESColumn),Boolean)
@@ -955,7 +955,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property ALLOW_NEW_VALUES() As Boolean
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ALLOW_NEW_VALUESColumn),Boolean)
@@ -966,7 +966,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property IF_VEKTOR_BEHAVIOUR() As String
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.IF_VEKTOR_BEHAVIOURColumn),String)
@@ -977,7 +977,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property SEQUENCE() As Byte
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.SEQUENCEColumn),Byte)
@@ -988,7 +988,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property CONTINUE_INDETERMINED() As Boolean
            Get
                Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.CONTINUE_INDETERMINEDColumn),Boolean)
@@ -999,25 +999,25 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Function IsCHANGED_WHONull() As Boolean
            Return Me.IsNull(Me.tableTBPM_PROFILE_FINAL_INDEXING.CHANGED_WHOColumn)
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Sub SetCHANGED_WHONull()
            Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.CHANGED_WHOColumn) = Global.System.Convert.DBNull
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Function IsCHANGED_WHENNull() As Boolean
            Return Me.IsNull(Me.tableTBPM_PROFILE_FINAL_INDEXING.CHANGED_WHENColumn)
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Sub SetCHANGED_WHENNull()
            Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.CHANGED_WHENColumn) = Global.System.Convert.DBNull
        End Sub
@@ -1026,7 +1026,7 @@ Partial Public Class FinalIndexDataSet
    '''<summary>
    '''Row event argument class
    '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
    Public Class TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent
        Inherits Global.System.EventArgs
@@ -1035,7 +1035,7 @@ Partial Public Class FinalIndexDataSet
        Private eventAction As Global.System.Data.DataRowAction
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Sub New(ByVal row As TBPM_PROFILE_FINAL_INDEXINGRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
@@ -1043,7 +1043,7 @@ Partial Public Class FinalIndexDataSet
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property Row() As TBPM_PROFILE_FINAL_INDEXINGRow
            Get
                Return Me.eventRow
@@ -1051,7 +1051,7 @@ Partial Public Class FinalIndexDataSet
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
@@ -1085,14 +1085,14 @@ Namespace FinalIndexDataSetTableAdapters
        Private _clearBeforeFill As Boolean
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
@@ -1103,7 +1103,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
@@ -1133,7 +1133,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
@@ -1161,7 +1161,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
@@ -1172,7 +1172,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
@@ -1183,7 +1183,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter()
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
@@ -1210,14 +1210,14 @@ Namespace FinalIndexDataSetTableAdapters
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection()
-            Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString
+            Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
@@ -1246,7 +1246,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As FinalIndexDataSet.TBPM_PROFILE_FINAL_INDEXINGDataTable, ByVal NAME As String) As Integer
@@ -1264,7 +1264,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData(ByVal NAME As String) As FinalIndexDataSet.TBPM_PROFILE_FINAL_INDEXINGDataTable
@@ -1280,7 +1280,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function DeleteFinalIndex(ByVal guid As Integer) As Integer
@@ -1321,7 +1321,7 @@ Namespace FinalIndexDataSetTableAdapters
        Private _connection As Global.System.Data.IDbConnection
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property UpdateOrder() As UpdateOrderOption
            Get
                Return Me._updateOrder
@@ -1332,7 +1332,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property BackupDataSetBeforeUpdate() As Boolean
            Get
                Return Me._backupDataSetBeforeUpdate
@@ -1343,7 +1343,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public Property Connection() As Global.System.Data.IDbConnection
            Get
@@ -1358,7 +1358,7 @@ Namespace FinalIndexDataSetTableAdapters
        End Property
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property TableAdapterInstanceCount() As Integer
            Get
@@ -1371,7 +1371,7 @@ Namespace FinalIndexDataSetTableAdapters
        '''Update rows in top-down order.
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Function UpdateUpdatedRows(ByVal dataSet As FinalIndexDataSet, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow), ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
            Dim result As Integer = 0
            Return result
@@ -1381,7 +1381,7 @@ Namespace FinalIndexDataSetTableAdapters
        '''Insert rows in top-down order.
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Function UpdateInsertedRows(ByVal dataSet As FinalIndexDataSet, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
            Dim result As Integer = 0
            Return result
@@ -1391,7 +1391,7 @@ Namespace FinalIndexDataSetTableAdapters
        '''Delete rows in bottom-up order.
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Function UpdateDeletedRows(ByVal dataSet As FinalIndexDataSet, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
            Dim result As Integer = 0
            Return result
@@ -1401,7 +1401,7 @@ Namespace FinalIndexDataSetTableAdapters
        '''Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Function GetRealUpdatedRows(ByVal updatedRows() As Global.System.Data.DataRow, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Global.System.Data.DataRow()
            If ((updatedRows Is Nothing)  _
                        OrElse (updatedRows.Length < 1)) Then
@@ -1427,7 +1427,7 @@ Namespace FinalIndexDataSetTableAdapters
        '''Update all changes to the dataset.
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Overridable Function UpdateAll(ByVal dataSet As FinalIndexDataSet) As Integer
            If (dataSet Is Nothing) Then
                Throw New Global.System.ArgumentNullException("dataSet")
@@ -1544,13 +1544,13 @@ Namespace FinalIndexDataSetTableAdapters
        End Function
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overridable Sub SortSelfReferenceRows(ByVal rows() As Global.System.Data.DataRow, ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
            Global.System.Array.Sort(Of Global.System.Data.DataRow)(rows, New SelfReferenceComparer(relation, childFirst))
        End Sub
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Protected Overridable Function MatchTableAdapterConnection(ByVal inputConnection As Global.System.Data.IDbConnection) As Boolean
            If (Not (Me._connection) Is Nothing) Then
                Return true
@@ -1568,7 +1568,7 @@ Namespace FinalIndexDataSetTableAdapters
        '''<summary>
        '''Update Order Option
        '''</summary>
-        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Enum UpdateOrderOption
            InsertUpdateDelete = 0
@@ -1579,7 +1579,7 @@ Namespace FinalIndexDataSetTableAdapters
        '''<summary>
        '''Used to sort self-referenced table's rows
        '''</summary>
-        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Private Class SelfReferenceComparer
            Inherits Object
            Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow)
@@ -1589,7 +1589,7 @@ Namespace FinalIndexDataSetTableAdapters
            Private _childFirst As Integer
            <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-             Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+             Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
            Friend Sub New(ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
                MyBase.New
                Me._relation = relation
@@ -1601,7 +1601,7 @@ Namespace FinalIndexDataSetTableAdapters
            End Sub
            <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-             Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+             Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
            Private Function GetRoot(ByVal row As Global.System.Data.DataRow, ByRef distance As Integer) As Global.System.Data.DataRow
                Global.System.Diagnostics.Debug.Assert((Not (row) Is Nothing))
                Dim root As Global.System.Data.DataRow = row
@@ -1640,7 +1640,7 @@ Namespace FinalIndexDataSetTableAdapters
            End Function
            <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-             Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>  _
+             Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
            Public Function Compare(ByVal row1 As Global.System.Data.DataRow, ByVal row2 As Global.System.Data.DataRow) As Integer Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow).Compare
                If Object.ReferenceEquals(row1, row2) Then
                    Return 0
--- a/app/DD_PM_WINDREAM/FinalIndexDataSet.xsc
+++ b/app/DD_PM_WINDREAM/FinalIndexDataSet.xsc
--- a/app/DD_PM_WINDREAM/FinalIndexDataSet.xsd
+++ b/app/DD_PM_WINDREAM/FinalIndexDataSet.xsd
@@ -4,7 +4,7 @@
    <xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource">
      <DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
        <Connections>
-          <Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="ConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="ConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.DD_ProcessManager.My.MySettings.GlobalReference.Default.ConnectionString" Provider="System.Data.SqlClient" />
+          <Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="ConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="ConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.taskFLOW.My.MySettings.GlobalReference.Default.ConnectionString" Provider="System.Data.SqlClient" />
        </Connections>
        <Tables>
          <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" GeneratorDataComponentClassName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" Name="TBPM_PROFILE_FINAL_INDEXING" UserDataComponentName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter">
@@ -66,71 +66,71 @@ WHERE        (GUID = @guid)</CommandText>
      </DataSource>
    </xs:appinfo>
  </xs:annotation>
-  <xs:element name="FinalIndexDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="FinalIndexDataSet" msprop:Generator_UserDSName="FinalIndexDataSet">
+  <xs:element name="FinalIndexDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_UserDSName="FinalIndexDataSet" msprop:Generator_DataSetName="FinalIndexDataSet">
    <xs:complexType>
      <xs:choice minOccurs="0" maxOccurs="unbounded">
-        <xs:element name="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_TableClassName="TBPM_PROFILE_FINAL_INDEXINGDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowDeletingName="TBPM_PROFILE_FINAL_INDEXINGRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FINAL_INDEXINGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FINAL_INDEXINGRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow" msprop:Generator_UserTableName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent">
+        <xs:element name="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FINAL_INDEXINGRowDeleted" msprop:Generator_RowDeletingName="TBPM_PROFILE_FINAL_INDEXINGRowDeleting" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent" msprop:Generator_TablePropName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_RowChangingName="TBPM_PROFILE_FINAL_INDEXINGRowChanging" msprop:Generator_TableClassName="TBPM_PROFILE_FINAL_INDEXINGDataTable" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow" msprop:Generator_TableVarName="tableTBPM_PROFILE_FINAL_INDEXING" msprop:Generator_UserTableName="TBPM_PROFILE_FINAL_INDEXING">
          <xs:complexType>
            <xs:sequence>
-              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
+              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_UserColumnName="GUID" type="xs:int" />
-              <xs:element name="PROFIL_ID" msprop:Generator_ColumnVarNameInTable="columnPROFIL_ID" msprop:Generator_ColumnPropNameInRow="PROFIL_ID" msprop:Generator_ColumnPropNameInTable="PROFIL_IDColumn" msprop:Generator_UserColumnName="PROFIL_ID" type="xs:int" />
+              <xs:element name="PROFIL_ID" msprop:Generator_ColumnPropNameInRow="PROFIL_ID" msprop:Generator_ColumnPropNameInTable="PROFIL_IDColumn" msprop:Generator_ColumnVarNameInTable="columnPROFIL_ID" msprop:Generator_UserColumnName="PROFIL_ID" type="xs:int" />
-              <xs:element name="CONNECTION_ID" msprop:Generator_ColumnVarNameInTable="columnCONNECTION_ID" msprop:Generator_ColumnPropNameInRow="CONNECTION_ID" msprop:Generator_ColumnPropNameInTable="CONNECTION_IDColumn" msprop:Generator_UserColumnName="CONNECTION_ID" type="xs:short" />
+              <xs:element name="CONNECTION_ID" msprop:Generator_ColumnPropNameInRow="CONNECTION_ID" msprop:Generator_ColumnPropNameInTable="CONNECTION_IDColumn" msprop:Generator_ColumnVarNameInTable="columnCONNECTION_ID" msprop:Generator_UserColumnName="CONNECTION_ID" type="xs:short" />
-              <xs:element name="SQL_COMMAND" msprop:Generator_ColumnVarNameInTable="columnSQL_COMMAND" msprop:Generator_ColumnPropNameInRow="SQL_COMMAND" msprop:Generator_ColumnPropNameInTable="SQL_COMMANDColumn" msprop:Generator_UserColumnName="SQL_COMMAND">
+              <xs:element name="SQL_COMMAND" msprop:Generator_ColumnPropNameInRow="SQL_COMMAND" msprop:Generator_ColumnPropNameInTable="SQL_COMMANDColumn" msprop:Generator_ColumnVarNameInTable="columnSQL_COMMAND" msprop:Generator_UserColumnName="SQL_COMMAND">
                <xs:simpleType>
                  <xs:restriction base="xs:string">
                    <xs:maxLength value="2147483647" />
                  </xs:restriction>
                </xs:simpleType>
              </xs:element>
-              <xs:element name="INDEXNAME" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_UserColumnName="INDEXNAME">
+              <xs:element name="INDEXNAME" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME" msprop:Generator_UserColumnName="INDEXNAME">
                <xs:simpleType>
                  <xs:restriction base="xs:string">
                    <xs:maxLength value="100" />
                  </xs:restriction>
                </xs:simpleType>
              </xs:element>
-              <xs:element name="VALUE" msprop:Generator_ColumnVarNameInTable="columnVALUE" msprop:Generator_ColumnPropNameInRow="VALUE" msprop:Generator_ColumnPropNameInTable="VALUEColumn" msprop:Generator_UserColumnName="VALUE">
+              <xs:element name="VALUE" msprop:Generator_ColumnPropNameInRow="VALUE" msprop:Generator_ColumnPropNameInTable="VALUEColumn" msprop:Generator_ColumnVarNameInTable="columnVALUE" msprop:Generator_UserColumnName="VALUE">
                <xs:simpleType>
                  <xs:restriction base="xs:string">
                    <xs:maxLength value="100" />
                  </xs:restriction>
                </xs:simpleType>
              </xs:element>
-              <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO">
+              <xs:element name="ADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_UserColumnName="ADDED_WHO">
                <xs:simpleType>
                  <xs:restriction base="xs:string">
                    <xs:maxLength value="30" />
                  </xs:restriction>
                </xs:simpleType>
              </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" />
+              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" />
-              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
+              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
                <xs:simpleType>
                  <xs:restriction base="xs:string">
                    <xs:maxLength value="30" />
                  </xs:restriction>
                </xs:simpleType>
              </xs:element>
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="DESCRIPTION" msprop:Generator_ColumnVarNameInTable="columnDESCRIPTION" msprop:Generator_ColumnPropNameInRow="DESCRIPTION" msprop:Generator_ColumnPropNameInTable="DESCRIPTIONColumn" msprop:Generator_UserColumnName="DESCRIPTION">
+              <xs:element name="DESCRIPTION" msprop:Generator_ColumnPropNameInRow="DESCRIPTION" msprop:Generator_ColumnPropNameInTable="DESCRIPTIONColumn" msprop:Generator_ColumnVarNameInTable="columnDESCRIPTION" msprop:Generator_UserColumnName="DESCRIPTION">
                <xs:simpleType>
                  <xs:restriction base="xs:string">
                    <xs:maxLength value="2147483647" />
                  </xs:restriction>
                </xs:simpleType>
              </xs:element>
-              <xs:element name="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" />
+              <xs:element name="ACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" />
-              <xs:element name="PREVENT_DUPLICATES" msprop:Generator_ColumnVarNameInTable="columnPREVENT_DUPLICATES" msprop:Generator_ColumnPropNameInRow="PREVENT_DUPLICATES" msprop:Generator_ColumnPropNameInTable="PREVENT_DUPLICATESColumn" msprop:Generator_UserColumnName="PREVENT_DUPLICATES" type="xs:boolean" />
+              <xs:element name="PREVENT_DUPLICATES" msprop:Generator_ColumnPropNameInRow="PREVENT_DUPLICATES" msprop:Generator_ColumnPropNameInTable="PREVENT_DUPLICATESColumn" msprop:Generator_ColumnVarNameInTable="columnPREVENT_DUPLICATES" msprop:Generator_UserColumnName="PREVENT_DUPLICATES" type="xs:boolean" />
-              <xs:element name="ALLOW_NEW_VALUES" msprop:Generator_ColumnVarNameInTable="columnALLOW_NEW_VALUES" msprop:Generator_ColumnPropNameInRow="ALLOW_NEW_VALUES" msprop:Generator_ColumnPropNameInTable="ALLOW_NEW_VALUESColumn" msprop:Generator_UserColumnName="ALLOW_NEW_VALUES" type="xs:boolean" />
+              <xs:element name="ALLOW_NEW_VALUES" msprop:Generator_ColumnPropNameInRow="ALLOW_NEW_VALUES" msprop:Generator_ColumnPropNameInTable="ALLOW_NEW_VALUESColumn" msprop:Generator_ColumnVarNameInTable="columnALLOW_NEW_VALUES" msprop:Generator_UserColumnName="ALLOW_NEW_VALUES" type="xs:boolean" />
-              <xs:element name="IF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnVarNameInTable="columnIF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnPropNameInRow="IF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnPropNameInTable="IF_VEKTOR_BEHAVIOURColumn" msprop:Generator_UserColumnName="IF_VEKTOR_BEHAVIOUR">
+              <xs:element name="IF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnPropNameInRow="IF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnPropNameInTable="IF_VEKTOR_BEHAVIOURColumn" msprop:Generator_ColumnVarNameInTable="columnIF_VEKTOR_BEHAVIOUR" msprop:Generator_UserColumnName="IF_VEKTOR_BEHAVIOUR">
                <xs:simpleType>
                  <xs:restriction base="xs:string">
                    <xs:maxLength value="25" />
                  </xs:restriction>
                </xs:simpleType>
              </xs:element>
-              <xs:element name="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_UserColumnName="SEQUENCE" type="xs:unsignedByte" default="0" />
+              <xs:element name="SEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_UserColumnName="SEQUENCE" type="xs:unsignedByte" default="0" />
-              <xs:element name="CONTINUE_INDETERMINED" msprop:Generator_ColumnVarNameInTable="columnCONTINUE_INDETERMINED" msprop:Generator_ColumnPropNameInRow="CONTINUE_INDETERMINED" msprop:Generator_ColumnPropNameInTable="CONTINUE_INDETERMINEDColumn" msprop:Generator_UserColumnName="CONTINUE_INDETERMINED" type="xs:boolean" />
+              <xs:element name="CONTINUE_INDETERMINED" msprop:Generator_ColumnPropNameInRow="CONTINUE_INDETERMINED" msprop:Generator_ColumnPropNameInTable="CONTINUE_INDETERMINEDColumn" msprop:Generator_ColumnVarNameInTable="columnCONTINUE_INDETERMINED" msprop:Generator_UserColumnName="CONTINUE_INDETERMINED" type="xs:boolean" />
            </xs:sequence>
          </xs:complexType>
        </xs:element>
--- a/app/DD_PM_WINDREAM/FinalIndexDataSet.xss
+++ b/app/DD_PM_WINDREAM/FinalIndexDataSet.xss
@@ -4,7 +4,7 @@
     Changes to this file may cause incorrect behavior and will be lost if
     the code is regenerated.
 </autogenerated>-->
-<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="0" ViewPortY="0" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
+<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="0" ViewPortY="0" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
  <Shapes>
    <Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="1" X="93" Y="35" Height="362" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
  </Shapes>
--- a/app/DD_PM_WINDREAM/MailLicense.xml
+++ b/app/DD_PM_WINDREAM/MailLicense.xml
--- a/app/TaskFlow/ModuleControlProperties.vb
+++ b/app/TaskFlow/ModuleControlProperties.vb
@@ -0,0 +1,424 @@
 Imports System.ComponentModel
 Imports System.ComponentModel.Design
 Imports System.Drawing.Design
 Imports System.Globalization
 Imports DevExpress.XtraPrinting.Native
 Imports DigitalData.Modules.Language.Utils
 Public Module ModuleControlProperties
    Public Enum IndexTypes
        SimpleIndex = 0
        VectorIndex = 1
    End Enum
    Public Class BaseProperties
        Private _size As Size
        Private _font As Font
        <DisplayName("Changed At")>
        <Category(ClassConstants.CAT_INFORMATION)>
        <[ReadOnly](True)>
        Public Property ChangedAt As Date
        <DisplayName("Changed Who")>
        <Category(ClassConstants.CAT_INFORMATION)>
        <[ReadOnly](True)>
        Public Property ChangedWho As String
        <Category(ClassConstants.CAT_GENERAL)>
        <[ReadOnly](True)>
        Public Property ID() As Integer
        <Category(ClassConstants.CAT_GENERAL)>
        Public Property Name() As String
        <Category(ClassConstants.CAT_DISPLAY)>
        Public Property Location() As Point
        <Category(ClassConstants.CAT_DISPLAY)>
        Public Property Size() As Size
            Get
                Return _size
            End Get
            Set(value As Size)
                If (value.Height <= 0) Then
                    value.Height = 1
                End If
                If (value.Width <= 20) Then
                    value.Width = 20
                End If
                _size = value
            End Set
        End Property
        <Category(ClassConstants.CAT_DISPLAY)>
        <TypeConverter(GetType(FontConverter))>
        Public Overridable Property Font As Font
            Get
                Return _font
            End Get
            Set(value As Font)
                _font = value
            End Set
        End Property
        <DisplayName("Font Color")>
        <Category(ClassConstants.CAT_DISPLAY)>
        Public Property TextColor As Color
        <DisplayName("Text Alignement")>
        <Category(ClassConstants.CAT_DISPLAY)>
        <TypeConverter(GetType(TextAlignmentConverter))>
        Public Property TextAlignment As String
        ' Converter für Dropdown-Werte Near/Center/Far
        Public Class TextAlignmentConverter
            Inherits TypeConverter
            Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean
                Return True
            End Function
            ' Optional: True, damit nur die vorgegebenen Werte erlaubt sind
            Public Overrides Function GetStandardValuesExclusive(context As ITypeDescriptorContext) As Boolean
                Return True
            End Function
            Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection
                Dim values = New List(Of String) From {"Near", "Center", "Far"}
                Return New StandardValuesCollection(values)
            End Function
            Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object
                If destinationType Is GetType(String) Then
                    Return If(value Is Nothing, "", value.ToString())
                End If
                Return MyBase.ConvertTo(context, culture, value, destinationType)
            End Function
        End Class
        Class FontConverter
            Inherits TypeConverter
            Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object
                Dim font = DirectCast(value, Font)
                Return $"{font.Name}, {font.Size}"
            End Function
        End Class
    End Class
    Public Class InputProperties
        Inherits BaseProperties
        Private _index_type As String
        Private _sql_command As String
        'Friend _sql_connection As Integer = 0
        Private _Enable_SQL As String
        Private _Enable_SQL_ONLOAD As String
        Private _default_value
        Friend _set_control_data As String
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property Active() As Boolean
        <Category(ClassConstants.CAT_VALIDATION)>
        Public Property Required() As Boolean
        <DisplayName("Read Only")>
        <Category(ClassConstants.CAT_VALIDATION)>
        Public Property [ReadOnly]() As Boolean
        <DisplayName("Save Changes On Read Only")>
        <Description("Stores data of Read Only fields when document is saved. Default behaviour is NOT to save Read Only fields.")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property [SaveChangeOnReadOnly]() As Boolean
        <Browsable(False)>
        <Category(ClassConstants.CAT_GENERAL)>
        Public Property IndexType() As IndexTypes
        ''' <summary>
        ''' Diese Eigenschaft enthält die auswählbaren Indicies, die für das Control verfügbar sind. Wird nicht direkt angezeigt.
        ''' </summary>
        <Browsable(False)>
        Public Property Indicies() As List(Of String)
        ''' <summary>
        ''' Diese Eigenschaft enthält des ausgewählten Index
        ''' </summary>
        <Category(ClassConstants.CAT_GENERAL)>
        <TypeConverter(GetType(IndexListConverter))>
        Public Property Index() As String
        <DisplayName("SQL Command")>
        <Category(ClassConstants.CAT_DATA)>
        Public Property SQLCommand() As SQLValue
            Get
                Return New SQLValue(ClassAllgemeineFunktionen.NotNullString(_sql_command, "")) ', _sql_connection
            End Get
            Set(ByVal value As SQLValue)
                _sql_command = value.Value
                'SQLConnection = value.ConnectionId
            End Set
        End Property
        '<DisplayName("SQL Connection")>
        '<Category(ClassConstants.CAT_INFORMATION)>
        '<[ReadOnly](True)>
        'Public Property SQLConnection() As Integer
        '    Get
        '        Return _sql_connection
        '    End Get
        '    Set(value As Integer)
        '        _sql_connection = value
        '    End Set
        'End Property
        <DisplayName("Enable On Change SQL")>
        <Description("SQL Command that determines if a control should be enabled/disabled when another, referenced control changes. Should return 0 or 1. Can include a Control-Placeholder.")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property Enable_SQL() As SQLValue
            Get
                Return New SQLValue(ClassAllgemeineFunktionen.NotNullString(_Enable_SQL, "")) ', _sql_connection
            End Get
            Set(ByVal value As SQLValue)
                _Enable_SQL = value.Value
                'SQLConnection = value.ConnectionId
            End Set
        End Property
        <DisplayName("Enable On Load SQL")>
        <Description("SQL Command that determines if a control should be enabled/disabled when the form loads. Should return 0 or 1. Can include a Control-Placeholder.")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property Enable_SQL_OnLoad() As SQLValue
            Get
                Return New SQLValue(ClassAllgemeineFunktionen.NotNullString(_Enable_SQL_ONLOAD, "")) ', _sql_connection
            End Get
            Set(ByVal value As SQLValue)
                _Enable_SQL_ONLOAD = value.Value
                'SQLConnection = value.ConnectionId
            End Set
        End Property
        <DisplayName("Default Value")>
        <Category(ClassConstants.CAT_DATA)>
        Public Property DefaultValue() As String
            Get
                Return _default_value
            End Get
            Set(value As String)
                _default_value = value
            End Set
        End Property
    End Class
    Public Class InputPropertiesWithControlData
        Inherits InputProperties
        <DisplayName("Set Control Data SQL")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property SetControlData As SQLValue
            Get
                Return New SQLValue(_set_control_data) ', _sql_connection
            End Get
            Set(value As SQLValue)
                _set_control_data = value.Value
                'SQLConnection = value.ConnectionId
            End Set
        End Property
    End Class
    Public Class TextboxProperties
        Inherits InputPropertiesWithControlData
        <DisplayName("Regex Pattern")>
        <Category(ClassConstants.CAT_VALIDATION)>
        <Editor(GetType(ClassRegexEditor), GetType(UITypeEditor))>
        Public Property Regex As String
        <DisplayName("Regex Failure Message")>
        <Category(ClassConstants.CAT_VALIDATION)>
        <Editor(GetType(MultilineStringEditor), GetType(UITypeEditor))>
        Public Property RegexMessage As String
        <DisplayName("Display Format")>
        <Category(ClassConstants.CAT_DISPLAY)>
        <TypeConverter(GetType(DisplayFormatConverter))>
        Public Property DisplayFormat As String
        Public Class DisplayFormatConverter
            Inherits TypeConverter
            Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean
                Return True
            End Function
            Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection
                Dim displayFormatList = New List(Of String) From {
                    ClassControlCreator.CONTROL_TYPE_TEXT,
                    ClassControlCreator.CONTROL_TYPE_DOUBLE,
                    ClassControlCreator.CONTROL_TYPE_CURRENCY,
                    ClassControlCreator.CONTROL_TYPE_DATE,
                    ClassControlCreator.CONTROL_TYPE_DATETIME
                }
                Dim values As New StandardValuesCollection(displayFormatList)
                Return values
            End Function
            Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object
                If IsNothing(value) Then
                    Return ""
                Else
                    Return value.ToString()
                End If
            End Function
        End Class
    End Class
    Public Class LabelProperties
        Inherits BaseProperties
        <Category(ClassConstants.CAT_DISPLAY)>
        Public Property Text() As String
    End Class
    Public Class CheckboxProperties
        Inherits InputPropertiesWithControlData
        <Category(ClassConstants.CAT_DISPLAY)>
        Public Property Text() As String
    End Class
    Public Class ComboboxProperties
        Inherits InputPropertiesWithControlData
        <Category(ClassConstants.CAT_DISPLAY)>
        Public Property Text() As String
        <Browsable(False)>
        Public Property ChoiceLists() As List(Of String)
        <DisplayName("Static Choice List")>
        <Category(ClassConstants.CAT_DATA)>
        <TypeConverter(GetType(ChoiceListConverter))>
        Public Property ChoiceList() As String
        <DisplayName("Display As Lookup Control")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property DisplayAsLookUpControl As Boolean
        <DisplayName("Add new values")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property AddNewValues As Boolean
        Public Class ChoiceListConverter
            Inherits TypeConverter
            Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean
                Return True
            End Function
            Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection
                Dim choiceListList = DirectCast(context.Instance, ComboboxProperties).ChoiceLists
                Dim values As New StandardValuesCollection(choiceListList)
                Return values
            End Function
            Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object
                If IsNothing(value) Then
                    Return ""
                Else
                    Return value.ToString()
                End If
            End Function
        End Class
    End Class
    Public Class DatepickerProperties
        Inherits InputProperties
    End Class
    Public Class GridViewProperties
        Inherits InputProperties
    End Class
    Public Class GridControlProperties
        Inherits InputProperties
        <DisplayName("Allow Adding New Values")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property AllowAddNewValues As Boolean
    End Class
    Public Class ButtonProperties
        Inherits InputProperties
        Private _image_Value As String
        Private _Override_SQL As String
        <Category(ClassConstants.CAT_DISPLAY)>
        Public Property Text() As String
        <DisplayName("Image")>
        <Category(ClassConstants.CAT_DISPLAY)>
        Public Property CtrlImage() As ImageValue
            Get
                Return New ImageValue(ClassAllgemeineFunktionen.NotNullString(_image_Value, ""))
            End Get
            Set(ByVal value As ImageValue)
                _image_Value = value.Value
            End Set
        End Property
        <DisplayName("Completion Override SQL")>
        <Category(ClassConstants.CAT_VALIDATION)>
        Public Property Override_SQL() As SQLValue
            Get
                Return New SQLValue(ClassAllgemeineFunktionen.NotNullString(_Override_SQL, "")) ', _sql_connection
            End Get
            Set(ByVal value As SQLValue)
                _Override_SQL = value.Value
                'SQLConnection = value.ConnectionId
            End Set
        End Property
    End Class
    Public Class LookupControlProperties
        Inherits InputPropertiesWithControlData
        <DisplayName("Multi Select")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property MultiSelect As Boolean
        <DisplayName("Allow Adding New Values")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property AllowAddNewValues As Boolean
        <DisplayName("Prevent Duplicates")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property PreventDuplicates As Boolean
        <DisplayName("Static Choice List")>
        <Category(ClassConstants.CAT_DATA)>
        Public Property ChoiceList() As String
        <DisplayName("Display As Combobox Control")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property DisplayAsComboBox As Boolean
    End Class
    Public Class LineLabelProperties
        Inherits BaseProperties
        <Browsable(False)>
        Public Overrides Property Font As Font
            Get
                Return Nothing
            End Get
            Set(value As Font)
            End Set
        End Property
    End Class
 End Module
--- a/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb
+++ b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb
@@ -1,78 +1,90 @@
 Imports System.ComponentModel
 Imports System.Drawing.Design
 Imports System.Globalization
-Imports FormsUtils
+Imports FormsUtils 'FormsUtils.dll als Fremdbibliothek für die Properties
 Module ModuleFinalIndexProperties
    <TypeConverter(GetType(PropertiesDeluxeTypeConverter))>
    Public Class FinalIndexProperties
-        <Category("Information")>
+        <DisplayName("ID")>
        <Category(ClassConstants.CAT_GENERAL)>
        <[ReadOnly](True)>
        Public Property GUID As Integer
        <Category("Information")>
        <[ReadOnly](True)>
        Public Property ConnectionId As Integer
-        <Category("Sonstiges")>
+        '<DisplayName("Connection ID")>
        '<Category(ClassConstants.CAT_INFORMATION)>
        '<[ReadOnly](True)>
        'Public Property ConnectionId As Integer
        <Category(ClassConstants.CAT_GENERAL)>
        Public Property Description As String
-        <Category("Sonstiges")>
+
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property Active As Boolean
-        <Category("Sonstiges")>
+
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property Sequence As Integer = 0
-        <Category("Sonstiges")>
+
        <DisplayName("Continue On Indifferent State")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        Public Property ContinueOnIndifferentState As Boolean
        ''' <summary>
        ''' Eigenschaft, die den SQL Editor anzeigt
        ''' </summary>
-        <Category("Daten - SQL")>
+        <DisplayName("SQL Command")>
        <Category(ClassConstants.CAT_DATA)>
        Public Property SQLCommand As SQLValue
        ' Eigenschaften für die verschiedenen Index-Typen
        <DisplayName("Value")>
-        <Category("Daten - Fester Wert")>
+        <Category(ClassConstants.CAT_DATA)>
        <PropertyAttributesProvider("IndexTypeStringProvider")>
        Public Property StringValue As String
        <DisplayName("Value")>
-        <Category("Daten - Fester Wert")>
+        <Category(ClassConstants.CAT_DATA)>
        <PropertyAttributesProvider("IndexTypeBooleanProvider")>
        Public Property BoolValue As Boolean
        <DisplayName("Value")>
-        <Category("Daten - Fester Wert")>
+        <Category(ClassConstants.CAT_DATA)>
        <PropertyAttributesProvider("IndexTypeFloatProvider")>
        Public Property FloatValue As Double
        <DisplayName("Value")>
-        <Category("Daten - Fester Wert")>
+        <Category(ClassConstants.CAT_DATA)>
        <PropertyAttributesProvider("IndexTypeDateProvider")>
        Public Property DateValue As Date
        <DisplayName("Value")>
-        <Category("Daten - Fester Wert")>
+        <Category(ClassConstants.CAT_DATA)>
        <PropertyAttributesProvider("IndexTypeIntegerProvider")>
        Public Property IntegerValue As Integer
-        <Category("Index")>
+        <DisplayName("Index")>
        <Category(ClassConstants.CAT_GENERAL)>
        <TypeConverter(GetType(IndexListConverter))>
        Public Property IndexName As String
-        <Category("Index")>
+        <DisplayName("Vector Index")>
        <Category(ClassConstants.CAT_INFORMATION)>
        <[ReadOnly](True)>
        Public Property VectorIndex As Boolean
-        <Category("Index")>
+        <Category(ClassConstants.CAT_BEHAVIOUR)>
        <DisplayName("Allow Multivalues")>
        <PropertyAttributesProvider("VectorIndexBooleanProvider")>
        Public Property AllowAddNewValues As Boolean
-        <Category("Index")>
+        <Category(ClassConstants.CAT_BEHAVIOUR)>
-        <DisplayName("IndexBehaviour")>
+        <DisplayName("Index Behaviour")>
        <TypeConverter(GetType(ClassVectorBehaviourListConverter))>
        <PropertyAttributesProvider("VectorIndexOnlyProvider")>
        Public Property VectorBehaviour As String
-        <Category("Index")>
+        <DisplayName("Prevent Duplicates")>
        <Category(ClassConstants.CAT_BEHAVIOUR)>
        <PropertyAttributesProvider("VectorIndexBooleanProvider")>
        Public Property PreventDuplicates As Boolean
@@ -85,6 +97,7 @@ Module ModuleFinalIndexProperties
        Public Property VectorBehaviourType As List(Of String)
        Public Sub VectorIndexBooleanProvider(attrs As PropertyAttributes)
            'Sd
            MaybeSetReadOnlyIfNotVectorIndex(attrs)
        End Sub
@@ -169,9 +182,14 @@ Module ModuleFinalIndexProperties
            If indexType.Contains(type) Then
                attrs.IsBrowsable = True
            Else
                If attrs.DisplayName = "Index Behaviour" Then
                    attrs.IsBrowsable = True
                Else
                    attrs.IsBrowsable = False
                End If
            End If
        End Sub
--- a/app/DD_PM_WINDREAM/ModuleHelper.vb
+++ b/app/DD_PM_WINDREAM/ModuleHelper.vb
--- a/app/TaskFlow/ModuleMySettings.vb
+++ b/app/TaskFlow/ModuleMySettings.vb
@@ -0,0 +1,31 @@
 Module ModuleMySettings
    Public Property MODULE_PM As String = "Process-Manager"
    Public Property SOURCE_INIT As Boolean = False
    Public Property CONNECTION_STRING_ECM As String = ""
    Public Property CONNECTION_STRING_IDB As String = ""
    Public Property IDB_ACTIVE As Boolean = False
    Public Property COPY_WMFILE_2TEMP As Boolean = False
    Public Property MAP_SHARE_DRIVE As String = String.Empty
    Public Property MAP_BLACKLIST As String = String.Empty
    Public Property EDMIAppServerActive As Boolean = False
    Public Property OPERATION_MODE_FS As String = "PURE_WM"
    Public Property IDB_USES_WMFILESTORE As Boolean = False
    Public Property BASIC_CONF_VISIBLE As Boolean = True
    Public Property IDB_DOC_DATA_SQL As String
    Public Property IDB_DT_DOC_DATA As DataTable
    Public Property NO_DETAIL_PROFILES As Boolean = False
    ' Debug Settings
    Public Property DEBUG As Boolean = False
    Public Property LOG_HOTSPOTS As Boolean = False
    Public Property INDEX_DMS_ERSTELLT = "DMS erstellt"
    Public Property INDEX_DMS_ERSTELLT_ZEIT = "DMS erstellt (Zeit)"
    ' These settings are loaded from the database
    Public Property VERSION_DELIMITER As String = "~"
    Public Property FILE_DELIMITER As String = "_"
    Public Property WMSESSION_STARTSTOP_STARTUP As Boolean = False
    Public Property SYS_LOCKED_MAINTENANCE As Boolean = False
    Public Property MAINFORM_CREATE_LOG_FILES As Boolean = False
 End Module
--- a/app/DD_PM_WINDREAM/ModuleRuntimeVariables.vb
+++ b/app/DD_PM_WINDREAM/ModuleRuntimeVariables.vb
@@ -1,51 +1,70 @@
-Imports WINDREAMLib
+Imports DigitalData.Modules.Config
 Imports DigitalData.Modules.Config
 Imports DigitalData.Modules.Logging
 Imports DigitalData.Modules.EDMI.API
 Imports DigitalData.Modules.Database
 Imports DigitalData.Modules.EDMI.API
 Imports DigitalData.Modules.Logging
 Imports DigitalData.Modules.Windream
 Imports DigitalData.Modules.ZooFlow
 Imports taskFLOW.ClassConfig
 Imports WINDREAMLib
 Module ModuleRuntimeVariables
    Public Const ConstAHWorkflow_BlindFile = 2
    Public Const ConstAHWorkflow_IDB = 22
    Public Const ConstWorkflowTypeRegular = 99
    Public Property DatabaseECM As MSSQLServer
    Public Property DatabaseIDB As MSSQLServer
    Public Property EDMIService As New State.ServiceState
    Public Property User As New State.UserState
    ' Diese Werte müssen später zur Laufzeit geladen werden
    Public Property ActiveWorkflowType As Integer
    Public Property BASEDATA_DT_TBDD_CONNECTION As DataTable
    Public Property BASEDATA_DT_TBDD_CATALOG As DataTable
    Public Property BASEDATA_DT_TBDD_SQL_COMMANDS As DataTable
    Public Property BASEDATA_DT_CONFIG As DataTable
    Public Property BASEDATA_DTGRID_GROUPS As DataTable
    Public Property BASEDATA_DT_CHARTS As DataTable
    Public Property BASEDATA_DT_LANGUAGE As DataTable
    Public Property BASEDATA_DT_GUI_LANGUAGE_PHRASES As DataTable
    Public Property BASEDATA_DT_PROFILES_SEARCHES_DOC As DataTable
-    Public Property BASEDATA_DT_PROFILE_SEARCHES_DOC As DataTable
+    Public Property DT_FILTERED_PROFILE_SEARCHES_DOC As DataTable
-    Public Property BASEDATA_DT_PROFILES_SEARCHES_SQL As DataTable
+    Public Property BASEDATA_DT_PROFILES_SEARCHES_DATA As DataTable
-    Public Property BASEDATA_DT_PROFILE_SEARCHES_SQL As DataTable
+    Public Property DT_FILTERED_PROFILE_SEARCHES_DATA As DataTable
    Public Property BASEDATA_DT_VW_PROFILE_USER As DataTable
    Public Property BASEDATA_TBDD_COLUMNS_FORMAT As DataTable
    Public Property BASEDATA_TBPM_PROFILE_CONTROLS As DataTable
    Public Property CURRENT_ProfilGUID As Integer
    Public Property CURRENT_ProfilName As String
    Public Property CURRENT_PROFILE_LOG_INDEX As String
-    Public Property CURRENT_HTML_DOC As String
+    Public Property PROFILE_SHOW_DOCUMENT As Boolean = True
    Public Property PROFILE_NOT_RESP_COMMENT As Boolean = True
-    Public Property CURRENT_DOC_GUID As Integer
+    Public Property CURRENT_DOC_GUID As Int64
-    Public Property CURRENT_DOC_ID As Integer
+    Public Property CURRENT_DOC_ID As Int64
    Public Property CURRENT_DOC_CURRENCY As String = "€"
    Public Property CURRENT_DOC_CREATION_DATE As String
    Public Property CURRENT_DOC_CREATION_TIME As String
    Public Property CURRENT_CONVERSATION_NEW As Long
-    Public Property CURRENT_CONN_ID As Integer
+    Public Property CURRENT_JUMP_DOC_GUID As Int64
    Public Property CURRENT_JUMP_DOC_GUID As Integer
    Public Property CURRENT_WMFILE As WMObject
    Public Property CURRENT_DOC_PATH As String
    Public Property ERROR_STATE = ""
    Public Property USER_USERNAME As String
    Public Property DT_USER2MODULE As DataTable
    Public Property CHANGES_FORM_DESIGN As Boolean = False
    Public Property USER_IS_ADMIN As Boolean = False
    Public Property USER_ID = 0
    Public Property USER_MODULE_ID = 0
    Public Property USER_PRENAME = ""
    Public Property USER_SURNAME = ""
    Public Property USER_SHORTNAME = ""
@@ -60,35 +79,50 @@ Module ModuleRuntimeVariables
    Public Property USER_RIGHT3 As Boolean = False
    Public Property USER_RIGHT4 As Boolean = False
    Public Property USER_CONFIG_DEBUG As Boolean = False
-
+    Public Property USER_CONFIG_DIRECTORY As String = ""
    Public Property USER_USERNAME_ORG As String = ""
    Public Property USER_GHOST_MODE_ACTIVE As Boolean = False
    Public Property USER_GHOST_MODE_USRNAME As String = ""
    ''' <summary>
    ''' Temporärer Ordner für Dokumentkopien (wenn COPY_WMFILE_2TEMP = True)
    ''' </summary>
    Public TEMP_DOCUMENT_FOLDER As String = String.Empty
    Public Class UserInheritanceConfirmation
        Public Property ColumnName As String = ""
        Public Property Count As Integer
    End Class
    Public Property UserInheritance_ConfirmationByColumn As New List(Of UserInheritanceConfirmation)
    Public Property FORCE_LAYOUT_OVERVIEW As Boolean = False
-    Public Property SHOW_CHARTS As Boolean = False
+    Public Property SHOW_CHARTS As Boolean = True
    Public Property SHOW_MASS_VALIDATOR As Boolean = True
    Public Property WORKING_MODE As String = ""
    Public Property MONITORING_ACTIVE As Boolean = False
    Public Property EXCEL_OVERVIEW As Boolean = False
    Public Property GHOSTMODE_ACTIVE As Boolean = False
-    Public Property RIBBON_COLOR_SCHEME As String = "Blue"
+    Public Property RIBBON_COLOR_SCHEME As String = ""
    Public Property ADDITIONAL_TITLE As String = ""
    Public Property CONV_IDENTIFICATION As String = "Username"
    Public Property POPUP_REMINDER_ACTIVE As Boolean = True
    Public Property INACTIVITY_DURATION As Integer = 0
    Public Property INACTIVITYRecognized As Boolean = False
    Public Property InheritanceMsgAmount As Integer = 5
    Public Property LAST_EDITED_COLUMN As String = "NONE"
    Public Property LAST_ADDED_COLUMN As String = "NONE"
    Public Property MON_EDITED_COLUMN As String = "NONE"
    Public Property MON_ADDED_COLUMN As String = "NONE"
    Public Property USE_APPSERVER As Boolean = False
    Public Property SEARCH1 As String = ""
    Public Property SEARCH2 As String = ""
    Public Property TL_ICON As Boolean = True
-
+    Public Property TITLE_NOTIFICATIONS As String = ""
    Public Property START_CW As Boolean = False
    Public Property START_CW_CAPTION As String
    Public Property START_CW_LOC_VARIANT As String = 0
    Public Property RibbonPageCustTitle As String = ""
    Public Property RibbonPageCustItm1 As String = ""
    Public Property ButtonExport2Folder_Caption As String = ""
    Public Property ButtonExport2Folder_Mode As String = ""
    Public Property ButtonExport2Folder_RootFolder As String = ""
@@ -100,12 +134,10 @@ Module ModuleRuntimeVariables
    Public Property CURRENT_INDEX_ID As Integer
    Public Property CURRENT_OBJECTTYPE As String
    Public Property CURRENT_DESIGN_TYPE As String = "FINAL_INDEX"
    Public Property CURRENT_SQL_CON As Integer
    Public Property CURRENT_SQL_COMAMND As String
    Public Property CURRENT_DT_SQL_CONFIG_TABLE As DataTable
    Public Property CURRENT_CLICKED_PROFILE_ID As Integer = 0
    Public Property CURRENT_CLICKED_PROFILE_TITLE As String
    Public Property CURRENT_WMObjecttype As String
    Public Property DT_CLIENT_USER As DataTable
    Public Property CLIENT_SELECTED As Integer = 0
@@ -118,26 +150,22 @@ Module ModuleRuntimeVariables
    Public Property CURRENT_DT_MASS_CHANGE_DOCS As DataTable
    Public Property CURRENT_DT_FINAL_INDEXING As DataTable
    Public Property CURRENT_DT_PROFILES As DataTable
    Public Property CURRENT_DT_PROFILE_LANGUAGE As DataTable
    Public Property CURRENT_DT_PROFILE As DataTable
-
+    Public Property CURRENT_CONTROL_NAME_LIST As New List(Of String)
-
+    Public Property COCKPIT_MONITOR_ID As Integer = 0
-    Public CURRENT_INDEX_ARRAY(100, 250) As String
+    Public Property COCKPIT_CHART_ID As Integer
    Public Property DTVWCONTROLS_INDEX As DataTable
    Public Property DTVWCONTROL_INDEX As DataTable
    Public Property DTCONTROLS_WITH_SQL As DataTable
-
+    Public Property DTTBPM_PROFILE_FINAL_INDEXING As DataTable
    Public Property CURRENT_CONTROL_ID As Integer
    Public Property errormessage As String
    Public Property WINDREAM As ClassPMWindream
    Public Property WINDREAM_MOD As Windream
    Public Property WINDREAM_ALLG As ClassWindream_allgemein
    Public Property FINALINDICES As ClassFinalIndex
    Public Property IDBData As ClassIDBData
@@ -152,9 +180,23 @@ Module ModuleRuntimeVariables
    Public Property _Client As Client
-    Public Property Database_ECM As MSSQLServer
+    Public Property WMSUFFIX As String
-    Public Property Database_IDB As MSSQLServer
+    Public Property WMDRIVE_LETTER As String
    Public Property DatabaseFallback As DatabaseWithFallback
    Public Property dbECMInitialized As Boolean = False
    Public Property dbIDBInitialized As Boolean = False
    Public Property Timer5Mins_running As Boolean = False
    Public Property TimerRefresh_running As Boolean = False
    Public Property SQL_PROFILES_USER As String = ""
    Public Property SQL_VALIDATOR_SEARCHES As String = ""
    Public Property SQL_WF_MESSAGES As String = ""
    Public WM_AHWF_docPath As String
    Public LIC_MODULES As String = "NONE"
    Public oSQLLoginAttempt As String
    Public MVSource_AllIndicies As List(Of String)
 End Module
--- a/Project/Application.Designer.vb
+++ b/Project/Application.Designer.vb
@@ -32,7 +32,13 @@ Namespace My
        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
        Protected Overrides Sub OnCreateMainForm()
-            Me.MainForm = Global.DD_ProcessManager.frmMain
+            Me.MainForm = Global.taskFLOW.frmMain
        End Sub
        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
        Protected Overrides Function OnInitialize(ByVal commandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
            Me.MinimumSplashScreenDisplayTime = 0
            Return MyBase.OnInitialize(commandLineArgs)
        End Function
    End Class
 End Namespace
--- a/Project/Application.myapp
+++ b/Project/Application.myapp
@@ -1,10 +1,12 @@
-<?xml version="1.0" encoding="utf-16"?>
+<?xml version="1.0" encoding="utf-8"?>
-<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+<MyApplicationData xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
  <MySubMain>true</MySubMain>
  <MainForm>frmMain</MainForm>
  <SingleInstance>false</SingleInstance>
  <ShutdownMode>0</ShutdownMode>
  <EnableVisualStyles>true</EnableVisualStyles>
  <AuthenticationMode>0</AuthenticationMode>
  <MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
  <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
  <HighDpiMode>0</HighDpiMode>
 </MyApplicationData>
--- a/Project/AssemblyInfo.vb
+++ b/Project/AssemblyInfo.vb
@@ -1,4 +1,5 @@
-Imports System
+Imports System.Resources
 Imports System
 Imports System.Reflection
 Imports System.Runtime.InteropServices
@@ -8,12 +9,12 @@ Imports System.Runtime.InteropServices
 ' Die Werte der Assemblyattribute überprüfen
-<Assembly: AssemblyTitle("Process Manager")> 
+<Assembly: AssemblyTitle("taskFLOW")>
 <Assembly: AssemblyDescription("")>
 <Assembly: AssemblyCompany("Digital Data")>
-<Assembly: AssemblyProduct("Process Manager")>
+<Assembly: AssemblyProduct("taskFLOW")>
-<Assembly: AssemblyCopyright("Copyright © Digital Data 2021")>
+<Assembly: AssemblyCopyright("Digital Data 2026")>
-<Assembly: AssemblyTrademark("2304")>
+<Assembly: AssemblyTrademark("")>
 <Assembly: ComVisible(False)>
@@ -31,5 +32,6 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
-<Assembly: AssemblyVersion("2.3.0.4")>
+<Assembly: AssemblyVersion("3.0.0.0")>
 <Assembly: AssemblyFileVersion("1.0.0.0")>
 <Assembly: NeutralResourcesLanguage("")>
--- a/Project/Resources.Designer.vb
+++ b/Project/Resources.Designer.vb
@@ -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", "16.0.0.0"),  _
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"),  _
     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
@@ -39,7 +39,7 @@ Namespace My.Resources
        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
            Get
                If Object.ReferenceEquals(resourceMan, Nothing) Then
-                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_ProcessManager.Resources", GetType(Resources).Assembly)
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("taskFLOW.Resources", GetType(Resources).Assembly)
                    resourceMan = temp
                End If
                Return resourceMan
@@ -90,6 +90,36 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property actions_table() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("actions_table", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property actions_user() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("actions_user", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property adateoccuring() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("adateoccuring", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -160,6 +190,16 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property AttachFileHS() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("AttachFileHS", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
@@ -251,12 +291,42 @@ Namespace My.Resources
        End Property
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
-        Friend ReadOnly Property Checkbox() As System.Drawing.Bitmap
+        Friend ReadOnly Property cancel1() As DevExpress.Utils.Svg.SvgImage
            Get
-                Dim obj As Object = ResourceManager.GetObject("Checkbox", resourceCulture)
+                Dim obj As Object = ResourceManager.GetObject("cancel1", resourceCulture)
-                Return CType(obj,System.Drawing.Bitmap)
+                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property chartdesigner() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("chartdesigner", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property chartdesigner1() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("chartdesigner1", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property chartdesigner2() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("chartdesigner2", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
@@ -270,6 +340,16 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property Checkboxbmp() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("Checkboxbmp", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -290,6 +370,16 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property color() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("color", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -400,6 +490,26 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property DD_taskFLOW_BOOT() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("DD_taskFLOW_BOOT", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property DD_taskFLOW_ICON() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("DD_taskFLOW_ICON", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
@@ -600,6 +710,16 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property formatastable() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("formatastable", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -620,6 +740,16 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property groupby() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("groupby", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -690,6 +820,26 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property insertcombobox() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("insertcombobox", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property itemtypechecked() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("itemtypechecked", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -850,6 +1000,16 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property pencolor() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("pencolor", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -880,6 +1040,16 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property publicfix_32x32() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("publicfix_32x32", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -960,6 +1130,36 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property save1() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("save1", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property seach_typo() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("seach_typo", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property search() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("search", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -980,6 +1180,26 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property searchFlow_icon() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("searchFlow_icon", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property security_key() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("security_key", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
@@ -1080,6 +1300,36 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property task() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("task", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property taskflow_boot() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("taskflow_boot", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property taskFlow_icon() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("taskFlow_icon", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -1100,6 +1350,16 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
        '''</summary>
        Friend ReadOnly Property textthatcontains() As DevExpress.Utils.Svg.SvgImage
            Get
                Dim obj As Object = ResourceManager.GetObject("textthatcontains", resourceCulture)
                Return CType(obj,DevExpress.Utils.Svg.SvgImage)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
--- a/Show More
+++ b/Show More