merge

.gitignore

@@ -155,4 +155,7 @@ $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
+/app/.vs/DD_PM_WINDREAM/v16/Server/sqlite3/storage.ide-wal
+/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

app/DD_PM_WINDREAM.sln

@@ -1,12 +1,14 @@
 
 Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio 15
+# Visual Studio Version 16
-VisualStudioVersion = 15.0.26228.9
+VisualStudioVersion = 16.0.29728.190
 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}") = "Setup", "Setup\Setup.wixproj", "{E714688A-5E3D-4229-9645-9FB650139B47}"
 EndProject
+Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "SetupVS19", "SetupVS19\SetupVS19.wixproj", "{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}"
+EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
 		CD_ROM|x86 = CD_ROM|x86
@@ -36,8 +38,21 @@ Global
 		{E714688A-5E3D-4229-9645-9FB650139B47}.Release|x86.Build.0 = Release|x86
 		{E714688A-5E3D-4229-9645-9FB650139B47}.SingleImage|x86.ActiveCfg = Release|x86
 		{E714688A-5E3D-4229-9645-9FB650139B47}.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|x86.ActiveCfg = Debug|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.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|x86.ActiveCfg = Release|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.Build.0 = Release|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.ActiveCfg = Release|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.Build.0 = Release|x86
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE
 	EndGlobalSection
+	GlobalSection(ExtensibilityGlobals) = postSolution
+		SolutionGuid = {D2AB72E6-23F2-4C08-95A0-55C39BACF5D7}
+	EndGlobalSection
 EndGlobal

app/DD_PM_WINDREAM/App.config

@@ -1,19 +1,63 @@
-<?xml version="1.0"?>
+<?xml version="1.0" encoding="utf-8"?>
 <configuration>
   <configSections>
+    <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
+      <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_PM_WINDREAM.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false"/>
+      <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>
+    <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_PM_WINDREAM.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"
+    <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_PM_WINDREAM.My.MySettings>
+    <DD_ProcessManager.My.MySettings>
       <setting name="frmTableColumns_Position" serializeAs="String">
         <value>0, 0</value>
       </setting>
@@ -54,7 +98,7 @@
         <value>0, 0</value>
       </setting>
       <setting name="frmValSearchSplitterDistance" serializeAs="String">
-                <value>558</value>
+        <value>563</value>
       </setting>
       <setting name="frmMainWindowState" serializeAs="String">
         <value>Normal</value>
@@ -68,6 +112,6 @@
       <setting name="frmValidatorWindowState" serializeAs="String">
         <value>Normal</value>
       </setting>
-        </DD_PM_WINDREAM.My.MySettings>
+    </DD_ProcessManager.My.MySettings>
   </userSettings>
 </configuration>

app/DD_PM_WINDREAM/ClassAllgemeineFunktionen.vb

@@ -5,9 +5,9 @@ Imports WINDREAMLib
 
 Public Class ClassAllgemeineFunktionen
     Public Shared Function GUI_LANGUAGE_INFO(pTITLE As String)
-        Dim oFilteredDatatable As DataTable = CURRENT_DT_GUI_LANGUAGE_PHRASES.Clone()
+        Dim oFilteredDatatable As DataTable = BASEDATA_DT_GUI_LANGUAGE_PHRASES.Clone()
         Dim oExpression = $"LANGUAGE ='{USER_LANGUAGE}' AND TITLE = '{pTITLE}'"
-        CURRENT_DT_GUI_LANGUAGE_PHRASES.Select(oExpression).CopyToDataTable(oFilteredDatatable, LoadOption.PreserveChanges)
+        BASEDATA_DT_GUI_LANGUAGE_PHRASES.Select(oExpression).CopyToDataTable(oFilteredDatatable, LoadOption.PreserveChanges)
         If oFilteredDatatable.Rows.Count = 1 Then
             If oFilteredDatatable.Rows(0).Item("CAPT_TYPE") = "MsgBox" Then
                 Return oFilteredDatatable
@@ -25,9 +25,9 @@ Public Class ClassAllgemeineFunktionen
         End If
     End Function
     Public Shared Function GUI_LANGUAGE_MSGBOX(pTITLE As String)
-        Dim oFilteredDatatable As DataTable = CURRENT_DT_GUI_LANGUAGE_PHRASES.Clone()
+        Dim oFilteredDatatable As DataTable = BASEDATA_DT_GUI_LANGUAGE_PHRASES.Clone()
         Dim oExpression = $"LANGUAGE = '{USER_LANGUAGE}' AND TITLE = '{pTITLE}'"
-        CURRENT_DT_GUI_LANGUAGE_PHRASES.Select(oExpression).CopyToDataTable(oFilteredDatatable, LoadOption.PreserveChanges)
+        BASEDATA_DT_GUI_LANGUAGE_PHRASES.Select(oExpression).CopyToDataTable(oFilteredDatatable, LoadOption.PreserveChanges)
         If oFilteredDatatable.Rows.Count = 1 Then
             Return oFilteredDatatable.Rows(0)
         Else
@@ -49,7 +49,7 @@ Public Class ClassAllgemeineFunktionen
                 LOGGER.Debug("User logged in....")
                 Return True
             Else
-                LOGGER.Info(" >> User could not be logged in/out....")
+                LOGGER.Info("User could not be logged in/out....")
                 Return False
             End If
         Catch ex As Exception
@@ -64,7 +64,7 @@ Public Class ClassAllgemeineFunktionen
             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) <> "" Then
-                LOGGER.Info("Eintrag in Log-Tabelle konnte nicht erstellt werden!!", True)
+                LOGGER.Warn("...Eintrag in Log-Tabelle konnte nicht erstellt werden!!", True)
             End If
         Catch ex As Exception
             LOGGER.Error(ex)
@@ -156,7 +156,7 @@ Public Class ClassAllgemeineFunktionen
             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")
+                LOGGER.Info("Datei " & xffres & " erfolgreich gelöscht")
                 Return True
             Else
                 Return Nothing
@@ -164,7 +164,7 @@ Public Class ClassAllgemeineFunktionen
         Catch ex As Exception
             LOGGER.Error(ex)
             LOGGER.Info(" Fehler bei Delete_xffres", True)
-            LOGGER.Info(">> Fehlermeldung: " & ex.Message)
+            LOGGER.Info("Fehlermeldung: " & ex.Message)
         End Try
     End Function
     'Public Function Delete_File(originFile As String)
@@ -172,7 +172,7 @@ Public Class ClassAllgemeineFunktionen
 
     '        If file_exists(originFile, False) = True Then
     '            System.IO.File.Delete(originFile)
-    '            LOGGER.Info(">> Manuelles Löschen: Datei " & originFile & " erfolgreich gelöscht", False)
+    '            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)
@@ -180,7 +180,7 @@ Public Class ClassAllgemeineFunktionen
     '        End If
     '    Catch ex As Exception
     '        LOGGER.Info(" Fehler bei Delete_File", True)
-    '        LOGGER.Info(">> Fehlermeldung: " & ex.Message)
+    '        LOGGER.Info("Fehlermeldung: " & ex.Message)
     '    End Try
     'End Function
 
@@ -201,18 +201,18 @@ Public Class ClassAllgemeineFunktionen
                     version = version + 1
                 Loop
                 My.Computer.FileSystem.MoveFile(vMove_File, _Ziel)
-                LOGGER.Info(">> Datei erfolgreich verschoben - Ziel: " & _Ziel)
+                LOGGER.Info("Datei erfolgreich verschoben - Ziel: " & _Ziel)
             Else
-                LOGGER.Info(">> Ziel und Quellpfad sind identisch!")
+                LOGGER.Info("Ziel und Quellpfad sind identisch!")
             End If
 
             Return ""
         Catch ex As Exception
             LOGGER.Error(ex)
             LOGGER.Info("Fehler bei Move2Folder", True)
-            LOGGER.Info(">> Fehlermeldung")
+            LOGGER.Info("Fehlermeldung")
-            LOGGER.Info(">>" & ex.Message)
+            LOGGER.Info(ex.Message)
-            Insert_LogEntry($"ERROR >> {ex.Message}")
+            Insert_LogEntry($"ERROR {ex.Message}")
             Return ex.Message
         End Try
     End Function
@@ -298,7 +298,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:")
-            Insert_LogEntry($"ERROR Execute_Scalar_SQLServer>> {ex.Message}")
+            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)
@@ -332,7 +332,7 @@ Public Class ClassAllgemeineFunktionen
         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:")
-            Insert_LogEntry($"ERROR Execute_Scalar_Oracle>> {ex.Message}")
+            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)

app/DD_PM_WINDREAM/ClassControlCreator.vb

@@ -405,7 +405,7 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateExistingGridControl(row As DataRow, columns As List(Of DD_DMSLiteDataSet.TBPM_CONTROL_TABLERow), designMode As Boolean) As GridControl
+    Public Shared Function CreateExistingGridControl(row As DataRow, DT_MY_COLUMNS As DataTable, designMode As Boolean) As GridControl
         Dim oControl As GridControl = CreateBaseControl(New GridControl(), row, designMode)
         Dim oDatatable As New DataTable
         Dim oView As GridView
@@ -450,13 +450,13 @@ Public Class ClassControlCreator
 
         GridTables.Clear()
 
-        For Each oRow As DD_DMSLiteDataSet.TBPM_CONTROL_TABLERow In columns
+        For Each oRow As DataRow In DT_MY_COLUMNS.Rows
             ' Create Columns in Datatable
 
             Dim oColumn = New DataColumn() With {
                 .DataType = GetType(String),
-                .ColumnName = oRow.SPALTENNAME,
+                .ColumnName = oRow.Item("SPALTENNAME"),
-                .Caption = oRow.SPALTEN_HEADER,
+                .Caption = oRow.Item("SPALTEN_HEADER"),
                 .ReadOnly = False
             }
 
@@ -470,9 +470,9 @@ Public Class ClassControlCreator
                 If oConnectionId > 0 And oSqlCommand <> "" Then
                     Try
                         Dim oComboboxDataTable As DataTable = ClassDatabase.Return_Datatable_ConId(oSqlCommand, oConnectionId)
-                        GridTables.Add(oRow.SPALTENNAME, oComboboxDataTable)
+                        GridTables.Add(oRow.Item("SPALTENNAME"), oComboboxDataTable)
                     Catch ex As Exception
-                        LOGGER.Warn("Could not load data for column {0} in control {1}", oRow.SPALTENNAME, oControl.Name)
+                        LOGGER.Warn("Could not load data for column {0} in control {1}", oRow.Item("SPALTENNAME"), oControl.Name)
                         LOGGER.Error(ex)
                     End Try
                 End If
@@ -484,18 +484,27 @@ Public Class ClassControlCreator
         oControl.DataSource = oDatatable
         oControl.RefreshDataSource()
         oControl.ForceInitialize()
+        oView.PopulateColumns()
+
+        For Each oRow As DataRow In DT_MY_COLUMNS.Rows
+            Dim o = oRow.Item("SPALTENNAME")
+            Dim p = oRow.Item("SPALTENBREITE")
+            Dim ocount = oView.Columns.Count
+
+            ' oGridView.Columns(oRow.Item("SPALTENNAME")).Width = oRow.Item("SPALTENBREITE")
+        Next
+
 
         AddHandler oView.CellValueChanged, AddressOf HandleCellValueChanged
         AddHandler oView.CustomRowCellEdit, Sub(sender As Object, e As CustomRowCellEditEventArgs)
-                                                For Each oRow As DD_DMSLiteDataSet.TBPM_CONTROL_TABLERow In columns
+                                                For Each oRow As DataRow In DT_MY_COLUMNS.Rows
-                                                    If oRow.SPALTENNAME = e.Column.FieldName Then
+                                                    If oRow.Item("SPALTENNAME") = e.Column.FieldName Then
 
                                                         If GridTables.ContainsKey(e.Column.FieldName) Then
                                                             Dim oComboboxDataTable As DataTable = GridTables.Item(e.Column.FieldName)
                                                             Dim oEditor As New RepositoryItemComboBox()
                                                             Dim oItems As New List(Of String)
 
-                                                            oEditor.AutoComplete = True
                                                             AddHandler oEditor.Validating, Sub(_sender As ComboBoxEdit, _e As CancelEventArgs)
                                                                                                If oItems.Contains(_sender.EditValue) Then
                                                                                                    _e.Cancel = False
@@ -504,9 +513,14 @@ Public Class ClassControlCreator
                                                                                                End If
 
                                                                                            End Sub
+                                                            For Each oRow2 As DataRow In oComboboxDataTable.Rows
+                                                                Dim oValue = oRow2.Item(0)
+
+                                                                Try
+                                                                    oValue &= $" | {oRow2.Item(1)}"
+                                                                Catch ex As Exception
+                                                                End Try
 
-                                                            For Each oRow2 In oComboboxDataTable.Rows
-                                                                Dim oValue = oRow2.item(0)
                                                                 oEditor.Items.Add(oValue)
                                                                 oItems.Add(oValue)
                                                             Next
@@ -517,6 +531,17 @@ Public Class ClassControlCreator
                                                 Next
                                             End Sub
 
+        AddHandler oView.CellValueChanged, Sub(sender As Object, e As CellValueChangedEventArgs)
+                                               Dim oValue = e.Value.ToString()
+                                               Dim oView2 As GridView = TryCast(sender, GridView)
+
+
+                                               If oValue.Contains(" | ") Then
+                                                   oValue = oValue.Split(" | ").ToList().Item(0)
+                                                   oView2.SetRowCellValue(e.RowHandle, e.Column, oValue)
+                                               End If
+                                           End Sub
+
         Return oControl
     End Function
 
@@ -577,7 +602,7 @@ Public Class ClassControlCreator
                     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)
+                        LOGGER.Info("CONNECTION NOT DEFINED - CTRL_GUID:" & CURRENT_CONTROL_ID)
                     End If
 
                     CURR_SELECT_CONTROL = IIf(IsDBNull(row("SQL_UEBERPRUEFUNG")), "", row("SQL_UEBERPRUEFUNG"))
@@ -645,7 +670,7 @@ Public Class ClassControlCreator
         Try
 
             Dim dt As New DataTable
-            dt = CURRENT_DT_TBDD_CONNECTION
+            dt = BASEDATA_DT_TBDD_CONNECTION
             '  Define the filter
             Dim filter As String = "GUID = " & CON_ID
             ' Filter the rows using Select() method of DataTable

app/DD_PM_WINDREAM/ClassDatabase.vb

@@ -61,12 +61,12 @@ Public Class ClassDatabase
         Try
             Dim SQLconnect As New SqlClient.SqlConnection
             Dim SQLcommand As SqlClient.SqlCommand
-            LOGGER.Debug(">>> ReturnDatatable: " & Select_anweisung)
+            LOGGER.Debug("ReturnDatatable: " & Select_anweisung)
             SQLconnect.ConnectionString = SQLSERVERConnectionString
             SQLconnect.Open()
             SQLcommand = SQLconnect.CreateCommand
             SQLcommand.CommandText = Select_anweisung
-            LOGGER.Debug(">>> Execute ReturnDatatable: " & Select_anweisung)
+            LOGGER.Debug("Execute ReturnDatatable: " & Select_anweisung)
             Dim adapter1 As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter(SQLcommand)
             Dim dt As DataTable = New DataTable()
             adapter1.Fill(dt)
@@ -74,16 +74,13 @@ Public Class ClassDatabase
             Return dt
         Catch ex As Exception
             LOGGER.Warn($"Unexpected Error in Return_Datatable: {ex.Message} [{Select_anweisung}]")
-            If userInput = True Then
-                MsgBox("Error in Return Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & Select_anweisung, MsgBoxStyle.Critical)
-            End If
             Return Nothing
         End Try
     End Function
     Public Shared Function Return_Datatable_ConId(SQLCommand As String, ConnID As Integer, Optional userInput As Boolean = False)
         Try
             Dim oConnString = Get_ConnectionString(ConnID)
-            LOGGER.Debug(">>> ReturnDatatable: " & SQLCommand)
+            LOGGER.Debug("ReturnDatatable: " & SQLCommand)
             Dim oSQLconnect As New SqlClient.SqlConnection
             Dim oSQLcommand As SqlClient.SqlCommand
             oSQLconnect.ConnectionString = oConnString
@@ -106,7 +103,7 @@ Public Class ClassDatabase
     End Function
     Public Shared Function Return_Datatable_ConStr(SQLCommand As String, ConNStr As String, Optional userInput As Boolean = False)
         Try
-            LOGGER.Debug(">>> ReturnDatatable: " & SQLCommand)
+            LOGGER.Debug("ReturnDatatable: " & SQLCommand)
             Dim oSQLconnect As New SqlClient.SqlConnection
             Dim oSQLcommand As SqlClient.SqlCommand
             oSQLconnect.ConnectionString = ConNStr
@@ -216,7 +213,7 @@ Public Class ClassDatabase
             SQLcommand = SQLconnect.CreateCommand
             'Update Last Created Record in Foo
             SQLcommand.CommandText = cmdscalar
-            LOGGER.Debug(">>> Execute Scalar: " & cmdscalar)
+            LOGGER.Debug("Execute Scalar: " & cmdscalar)
             result = SQLcommand.ExecuteScalar()
             SQLcommand.Dispose()
             SQLconnect.Close()

app/DD_PM_WINDREAM/ClassDragDrop.vb

@@ -61,10 +61,10 @@ Public Class ClassDragDrop
                         Try
                             dragDropData = row.Item("GUID") & "|" & source
                         Catch ex As Exception
-                            LOGGER.Error(ex)
                             Try
                                 dragDropData = row.Item("USER_ID") & "|" & source
                             Catch ex1 As Exception
+                                LOGGER.Warn($"Error in view_MouseMove(2nd exception): " & ex.Message)
                                 MsgBox("Error in view_MouseMove(2nd exception): " & ex.Message, MsgBoxStyle.Critical)
                             End Try
 

app/DD_PM_WINDREAM/ClassFinalizeDoc.vb

@@ -25,7 +25,7 @@
                         '' alle Vorkommen innerhalbd er Namenkonvention durchlaufen
                         'For Each element As System.Text.RegularExpressions.Match In elemente
                         '    Try
-                        '        If LogErrorsOnly = False Then LOGGER.Info(" >> element in RegeX: " & element.Value)
+                        '        If LogErrorsOnly = False Then LOGGER.Info(" element in RegeX: " & element.Value)
                         '        Dim WDINDEXNAME = element.Value.Substring(2, element.Value.Length - 3)
                         '        Dim wertWD = WMObject.GetVariableValue(WDINDEXNAME)
                         '        If Not IsNothing(wertWD) Then
@@ -41,7 +41,7 @@
                         sql_Statement = clsPatterns.ReplaceInternalValues(sql_Statement)
                         sql_Statement = clsPatterns.ReplaceWindreamIndicies(sql_Statement, WMObject)
 
-                        LOGGER.Debug(">>> sql after ReplaceAllValues: " & sql_Statement)
+                        LOGGER.Debug("sql after ReplaceAllValues: " & sql_Statement)
                         Dim dynamic_value = ClassDatabase.Execute_Scalar(sql_Statement, CONNECTION_STRING, True)
                         If Not IsNothing(dynamic_value) Then
                             value = dynamic_value
@@ -83,9 +83,9 @@
                             LOGGER.Debug("FINALER INDEX '" & INDEXNAME & "' WURDE ERFOLGREICH GESETZT")
                             LOGGER.Debug("")
                             'Nun das Logging
-                            If CURRENT_PROFILE_VEKTOR_LOG <> "" Then
+                            If CURRENT_PROFILE_LOG_INDEX <> "" Then
                                 Dim logstr = Return_LOGString(value, "DDFINALINDEX", INDEXNAME)
-                                Indexiere_VektorfeldPM(logstr, CURRENT_PROFILE_VEKTOR_LOG, WMObject)
+                                Indexiere_VektorfeldPM(logstr, CURRENT_PROFILE_LOG_INDEX, WMObject)
                             End If
 
                         Else
@@ -107,7 +107,7 @@
             End If
         Catch ex As Exception
             LOGGER.Error(ex)
-            LOGGER.Info(">> unexpected error in Write_Final_Metadata: " & ex.Message.ToString, True)
+            LOGGER.Info("unexpected error in Write_Final_Metadata: " & ex.Message.ToString, True)
             Return False
         End Try
     End Function
@@ -147,7 +147,7 @@
         End If
 
         'Catch ex As Exception
-        '    LOGGER.Info(">> Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString, True)
+        '    LOGGER.Info("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString, True)
         '    Return Err()
         'End Try
     End Function
@@ -200,7 +200,7 @@
             PM_String = "DD-PM#" & Bezeichner & "#" & input & "#" & USER_USERNAME & "#" & Now.ToString
         Catch ex As Exception
             LOGGER.Error(ex)
-            LOGGER.Info(">> Fehler in Return_PM_VEKTOR: " & ex.Message, True)
+            LOGGER.Info("Fehler in Return_PM_VEKTOR: " & ex.Message, True)
             PM_String = "DD-PM ERROR: " & ex.Message
         End Try
         Return PM_String
@@ -217,7 +217,7 @@
 
         Catch ex As Exception
             LOGGER.Error(ex)
-            LOGGER.Info(">> Fehler in Return_LOGString: " & ex.Message, True)
+            LOGGER.Info("Fehler in Return_LOGString: " & ex.Message, True)
             PM_String = "DD-PM ERROR: " & ex.Message
         End Try
         Return PM_String

app/DD_PM_WINDREAM/ClassIDBData.vb

@@ -11,7 +11,7 @@
         Dim oSQL = $"SELECT * FROM VWIDB_BE_ATTRIBUTE"
         DTVWIDB_BE_ATTRIBUTE = ClassDatabase.Return_Datatable_ConStr(oSQL, CONNECTION_STRING_IDB)
     End Function
-    Public Source_IDBIndices As List(Of String)
+    Public IDBSystemIndices As List(Of String)
     Public Function GetIndicesByBE(ByVal BusinessEntity As String) As String()
         Try
             Dim aNames(4) As String
@@ -20,7 +20,7 @@
             aNames(2) = "IDBCreatedWho"
             aNames(3) = "IDBChangedWhen"
             aNames(4) = "IDBChangedWho"
-            Source_IDBIndices = aNames.ToList
+            IDBSystemIndices = aNames.ToList
             ' Array für Indizes vorbereiten
             Dim aIndexNames(DTVWIDB_BE_ATTRIBUTE.Rows.Count + 4) As String
             Dim oCount As Integer = 0
@@ -130,16 +130,29 @@
         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}'"
+            ClassDatabase.Execute_non_Query_ConStr(oDELSQL, CONNECTION_STRING_IDB)
 
-    Public Function SetVariableValue(oAttributeName As String, oNewValue As Object, Optional CheckDeleted As Boolean = False)
+        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
-                    Dim oOldAttributeResult = GetVariableValue(oAttributeName)
+                    oOldAttributeResult = GetVariableValue(oAttributeName, oIDBTyp)
-                    Dim oTypeOldResult = oOldAttributeResult.GetType.ToString
+                    oTypeOldResult = oOldAttributeResult.GetType.ToString
                     If oTypeOldResult = "System.Data.DataTable" Then
                         Dim myOldValues As DataTable = oOldAttributeResult
                         If myOldValues.Rows.Count > 1 Then
@@ -158,14 +171,38 @@
                                 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
+                        If oDTMyNewValues.Rows.Count > 1 Then
+                            Dim oExists As Boolean = False
+                            For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
+                                Dim oInfo1 = $"Checking oldValue[{oOldAttributeResult}] vs NewValue [{oNewValueRow.Item(1)}]"
+                                If oNewValueRow.Item(1).ToString.ToUpper = oOldAttributeResult.ToString.ToUpper Then
+                                    oExists = True
+                                    Exit For
                                 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
+                            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)
                         End If
 
+                    End If
+
+                End If
 
                 For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
                     Dim oSuccess As Boolean = False

app/DD_PM_WINDREAM/ClassImageSelector.vb

@@ -1,6 +1,6 @@
 Imports System.ComponentModel
 Imports System.Drawing.Design
-Imports DD_PM_WINDREAM.InputProperties
+Imports DD_ProcessManager.InputProperties
 
 Public Class ClassImageSelector
     Inherits UITypeEditor

app/DD_PM_WINDREAM/ClassInit.vb

@@ -3,6 +3,7 @@ Imports System.Globalization
 Imports DLLLicenseManager
 Imports DigitalData.Modules.Logging
 Imports DigitalData.Modules.Config
+Imports System.Threading
 
 Public Class ClassInit
 
@@ -21,9 +22,10 @@ Public Class ClassInit
 
     <STAThread()>
     Public Sub InitUserConfig()
-        CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, Application.UserAppDataPath, Application.CommonAppDataPath)
+        CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, Application.UserAppDataPath, Application.CommonAppDataPath, Application.StartupPath)
         LOGGER.Info("Config loaded")
 
+
         If CONFIG.Config.ConnectionStringTest <> String.Empty And CONFIG.Config.TestMode = True Then
             LOGGER.Debug("Test Connection String loaded")
             CONNECTION_STRING = DecryptConnectionString(CONFIG.Config.ConnectionStringTest)
@@ -99,7 +101,7 @@ Public Class ClassInit
     Sub Refresh_Licence()
         Try
             Me._lizenzManager = New ClassLicenseManager("#DigitalData35452!#", "")
-            Dim lic As String = CURRENT_DT_CONFIG.Rows(0).Item("LIZENZEN") ' ClassDatabase.Execute_Scalar("SELECT LIZENZEN FROM TBPM_KONFIGURATION WHERE (GUID = 1)", MyConnectionString)
+            Dim lic As String = BASEDATA_DT_CONFIG.Rows(0).Item("LIZENZEN") ' ClassDatabase.Execute_Scalar("SELECT LIZENZEN FROM TBPM_KONFIGURATION WHERE (GUID = 1)", MyConnectionString)
             Dim licString = Me._lizenzManager.DecodeLicenseKey(lic)
             Dim split() = licString.ToString.Split("#")
 
@@ -128,7 +130,8 @@ Public Class ClassInit
         Try
             USER_USERNAME = Environment.UserName
             Try
-                DT_CLIENT_USER = ClassDatabase.Return_Datatable(String.Format("SELECT * FROM VWDD_USER_CLIENT WHERE UPPER(USERNAME) = UPPER('{0}')", USER_USERNAME), False)
+                Dim oSQL = $"SELECT * FROM VWDD_USER_CLIENT WHERE UPPER(USERNAME) = UPPER('{USER_USERNAME}')"
+                DT_CLIENT_USER = ClassDatabase.Return_Datatable(oSQL, False)
                 If DT_CLIENT_USER.Rows.Count > 1 Then
                     frmClientLogin.ShowDialog()
                 ElseIf DT_CLIENT_USER.Rows.Count = 1 Then
@@ -136,8 +139,9 @@ Public Class ClassInit
                 Else
                     ERROR_STATE = "NO CLIENT"
                     Dim oDT As DataTable = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("No Client relation")
+                    'Related to a client
                     '  Throw New Exception("You are not configured in the Useradministration." & vbNewLine & "Please contact the system administrator!")
-                    MsgBox(oDT.Rows(0).Item("STRING1") & vbNewLine & oDT.Rows(0).Item("STRING2"), MsgBoxStyle.Exclamation)
+                    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
@@ -146,7 +150,7 @@ Public Class ClassInit
                 CLIENT_SELECTED = 1
             End Try
 
-            LOGGER.Info(">> Username: " & USER_USERNAME)
+            LOGGER.Debug("Username: " & USER_USERNAME)
 
             Dim sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','PM',{1})", USER_USERNAME, CLIENT_SELECTED)
 
@@ -187,19 +191,12 @@ Public Class ClassInit
                 FINALINDICES.init()
                 If IDB_ACTIVE = True Then
                     IDBData = New ClassIDBData()
-
-
                 End If
 
                 Try
-                        USER_RIGHT1 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT1")
+                    USER_RIGHT_VIEW_ONLY = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT2")
                 Catch ex As Exception
-                        USER_RIGHT1 = False
+                    USER_RIGHT_VIEW_ONLY = False
-                    End Try
-                    Try
-                        USER_RIGHT2 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT2")
-                    Catch ex As Exception
-                        USER_RIGHT2 = False
                 End Try
                 Try
                     USER_RIGHT3 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT3")
@@ -215,6 +212,16 @@ Public Class ClassInit
                 '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
@@ -227,10 +234,10 @@ Public Class ClassInit
                 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!")
+                    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")
-                            LOGGER.Info(" - Wieder abgemeldet - START INCOMPLETE")
+                        LOGGER.Info("Wieder abgemeldet - START INCOMPLETE")
                         ERROR_STATE = "START INCOMPLETE"
                     End If
                 End If
@@ -248,13 +255,13 @@ Public Class ClassInit
     Public Shared Sub InitBasics()
         Try
             Dim oSql = String.Format("select * from TBPM_KONFIGURATION WHERE GUID = 1")
-            CURRENT_DT_CONFIG = ClassDatabase.Return_Datatable(oSql)
+            BASEDATA_DT_CONFIG = ClassDatabase.Return_Datatable(oSql)
-
-            oSql = "select * from TBDD_CONNECTION"
-            CURRENT_DT_TBDD_CONNECTION = ClassDatabase.Return_Datatable(oSql)
             Settings_LoadBasicConfig()
+            oSql = "select * from TBDD_CONNECTION WHERE AKTIV = 1"
+            BASEDATA_DT_TBDD_CONNECTION = ClassDatabase.Return_Datatable(oSql)
 
-            oSql = "Select * from TBDD_3RD_PARTY_MODULES"
+
+            oSql = "Select * FROM TBDD_3RD_PARTY_MODULES WHERE ACTIVE = 1"
             Dim oDT As DataTable = ClassDatabase.Return_Datatable(oSql)
             For Each oROW As DataRow In oDT.Rows
                 If oROW.Item("NAME") = "GDPICTURE" Then
@@ -262,7 +269,14 @@ Public Class ClassInit
                 End If
             Next
             oSql = "SELECT * FROM TBDD_GUI_LANGUAGE_PHRASE WHERE MODULE IN ('PM','All Modules')"
-            CURRENT_DT_GUI_LANGUAGE_PHRASES = ClassDatabase.Return_Datatable(oSql)
+            BASEDATA_DT_GUI_LANGUAGE_PHRASES = ClassDatabase.Return_Datatable(oSql)
+
+            BASEDATA_DT_PROFILES_SEARCHES_DOC = ClassDatabase.Return_Datatable("select * from TBPM_PROFILE_SEARCH where TYPE = 'DOC' AND ACTIVE = 1 ORDER BY PROFILE_ID,TAB_INDEX")
+            BASEDATA_DT_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Clone()
+
+            BASEDATA_DTGRID_GROUPS = ClassDatabase.Return_Datatable($"SELECT * FROM TBPM_MAIN_VIEW_GROUPS WHERE ACTIVE = 1")
+            oSql = "SELECT * FROM TBPM_CHART"
+            BASEDATA_DT_CHARTS = ClassDatabase.Return_Datatable(oSql)
         Catch ex As Exception
             LOGGER.Error(ex)
             LOGGER.Info("Unexpected Error in InitBasics: " & ex.Message, True)
@@ -270,6 +284,17 @@ Public Class ClassInit
         End Try
     End Sub
     <STAThread()>
+    Public Shared Sub InitBasics2()
+        Try
+            Dim oSql = String.Format("SELECT * FROM VWPM_PROFILE_USER WHERE USER_ID = {0}", USER_ID)
+            BASEDATA_DT_VW_PROFILE_USER = ClassDatabase.Return_Datatable(oSql)
+        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 Shared Function Settings_LoadBasicConfig()
         Try
             Dim sql As String = "select * from tbdd_Modules where SHORT_NAME = 'PM'"

app/DD_PM_WINDREAM/ClassParamRefresh.vb

@@ -12,7 +12,14 @@
             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("#")
 
@@ -48,6 +55,10 @@
                     End If
                 ElseIf oMode = "PM.MONITORING" Then
                     MONITORING_ACTIVE = True
+                ElseIf oMode.StartsWith("PM.COLORSCHEME") Then
+                    Dim oColorScheme = oMode.Replace("PM.COLORSCHEME=", "")
+                    RIBBON_COLOR_SCHEME = oColorScheme.ToUpper
+
                 Else
                     LOGGER.Info($"Wrong oMode: {oMode}")
                 End If

app/DD_PM_WINDREAM/ClassRefreshHelper.vb

@@ -221,5 +221,44 @@ Public Class RefreshHelper
         End Try
 
     End Sub
+    Public Class SW
+        Public label As String
+        Public stopwatch As Stopwatch
+
+        Public Sub New(label As String)
+            Me.label = label
+            stopwatch = New Stopwatch()
+            stopwatch.Start()
+        End Sub
+
+        Public Function Done() As Long
+            If LOGCONFIG.Debug = False Then
+                Return 0
+            End If
+
+            stopwatch.Stop()
+            Dim ts As TimeSpan = stopwatch.Elapsed
+
+            Dim timespan_ = String.Format("{0:00}:{1:00}.{2:00}", ts.Minutes, ts.Seconds, ts.Milliseconds / 10)
+            If ts.Minutes > 0 Then
+                timespan_ = String.Format("{0:00}:{1:00}.{2:00}", ts.Minutes, ts.Seconds, ts.Milliseconds / 10)
+            ElseIf ts.Seconds > 0 And (ts.Minutes > 0) = False Then
+                timespan_ = String.Format("{0:00}.{1:00} seconds", ts.Seconds, ts.Milliseconds / 10)
+            ElseIf (ts.Seconds > 0) = False And ts.Milliseconds > 0 Then
+                timespan_ = String.Format("{0:00}.{1:00} seconds", ts.Seconds, ts.Milliseconds / 10)
+            End If
+            If timespan_ <> "00:00.00" Then
+                Dim message = String.Format("PerformanceWatch {0} || {1}", timespan_, label)
+
+                If LOGCONFIG.Debug = True Then
+                    LOGGER.Debug(message)
+                End If
+
+            End If
+            Return stopwatch.ElapsedMilliseconds
+        End Function
+
+
+    End Class
 End Class
 

app/DD_PM_WINDREAM/ClassSQLEditor.vb

@@ -1,7 +1,7 @@
 Imports System.ComponentModel
 Imports System.Drawing.Design
 Imports System.Windows.Forms.Design
-Imports DD_PM_WINDREAM.InputProperties
+Imports DD_ProcessManager.InputProperties
 
 Public Class ClassSQLEditor
     Inherits UITypeEditor

app/DD_PM_WINDREAM/ClassWindream_allgemein.vb

@@ -240,7 +240,7 @@ LOGGER.Error(ex)
         ElseIf Path.StartsWith("\") Then
             Return Path
         Else
-            Return "\" & Path
+            oNormalizedPath = "\" & Path
         End If
 
         Return oNormalizedPath

app/DD_PM_WINDREAM/DD_DMSLiteDataSet.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_PM_WINDREAM.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.DD_ProcessManager.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">
@@ -966,8 +966,8 @@ WHERE        (GUID = @GUID)</CommandText>
                   <DbCommand CommandType="Text" ModifiedByUser="true">
                     <CommandText>INSERT INTO TBPM_PROFILE
                          (NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, 
-                         WORK_HISTORY_ENTRY, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE)
+                         WORK_HISTORY_ENTRY, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH)
-VALUES        (@NAME,@TITLE,@PRIORITY,@DESCRIPTION,@ACTIVE,@WD_SEARCH,@NO_OF_DOCUMENTS,@ADDED_WHO,@FINAL_PROFILE,@FINAL_TEXT,@MOVE2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_VEKTOR_INDEX,@WORK_HISTORY_ENTRY,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@ANNOTATE_WORK_HISTORY_ENTRY,@DISPLAY_MODE);       
+VALUES        (@NAME,@TITLE,@PRIORITY,@DESCRIPTION,@ACTIVE,@WD_SEARCH,@NO_OF_DOCUMENTS,@ADDED_WHO,@FINAL_PROFILE,@FINAL_TEXT,@MOVE2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_VEKTOR_INDEX,@WORK_HISTORY_ENTRY,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@ANNOTATE_WORK_HISTORY_ENTRY,@DISPLAY_MODE,@SQL_BTN_FINISH);        
 SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE WHERE (GUID = SCOPE_IDENTITY())</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -975,7 +975,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
                       <Parameter AllowDbNull="false" AutogeneratedName="PRIORITY" ColumnName="PRIORITY" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PRIORITY" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PRIORITY" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="DESCRIPTION" ColumnName="DESCRIPTION" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="WD_SEARCH" ColumnName="WD_SEARCH" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="WD_SEARCH" ColumnName="WD_SEARCH" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="NO_OF_DOCUMENTS" ColumnName="NO_OF_DOCUMENTS" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@NO_OF_DOCUMENTS" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="NO_OF_DOCUMENTS" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="FINAL_PROFILE" ColumnName="FINAL_PROFILE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@FINAL_PROFILE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="FINAL_PROFILE" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -990,13 +990,15 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
                       <Parameter AllowDbNull="false" AutogeneratedName="ANNOTATE_ALL_WORK_HISTORY_ENTRIES" ColumnName="ANNOTATE_ALL_WORK_HISTORY_ENTRIES" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ANNOTATE_ALL_WORK_HISTORY_ENTRIES" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ANNOTATE_ALL_WORK_HISTORY_ENTRIES" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="ANNOTATE_WORK_HISTORY_ENTRY" ColumnName="ANNOTATE_WORK_HISTORY_ENTRY" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ANNOTATE_WORK_HISTORY_ENTRY" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ANNOTATE_WORK_HISTORY_ENTRY" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="DISPLAY_MODE" ColumnName="DISPLAY_MODE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@DISPLAY_MODE" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="DISPLAY_MODE" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="SQL_BTN_FINISH" ColumnName="SQL_BTN_FINISH" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_BTN_FINISH" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_BTN_FINISH" SourceColumnNullMapping="false" SourceVersion="Current" />
                     </Parameters>
                   </DbCommand>
                 </InsertCommand>
                 <SelectCommand>
                   <DbCommand CommandType="Text" ModifiedByUser="false">
                     <CommandText>SELECT        GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, 
-                         WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE
+                         WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, 
+                         SQL_BTN_FINISH
 FROM            TBPM_PROFILE
 ORDER BY NAME</CommandText>
                     <Parameters />
@@ -1008,7 +1010,8 @@ ORDER BY NAME</CommandText>
 SET                NAME = @NAME, TITLE = @TITLE, PRIORITY = @PRIORITY, DESCRIPTION = @DESCRIPTION, ACTIVE = @ACTIVE, WD_SEARCH = @WD_SEARCH, NO_OF_DOCUMENTS = @NO_OF_DOCUMENTS, 
                          CHANGED_WHO = @CHANGED_WHO, FINAL_PROFILE = @FINAL_PROFILE, FINAL_TEXT = @FINAL_TEXT, MOVE2FOLDER = @MOVE2FOLDER, TYPE = @TYPE, WD_OBJECTTYPE = @WD_OBJECTTYPE, 
                          SORT_BY_LATEST = @SORT_BY_LATEST, PM_VEKTOR_INDEX = @PM_VEKTOR_INDEX, LOG_INDEX = @LOG_INDEX, WORK_HISTORY_ENTRY = @WORK_HISTORY_ENTRY, SQL_VIEW = @SQL_VIEW, 
-                         ANNOTATE_ALL_WORK_HISTORY_ENTRIES = @ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY = @ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE
+                         ANNOTATE_ALL_WORK_HISTORY_ENTRIES = @ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY = @ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE, 
+                         SQL_BTN_FINISH = @SQL_BTN_FINISH
 WHERE        (GUID = @Original_GUID);         
 SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE WHERE (GUID = @GUID)</CommandText>
                     <Parameters>
@@ -1017,7 +1020,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
                       <Parameter AllowDbNull="false" AutogeneratedName="PRIORITY" ColumnName="PRIORITY" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PRIORITY" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PRIORITY" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="DESCRIPTION" ColumnName="DESCRIPTION" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="WD_SEARCH" ColumnName="WD_SEARCH" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="WD_SEARCH" ColumnName="WD_SEARCH" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="NO_OF_DOCUMENTS" ColumnName="NO_OF_DOCUMENTS" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@NO_OF_DOCUMENTS" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="NO_OF_DOCUMENTS" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="FINAL_PROFILE" ColumnName="FINAL_PROFILE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@FINAL_PROFILE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="FINAL_PROFILE" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -1033,6 +1036,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
                       <Parameter AllowDbNull="false" AutogeneratedName="ANNOTATE_ALL_WORK_HISTORY_ENTRIES" ColumnName="ANNOTATE_ALL_WORK_HISTORY_ENTRIES" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ANNOTATE_ALL_WORK_HISTORY_ENTRIES" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ANNOTATE_ALL_WORK_HISTORY_ENTRIES" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="ANNOTATE_WORK_HISTORY_ENTRY" ColumnName="ANNOTATE_WORK_HISTORY_ENTRY" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ANNOTATE_WORK_HISTORY_ENTRY" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ANNOTATE_WORK_HISTORY_ENTRY" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="DISPLAY_MODE" ColumnName="DISPLAY_MODE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@DISPLAY_MODE" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="DISPLAY_MODE" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="SQL_BTN_FINISH" ColumnName="SQL_BTN_FINISH" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_BTN_FINISH" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_BTN_FINISH" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                     </Parameters>
@@ -1066,6 +1070,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
               <Mapping SourceColumn="ANNOTATE_WORK_HISTORY_ENTRY" DataSetColumn="ANNOTATE_WORK_HISTORY_ENTRY" />
               <Mapping SourceColumn="WORK_HISTORY_ENTRY" DataSetColumn="WORK_HISTORY_ENTRY" />
               <Mapping SourceColumn="DISPLAY_MODE" DataSetColumn="DISPLAY_MODE" />
+              <Mapping SourceColumn="SQL_BTN_FINISH" DataSetColumn="SQL_BTN_FINISH" />
             </Mappings>
             <Sources>
               <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdAnzProfile" Modifier="Public" Name="cmdAnzProfile" QueryType="Scalar" ScalarCallRetval="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="cmdAnzProfile">
@@ -1097,25 +1102,6 @@ WHERE        (GUID = @GUID)</CommandText>
                   </DbCommand>
                 </SelectCommand>
               </DbSource>
-              <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBPM_PROFILE" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdInsert_Copy" Modifier="Public" Name="cmdInsert_Copy" QueryType="Scalar" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy3" UserSourceName="cmdInsert_Copy">
-                <SelectCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>INSERT INTO TBPM_PROFILE
-                         (NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, 
-                         LOG_INDEX, WORK_HISTORY_ENTRY, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY)
-SELECT        NAME + @COPY_SUFFIX AS Expr1, TITLE + @COPY_SUFFIX AS Expr5, PRIORITY, DESCRIPTION, 0 AS Expr2, WD_SEARCH, 0 AS Expr3, @USER AS Expr4, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, 
-                         WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, WORK_HISTORY_ENTRY, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, 
-                         ANNOTATE_WORK_HISTORY_ENTRY
-FROM            TBPM_PROFILE AS TBPM_PROFILE_1
-WHERE        (GUID = @GUID)</CommandText>
-                    <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="COPY_SUFFIX" ColumnName="" DataSourceName="" DataTypeServer="unknown" DbType="AnsiString" Direction="Input" ParameterName="@COPY_SUFFIX" Precision="0" Scale="0" Size="1024" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="USER" ColumnName="" DataSourceName="" DataTypeServer="unknown" DbType="AnsiString" Direction="Input" ParameterName="@USER" Precision="0" Scale="0" Size="1024" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
-                    </Parameters>
-                  </DbCommand>
-                </SelectCommand>
-              </DbSource>
               <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdMaxGuid" Modifier="Public" Name="cmdMaxGuid" QueryType="Scalar" ScalarCallRetval="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy4" UserSourceName="cmdMaxGuid">
                 <SelectCommand>
                   <DbCommand CommandType="Text" ModifiedByUser="true">
@@ -1472,20 +1458,6 @@ VALUES        (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@
                   </DbCommand>
                 </InsertCommand>
               </DbSource>
-              <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdInsertCopy" Modifier="Public" Name="cmdInsertCopy" QueryType="Scalar" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy8" UserSourceName="cmdInsertCopy">
-                <SelectCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>INSERT INTO TBPM_PROFILE_CONTROLS
-                         (NAME, PROFIL_ID, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, READ_ONLY, 
-                         LOAD_IDX_VALUE, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR)
-SELECT        LOWER(CTRL_TYPE + CONVERT(VARCHAR(4),rank() OVER (ORDER BY CTRL_TYPE))),@NEW_PROFIL_ID, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, @User, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, 
-                         READ_ONLY, LOAD_IDX_VALUE, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR
-FROM            TBPM_PROFILE_CONTROLS AS TBPM_PROFILE_CONTROLS_1
-WHERE        (PROFIL_ID = @Copy_profilId)</CommandText>
-                    <Parameters />
-                  </DbCommand>
-                </SelectCommand>
-              </DbSource>
               <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdUpdateIndexname" Modifier="Public" Name="cmdUpdateIndexname" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy9" UserSourceName="cmdUpdateIndexname">
                 <UpdateCommand>
                   <DbCommand CommandType="Text" ModifiedByUser="true">
@@ -2003,6 +1975,54 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </Mappings>
             <Sources />
           </TableAdapter>
+          <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWPM_CHART_INVOICE_MONITORTableAdapter" GeneratorDataComponentClassName="VWPM_CHART_INVOICE_MONITORTableAdapter" Name="VWPM_CHART_INVOICE_MONITOR" UserDataComponentName="VWPM_CHART_INVOICE_MONITORTableAdapter">
+            <MainSource>
+              <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.VWPM_CHART_INVOICE_MONITOR" DbObjectType="View" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
+                <SelectCommand>
+                  <DbCommand CommandType="Text" ModifiedByUser="true">
+                    <CommandText>SELECT        VWPM_CHART_INVOICE_MONITOR.*
+FROM            VWPM_CHART_INVOICE_MONITOR</CommandText>
+                    <Parameters />
+                  </DbCommand>
+                </SelectCommand>
+              </DbSource>
+            </MainSource>
+            <Mappings>
+              <Mapping SourceColumn="Anzahl_AI" DataSetColumn="Anzahl_AI" />
+              <Mapping SourceColumn="NettoSumme_AI" DataSetColumn="NettoSumme_AI" />
+              <Mapping SourceColumn="Anzahl_PE" DataSetColumn="Anzahl_PE" />
+              <Mapping SourceColumn="NettoSumme_PE" DataSetColumn="NettoSumme_PE" />
+              <Mapping SourceColumn="Anzahl_FF" DataSetColumn="Anzahl_FF" />
+              <Mapping SourceColumn="NettoSumme_FF" DataSetColumn="NettoSumme_FF" />
+              <Mapping SourceColumn="Anzahl_FIF" DataSetColumn="Anzahl_FIF" />
+              <Mapping SourceColumn="NettoSumme_FIF" DataSetColumn="NettoSumme_FIF" />
+              <Mapping SourceColumn="Anzahl_ZK" DataSetColumn="Anzahl_ZK" />
+              <Mapping SourceColumn="WFState" DataSetColumn="WFState" />
+              <Mapping SourceColumn="NettoSumme_ZK" DataSetColumn="NettoSumme_ZK" />
+            </Mappings>
+            <Sources />
+          </TableAdapter>
+          <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter" GeneratorDataComponentClassName="VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter" Name="VWPM_CHART_INVOICE_MONITOR_SERIES" UserDataComponentName="VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter">
+            <MainSource>
+              <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.VWPM_CHART_INVOICE_MONITOR_SERIES" DbObjectType="View" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
+                <SelectCommand>
+                  <DbCommand CommandType="Text" ModifiedByUser="true">
+                    <CommandText>SELECT        Title, Anzahl, NettoSumme, SEQ
+FROM            VWPM_CHART_INVOICE_MONITOR_SERIES
+ORDER BY SEQ</CommandText>
+                    <Parameters />
+                  </DbCommand>
+                </SelectCommand>
+              </DbSource>
+            </MainSource>
+            <Mappings>
+              <Mapping SourceColumn="Title" DataSetColumn="Title" />
+              <Mapping SourceColumn="Anzahl" DataSetColumn="Anzahl" />
+              <Mapping SourceColumn="NettoSumme" DataSetColumn="NettoSumme" />
+              <Mapping SourceColumn="SEQ" DataSetColumn="SEQ" />
+            </Mappings>
+            <Sources />
+          </TableAdapter>
         </Tables>
         <Sources />
       </DataSource>
@@ -2011,7 +2031,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
   <xs:element name="DD_DMSLiteDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="True" msprop:Generator_DataSetName="DD_DMSLiteDataSet" msprop:Generator_UserDSName="DD_DMSLiteDataSet">
     <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_TableClassName="TBPM_PROFILE_FINAL_INDEXINGDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FINAL_INDEXING" 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_UserTableName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="INDEXNAME" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_UserColumnName="INDEXNAME">
@@ -2071,7 +2091,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPM_KONFIGURATION" msprop:Generator_TableClassName="TBPM_KONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPM_KONFIGURATION" msprop:Generator_RowChangedName="TBPM_KONFIGURATIONRowChanged" msprop:Generator_TablePropName="TBPM_KONFIGURATION" msprop:Generator_RowDeletingName="TBPM_KONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPM_KONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPM_KONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_KONFIGURATIONRowDeleted" msprop:Generator_RowClassName="TBPM_KONFIGURATIONRow" msprop:Generator_UserTableName="TBPM_KONFIGURATION" msprop:Generator_RowEvArgName="TBPM_KONFIGURATIONRowChangeEvent">
+        <xs:element name="TBPM_KONFIGURATION" msprop:Generator_TableClassName="TBPM_KONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPM_KONFIGURATION" msprop:Generator_TablePropName="TBPM_KONFIGURATION" msprop:Generator_RowDeletingName="TBPM_KONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPM_KONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPM_KONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_KONFIGURATIONRowDeleted" msprop:Generator_UserTableName="TBPM_KONFIGURATION" msprop:Generator_RowChangedName="TBPM_KONFIGURATIONRowChanged" msprop:Generator_RowEvArgName="TBPM_KONFIGURATIONRowChangeEvent" msprop:Generator_RowClassName="TBPM_KONFIGURATIONRow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:unsignedByte" />
@@ -2167,7 +2187,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBDD_USER" msprop:Generator_TableClassName="TBDD_USERDataTable" msprop:Generator_TableVarName="tableTBDD_USER" msprop:Generator_RowChangedName="TBDD_USERRowChanged" msprop:Generator_TablePropName="TBDD_USER" msprop:Generator_RowDeletingName="TBDD_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USERRowDeleted" msprop:Generator_RowClassName="TBDD_USERRow" msprop:Generator_UserTableName="TBDD_USER" msprop:Generator_RowEvArgName="TBDD_USERRowChangeEvent">
+        <xs:element name="TBDD_USER" msprop:Generator_TableClassName="TBDD_USERDataTable" msprop:Generator_TableVarName="tableTBDD_USER" msprop:Generator_TablePropName="TBDD_USER" msprop:Generator_RowDeletingName="TBDD_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USERRowDeleted" msprop:Generator_UserTableName="TBDD_USER" msprop:Generator_RowChangedName="TBDD_USERRowChanged" msprop:Generator_RowEvArgName="TBDD_USERRowChangeEvent" msprop:Generator_RowClassName="TBDD_USERRow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2232,7 +2252,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPM_TYPE" msprop:Generator_TableClassName="TBPM_TYPEDataTable" msprop:Generator_TableVarName="tableTBPM_TYPE" msprop:Generator_RowChangedName="TBPM_TYPERowChanged" msprop:Generator_TablePropName="TBPM_TYPE" msprop:Generator_RowDeletingName="TBPM_TYPERowDeleting" msprop:Generator_RowChangingName="TBPM_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBPM_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_TYPERowDeleted" msprop:Generator_RowClassName="TBPM_TYPERow" msprop:Generator_UserTableName="TBPM_TYPE" msprop:Generator_RowEvArgName="TBPM_TYPERowChangeEvent">
+        <xs:element name="TBPM_TYPE" msprop:Generator_TableClassName="TBPM_TYPEDataTable" msprop:Generator_TableVarName="tableTBPM_TYPE" msprop:Generator_TablePropName="TBPM_TYPE" msprop:Generator_RowDeletingName="TBPM_TYPERowDeleting" msprop:Generator_RowChangingName="TBPM_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBPM_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_TYPERowDeleted" msprop:Generator_UserTableName="TBPM_TYPE" msprop:Generator_RowChangedName="TBPM_TYPERowChanged" msprop:Generator_RowEvArgName="TBPM_TYPERowChangeEvent" msprop:Generator_RowClassName="TBPM_TYPERow">
           <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:short" />
@@ -2262,7 +2282,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPM_ERROR_LOG" msprop:Generator_TableClassName="TBPM_ERROR_LOGDataTable" msprop:Generator_TableVarName="tableTBPM_ERROR_LOG" msprop:Generator_RowChangedName="TBPM_ERROR_LOGRowChanged" msprop:Generator_TablePropName="TBPM_ERROR_LOG" msprop:Generator_RowDeletingName="TBPM_ERROR_LOGRowDeleting" msprop:Generator_RowChangingName="TBPM_ERROR_LOGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_ERROR_LOGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_ERROR_LOGRowDeleted" msprop:Generator_RowClassName="TBPM_ERROR_LOGRow" msprop:Generator_UserTableName="TBPM_ERROR_LOG" msprop:Generator_RowEvArgName="TBPM_ERROR_LOGRowChangeEvent">
+        <xs:element name="TBPM_ERROR_LOG" msprop:Generator_TableClassName="TBPM_ERROR_LOGDataTable" msprop:Generator_TableVarName="tableTBPM_ERROR_LOG" msprop:Generator_TablePropName="TBPM_ERROR_LOG" msprop:Generator_RowDeletingName="TBPM_ERROR_LOGRowDeleting" msprop:Generator_RowChangingName="TBPM_ERROR_LOGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_ERROR_LOGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_ERROR_LOGRowDeleted" msprop:Generator_UserTableName="TBPM_ERROR_LOG" msprop:Generator_RowChangedName="TBPM_ERROR_LOGRowChanged" msprop:Generator_RowEvArgName="TBPM_ERROR_LOGRowChangeEvent" msprop:Generator_RowClassName="TBPM_ERROR_LOGRow">
           <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" />
@@ -2285,7 +2305,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBDD_CONNECTIONRow" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent">
+        <xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBDD_CONNECTIONRow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
@@ -2359,7 +2379,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPROFILE_USER" msprop:Generator_TableClassName="TBPROFILE_USERDataTable" msprop:Generator_TableVarName="tableTBPROFILE_USER" msprop:Generator_RowChangedName="TBPROFILE_USERRowChanged" msprop:Generator_TablePropName="TBPROFILE_USER" msprop:Generator_RowDeletingName="TBPROFILE_USERRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_USERRowDeleted" msprop:Generator_RowClassName="TBPROFILE_USERRow" msprop:Generator_UserTableName="TBPROFILE_USER" msprop:Generator_RowEvArgName="TBPROFILE_USERRowChangeEvent">
+        <xs:element name="TBPROFILE_USER" msprop:Generator_TableClassName="TBPROFILE_USERDataTable" msprop:Generator_TableVarName="tableTBPROFILE_USER" msprop:Generator_TablePropName="TBPROFILE_USER" msprop:Generator_RowDeletingName="TBPROFILE_USERRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_USERRowDeleted" msprop:Generator_UserTableName="TBPROFILE_USER" msprop:Generator_RowChangedName="TBPROFILE_USERRowChanged" msprop:Generator_RowEvArgName="TBPROFILE_USERRowChangeEvent" msprop:Generator_RowClassName="TBPROFILE_USERRow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2408,7 +2428,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPM_PROFILE_FILES" msprop:Generator_TableClassName="TBPM_PROFILE_FILESDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FILES" msprop:Generator_RowChangedName="TBPM_PROFILE_FILESRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_FILES" msprop:Generator_RowDeletingName="TBPM_PROFILE_FILESRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FILESRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FILESRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_FILESRow" msprop:Generator_UserTableName="TBPM_PROFILE_FILES" msprop:Generator_RowEvArgName="TBPM_PROFILE_FILESRowChangeEvent">
+        <xs:element name="TBPM_PROFILE_FILES" msprop:Generator_TableClassName="TBPM_PROFILE_FILESDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FILES" msprop:Generator_TablePropName="TBPM_PROFILE_FILES" msprop:Generator_RowDeletingName="TBPM_PROFILE_FILESRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FILESRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FILESRowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE_FILES" msprop:Generator_RowChangedName="TBPM_PROFILE_FILESRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_FILESRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_FILESRow">
           <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" />
@@ -2423,7 +2443,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPM_PROFILE" msprop:Generator_TableClassName="TBPM_PROFILEDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE" msprop:Generator_RowChangedName="TBPM_PROFILERowChanged" msprop:Generator_TablePropName="TBPM_PROFILE" msprop:Generator_RowDeletingName="TBPM_PROFILERowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILERowDeleted" msprop:Generator_RowClassName="TBPM_PROFILERow" msprop:Generator_UserTableName="TBPM_PROFILE" msprop:Generator_RowEvArgName="TBPM_PROFILERowChangeEvent">
+        <xs:element name="TBPM_PROFILE" msprop:Generator_TableClassName="TBPM_PROFILEDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE" msprop:Generator_TablePropName="TBPM_PROFILE" msprop:Generator_RowDeletingName="TBPM_PROFILERowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILERowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE" msprop:Generator_RowChangedName="TBPM_PROFILERowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILERow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2535,10 +2555,17 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
+              <xs:element name="SQL_BTN_FINISH" msprop:Generator_ColumnVarNameInTable="columnSQL_BTN_FINISH" msprop:Generator_ColumnPropNameInRow="SQL_BTN_FINISH" msprop:Generator_ColumnPropNameInTable="SQL_BTN_FINISHColumn" msprop:Generator_UserColumnName="SQL_BTN_FINISH" default="">
+                <xs:simpleType>
+                  <xs:restriction base="xs:string">
+                    <xs:maxLength value="2147483647" />
+                  </xs:restriction>
+                </xs:simpleType>
+              </xs:element>
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBWH_CONNECTION" msprop:Generator_TableClassName="TBWH_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBWH_CONNECTION" msprop:Generator_TablePropName="TBWH_CONNECTION" msprop:Generator_RowDeletingName="TBWH_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBWH_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBWH_CONNECTION" msprop:Generator_RowChangedName="TBWH_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBWH_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBWH_CONNECTIONRow">
+        <xs:element name="TBWH_CONNECTION" msprop:Generator_TableClassName="TBWH_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBWH_CONNECTION" msprop:Generator_RowChangedName="TBWH_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBWH_CONNECTION" msprop:Generator_RowDeletingName="TBWH_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBWH_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBWH_CONNECTIONRow" msprop:Generator_UserTableName="TBWH_CONNECTION" msprop:Generator_RowEvArgName="TBWH_CONNECTIONRowChangeEvent">
           <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:short" />
@@ -2611,7 +2638,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBWH_CHECK_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TablePropName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBWH_CHECK_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBWH_CHECK_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CHECK_PROFILE_CONTROLSRowDeleted" msprop:Generator_UserTableName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBWH_CHECK_PROFILE_CONTROLSRowChanged" msprop:Generator_RowEvArgName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEvent" msprop:Generator_RowClassName="TBWH_CHECK_PROFILE_CONTROLSRow">
+        <xs:element name="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBWH_CHECK_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBWH_CHECK_PROFILE_CONTROLSRowChanged" msprop:Generator_TablePropName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBWH_CHECK_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBWH_CHECK_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CHECK_PROFILE_CONTROLSRowDeleted" msprop:Generator_RowClassName="TBWH_CHECK_PROFILE_CONTROLSRow" msprop:Generator_UserTableName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowEvArgName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEvent">
           <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" />
@@ -2662,7 +2689,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPM_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBPM_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_CONTROLS" msprop:Generator_TablePropName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBPM_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_CONTROLSRowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBPM_PROFILE_CONTROLSRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_CONTROLSRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_CONTROLSRow">
+        <xs:element name="TBPM_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBPM_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBPM_PROFILE_CONTROLSRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBPM_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_CONTROLSRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_CONTROLSRow" msprop:Generator_UserTableName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowEvArgName="TBPM_PROFILE_CONTROLSRowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2800,7 +2827,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPM_CONTROL_TABLE" msprop:Generator_TableClassName="TBPM_CONTROL_TABLEDataTable" msprop:Generator_TableVarName="tableTBPM_CONTROL_TABLE" msprop:Generator_TablePropName="TBPM_CONTROL_TABLE" msprop:Generator_RowDeletingName="TBPM_CONTROL_TABLERowDeleting" msprop:Generator_RowChangingName="TBPM_CONTROL_TABLERowChanging" msprop:Generator_RowEvHandlerName="TBPM_CONTROL_TABLERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_CONTROL_TABLERowDeleted" msprop:Generator_UserTableName="TBPM_CONTROL_TABLE" msprop:Generator_RowChangedName="TBPM_CONTROL_TABLERowChanged" msprop:Generator_RowEvArgName="TBPM_CONTROL_TABLERowChangeEvent" msprop:Generator_RowClassName="TBPM_CONTROL_TABLERow">
+        <xs:element name="TBPM_CONTROL_TABLE" msprop:Generator_TableClassName="TBPM_CONTROL_TABLEDataTable" msprop:Generator_TableVarName="tableTBPM_CONTROL_TABLE" msprop:Generator_RowChangedName="TBPM_CONTROL_TABLERowChanged" msprop:Generator_TablePropName="TBPM_CONTROL_TABLE" msprop:Generator_RowDeletingName="TBPM_CONTROL_TABLERowDeleting" msprop:Generator_RowChangingName="TBPM_CONTROL_TABLERowChanging" msprop:Generator_RowEvHandlerName="TBPM_CONTROL_TABLERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_CONTROL_TABLERowDeleted" msprop:Generator_RowClassName="TBPM_CONTROL_TABLERow" msprop:Generator_UserTableName="TBPM_CONTROL_TABLE" msprop:Generator_RowEvArgName="TBPM_CONTROL_TABLERowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2878,7 +2905,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBDD_GROUPS" msprop:Generator_TableClassName="TBDD_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS" msprop:Generator_RowChangedName="TBDD_GROUPSRowChanged" msprop:Generator_TablePropName="TBDD_GROUPS" msprop:Generator_RowDeletingName="TBDD_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPSRowDeleted" msprop:Generator_RowClassName="TBDD_GROUPSRow" msprop:Generator_UserTableName="TBDD_GROUPS" msprop:Generator_RowEvArgName="TBDD_GROUPSRowChangeEvent">
+        <xs:element name="TBDD_GROUPS" msprop:Generator_TableClassName="TBDD_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS" msprop:Generator_TablePropName="TBDD_GROUPS" msprop:Generator_RowDeletingName="TBDD_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPSRowDeleted" msprop:Generator_UserTableName="TBDD_GROUPS" msprop:Generator_RowChangedName="TBDD_GROUPSRowChanged" msprop:Generator_RowEvArgName="TBDD_GROUPSRowChangeEvent" msprop:Generator_RowClassName="TBDD_GROUPSRow">
           <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" />
@@ -2919,7 +2946,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBPROFILE_GROUP" msprop:Generator_TableClassName="TBPROFILE_GROUPDataTable" msprop:Generator_TableVarName="tableTBPROFILE_GROUP" msprop:Generator_TablePropName="TBPROFILE_GROUP" msprop:Generator_RowDeletingName="TBPROFILE_GROUPRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_GROUPRowDeleted" msprop:Generator_UserTableName="TBPROFILE_GROUP" msprop:Generator_RowChangedName="TBPROFILE_GROUPRowChanged" msprop:Generator_RowEvArgName="TBPROFILE_GROUPRowChangeEvent" msprop:Generator_RowClassName="TBPROFILE_GROUPRow">
+        <xs:element name="TBPROFILE_GROUP" msprop:Generator_TableClassName="TBPROFILE_GROUPDataTable" msprop:Generator_TableVarName="tableTBPROFILE_GROUP" msprop:Generator_RowChangedName="TBPROFILE_GROUPRowChanged" msprop:Generator_TablePropName="TBPROFILE_GROUP" msprop:Generator_RowDeletingName="TBPROFILE_GROUPRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_GROUPRowDeleted" msprop:Generator_RowClassName="TBPROFILE_GROUPRow" msprop:Generator_UserTableName="TBPROFILE_GROUP" msprop:Generator_RowEvArgName="TBPROFILE_GROUPRowChangeEvent">
           <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" />
@@ -2957,7 +2984,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_TableClassName="FNPM_GET_FREE_USER_FOR_PROFILEDataTable" msprop:Generator_TableVarName="tableFNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_TablePropName="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowDeletingName="FNPM_GET_FREE_USER_FOR_PROFILERowDeleting" msprop:Generator_RowChangingName="FNPM_GET_FREE_USER_FOR_PROFILERowChanging" msprop:Generator_RowEvHandlerName="FNPM_GET_FREE_USER_FOR_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="FNPM_GET_FREE_USER_FOR_PROFILERowDeleted" msprop:Generator_UserTableName="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowChangedName="FNPM_GET_FREE_USER_FOR_PROFILERowChanged" msprop:Generator_RowEvArgName="FNPM_GET_FREE_USER_FOR_PROFILERowChangeEvent" msprop:Generator_RowClassName="FNPM_GET_FREE_USER_FOR_PROFILERow">
+        <xs:element name="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_TableClassName="FNPM_GET_FREE_USER_FOR_PROFILEDataTable" msprop:Generator_TableVarName="tableFNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowChangedName="FNPM_GET_FREE_USER_FOR_PROFILERowChanged" msprop:Generator_TablePropName="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowDeletingName="FNPM_GET_FREE_USER_FOR_PROFILERowDeleting" msprop:Generator_RowChangingName="FNPM_GET_FREE_USER_FOR_PROFILERowChanging" msprop:Generator_RowEvHandlerName="FNPM_GET_FREE_USER_FOR_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="FNPM_GET_FREE_USER_FOR_PROFILERowDeleted" msprop:Generator_RowClassName="FNPM_GET_FREE_USER_FOR_PROFILERow" msprop:Generator_UserTableName="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowEvArgName="FNPM_GET_FREE_USER_FOR_PROFILERowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="SequentialOrder" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnSequentialOrder" msprop:Generator_ColumnPropNameInRow="SequentialOrder" msprop:Generator_ColumnPropNameInTable="SequentialOrderColumn" msprop:Generator_UserColumnName="SequentialOrder" type="xs:int" />
@@ -3014,7 +3041,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBDD_EMAIL_TEMPLATE" msprop:Generator_TableClassName="TBDD_EMAIL_TEMPLATEDataTable" msprop:Generator_TableVarName="tableTBDD_EMAIL_TEMPLATE" msprop:Generator_RowChangedName="TBDD_EMAIL_TEMPLATERowChanged" msprop:Generator_TablePropName="TBDD_EMAIL_TEMPLATE" msprop:Generator_RowDeletingName="TBDD_EMAIL_TEMPLATERowDeleting" msprop:Generator_RowChangingName="TBDD_EMAIL_TEMPLATERowChanging" msprop:Generator_RowEvHandlerName="TBDD_EMAIL_TEMPLATERowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EMAIL_TEMPLATERowDeleted" msprop:Generator_RowClassName="TBDD_EMAIL_TEMPLATERow" msprop:Generator_UserTableName="TBDD_EMAIL_TEMPLATE" msprop:Generator_RowEvArgName="TBDD_EMAIL_TEMPLATERowChangeEvent">
+        <xs:element name="TBDD_EMAIL_TEMPLATE" msprop:Generator_TableClassName="TBDD_EMAIL_TEMPLATEDataTable" msprop:Generator_TableVarName="tableTBDD_EMAIL_TEMPLATE" msprop:Generator_TablePropName="TBDD_EMAIL_TEMPLATE" msprop:Generator_RowDeletingName="TBDD_EMAIL_TEMPLATERowDeleting" msprop:Generator_RowChangingName="TBDD_EMAIL_TEMPLATERowChanging" msprop:Generator_RowEvHandlerName="TBDD_EMAIL_TEMPLATERowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EMAIL_TEMPLATERowDeleted" msprop:Generator_UserTableName="TBDD_EMAIL_TEMPLATE" msprop:Generator_RowChangedName="TBDD_EMAIL_TEMPLATERowChanged" msprop:Generator_RowEvArgName="TBDD_EMAIL_TEMPLATERowChangeEvent" msprop:Generator_RowClassName="TBDD_EMAIL_TEMPLATERow">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -3072,7 +3099,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBDD_GUI_LANGUAGE_PHRASE" msprop:Generator_TableClassName="TBDD_GUI_LANGUAGE_PHRASEDataTable" msprop:Generator_TableVarName="tableTBDD_GUI_LANGUAGE_PHRASE" msprop:Generator_TablePropName="TBDD_GUI_LANGUAGE_PHRASE" msprop:Generator_RowDeletingName="TBDD_GUI_LANGUAGE_PHRASERowDeleting" msprop:Generator_RowChangingName="TBDD_GUI_LANGUAGE_PHRASERowChanging" msprop:Generator_RowEvHandlerName="TBDD_GUI_LANGUAGE_PHRASERowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GUI_LANGUAGE_PHRASERowDeleted" msprop:Generator_UserTableName="TBDD_GUI_LANGUAGE_PHRASE" msprop:Generator_RowChangedName="TBDD_GUI_LANGUAGE_PHRASERowChanged" msprop:Generator_RowEvArgName="TBDD_GUI_LANGUAGE_PHRASERowChangeEvent" msprop:Generator_RowClassName="TBDD_GUI_LANGUAGE_PHRASERow">
+        <xs:element name="TBDD_GUI_LANGUAGE_PHRASE" msprop:Generator_TableClassName="TBDD_GUI_LANGUAGE_PHRASEDataTable" msprop:Generator_TableVarName="tableTBDD_GUI_LANGUAGE_PHRASE" msprop:Generator_RowChangedName="TBDD_GUI_LANGUAGE_PHRASERowChanged" msprop:Generator_TablePropName="TBDD_GUI_LANGUAGE_PHRASE" msprop:Generator_RowDeletingName="TBDD_GUI_LANGUAGE_PHRASERowDeleting" msprop:Generator_RowChangingName="TBDD_GUI_LANGUAGE_PHRASERowChanging" msprop:Generator_RowEvHandlerName="TBDD_GUI_LANGUAGE_PHRASERowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GUI_LANGUAGE_PHRASERowDeleted" msprop:Generator_RowClassName="TBDD_GUI_LANGUAGE_PHRASERow" msprop:Generator_UserTableName="TBDD_GUI_LANGUAGE_PHRASE" msprop:Generator_RowEvArgName="TBDD_GUI_LANGUAGE_PHRASERowChangeEvent">
           <xs:complexType>
             <xs:sequence>
               <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -3111,7 +3138,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="STRING2" msprop:Generator_ColumnVarNameInTable="columnSTRING2" msprop:Generator_ColumnPropNameInRow="STRING2" msprop:Generator_ColumnPropNameInTable="STRING2Column" msprop:Generator_UserColumnName="STRING2">
+              <xs:element name="STRING2" msprop:Generator_ColumnVarNameInTable="columnSTRING2" msprop:Generator_ColumnPropNameInRow="STRING2" msprop:Generator_ColumnPropNameInTable="STRING2Column" msprop:Generator_UserColumnName="STRING2" default="">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="900" />
@@ -3173,6 +3200,75 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
             </xs:sequence>
           </xs:complexType>
         </xs:element>
+        <xs:element name="VWPM_CHART_INVOICE_MONITOR" msprop:Generator_TableClassName="VWPM_CHART_INVOICE_MONITORDataTable" msprop:Generator_TableVarName="tableVWPM_CHART_INVOICE_MONITOR" msprop:Generator_TablePropName="VWPM_CHART_INVOICE_MONITOR" msprop:Generator_RowDeletingName="VWPM_CHART_INVOICE_MONITORRowDeleting" msprop:Generator_RowChangingName="VWPM_CHART_INVOICE_MONITORRowChanging" msprop:Generator_RowEvHandlerName="VWPM_CHART_INVOICE_MONITORRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPM_CHART_INVOICE_MONITORRowDeleted" msprop:Generator_UserTableName="VWPM_CHART_INVOICE_MONITOR" msprop:Generator_RowChangedName="VWPM_CHART_INVOICE_MONITORRowChanged" msprop:Generator_RowEvArgName="VWPM_CHART_INVOICE_MONITORRowChangeEvent" msprop:Generator_RowClassName="VWPM_CHART_INVOICE_MONITORRow">
+          <xs:complexType>
+            <xs:sequence>
+              <xs:element name="Anzahl_AI" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnAnzahl_AI" msprop:Generator_ColumnPropNameInRow="Anzahl_AI" msprop:Generator_ColumnPropNameInTable="Anzahl_AIColumn" msprop:Generator_UserColumnName="Anzahl_AI" type="xs:int" minOccurs="0" />
+              <xs:element name="NettoSumme_AI" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnNettoSumme_AI" msprop:Generator_ColumnPropNameInRow="NettoSumme_AI" msprop:Generator_ColumnPropNameInTable="NettoSumme_AIColumn" msprop:Generator_UserColumnName="NettoSumme_AI" minOccurs="0">
+                <xs:simpleType>
+                  <xs:restriction base="xs:string">
+                    <xs:maxLength value="30" />
+                  </xs:restriction>
+                </xs:simpleType>
+              </xs:element>
+              <xs:element name="Anzahl_PE" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnAnzahl_PE" msprop:Generator_ColumnPropNameInRow="Anzahl_PE" msprop:Generator_ColumnPropNameInTable="Anzahl_PEColumn" msprop:Generator_UserColumnName="Anzahl_PE" type="xs:int" minOccurs="0" />
+              <xs:element name="NettoSumme_PE" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnNettoSumme_PE" msprop:Generator_ColumnPropNameInRow="NettoSumme_PE" msprop:Generator_ColumnPropNameInTable="NettoSumme_PEColumn" msprop:Generator_UserColumnName="NettoSumme_PE" minOccurs="0">
+                <xs:simpleType>
+                  <xs:restriction base="xs:string">
+                    <xs:maxLength value="30" />
+                  </xs:restriction>
+                </xs:simpleType>
+              </xs:element>
+              <xs:element name="Anzahl_FF" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnAnzahl_FF" msprop:Generator_ColumnPropNameInRow="Anzahl_FF" msprop:Generator_ColumnPropNameInTable="Anzahl_FFColumn" msprop:Generator_UserColumnName="Anzahl_FF" type="xs:int" minOccurs="0" />
+              <xs:element name="NettoSumme_FF" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnNettoSumme_FF" msprop:Generator_ColumnPropNameInRow="NettoSumme_FF" msprop:Generator_ColumnPropNameInTable="NettoSumme_FFColumn" msprop:Generator_UserColumnName="NettoSumme_FF" minOccurs="0">
+                <xs:simpleType>
+                  <xs:restriction base="xs:string">
+                    <xs:maxLength value="30" />
+                  </xs:restriction>
+                </xs:simpleType>
+              </xs:element>
+              <xs:element name="Anzahl_FIF" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnAnzahl_FIF" msprop:Generator_ColumnPropNameInRow="Anzahl_FIF" msprop:Generator_ColumnPropNameInTable="Anzahl_FIFColumn" msprop:Generator_UserColumnName="Anzahl_FIF" type="xs:int" minOccurs="0" />
+              <xs:element name="NettoSumme_FIF" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnNettoSumme_FIF" msprop:Generator_ColumnPropNameInRow="NettoSumme_FIF" msprop:Generator_ColumnPropNameInTable="NettoSumme_FIFColumn" msprop:Generator_UserColumnName="NettoSumme_FIF" minOccurs="0">
+                <xs:simpleType>
+                  <xs:restriction base="xs:string">
+                    <xs:maxLength value="30" />
+                  </xs:restriction>
+                </xs:simpleType>
+              </xs:element>
+              <xs:element name="Anzahl_ZK" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnAnzahl_ZK" msprop:Generator_ColumnPropNameInRow="Anzahl_ZK" msprop:Generator_ColumnPropNameInTable="Anzahl_ZKColumn" msprop:Generator_UserColumnName="Anzahl_ZK" type="xs:int" minOccurs="0" />
+              <xs:element name="WFState" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnWFState" msprop:Generator_ColumnPropNameInRow="WFState" msprop:Generator_ColumnPropNameInTable="WFStateColumn" msprop:Generator_UserColumnName="WFState" minOccurs="0">
+                <xs:simpleType>
+                  <xs:restriction base="xs:string">
+                    <xs:maxLength value="12" />
+                  </xs:restriction>
+                </xs:simpleType>
+              </xs:element>
+              <xs:element name="NettoSumme_ZK" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnNettoSumme_ZK" msprop:Generator_ColumnPropNameInRow="NettoSumme_ZK" msprop:Generator_ColumnPropNameInTable="NettoSumme_ZKColumn" msprop:Generator_UserColumnName="NettoSumme_ZK" minOccurs="0">
+                <xs:simpleType>
+                  <xs:restriction base="xs:string">
+                    <xs:maxLength value="5" />
+                  </xs:restriction>
+                </xs:simpleType>
+              </xs:element>
+            </xs:sequence>
+          </xs:complexType>
+        </xs:element>
+        <xs:element name="VWPM_CHART_INVOICE_MONITOR_SERIES" msprop:Generator_TableClassName="VWPM_CHART_INVOICE_MONITOR_SERIESDataTable" msprop:Generator_TableVarName="tableVWPM_CHART_INVOICE_MONITOR_SERIES" msprop:Generator_RowChangedName="VWPM_CHART_INVOICE_MONITOR_SERIESRowChanged" msprop:Generator_TablePropName="VWPM_CHART_INVOICE_MONITOR_SERIES" msprop:Generator_RowDeletingName="VWPM_CHART_INVOICE_MONITOR_SERIESRowDeleting" msprop:Generator_RowChangingName="VWPM_CHART_INVOICE_MONITOR_SERIESRowChanging" msprop:Generator_RowEvHandlerName="VWPM_CHART_INVOICE_MONITOR_SERIESRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPM_CHART_INVOICE_MONITOR_SERIESRowDeleted" msprop:Generator_RowClassName="VWPM_CHART_INVOICE_MONITOR_SERIESRow" msprop:Generator_UserTableName="VWPM_CHART_INVOICE_MONITOR_SERIES" msprop:Generator_RowEvArgName="VWPM_CHART_INVOICE_MONITOR_SERIESRowChangeEvent">
+          <xs:complexType>
+            <xs:sequence>
+              <xs:element name="Title" msprop:Generator_ColumnVarNameInTable="columnTitle" msprop:Generator_ColumnPropNameInRow="Title" msprop:Generator_ColumnPropNameInTable="TitleColumn" msprop:Generator_UserColumnName="Title">
+                <xs:simpleType>
+                  <xs:restriction base="xs:string">
+                    <xs:maxLength value="18" />
+                  </xs:restriction>
+                </xs:simpleType>
+              </xs:element>
+              <xs:element name="Anzahl" msprop:Generator_ColumnVarNameInTable="columnAnzahl" msprop:Generator_ColumnPropNameInRow="Anzahl" msprop:Generator_ColumnPropNameInTable="AnzahlColumn" msprop:Generator_UserColumnName="Anzahl" type="xs:int" />
+              <xs:element name="NettoSumme" msprop:Generator_ColumnVarNameInTable="columnNettoSumme" msprop:Generator_ColumnPropNameInRow="NettoSumme" msprop:Generator_ColumnPropNameInTable="NettoSummeColumn" msprop:Generator_UserColumnName="NettoSumme" type="xs:decimal" />
+              <xs:element name="SEQ" msprop:Generator_ColumnVarNameInTable="columnSEQ" msprop:Generator_ColumnPropNameInRow="SEQ" msprop:Generator_ColumnPropNameInTable="SEQColumn" msprop:Generator_UserColumnName="SEQ" type="xs:int" />
+            </xs:sequence>
+          </xs:complexType>
+        </xs:element>
       </xs:choice>
     </xs:complexType>
     <xs:unique name="Constraint1" msdata:PrimaryKey="true">
@@ -3254,11 +3350,11 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI
   </xs:element>
   <xs:annotation>
     <xs:appinfo>
-      <msdata:Relationship name="FK_TBPM_ERROR_LOG_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_ERROR_LOG" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_ERROR_LOG" msprop:Generator_ChildPropName="GetTBPM_ERROR_LOGRows" msprop:Generator_UserRelationName="FK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_ParentPropName="TBPM_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" />
+      <msdata:Relationship name="FK_TBPM_ERROR_LOG_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_ERROR_LOG" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_ERROR_LOG" msprop:Generator_ChildPropName="GetTBPM_ERROR_LOGRows" msprop:Generator_UserRelationName="FK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_RelationVarName="relationFK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" msprop:Generator_ParentPropName="TBPM_PROFILERow" />
-      <msdata:Relationship name="FK_TBPM_PROFILE_TYPE1" msdata:parent="TBPM_TYPE" msdata:child="TBPM_PROFILE" msdata:parentkey="GUID" msdata:childkey="TYPE" msprop:Generator_UserChildTable="TBPM_PROFILE" msprop:Generator_ChildPropName="GetTBPM_PROFILERows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_TYPE1" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_TYPE1" msprop:Generator_UserParentTable="TBPM_TYPE" msprop:Generator_ParentPropName="TBPM_TYPERow" />
+      <msdata:Relationship name="FK_TBPM_PROFILE_TYPE1" msdata:parent="TBPM_TYPE" msdata:child="TBPM_PROFILE" msdata:parentkey="GUID" msdata:childkey="TYPE" msprop:Generator_UserChildTable="TBPM_PROFILE" msprop:Generator_ChildPropName="GetTBPM_PROFILERows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_TYPE1" msprop:Generator_ParentPropName="TBPM_TYPERow" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_TYPE1" msprop:Generator_UserParentTable="TBPM_TYPE" />
-      <msdata:Relationship name="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_PROFILE_CONTROLS" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ChildPropName="GetTBPM_PROFILE_CONTROLSRows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_ParentPropName="TBPM_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" />
+      <msdata:Relationship name="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_PROFILE_CONTROLS" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ChildPropName="GetTBPM_PROFILE_CONTROLSRows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" msprop:Generator_ParentPropName="TBPM_PROFILERow" />
-      <msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL1" msdata:parent="TBPM_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_ParentPropName="TBPM_PROFILE_CONTROLSRow" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_UserParentTable="TBPM_PROFILE_CONTROLS" />
+      <msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL1" msdata:parent="TBPM_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_UserParentTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ParentPropName="TBPM_PROFILE_CONTROLSRow" />
-      <msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL" msdata:parent="TBWH_CHECK_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_UserParentTable="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_ParentPropName="TBWH_CHECK_PROFILE_CONTROLSRow" />
+      <msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL" msdata:parent="TBWH_CHECK_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_ParentPropName="TBWH_CHECK_PROFILE_CONTROLSRow" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_UserParentTable="TBWH_CHECK_PROFILE_CONTROLS" />
     </xs:appinfo>
   </xs:annotation>
 </xs:schema>

app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss

@@ -4,33 +4,35 @@
      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="747" ViewPortY="131" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
+<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="303" ViewPortY="135" 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="8" X="1688" Y="-74" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
+    <Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="11" X="1688" Y="-74" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
-    <Shape ID="DesignTable:TBPM_KONFIGURATION" ZOrder="23" X="-17" Y="232" Height="262" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
+    <Shape ID="DesignTable:TBPM_KONFIGURATION" ZOrder="25" X="-17" Y="232" Height="262" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
-    <Shape ID="DesignTable:TBDD_USER" ZOrder="13" X="608" Y="446" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
+    <Shape ID="DesignTable:TBDD_USER" ZOrder="15" X="608" Y="444" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
-    <Shape ID="DesignTable:TBPM_TYPE" ZOrder="14" X="17" Y="113" Height="203" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
+    <Shape ID="DesignTable:TBPM_TYPE" ZOrder="16" 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="16" 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="18" X="443" Y="-87" Height="111" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="21" />
-    <Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="6" X="408" Y="113" Height="186" Width="178" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="80" />
+    <Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="9" X="408" Y="113" Height="186" Width="178" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="80" />
-    <Shape ID="DesignTable:TBPROFILE_USER" ZOrder="9" X="509" Y="-80" Height="267" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
+    <Shape ID="DesignTable:TBPROFILE_USER" ZOrder="12" X="509" Y="-80" Height="267" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
-    <Shape ID="DesignTable:TBPM_PROFILE_FILES" ZOrder="7" 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="10" X="1391" Y="-70" Height="229" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" />
-    <Shape ID="DesignTable:TBPM_PROFILE" ZOrder="10" X="303" Y="316" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBPM_PROFILE" ZOrder="1" X="303" Y="315" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
-    <Shape ID="DesignTable:TBWH_CHECK_PROFILE_CONTROLS" ZOrder="19" 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="21" 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="3" X="947" Y="400" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBPM_PROFILE_CONTROLS" ZOrder="6" X="948" Y="398" 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="5" X="1300" Y="326" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
-    <Shape ID="DesignTable:TBDD_GROUPS" ZOrder="12" X="19" Y="320" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
+    <Shape ID="DesignTable:TBDD_GROUPS" ZOrder="14" X="19" Y="320" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
-    <Shape ID="DesignTable:TBPROFILE_GROUP" ZOrder="4" X="1054" Y="47" Height="286" Width="277" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
+    <Shape ID="DesignTable:TBPROFILE_GROUP" ZOrder="7" 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="11" 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="13" 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="5" X="1823" Y="483" Height="267" Width="287" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" />
+    <Shape ID="DesignTable:TBDD_EMAIL_TEMPLATE" ZOrder="8" 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="2" X="1727" Y="301" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBDD_GUI_LANGUAGE_PHRASE" ZOrder="4" X="1427" Y="251" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
-    <Shape ID="DesignTable:TBWH_CONNECTION" ZOrder="20" X="625" Y="114" Height="276" Width="189" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="272" />
+    <Shape ID="DesignTable:VWPM_CHART_INVOICE_MONITOR" ZOrder="3" 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="2" X="1903" Y="311" Height="153" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
+    <Shape ID="DesignTable:TBWH_CONNECTION" ZOrder="22" 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_ERROR_LOG_PROFILE1" ZOrder="22" LineWidth="11">
+    <Connector ID="DesignRelation:FK_TBPM_ERROR_LOG_PROFILE1" ZOrder="24" LineWidth="11">
       <RoutePoints>
         <Point>
           <X>549</X>
-          <Y>316</Y>
+          <Y>315</Y>
         </Point>
         <Point>
           <X>549</X>
@@ -38,7 +40,7 @@
         </Point>
       </RoutePoints>
     </Connector>
-    <Connector ID="DesignRelation:FK_TBPM_PROFILE_TYPE1" ZOrder="21" LineWidth="11">
+    <Connector ID="DesignRelation:FK_TBPM_PROFILE_TYPE1" ZOrder="23" LineWidth="11">
       <RoutePoints>
         <Point>
           <X>175</X>
@@ -50,35 +52,35 @@
         </Point>
         <Point>
           <X>448</X>
-          <Y>316</Y>
+          <Y>315</Y>
         </Point>
       </RoutePoints>
     </Connector>
-    <Connector ID="DesignRelation:FK_TBPM_PROFILE_CONTROLS_PROFILE1" ZOrder="18" LineWidth="11">
+    <Connector ID="DesignRelation:FK_TBPM_PROFILE_CONTROLS_PROFILE1" ZOrder="20" LineWidth="11">
       <RoutePoints>
         <Point>
           <X>603</X>
-          <Y>501</Y>
+          <Y>498</Y>
         </Point>
         <Point>
-          <X>947</X>
+          <X>948</X>
-          <Y>501</Y>
+          <Y>498</Y>
         </Point>
       </RoutePoints>
     </Connector>
-    <Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL1" ZOrder="17" LineWidth="11">
+    <Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL1" ZOrder="19" LineWidth="11">
       <RoutePoints>
         <Point>
-          <X>1247</X>
+          <X>1248</X>
-          <Y>542</Y>
+          <Y>540</Y>
         </Point>
         <Point>
           <X>1300</X>
-          <Y>542</Y>
+          <Y>540</Y>
         </Point>
       </RoutePoints>
     </Connector>
-    <Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL" ZOrder="15" LineWidth="11">
+    <Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL" ZOrder="17" LineWidth="11">
       <RoutePoints>
         <Point>
           <X>141</X>

app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj

@@ -8,9 +8,9 @@
     <SchemaVersion>2.0</SchemaVersion>
     <ProjectGuid>{6ACA1432-09A2-47EF-A704-C0AA73905756}</ProjectGuid>
     <OutputType>WinExe</OutputType>
-    <StartupObject>DD_PM_WINDREAM.My.MyApplication</StartupObject>
+    <StartupObject>DD_ProcessManager.My.MyApplication</StartupObject>
-    <RootNamespace>DD_PM_WINDREAM</RootNamespace>
+    <RootNamespace>DD_ProcessManager</RootNamespace>
-    <AssemblyName>DD_PM_WINDREAM</AssemblyName>
+    <AssemblyName>DD_ProcessManager</AssemblyName>
     <FileAlignment>512</FileAlignment>
     <MyType>WindowsForms</MyType>
     <TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
@@ -39,7 +39,7 @@
     <DefineDebug>true</DefineDebug>
     <DefineTrace>true</DefineTrace>
     <OutputPath>bin\Debug\</OutputPath>
-    <DocumentationFile>DD_PM_WINDREAM.xml</DocumentationFile>
+    <DocumentationFile>DD_ProcessManager.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
     <Prefer32Bit>false</Prefer32Bit>
     <CodeAnalysisRuleSet>UnusedCode.ruleset</CodeAnalysisRuleSet>
@@ -51,7 +51,7 @@
     <DefineTrace>true</DefineTrace>
     <Optimize>true</Optimize>
     <OutputPath>bin\Release\</OutputPath>
-    <DocumentationFile>DD_PM_WINDREAM.xml</DocumentationFile>
+    <DocumentationFile>DD_ProcessManager.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>
@@ -89,17 +89,22 @@
     <Reference Include="DevExpress.Images.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
     </Reference>
+    <Reference Include="DevExpress.Pdf.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
     <Reference Include="DevExpress.Pdf.v19.2.Drawing, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
     </Reference>
+    <Reference Include="DevExpress.PivotGrid.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
     <Reference Include="DevExpress.Printing.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.Office.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.RichEdit.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.RichEdit.v19.2.Export, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
+    <Reference Include="DevExpress.Sparkline.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
     <Reference Include="DevExpress.Utils.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.Utils.v19.2.UI, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.Xpf.PdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
     </Reference>
+    <Reference Include="DevExpress.Xpo.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
     </Reference>
@@ -117,6 +122,7 @@
     </Reference>
     <Reference Include="DevExpress.XtraDiagram.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.XtraGauges.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
     <Reference Include="DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
     <Reference Include="DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.XtraNavBar.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
@@ -126,10 +132,13 @@
       <SpecificVersion>False</SpecificVersion>
     </Reference>
     <Reference Include="DevExpress.XtraPrinting.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.XtraReports.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
+    <Reference Include="DevExpress.XtraReports.v19.2.Extensions, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.XtraRichEdit.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DevExpress.XtraTreeList.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
     </Reference>
+    <Reference Include="DevExpress.XtraVerticalGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
     <Reference Include="DigitalData.Controls.DocumentViewer">
       <HintPath>..\..\..\DDMonorepo\Controls.DocumentViewer\bin\Debug\DigitalData.Controls.DocumentViewer.dll</HintPath>
     </Reference>
@@ -153,6 +162,23 @@
       <SpecificVersion>False</SpecificVersion>
       <HintPath>..\..\..\DDMonorepo\Controls.DocumentViewer\bin\Debug\Independentsoft.Msg.dll</HintPath>
     </Reference>
+    <Reference Include="Interop.WINDREAMLib, Version=1.0.0.0, Culture=neutral, processorArchitecture=x86">
+      <SpecificVersion>False</SpecificVersion>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+      <HintPath>..\..\..\..\Interop.WINDREAMLib.dll</HintPath>
+    </Reference>
+    <Reference Include="Interop.WMOBRWSLib">
+      <HintPath>..\..\..\..\Interop.WMOBRWSLib.dll</HintPath>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+    </Reference>
+    <Reference Include="Interop.WMOSRCHLib">
+      <HintPath>..\..\..\..\Interop.WMOSRCHLib.dll</HintPath>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+    </Reference>
+    <Reference Include="Interop.WMOTOOLLib">
+      <HintPath>..\..\..\..\Interop.WMOTOOLLib.dll</HintPath>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+    </Reference>
     <Reference Include="Microsoft.CSharp" />
     <Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
       <HintPath>..\packages\NLog.4.5.11\lib\net45\NLog.dll</HintPath>
@@ -164,8 +190,10 @@
       <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\PdfSharp-gdi.dll</HintPath>
     </Reference>
     <Reference Include="System" />
+    <Reference Include="System.ComponentModel.DataAnnotations" />
     <Reference Include="System.Configuration" />
     <Reference Include="System.Data" />
+    <Reference Include="System.Data.Linq" />
     <Reference Include="System.Data.OracleClient" />
     <Reference Include="System.Deployment" />
     <Reference Include="System.Design" />
@@ -285,6 +313,37 @@
     <Compile Include="frmControl_Detail.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmDesignerLayout.Designer.vb">
+      <DependentUpon>frmDesignerLayout.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmDesignerLayout.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="frmDesignerLayout\Editors\DatasourceEditor.vb" />
+    <Compile Include="frmDesignerLayout\Editors\DatasourceType.vb" />
+    <Compile Include="frmDesignerLayout\Editors\frmDatasourceEditor.Designer.vb">
+      <DependentUpon>frmDatasourceEditor.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmDesignerLayout\Editors\frmDatasourceEditor.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="frmDesignerLayout\Editors\frmStaticListEditor.Designer.vb">
+      <DependentUpon>frmStaticListEditor.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmDesignerLayout\Editors\frmStaticListEditor.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="frmDesignerLayout\Editors\StaticListEditor.vb" />
+    <Compile Include="frmDesignerLayout\Loader.vb" />
+    <Compile Include="frmDesignerLayout\Localization.vb" />
+    <Compile Include="frmDesignerLayout\Metadata.vb" />
+    <Compile Include="frmDesignerLayout\Properties\BaseProperties.vb" />
+    <Compile Include="frmDesignerLayout\Properties\CheckboxProperties.vb" />
+    <Compile Include="frmDesignerLayout\Properties\ComboboxProperties.vb" />
+    <Compile Include="frmDesignerLayout\Properties\DatepickerProperties.vb" />
+    <Compile Include="frmDesignerLayout\Properties\MemoeditProperties.vb" />
+    <Compile Include="frmDesignerLayout\Properties\TextboxProperties.vb" />
+    <Compile Include="frmDesignerLayout\Serializer.vb" />
     <Compile Include="frmDocView.Designer.vb">
       <DependentUpon>frmDocView.vb</DependentUpon>
     </Compile>
@@ -309,6 +368,12 @@
     <Compile Include="frmFormDesigner.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmInvDashboard.Designer.vb">
+      <DependentUpon>frmInvDashboard.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmInvDashboard.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="frmLicense.Designer.vb">
       <DependentUpon>frmLicense.vb</DependentUpon>
     </Compile>
@@ -339,6 +404,12 @@
     <Compile Include="frmKonfig.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmMetadataFile.Designer.vb">
+      <DependentUpon>frmMetadataFile.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmMetadataFile.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="frmMonitor.Designer.vb">
       <DependentUpon>frmMonitor.vb</DependentUpon>
     </Compile>
@@ -420,6 +491,12 @@
       <DesignTimeSharedInput>True</DesignTimeSharedInput>
       <DependentUpon>Settings.settings</DependentUpon>
     </Compile>
+    <Compile Include="XtraReport1.Designer.vb">
+      <DependentUpon>XtraReport1.vb</DependentUpon>
+    </Compile>
+    <Compile Include="XtraReport1.vb">
+      <SubType>Component</SubType>
+    </Compile>
   </ItemGroup>
   <ItemGroup>
     <EmbeddedResource Include="frmAbout.resx">
@@ -427,6 +504,7 @@
     </EmbeddedResource>
     <EmbeddedResource Include="frmAdmin2.resx">
       <DependentUpon>frmAdmin2.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="frmAdminPasswort.resx">
       <DependentUpon>frmAdminPasswort.vb</DependentUpon>
@@ -447,6 +525,18 @@
     <EmbeddedResource Include="frmControl_Detail.resx">
       <DependentUpon>frmControl_Detail.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmDesignerLayout.resx">
+      <DependentUpon>frmDesignerLayout.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmDesignerLayout\Editors\frmDatasourceEditor.resx">
+      <DependentUpon>frmDatasourceEditor.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmDesignerLayout\Editors\frmStaticListEditor.en-US.resx">
+      <DependentUpon>frmStaticListEditor.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmDesignerLayout\Editors\frmStaticListEditor.resx">
+      <DependentUpon>frmStaticListEditor.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmDocView.resx">
       <DependentUpon>frmDocView.vb</DependentUpon>
     </EmbeddedResource>
@@ -459,6 +549,9 @@
     <EmbeddedResource Include="frmFormDesigner.resx">
       <DependentUpon>frmFormDesigner.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmInvDashboard.resx">
+      <DependentUpon>frmInvDashboard.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmLicense.resx">
       <DependentUpon>frmLicense.vb</DependentUpon>
     </EmbeddedResource>
@@ -484,6 +577,9 @@
     <EmbeddedResource Include="frmKonfig.resx">
       <DependentUpon>frmKonfig.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmMetadataFile.resx">
+      <DependentUpon>frmMetadataFile.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmMonitor.resx">
       <DependentUpon>frmMonitor.vb</DependentUpon>
     </EmbeddedResource>
@@ -517,6 +613,7 @@
     </EmbeddedResource>
     <EmbeddedResource Include="frmValidatorSearch.resx">
       <DependentUpon>frmValidatorSearch.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="My Project\licenses.licx" />
     <EmbeddedResource Include="My Project\Resources.resx">
@@ -525,6 +622,9 @@
       <SubType>Designer</SubType>
       <LastGenOutput>Resources.Designer.vb</LastGenOutput>
     </EmbeddedResource>
+    <EmbeddedResource Include="XtraReport1.resx">
+      <DependentUpon>XtraReport1.vb</DependentUpon>
+    </EmbeddedResource>
   </ItemGroup>
   <ItemGroup>
     <None Include="App.config" />
@@ -567,44 +667,6 @@
   <ItemGroup>
     <None Include="Resources\syncreon.png" />
   </ItemGroup>
-  <ItemGroup>
-    <COMReference Include="WINDREAMLib">
-      <Guid>{18E0EEE0-42A3-11D3-B322-00104B066E1A}</Guid>
-      <VersionMajor>1</VersionMajor>
-      <VersionMinor>0</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>tlbimp</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>False</EmbedInteropTypes>
-    </COMReference>
-    <COMReference Include="WMOBRWSLib">
-      <Guid>{25B51999-6DCA-11D4-B815-00104BB52DEA}</Guid>
-      <VersionMajor>1</VersionMajor>
-      <VersionMinor>0</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>tlbimp</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-    <COMReference Include="WMOSRCHLib">
-      <Guid>{BE4F1D13-88A8-11D4-B3FA-0001021F035F}</Guid>
-      <VersionMajor>1</VersionMajor>
-      <VersionMinor>0</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>tlbimp</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-    <COMReference Include="WMOTOOLLib">
-      <Guid>{A704B4C1-E1C1-11D2-B2A9-00104B066E1A}</Guid>
-      <VersionMajor>1</VersionMajor>
-      <VersionMinor>0</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>tlbimp</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-  </ItemGroup>
   <ItemGroup>
     <None Include="Resources\flag_green.png" />
   </ItemGroup>
@@ -785,6 +847,9 @@
   <ItemGroup>
     <Content Include="DD_Icons_ICO_PMANAGER_48px.ico" />
     <Content Include="PM_ohne_slogan_128px.ico" />
+    <None Include="Resources\image.png" />
+    <None Include="Resources\Image_File.png" />
+    <None Include="Resources\TextBox.png" />
     <None Include="Resources\Monitor_Screen_16xLG.png" />
     <None Include="Resources\hide_16x16.png" />
     <None Include="Resources\hide_32x32.png" />

app/DD_PM_WINDREAM/FinalIndexDataSet.Designer.vb

@@ -1144,7 +1144,7 @@ Namespace FinalIndexDataSetTableAdapters
          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")>  _
         Private Sub InitConnection()
             Me._connection = New Global.System.Data.SqlClient.SqlConnection()
-            Me._connection.ConnectionString = Global.DD_PM_WINDREAM.My.MySettings.Default.ConnectionString
+            Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString
         End Sub
         
         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _

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_PM_WINDREAM.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.DD_ProcessManager.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">
@@ -98,7 +98,7 @@ VALUES        (@PROFIL_ID,@INDEXNAME,@VALUE,@ADDED_WHO,@CONNECTION_ID,@SQL_COMMA
   <xs:element name="FinalIndexDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="FinalIndexDataSet" msprop:Generator_UserDSName="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_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_UserTableName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow">
+        <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: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" />

app/DD_PM_WINDREAM/ModuleRuntimeVariables.vb

@@ -5,9 +5,21 @@ Imports DigitalData.Modules.Logging
 Module ModuleRuntimeVariables
 
     ' Diese Werte müssen später zur Laufzeit geladen werden
+    Public BASEDATA_DT_TBDD_CONNECTION As DataTable
+    Public BASEDATA_DT_CONFIG As DataTable
+    Public BASEDATA_DTGRID_GROUPS As DataTable
+    Public BASEDATA_DT_CHARTS As DataTable
+    Public BASEDATA_DT_GUI_LANGUAGE_PHRASES As DataTable
+    Public BASEDATA_DT_PROFILES_SEARCHES_DOC As DataTable
+    Public BASEDATA_DT_PROFILE_SEARCHES_DOC As DataTable
+
+    Public BASEDATA_DT_PROFILES_SEARCHES_SQL As DataTable
+    Public BASEDATA_DT_PROFILE_SEARCHES_SQL As DataTable
+    Public BASEDATA_DT_VW_PROFILE_USER As DataTable
+
     Public CURRENT_ProfilGUID As Integer
     Public CURRENT_ProfilName As String
-    Public CURRENT_PROFILE_VEKTOR_LOG As String
+    Public CURRENT_PROFILE_LOG_INDEX As String
     Public CURRENT_HTML_DOC As String
 
     Public CURRENT_DOC_GUID As Integer
@@ -15,6 +27,8 @@ Module ModuleRuntimeVariables
     Public CURRENT_DOC_CREATION_DATE As String
     Public CURRENT_DOC_CREATION_TIME As String
 
+    Public CURRENT_CONN_ID As Integer
+
     Public CURRENT_JUMP_DOC_GUID As Integer
     Public CURRENT_WMFILE As WMObject
 
@@ -35,7 +49,7 @@ Module ModuleRuntimeVariables
     Public USER_EXISTS = False
     Public USER_IN_MODULE = False
     Public USER_RIGHT_FILE_DELETE As Boolean = False
-    Public USER_RIGHT1 As Boolean = False
+    Public USER_RIGHT_VIEW_ONLY As Boolean = False
     Public USER_RIGHT2 As Boolean = False
     Public USER_RIGHT3 As Boolean = False
     Public USER_RIGHT4 As Boolean = False
@@ -47,6 +61,8 @@ Module ModuleRuntimeVariables
     Public SHOW_MASS_VALIDATOR As Boolean = True
     Public WORKING_MODE As String = ""
     Public MONITORING_ACTIVE As Boolean = False
+    Public RIBBON_COLOR_SCHEME As String = "Blue"
+    Public ADDITIONAL_TITLE As String = ""
 
     Public LICENSE_COUNT As Integer = 0
     Public LICENSE_EXPIRED As Boolean = False
@@ -59,8 +75,7 @@ Module ModuleRuntimeVariables
     Public CURRENT_SQL_CON As Integer
     Public CURRENT_SQL_COMAMND As String
     Public CURRENT_DT_SQL_CONFIG_TABLE As DataTable
-    Public CURRENT_DT_TBDD_CONNECTION As DataTable
+
-    Public CURRENT_DT_CONFIG As DataTable
     Public CURRENT_CLICKED_PROFILE_ID As Integer = 0
     Public CURRENT_CLICKED_PROFILE_TITLE As String
 
@@ -77,12 +92,18 @@ Module ModuleRuntimeVariables
     Public CURRENT_DT_MASS_CHANGE_DOCS As DataTable
 
     Public CURRENT_DT_FINAL_INDEXING As DataTable
+    Public CURRENT_DT_PROFILES As DataTable
     Public CURRENT_DT_PROFILE As DataTable
-    Public CURRENT_DT_PROFILE_SEARCHES_DOC As DataTable
+
-    Public CURRENT_DT_PROFILE_SEARCHES_SQL As DataTable
+
     Public CURRENT_INDEX_ARRAY(100, 250) As String
-    Public CURRENT_DT_VW_PROFILE_USER As DataTable
+
-    Public CURRENT_DT_GUI_LANGUAGE_PHRASES As DataTable
+
+
+    Public DTVWCONTROLS_INDEX As DataTable
+    Public DTVWCONTROL_INDEX As DataTable
+
+    Public DTCONTROLS_WITH_SQL As DataTable
 
     Public CURRENT_CONTROL_ID As Integer
 

app/DD_PM_WINDREAM/My Project/Application.Designer.vb

@@ -32,7 +32,7 @@ Namespace My
         
         <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
         Protected Overrides Sub OnCreateMainForm()
-            Me.MainForm = Global.DD_PM_WINDREAM.frmMain
+            Me.MainForm = Global.DD_ProcessManager.frmMain
         End Sub
     End Class
 End Namespace

app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.0.0.0")>
+<Assembly: AssemblyVersion("2.0.0.9")>
 <Assembly: AssemblyFileVersion("1.0.0.0")> 

app/DD_PM_WINDREAM/My 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", "15.0.0.0"),  _
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "16.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_PM_WINDREAM.Resources", GetType(Resources).Assembly)
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_ProcessManager.Resources", GetType(Resources).Assembly)
                     resourceMan = temp
                 End If
                 Return resourceMan
@@ -550,6 +550,26 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property image() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("image", 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 Image_File() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Image_File", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
@@ -890,6 +910,16 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property TextBox() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("TextBox", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>

app/DD_PM_WINDREAM/My Project/Resources.resx

@@ -121,20 +121,29 @@
   <data name="refresh_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\refresh_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="arrow_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\arrow_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="asterisk_yellow" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\asterisk_yellow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="key" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="action_add_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\key.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\action_add_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="ComboBox_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="database_save" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\ComboBox_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\database_save.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="hide_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\hide_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="GoToDeclaration_5576" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\GoToDeclaration_5576.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="database_go1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\database_go1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="GoToDeclaration_5576" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="key" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\GoToDeclaration_5576.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\key.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="DateOrTimePicker_675" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\DateOrTimePicker_675.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -166,8 +175,8 @@
   <data name="_blank" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\_blank.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="cancel" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="zoom_in" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\cancel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\zoom_in.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="ampel-rot" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\ampel-rot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -175,6 +184,9 @@
   <data name="Settings" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\Settings.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="Search(Go)_5718" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\Search(Go)_5718.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="application_form_edit" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\application_form_edit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -187,9 +199,6 @@
   <data name="txt" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\txt.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="hide_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\hide_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="checkbox_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\checkbox_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -202,12 +211,12 @@
   <data name="database_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\database_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="zoom_in" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\zoom_in.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="information" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\information.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="Image_File" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\Image_File.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="key_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\key_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -235,9 +244,6 @@
   <data name="Hammer_Builder_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\Hammer_Builder_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="magifier_zoom_out" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\magifier_zoom_out.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="page_copy" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\page_copy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -256,15 +262,9 @@
   <data name="add" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\add.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="book_open" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\book_open.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="refresh_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\refresh_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="user" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\user.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="ampel-gruen" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\ampel-gruen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -274,8 +274,11 @@
   <data name="doc_pdf" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\doc_pdf.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="Search(Go)_5718" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="book_open" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\Search(Go)_5718.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\book_open.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="cancel" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\cancel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="puzzle2" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\puzzle2.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -289,8 +292,8 @@
   <data name="Nextrequest_10302" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\Nextrequest_10302.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="bullet_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="TextBox" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\bullet_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\TextBox.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="resultset_last" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\resultset_last.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -319,20 +322,20 @@
   <data name="lbl" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\lbl.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="ID_FILE_PAGE_SETUP" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="ComboBox_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\ID_FILE_PAGE_SETUP.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\ComboBox_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="show_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\show_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="flag_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="ID_FILE_PAGE_SETUP" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\flag_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\ID_FILE_PAGE_SETUP.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="flag_orange" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\flag_orange.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="arrow_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="bullet_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\arrow_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\bullet_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="resultset_previous" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\resultset_previous.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -346,8 +349,11 @@
   <data name="flag_green" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\flag_green.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="database_save" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="Monitor_Screen_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\database_save.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\Monitor_Screen_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="flag_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\flag_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="OpenFileDialog_692" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\OpenFileDialog_692.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -355,6 +361,9 @@
   <data name="doc_text_image" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\doc_text_image.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="Einstellungen6" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\Einstellungen6.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="pdf" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\pdf.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -364,8 +373,8 @@
   <data name="WorkItem_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\WorkItem_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="action_add_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="user" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\action_add_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\user.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="resultset_first" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\resultset_first.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -385,8 +394,8 @@
   <data name="Checkbox" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\Checkbox.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="Einstellungen6" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="magifier_zoom_out" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\Einstellungen6.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\magifier_zoom_out.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="key1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\key1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -394,7 +403,7 @@
   <data name="user_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\user_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="Monitor_Screen_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="image" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\Monitor_Screen_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\image.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
 </root>

app/DD_PM_WINDREAM/My Project/Settings.Designer.vb

@@ -231,7 +231,7 @@ Namespace My
         
         <Global.System.Configuration.UserScopedSettingAttribute(),  _
          Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("558")>  _
+         Global.System.Configuration.DefaultSettingValueAttribute("563")>  _
         Public Property frmValSearchSplitterDistance() As Integer
             Get
                 Return CType(Me("frmValSearchSplitterDistance"),Integer)
@@ -299,9 +299,9 @@ Namespace My
     Friend Module MySettingsProperty
         
         <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
-        Friend ReadOnly Property Settings() As Global.DD_PM_WINDREAM.My.MySettings
+        Friend ReadOnly Property Settings() As Global.DD_ProcessManager.My.MySettings
             Get
-                Return Global.DD_PM_WINDREAM.My.MySettings.Default
+                Return Global.DD_ProcessManager.My.MySettings.Default
             End Get
         End Property
     End Module

app/DD_PM_WINDREAM/My Project/Settings.settings

@@ -50,7 +50,7 @@
       <Value Profile="(Default)">0, 0</Value>
     </Setting>
     <Setting Name="frmValSearchSplitterDistance" Type="System.Int32" Scope="User">
-      <Value Profile="(Default)">558</Value>
+      <Value Profile="(Default)">563</Value>
     </Setting>
     <Setting Name="frmMainWindowState" Type="System.String" Scope="User">
       <Value Profile="(Default)">Normal</Value>

app/DD_PM_WINDREAM/My Project/licenses.licx

@@ -1,5 +1,15 @@
-DevExpress.XtraCharts.ChartControl, DevExpress.XtraCharts.v19.2.UI, 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.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.XtraLayout.LayoutControl, DevExpress.XtraLayout.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.DateEdit, DevExpress.XtraEditors.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.XtraVerticalGrid.PropertyGridControl, DevExpress.XtraVerticalGrid.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.ComboBoxEdit, DevExpress.XtraEditors.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
+DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.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.XtraEditors.Repository.RepositoryItemProgressBar, DevExpress.XtraEditors.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

app/DD_PM_WINDREAM/My Project/licenses.licx.bak

@@ -1 +1,5 @@
+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

app/DD_PM_WINDREAM/XtraReport1.Designer.vb

@@ -0,0 +1,430 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Public Class XtraReport1
+    Inherits DevExpress.XtraReports.UI.XtraReport
+
+    'XtraReport overrides dispose to clean up the component list.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing AndAlso components IsNot Nothing Then
+            components.Dispose()
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+
+    'Required by the Designer
+    Private components As System.ComponentModel.IContainer
+
+    'NOTE: The following procedure is required by the Designer
+    'It can be modified using the Designer.  
+    'Do not modify it using the code editor.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim SelectQuery1 As DevExpress.DataAccess.Sql.SelectQuery = New DevExpress.DataAccess.Sql.SelectQuery()
+        Dim Column1 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
+        Dim ColumnExpression1 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
+        Dim Table4 As DevExpress.DataAccess.Sql.Table = New DevExpress.DataAccess.Sql.Table()
+        Dim Column2 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
+        Dim ColumnExpression2 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
+        Dim Column3 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
+        Dim ColumnExpression3 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(XtraReport1))
+        Me.SqlDataSource1 = New DevExpress.DataAccess.Sql.SqlDataSource(Me.components)
+        Me.Title = New DevExpress.XtraReports.UI.XRControlStyle()
+        Me.GroupCaption1 = New DevExpress.XtraReports.UI.XRControlStyle()
+        Me.GroupData1 = New DevExpress.XtraReports.UI.XRControlStyle()
+        Me.PageInfo = New DevExpress.XtraReports.UI.XRControlStyle()
+        Me.DetailData1VerticalFirstRow = New DevExpress.XtraReports.UI.XRControlStyle()
+        Me.DetailData1VerticalLastRow_Even = New DevExpress.XtraReports.UI.XRControlStyle()
+        Me.HeaderData1VerticalFirstRow = New DevExpress.XtraReports.UI.XRControlStyle()
+        Me.HeaderData1VerticalLastRow_Even = New DevExpress.XtraReports.UI.XRControlStyle()
+        Me.TopMargin = New DevExpress.XtraReports.UI.TopMarginBand()
+        Me.BottomMargin = New DevExpress.XtraReports.UI.BottomMarginBand()
+        Me.ReportHeader = New DevExpress.XtraReports.UI.ReportHeaderBand()
+        Me.GroupHeader1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
+        Me.VerticalHeader = New DevExpress.XtraReports.UI.VerticalHeaderBand()
+        Me.VerticalDetail = New DevExpress.XtraReports.UI.VerticalDetailBand()
+        Me.pageInfo1 = New DevExpress.XtraReports.UI.XRPageInfo()
+        Me.pageInfo2 = New DevExpress.XtraReports.UI.XRPageInfo()
+        Me.label1 = New DevExpress.XtraReports.UI.XRLabel()
+        Me.table1 = New DevExpress.XtraReports.UI.XRTable()
+        Me.tableRow1 = New DevExpress.XtraReports.UI.XRTableRow()
+        Me.tableCell1 = New DevExpress.XtraReports.UI.XRTableCell()
+        Me.tableCell2 = New DevExpress.XtraReports.UI.XRTableCell()
+        Me.table2 = New DevExpress.XtraReports.UI.XRTable()
+        Me.tableRow2 = New DevExpress.XtraReports.UI.XRTableRow()
+        Me.tableRow3 = New DevExpress.XtraReports.UI.XRTableRow()
+        Me.tableCell3 = New DevExpress.XtraReports.UI.XRTableCell()
+        Me.tableCell4 = New DevExpress.XtraReports.UI.XRTableCell()
+        Me.table3 = New DevExpress.XtraReports.UI.XRTable()
+        Me.tableRow4 = New DevExpress.XtraReports.UI.XRTableRow()
+        Me.tableRow5 = New DevExpress.XtraReports.UI.XRTableRow()
+        Me.tableCell5 = New DevExpress.XtraReports.UI.XRTableCell()
+        Me.tableCell6 = New DevExpress.XtraReports.UI.XRTableCell()
+        CType(Me.table1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.table2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.table3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
+        '
+        'SqlDataSource1
+        '
+        Me.SqlDataSource1.ConnectionName = "DD_ProcessManager.My.MySettings.ConnectionString"
+        Me.SqlDataSource1.Name = "SqlDataSource1"
+        ColumnExpression1.ColumnName = "Anzahl"
+        Table4.Name = "VWPM_CHART_INVOICE_MONITOR"
+        ColumnExpression1.Table = Table4
+        Column1.Expression = ColumnExpression1
+        ColumnExpression2.ColumnName = "WFState"
+        ColumnExpression2.Table = Table4
+        Column2.Expression = ColumnExpression2
+        ColumnExpression3.ColumnName = "NettoSumme"
+        ColumnExpression3.Table = Table4
+        Column3.Expression = ColumnExpression3
+        SelectQuery1.Columns.Add(Column1)
+        SelectQuery1.Columns.Add(Column2)
+        SelectQuery1.Columns.Add(Column3)
+        SelectQuery1.Name = "VWPM_CHART_INVOICE_MONITOR"
+        SelectQuery1.Tables.Add(Table4)
+        Me.SqlDataSource1.Queries.AddRange(New DevExpress.DataAccess.Sql.SqlQuery() {SelectQuery1})
+        Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable")
+        '
+        'Title
+        '
+        Me.Title.BackColor = System.Drawing.Color.Transparent
+        Me.Title.BorderColor = System.Drawing.Color.Black
+        Me.Title.Borders = DevExpress.XtraPrinting.BorderSide.None
+        Me.Title.BorderWidth = 1.0!
+        Me.Title.Font = New System.Drawing.Font("Arial", 14.25!)
+        Me.Title.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(70, Byte), Integer), CType(CType(80, Byte), Integer))
+        Me.Title.Name = "Title"
+        '
+        'GroupCaption1
+        '
+        Me.GroupCaption1.BackColor = System.Drawing.Color.FromArgb(CType(CType(23, Byte), Integer), CType(CType(104, Byte), Integer), CType(CType(196, Byte), Integer))
+        Me.GroupCaption1.BorderColor = System.Drawing.Color.White
+        Me.GroupCaption1.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
+        Me.GroupCaption1.BorderWidth = 2.0!
+        Me.GroupCaption1.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold)
+        Me.GroupCaption1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer))
+        Me.GroupCaption1.Name = "GroupCaption1"
+        Me.GroupCaption1.Padding = New DevExpress.XtraPrinting.PaddingInfo(15, 5, 0, 0, 254.0!)
+        Me.GroupCaption1.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
+        '
+        'GroupData1
+        '
+        Me.GroupData1.BackColor = System.Drawing.Color.FromArgb(CType(CType(23, Byte), Integer), CType(CType(104, Byte), Integer), CType(CType(196, Byte), Integer))
+        Me.GroupData1.BorderColor = System.Drawing.Color.White
+        Me.GroupData1.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
+        Me.GroupData1.BorderWidth = 2.0!
+        Me.GroupData1.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold)
+        Me.GroupData1.ForeColor = System.Drawing.Color.White
+        Me.GroupData1.Name = "GroupData1"
+        Me.GroupData1.Padding = New DevExpress.XtraPrinting.PaddingInfo(15, 5, 0, 0, 254.0!)
+        Me.GroupData1.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
+        '
+        'PageInfo
+        '
+        Me.PageInfo.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold)
+        Me.PageInfo.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(70, Byte), Integer), CType(CType(80, Byte), Integer))
+        Me.PageInfo.Name = "PageInfo"
+        Me.PageInfo.Padding = New DevExpress.XtraPrinting.PaddingInfo(5, 5, 0, 0, 254.0!)
+        '
+        'DetailData1VerticalFirstRow
+        '
+        Me.DetailData1VerticalFirstRow.BackColor = System.Drawing.Color.FromArgb(CType(CType(243, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(248, Byte), Integer))
+        Me.DetailData1VerticalFirstRow.BorderColor = System.Drawing.Color.White
+        Me.DetailData1VerticalFirstRow.Borders = CType((DevExpress.XtraPrinting.BorderSide.Top Or DevExpress.XtraPrinting.BorderSide.Right), DevExpress.XtraPrinting.BorderSide)
+        Me.DetailData1VerticalFirstRow.BorderWidth = 2.0!
+        Me.DetailData1VerticalFirstRow.Font = New System.Drawing.Font("Arial", 8.25!)
+        Me.DetailData1VerticalFirstRow.ForeColor = System.Drawing.Color.FromArgb(CType(CType(51, Byte), Integer), CType(CType(51, Byte), Integer), CType(CType(51, Byte), Integer))
+        Me.DetailData1VerticalFirstRow.Name = "DetailData1VerticalFirstRow"
+        Me.DetailData1VerticalFirstRow.Padding = New DevExpress.XtraPrinting.PaddingInfo(15, 15, 0, 0, 254.0!)
+        Me.DetailData1VerticalFirstRow.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
+        '
+        'DetailData1VerticalLastRow_Even
+        '
+        Me.DetailData1VerticalLastRow_Even.BackColor = System.Drawing.Color.Transparent
+        Me.DetailData1VerticalLastRow_Even.BorderColor = System.Drawing.Color.White
+        Me.DetailData1VerticalLastRow_Even.Borders = CType((DevExpress.XtraPrinting.BorderSide.Right Or DevExpress.XtraPrinting.BorderSide.Bottom), DevExpress.XtraPrinting.BorderSide)
+        Me.DetailData1VerticalLastRow_Even.BorderWidth = 2.0!
+        Me.DetailData1VerticalLastRow_Even.Font = New System.Drawing.Font("Arial", 8.25!)
+        Me.DetailData1VerticalLastRow_Even.ForeColor = System.Drawing.Color.FromArgb(CType(CType(51, Byte), Integer), CType(CType(51, Byte), Integer), CType(CType(51, Byte), Integer))
+        Me.DetailData1VerticalLastRow_Even.Name = "DetailData1VerticalLastRow_Even"
+        Me.DetailData1VerticalLastRow_Even.Padding = New DevExpress.XtraPrinting.PaddingInfo(15, 15, 0, 0, 254.0!)
+        Me.DetailData1VerticalLastRow_Even.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
+        '
+        'HeaderData1VerticalFirstRow
+        '
+        Me.HeaderData1VerticalFirstRow.BackColor = System.Drawing.Color.FromArgb(CType(CType(37, Byte), Integer), CType(CType(129, Byte), Integer), CType(CType(216, Byte), Integer))
+        Me.HeaderData1VerticalFirstRow.BorderColor = System.Drawing.Color.White
+        Me.HeaderData1VerticalFirstRow.Borders = CType((DevExpress.XtraPrinting.BorderSide.Top Or DevExpress.XtraPrinting.BorderSide.Right), DevExpress.XtraPrinting.BorderSide)
+        Me.HeaderData1VerticalFirstRow.BorderWidth = 2.0!
+        Me.HeaderData1VerticalFirstRow.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold)
+        Me.HeaderData1VerticalFirstRow.ForeColor = System.Drawing.Color.White
+        Me.HeaderData1VerticalFirstRow.Name = "HeaderData1VerticalFirstRow"
+        Me.HeaderData1VerticalFirstRow.Padding = New DevExpress.XtraPrinting.PaddingInfo(15, 15, 0, 0, 254.0!)
+        Me.HeaderData1VerticalFirstRow.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
+        '
+        'HeaderData1VerticalLastRow_Even
+        '
+        Me.HeaderData1VerticalLastRow_Even.BackColor = System.Drawing.Color.FromArgb(CType(CType(55, Byte), Integer), CType(CType(153, Byte), Integer), CType(CType(224, Byte), Integer))
+        Me.HeaderData1VerticalLastRow_Even.BorderColor = System.Drawing.Color.White
+        Me.HeaderData1VerticalLastRow_Even.Borders = CType((DevExpress.XtraPrinting.BorderSide.Right Or DevExpress.XtraPrinting.BorderSide.Bottom), DevExpress.XtraPrinting.BorderSide)
+        Me.HeaderData1VerticalLastRow_Even.BorderWidth = 2.0!
+        Me.HeaderData1VerticalLastRow_Even.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold)
+        Me.HeaderData1VerticalLastRow_Even.ForeColor = System.Drawing.Color.White
+        Me.HeaderData1VerticalLastRow_Even.Name = "HeaderData1VerticalLastRow_Even"
+        Me.HeaderData1VerticalLastRow_Even.Padding = New DevExpress.XtraPrinting.PaddingInfo(15, 15, 0, 0, 254.0!)
+        Me.HeaderData1VerticalLastRow_Even.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
+        '
+        'TopMargin
+        '
+        Me.TopMargin.Dpi = 254.0!
+        Me.TopMargin.HeightF = 254.0!
+        Me.TopMargin.Name = "TopMargin"
+        '
+        'BottomMargin
+        '
+        Me.BottomMargin.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.pageInfo1, Me.pageInfo2})
+        Me.BottomMargin.Dpi = 254.0!
+        Me.BottomMargin.HeightF = 91.86333!
+        Me.BottomMargin.Name = "BottomMargin"
+        '
+        'ReportHeader
+        '
+        Me.ReportHeader.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.label1})
+        Me.ReportHeader.Dpi = 254.0!
+        Me.ReportHeader.HeightF = 152.4!
+        Me.ReportHeader.Name = "ReportHeader"
+        '
+        'GroupHeader1
+        '
+        Me.GroupHeader1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.table1})
+        Me.GroupHeader1.Dpi = 254.0!
+        Me.GroupHeader1.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("WFState", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
+        Me.GroupHeader1.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
+        Me.GroupHeader1.HeightF = 68.58!
+        Me.GroupHeader1.Name = "GroupHeader1"
+        '
+        'VerticalHeader
+        '
+        Me.VerticalHeader.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.table2})
+        Me.VerticalHeader.Dpi = 254.0!
+        Me.VerticalHeader.HeightF = 142.24!
+        Me.VerticalHeader.Name = "VerticalHeader"
+        Me.VerticalHeader.RepeatEveryPage = True
+        Me.VerticalHeader.WidthF = 222.8771!
+        '
+        'VerticalDetail
+        '
+        Me.VerticalDetail.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.table3})
+        Me.VerticalDetail.Dpi = 254.0!
+        Me.VerticalDetail.HeightF = 142.24!
+        Me.VerticalDetail.KeepTogether = True
+        Me.VerticalDetail.Name = "VerticalDetail"
+        Me.VerticalDetail.WidthF = 222.8771!
+        '
+        'pageInfo1
+        '
+        Me.pageInfo1.Dpi = 254.0!
+        Me.pageInfo1.LocationFloat = New DevExpress.Utils.PointFloat(16.0!, 16.0!)
+        Me.pageInfo1.Name = "pageInfo1"
+        Me.pageInfo1.PageInfo = DevExpress.XtraPrinting.PageInfo.DateTime
+        Me.pageInfo1.SizeF = New System.Drawing.SizeF(1199.0!, 58.0!)
+        Me.pageInfo1.StyleName = "PageInfo"
+        '
+        'pageInfo2
+        '
+        Me.pageInfo2.Dpi = 254.0!
+        Me.pageInfo2.LocationFloat = New DevExpress.Utils.PointFloat(1247.0!, 16.0!)
+        Me.pageInfo2.Name = "pageInfo2"
+        Me.pageInfo2.SizeF = New System.Drawing.SizeF(1199.0!, 58.0!)
+        Me.pageInfo2.StyleName = "PageInfo"
+        Me.pageInfo2.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
+        Me.pageInfo2.TextFormatString = "Seite {0} von {1}"
+        '
+        'label1
+        '
+        Me.label1.Dpi = 254.0!
+        Me.label1.LocationFloat = New DevExpress.Utils.PointFloat(16.0!, 16.0!)
+        Me.label1.Name = "label1"
+        Me.label1.SizeF = New System.Drawing.SizeF(254.2506!, 61.45361!)
+        Me.label1.StyleName = "Title"
+        Me.label1.Text = "All Invoices"
+        '
+        'table1
+        '
+        Me.table1.Dpi = 254.0!
+        Me.table1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 5.08!)
+        Me.table1.Name = "table1"
+        Me.table1.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.tableRow1})
+        Me.table1.SizeF = New System.Drawing.SizeF(2462.0!, 63.5!)
+        '
+        'tableRow1
+        '
+        Me.tableRow1.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.tableCell1, Me.tableCell2})
+        Me.tableRow1.Dpi = 254.0!
+        Me.tableRow1.Name = "tableRow1"
+        Me.tableRow1.Weight = 1.0R
+        '
+        'tableCell1
+        '
+        Me.tableCell1.Dpi = 254.0!
+        Me.tableCell1.Name = "tableCell1"
+        Me.tableCell1.StyleName = "GroupCaption1"
+        Me.tableCell1.Text = "WFSTATE"
+        Me.tableCell1.Weight = 0.065250375036492184R
+        '
+        'tableCell2
+        '
+        Me.tableCell2.Dpi = 254.0!
+        Me.tableCell2.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[WFState]")})
+        Me.tableCell2.Name = "tableCell2"
+        Me.tableCell2.StyleName = "GroupData1"
+        Me.tableCell2.Weight = 0.93474960017262387R
+        '
+        'table2
+        '
+        Me.table2.AnchorHorizontal = CType((DevExpress.XtraReports.UI.HorizontalAnchorStyles.Left Or DevExpress.XtraReports.UI.HorizontalAnchorStyles.Right), DevExpress.XtraReports.UI.HorizontalAnchorStyles)
+        Me.table2.Dpi = 254.0!
+        Me.table2.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
+        Me.table2.Name = "table2"
+        Me.table2.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.tableRow2, Me.tableRow3})
+        Me.table2.SizeF = New System.Drawing.SizeF(222.8771!, 142.24!)
+        '
+        'tableRow2
+        '
+        Me.tableRow2.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.tableCell3})
+        Me.tableRow2.Dpi = 254.0!
+        Me.tableRow2.Name = "tableRow2"
+        Me.tableRow2.Weight = 0.5R
+        '
+        'tableRow3
+        '
+        Me.tableRow3.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.tableCell4})
+        Me.tableRow3.Dpi = 254.0!
+        Me.tableRow3.Name = "tableRow3"
+        Me.tableRow3.Weight = 0.5R
+        '
+        'tableCell3
+        '
+        Me.tableCell3.Dpi = 254.0!
+        Me.tableCell3.Name = "tableCell3"
+        Me.tableCell3.StyleName = "HeaderData1VerticalFirstRow"
+        Me.tableCell3.Text = "Anzahl"
+        Me.tableCell3.Weight = 1.4176663672406411R
+        Me.tableCell3.WordWrap = False
+        '
+        'tableCell4
+        '
+        Me.tableCell4.Dpi = 254.0!
+        Me.tableCell4.Name = "tableCell4"
+        Me.tableCell4.StyleName = "HeaderData1VerticalLastRow_Even"
+        Me.tableCell4.Text = "Netto Summe"
+        Me.tableCell4.Weight = 1.0R
+        Me.tableCell4.WordWrap = False
+        '
+        'table3
+        '
+        Me.table3.AnchorHorizontal = CType((DevExpress.XtraReports.UI.HorizontalAnchorStyles.Left Or DevExpress.XtraReports.UI.HorizontalAnchorStyles.Right), DevExpress.XtraReports.UI.HorizontalAnchorStyles)
+        Me.table3.Dpi = 254.0!
+        Me.table3.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
+        Me.table3.Name = "table3"
+        Me.table3.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.tableRow4, Me.tableRow5})
+        Me.table3.SizeF = New System.Drawing.SizeF(222.8771!, 142.24!)
+        '
+        'tableRow4
+        '
+        Me.tableRow4.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.tableCell5})
+        Me.tableRow4.Dpi = 254.0!
+        Me.tableRow4.Name = "tableRow4"
+        Me.tableRow4.Weight = 0.5R
+        '
+        'tableRow5
+        '
+        Me.tableRow5.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.tableCell6})
+        Me.tableRow5.Dpi = 254.0!
+        Me.tableRow5.Name = "tableRow5"
+        Me.tableRow5.Weight = 0.5R
+        '
+        'tableCell5
+        '
+        Me.tableCell5.CanGrow = False
+        Me.tableCell5.Dpi = 254.0!
+        Me.tableCell5.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Anzahl]")})
+        Me.tableCell5.Name = "tableCell5"
+        Me.tableCell5.StyleName = "DetailData1VerticalFirstRow"
+        Me.tableCell5.StylePriority.UseTextAlignment = False
+        Me.tableCell5.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleRight
+        Me.tableCell5.Weight = 0.53113348626699852R
+        Me.tableCell5.WordWrap = False
+        '
+        'tableCell6
+        '
+        Me.tableCell6.CanGrow = False
+        Me.tableCell6.Dpi = 254.0!
+        Me.tableCell6.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[NettoSumme]")})
+        Me.tableCell6.Name = "tableCell6"
+        Me.tableCell6.StyleName = "DetailData1VerticalLastRow_Even"
+        Me.tableCell6.TextFormatString = "{0:0.00 €}"
+        Me.tableCell6.Weight = 0.53113348626699852R
+        Me.tableCell6.WordWrap = False
+        '
+        'XtraReport1
+        '
+        Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.TopMargin, Me.BottomMargin, Me.ReportHeader, Me.GroupHeader1, Me.VerticalHeader, Me.VerticalDetail})
+        Me.ComponentStorage.AddRange(New System.ComponentModel.IComponent() {Me.SqlDataSource1})
+        Me.DataMember = "VWPM_CHART_INVOICE_MONITOR"
+        Me.DataSource = Me.SqlDataSource1
+        Me.Dpi = 254.0!
+        Me.Font = New System.Drawing.Font("Arial", 9.75!)
+        Me.Landscape = True
+        Me.Margins = New System.Drawing.Printing.Margins(254, 254, 254, 92)
+        Me.PageHeight = 2100
+        Me.PageWidth = 2970
+        Me.PaperKind = System.Drawing.Printing.PaperKind.A4
+        Me.ReportUnit = DevExpress.XtraReports.UI.ReportUnit.TenthsOfAMillimeter
+        Me.SnapGridSize = 25.0!
+        Me.StyleSheet.AddRange(New DevExpress.XtraReports.UI.XRControlStyle() {Me.Title, Me.GroupCaption1, Me.GroupData1, Me.PageInfo, Me.DetailData1VerticalFirstRow, Me.DetailData1VerticalLastRow_Even, Me.HeaderData1VerticalFirstRow, Me.HeaderData1VerticalLastRow_Even})
+        Me.Version = "19.2"
+        Me.VerticalContentSplitting = DevExpress.XtraPrinting.VerticalContentSplitting.Smart
+        CType(Me.table1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.table2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.table3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
+
+    End Sub
+
+    Friend WithEvents SqlDataSource1 As DevExpress.DataAccess.Sql.SqlDataSource
+    Friend WithEvents Title As DevExpress.XtraReports.UI.XRControlStyle
+    Friend WithEvents GroupCaption1 As DevExpress.XtraReports.UI.XRControlStyle
+    Friend WithEvents GroupData1 As DevExpress.XtraReports.UI.XRControlStyle
+    Friend WithEvents PageInfo As DevExpress.XtraReports.UI.XRControlStyle
+    Friend WithEvents DetailData1VerticalFirstRow As DevExpress.XtraReports.UI.XRControlStyle
+    Friend WithEvents DetailData1VerticalLastRow_Even As DevExpress.XtraReports.UI.XRControlStyle
+    Friend WithEvents HeaderData1VerticalFirstRow As DevExpress.XtraReports.UI.XRControlStyle
+    Friend WithEvents HeaderData1VerticalLastRow_Even As DevExpress.XtraReports.UI.XRControlStyle
+    Friend WithEvents TopMargin As DevExpress.XtraReports.UI.TopMarginBand
+    Friend WithEvents BottomMargin As DevExpress.XtraReports.UI.BottomMarginBand
+    Friend WithEvents pageInfo1 As DevExpress.XtraReports.UI.XRPageInfo
+    Friend WithEvents pageInfo2 As DevExpress.XtraReports.UI.XRPageInfo
+    Friend WithEvents ReportHeader As DevExpress.XtraReports.UI.ReportHeaderBand
+    Friend WithEvents label1 As DevExpress.XtraReports.UI.XRLabel
+    Friend WithEvents GroupHeader1 As DevExpress.XtraReports.UI.GroupHeaderBand
+    Friend WithEvents table1 As DevExpress.XtraReports.UI.XRTable
+    Friend WithEvents tableRow1 As DevExpress.XtraReports.UI.XRTableRow
+    Friend WithEvents tableCell1 As DevExpress.XtraReports.UI.XRTableCell
+    Friend WithEvents tableCell2 As DevExpress.XtraReports.UI.XRTableCell
+    Friend WithEvents VerticalHeader As DevExpress.XtraReports.UI.VerticalHeaderBand
+    Friend WithEvents table2 As DevExpress.XtraReports.UI.XRTable
+    Friend WithEvents tableRow2 As DevExpress.XtraReports.UI.XRTableRow
+    Friend WithEvents tableCell3 As DevExpress.XtraReports.UI.XRTableCell
+    Friend WithEvents tableRow3 As DevExpress.XtraReports.UI.XRTableRow
+    Friend WithEvents tableCell4 As DevExpress.XtraReports.UI.XRTableCell
+    Friend WithEvents VerticalDetail As DevExpress.XtraReports.UI.VerticalDetailBand
+    Friend WithEvents table3 As DevExpress.XtraReports.UI.XRTable
+    Friend WithEvents tableRow4 As DevExpress.XtraReports.UI.XRTableRow
+    Friend WithEvents tableCell5 As DevExpress.XtraReports.UI.XRTableCell
+    Friend WithEvents tableRow5 As DevExpress.XtraReports.UI.XRTableRow
+    Friend WithEvents tableCell6 As DevExpress.XtraReports.UI.XRTableCell
+End Class

app/DD_PM_WINDREAM/XtraReport1.resx

@@ -0,0 +1,126 @@
+<?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="SqlDataSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <data name="SqlDataSource1.ResultSchemaSerializable" xml:space="preserve">
+    <value>PERhdGFTZXQgTmFtZT0iU3FsRGF0YVNvdXJjZTEiPjxWaWV3IE5hbWU9IlZXUE1fQ0hBUlRfSU5WT0lDRV9NT05JVE9SIj48RmllbGQgTmFtZT0iQW56YWhsIiBUeXBlPSJJbnQzMiIgLz48RmllbGQgTmFtZT0iV0ZTdGF0ZSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJOZXR0b1N1bW1lIiBUeXBlPSJTdHJpbmciIC8+PC9WaWV3PjwvRGF0YVNldD4=</value>
+  </data>
+</root>

app/DD_PM_WINDREAM/XtraReport1.vb

@@ -0,0 +1,3 @@
+Public Class XtraReport1
+
+End Class

app/DD_PM_WINDREAM/clsPatterns.vb

@@ -54,13 +54,16 @@ Public Class clsPatterns
     Public Shared Function ReplaceAllValues(input As String, panel As Panel, document As WMObject, prename As Object, surname As Object, shortname As Object, language As Object, email As Object, userId As Object, profileId As Object) As String
         Try
             Dim result = input
-            LOGGER.Debug($"ReplaceString BEFORE replacing: [{result}]")
+            LOGGER.Debug($"inputString BEFORE replacing: [{result}]")
             result = ReplaceInternalValues(result)
             result = ReplaceControlValues(result, panel)
             If Not IsNothing(document) Then result = ReplaceWindreamIndicies(result, document)
+            If IDB_ACTIVE = True Then
                 result = ReplaceIDBAttributes(result)
+            End If
+
             result = ReplaceUserValues(result, prename, surname, shortname, language, email, userId, profileId)
-            LOGGER.Debug($"ReplaceString AFTER replacing: [{result}]")
+            LOGGER.Debug($"inputString AFTER replacing: [{result}]")
             Return result
         Catch ex As Exception
             LOGGER.Error(ex)
@@ -91,7 +94,7 @@ Public Class clsPatterns
             While ContainsPatternAndValue(result, PATTERN_INT, INT_VALUE_DATE)
                 result = ReplacePattern(result, PATTERN_INT, Now.ToShortDateString)
             End While
-
+            LOGGER.Debug("sql after ReplaceInternalValues: " & input)
             Return result
         Catch ex As Exception
             LOGGER.Error(ex)
@@ -114,7 +117,9 @@ Public Class clsPatterns
             While ContainsPatternAndValue(result, PATTERN_USER, USER_VALUE_SURNAME)
                 result = ReplacePattern(result, PATTERN_USER, surname)
             End While
-
+            If IsDBNull(shortname) Then
+                shortname = ""
+            End If
             While ContainsPatternAndValue(result, PATTERN_USER, USER_VALUE_SHORTNAME)
                 result = ReplacePattern(result, PATTERN_USER, shortname)
             End While
@@ -130,7 +135,7 @@ Public Class clsPatterns
             While ContainsPatternAndValue(result, PATTERN_USER, USER_VALUE_PROFILE_ID)
                 result = ReplacePattern(result, PATTERN_USER, profileId)
             End While
-
+            LOGGER.Debug("sql after ReplaceUserValues: " & input)
             Return result
         Catch ex As Exception
             LOGGER.Error(ex)
@@ -145,7 +150,7 @@ Public Class clsPatterns
 
             While ContainsPattern(result, PATTERN_CTRL)
                 If oTryCounter > MAX_TRY_COUNT Then
-                    Throw New Exception("Max tries in ReplaceControlValues exceeded.")
+                    Throw New Exception($"Max tries in ReplaceControlValues exceeded - Result so far [{result}].")
                 End If
 
                 Dim controlName As String = GetNextPattern(result, PATTERN_CTRL).Value
@@ -158,7 +163,7 @@ Public Class clsPatterns
 
                 oTryCounter += 1
             End While
-
+            LOGGER.Debug("sql after ReplaceControlValues: " & input)
             Return result
         Catch ex As Exception
             LOGGER.Error(ex)
@@ -184,7 +189,7 @@ Public Class clsPatterns
                 End If
                 oTryCounter += 100
             End While
-
+            LOGGER.Debug("sql after ReplaceWindreamIndicies: " & input)
             Return result
         Catch ex As Exception
             LOGGER.Error(ex)
@@ -216,11 +221,13 @@ Public Class clsPatterns
 
                 End If
                 If oIDBValue IsNot Nothing Then
-                    result = ReplacePattern(result, PATTERN_IDBA, oIDBValue)
+                    Dim oReplaceValue = "{" + $"#{PATTERN_IDBA}#{indexName}" + "}"
+                    result = result.Replace(oReplaceValue, oIDBValue)
+                    'result = ReplacePattern(result, oReplaceValue, oIDBValue)
                 End If
                 oTryCounter += 100
             End While
-
+            LOGGER.Debug("sql after ReplaceIDBAttributes: " & input)
             Return result
         Catch ex As Exception
             LOGGER.Error(ex)

app/DD_PM_WINDREAM/frmAdmin2.vb

@@ -1,16 +1,33 @@
 
 
+Imports System.IO
 Imports DevExpress.XtraTab
 
 Public Class frmAdmin2
-
+    Dim oSave As Boolean = True
 
     Private Sub frmAdmin2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
-        'TODO: Diese Codezeile lädt Daten in die Tabelle "DD_DMSLiteDataSet.TBDD_GUI_LANGUAGE_PHRASE". Sie können sie bei Bedarf verschieben oder entfernen.
-
-        'TODO: Diese Codezeile lädt Daten in die Tabelle "DD_DMSLiteDataSet.TBDD_EMAIL_TEMPLATE". Sie können sie bei Bedarf verschieben oder entfernen.
         Load_Email_template()
-        Load_Gui_Phrases
+        Load_Gui_Phrases()
+        oSave = True
+        Try
+            Dim oFilename As String = String.Format("DevExLayoutAdmin2_Email.xml")
+            Dim oXml As String = System.IO.Path.Combine(Application.UserAppDataPath(), oFilename)
+            If File.Exists(oXml) Then
+                DataLayoutControl1.RestoreLayoutFromXml(oXml)
+            End If
+            oFilename = String.Format("DevExLayoutAdmin2_GUIPhrases.xml")
+            oXml = System.IO.Path.Combine(Application.UserAppDataPath(), oFilename)
+            If File.Exists(oXml) Then
+                DataLayoutControl2.RestoreLayoutFromXml(oXml)
+            End If
+
+
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            LOGGER.Info("Error while restoring Datalayout: " & ex.Message)
+        End Try
+
     End Sub
     Sub Status_Changed(text As String)
         labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
@@ -19,6 +36,7 @@ Public Class frmAdmin2
 
     Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BbitemplateAdd.ItemClick
         TBDD_EMAIL_TEMPLATEBindingSource.AddNew()
+        TITLETextEdit.ReadOnly = False
     End Sub
 
 
@@ -53,10 +71,11 @@ Public Class frmAdmin2
         Try
             Me.TBDD_EMAIL_TEMPLATEBindingSource.EndEdit()
             If Not IsNothing(DD_DMSLiteDataSet.TBDD_EMAIL_TEMPLATE.GetChanges) Then
-                Me.CHANGED_WHOTextBox.Text = USER_USERNAME
+                Me.CHANGED_WHOTextEdit.Text = USER_USERNAME
                 Me.TBDD_EMAIL_TEMPLATEBindingSource.EndEdit()
                 Me.TBDD_EMAIL_TEMPLATETableAdapter.Update(DD_DMSLiteDataSet.TBDD_EMAIL_TEMPLATE)
                 Status_Changed("Vorlage gespeichert")
+                TITLETextEdit.ReadOnly = True
             Else
                 Status_Changed("Keine Änderung")
             End If
@@ -70,7 +89,7 @@ Public Class frmAdmin2
         Dim result As MsgBoxResult = MsgBox("Wollen Sie die Vorlage wirklich löschen?", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
         'wenn Speichern ja
         If result = MsgBoxResult.Yes Then
-            Dim oSQL = $"Delete from TBDD_EMAIL_TEMPLATE where guid = {GUIDTextBox.Text}"
+            Dim oSQL = $"Delete from TBDD_EMAIL_TEMPLATE where guid = {GUIDTextEdit.Text}"
             If ClassDatabase.Execute_non_Query(oSQL) = True Then
                 Load_Email_template()
                 Status_Changed("Vorlage gelöscht!")
@@ -90,18 +109,7 @@ Public Class frmAdmin2
         End Select
     End Sub
 
-    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+
-        Dim oText = EMAIL_BODY1TextBox.Text
-        If EMAIL_BODY2TextBox.Text <> "" Then
-            oText = oText & "<p>" & EMAIL_BODY2TextBox.Text
-        End If
-        If EMAIL_BODY3TextBox.Text <> "" Then
-            oText = oText & "<p>" & EMAIL_BODY3TextBox.Text
-        End If
-        Dim ofrm As New frmPreviewHtml
-        ofrm.DisplayText = oText
-        ofrm.ShowDialog()
-    End Sub
 
     Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
         GuiPhrase_Save()
@@ -114,7 +122,7 @@ Public Class frmAdmin2
         Try
             Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource.EndEdit()
             If Not IsNothing(DD_DMSLiteDataSet.TBDD_GUI_LANGUAGE_PHRASE.GetChanges) Then
-                Me.CHANGED_WHOTextBox1.Text = USER_USERNAME
+                Me.TextEdit4.Text = USER_USERNAME
                 Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource.EndEdit()
                 Me.TBDD_GUI_LANGUAGE_PHRASETableAdapter.Update(DD_DMSLiteDataSet.TBDD_GUI_LANGUAGE_PHRASE)
                 Status_Changed("Phrase saved!")
@@ -137,4 +145,84 @@ Public Class frmAdmin2
     Private Sub TBDD_GUI_LANGUAGE_PHRASEBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBDD_GUI_LANGUAGE_PHRASEBindingSource.AddingNew
         DD_DMSLiteDataSet.TBDD_GUI_LANGUAGE_PHRASE.ADDED_WHOColumn.DefaultValue = USER_USERNAME
     End Sub
+
+
+
+    Private Sub BarButtonItem7_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem7.ItemClick
+        Dim oText = EMAIL_BODY1TextEdit.Text
+        If EMAIL_BODY2TextEdit.Text <> "" Then
+            oText = oText & "<p>" & EMAIL_BODY2TextEdit.Text
+        End If
+        If EMAIL_BODY3TextEdit.Text <> "" Then
+            oText = oText & "<p>" & EMAIL_BODY3TextEdit.Text
+        End If
+        Dim ofrm As New frmPreviewHtml
+        ofrm.DisplayText = oText
+        ofrm.ShowDialog()
+    End Sub
+
+    Private Sub frmAdmin2_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
+        If oSave = False Then
+            Exit Sub
+        End If
+        Try
+            Dim Filename As String = String.Format("DevExLayoutAdmin2_Email.xml")
+            Dim xml As String = System.IO.Path.Combine(Application.UserAppDataPath(), Filename)
+            'If File.Exists(xml) Then
+            DataLayoutControl1.SaveLayoutToXml(xml)
+            'End If
+            Filename = String.Format("DevExLayoutAdmin2_GUIPhrases.xml")
+            xml = System.IO.Path.Combine(Application.UserAppDataPath(), Filename)
+            DataLayoutControl2.SaveLayoutToXml(xml)
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            LOGGER.Info("Error while saving datalayout: " & ex.Message)
+        End Try
+
+
+    End Sub
+
+
+
+    Private Sub BarButtonItem8_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem8.ItemClick
+        Try
+            Dim oFilename = String.Format("DevExLayoutAdmin2_GUIPhrases.xml")
+            Dim oXml = System.IO.Path.Combine(Application.UserAppDataPath(), oFilename)
+            File.Delete(oXml)
+            MsgBox("Form will now close to reload all controls!", MsgBoxStyle.Information)
+            Me.Close()
+            oSave = False
+        Catch ex As Exception
+            LOGGER.Error(ex)
+        End Try
+
+
+    End Sub
+
+    Private Sub BarButtonItem9_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem9.ItemClick
+        Try
+            Dim oFilename = String.Format("DevExLayoutAdmin2_Email.xml")
+            Dim oXml = System.IO.Path.Combine(Application.UserAppDataPath(), oFilename)
+            File.Delete(oXml)
+            MsgBox("Form will now close to reload all controls!", MsgBoxStyle.Information)
+            Me.Close()
+            oSave = False
+        Catch ex As Exception
+            LOGGER.Error(ex)
+        End Try
+    End Sub
+
+    Private Sub INTERNALCheckEdit_CheckedChanged_1(sender As Object, e As EventArgs) Handles INTERNALCheckEdit.CheckedChanged
+        If INTERNALCheckEdit.Checked Then
+            TextEdit2.ReadOnly = True
+            OBJ_NAMETextEdit.ReadOnly = True
+            STRING1TextEdit.ReadOnly = True
+            STRING2TextEdit.ReadOnly = True
+        Else
+            TextEdit2.ReadOnly = False
+            OBJ_NAMETextEdit.ReadOnly = False
+            STRING1TextEdit.ReadOnly = False
+            STRING2TextEdit.ReadOnly = False
+        End If
+    End Sub
 End Class

app/DD_PM_WINDREAM/frmAdminPasswort.Designer.vb

@@ -25,10 +25,10 @@ Partial Class frmAdminPasswort
         Me.components = New System.ComponentModel.Container()
         Me.txtOld = New System.Windows.Forms.TextBox()
         Me.txtNew = New System.Windows.Forms.TextBox()
-        Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
         Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.TBPM_KONFIGURATIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
+        Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
-        Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
         Me.btnSetNew = New System.Windows.Forms.Button()
         Me.Label1 = New System.Windows.Forms.Label()
         Me.Label2 = New System.Windows.Forms.Label()
@@ -81,11 +81,11 @@ Partial Class frmAdminPasswort
         Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
         Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
-        Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
         'btnSetNew
         '
-        Me.btnSetNew.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.add
+        Me.btnSetNew.Image = Global.DD_ProcessManager.My.Resources.Resources.add
         Me.btnSetNew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnSetNew.Location = New System.Drawing.Point(12, 60)
         Me.btnSetNew.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
@@ -138,10 +138,10 @@ Partial Class frmAdminPasswort
     End Sub
     Friend WithEvents txtOld As System.Windows.Forms.TextBox
     Friend WithEvents txtNew As System.Windows.Forms.TextBox
-    Friend WithEvents DD_DMSLiteDataSet As DD_PM_WINDREAM.DD_DMSLiteDataSet
+    Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
     Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
+    Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
-    Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
+    Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
     Friend WithEvents btnSetNew As System.Windows.Forms.Button
     Friend WithEvents Label1 As System.Windows.Forms.Label
     Friend WithEvents Label2 As System.Windows.Forms.Label

app/DD_PM_WINDREAM/frmAdministration.vb

@@ -40,16 +40,7 @@ Public Class frmAdministration
             dragDropManager.AddGridView(viewAssignedGroups)
 
 
-            'If clsModules.IsModuleInstalled("User Manager") Then
+
-            '    btnUserManager.Enabled = True
-            'Else
-            '    btnUserManager.Enabled = False
-            'End If
-            If ClassUser.Check_User_Exists_in_UMGroups = True Then
-                btnUserManager.Enabled = True
-            Else
-                btnUserManager.Enabled = False
-            End If
 
             tabctrl_Profilkonfig.SelectedIndex = 0
 
@@ -59,11 +50,17 @@ Public Class frmAdministration
         End Try
         If IDB_ACTIVE = True Then
             IDBData.Init()
-            Label7.Text = "Datei-Suche (SQL):"
+            lblSearch.Text = "Datei-Suche (SQL):"
             btnWMopenSuche.Visible = False
+            SORT_BY_LATESTCheckBox.Visible = False
+            PRIORITYNumericUpDown.Visible = False
+            lblPriority.Visible = False
         Else
-            Label7.Text = "windream-Suche:"
+            lblSearch.Text = "windream-Suche:"
             btnWMopenSuche.Visible = True
+            SORT_BY_LATESTCheckBox.Visible = True
+            PRIORITYNumericUpDown.Visible = True
+            lblPriority.Visible = True
         End If
         ObjekttypenEintragen()
         Indexe_eintragen()
@@ -79,6 +76,10 @@ Public Class frmAdministration
             If IDB_ACTIVE = False Then
                 PM_VEKTOR_INDEXComboBox.Enabled = True
                 Label4.Enabled = True
+                If cmbObjekttypen.Text = "DEFAULT" And IDB_ACTIVE = False Then
+                    MsgBox("The Objecttype is invalid!", MsgBoxStyle.Exclamation)
+                    Exit Sub
+                End If
                 Try
                     Dim indexe = WINDREAM.GetIndicesByObjecttype(cmbObjekttypen.Text)
                     If indexe IsNot Nothing Then
@@ -99,6 +100,7 @@ Public Class frmAdministration
 
                         Next
                     End If
+                    MyIndicies_Types = New List(Of Integer)
                     MyIndicies = WINDREAM.GetIndicesByObjecttype(cmbObjekttypen.Text).ToList()
                     For Each i In MyIndicies
                         Dim type = WINDREAM.GetTypeOfIndex(i)
@@ -120,7 +122,7 @@ Public Class frmAdministration
                 Else
                     cmbLOGIndex.SelectedIndex = -1
                 End If
-            Else
+            Else '############## IDB ACTIVE #################
 
                 PM_VEKTOR_INDEXComboBox.Enabled = False
                 Label4.Enabled = False
@@ -233,21 +235,7 @@ Public Class frmAdministration
         End Try
     End Sub
 
-    Private Sub VWPM_PROFILE_USERBindingNavigatorSaveItem_Click(sender As System.Object, e As System.EventArgs) Handles VWPM_PROFILE_USERBindingNavigatorSaveItem.Click
-        Try
-            Me.TBPM_PROFILEBindingSource.EndEdit()
-            If DD_DMSLiteDataSet.TBPM_PROFILE.GetChanges Is Nothing = False Then
-                Me.TBPM_PROFILETableAdapter.Update(DD_DMSLiteDataSet.TBPM_PROFILE)
-                tstrlblSave.Visible = True
-            Else
-                tstrlblSave.Visible = False
-            End If
-        Catch ex As Exception
-            LOGGER.Error(ex)
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Speichern des Profils:")
-        End Try
 
-    End Sub
 
     Private Sub TBPM_PROFILEBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBPM_PROFILEBindingSource.AddingNew
         DD_DMSLiteDataSet.TBPM_PROFILE.ADDED_WHOColumn.DefaultValue = USER_USERNAME
@@ -256,42 +244,18 @@ Public Class frmAdministration
     End Sub
 
     Private Sub TBPM_PROFILEBindingSource_PositionChanged(sender As System.Object, e As System.EventArgs) Handles TBPM_PROFILEBindingSource.PositionChanged
-        tstrlblSave.Visible = False
+        tsbStaticInfo.Caption = ""
         Indexe_eintragen()
         If tabctrl_Profilkonfig.SelectedIndex = 1 And TBPM_PROFILEBindingSource.Position <> -1 Then
             Refresh_Final_indexe()
         End If
     End Sub
 
-    Private Sub tstrpbtn_add_Click(sender As System.Object, e As System.EventArgs) Handles tstrpbtn_add.Click
-        If TBPM_PROFILETableAdapter.cmdAnzProfile + 1 > LICENSE_PROFILES Then
-            MsgBox("Sie haben die maximale Anzahl (" & LICENSE_PROFILES & ") von lizensierten Profilen erreicht!" & vbNewLine & "Bitte löschen Sie Profile oder setzen sich mit Digital Data in Verbindung!", MsgBoxStyle.Exclamation, "Achtung Lizenzhinweis:")
-        Else
-            TBPM_PROFILEBindingSource.AddNew()
-        End If
 
-    End Sub
 
-    Private Sub ToolStripButton1_Click(sender As System.Object, e As System.EventArgs) Handles tsbtnDesigner_open.Click
-        If CInt(PROFILGUIDTextBox.Text) > 0 Then
-            profile_guid = PROFILGUIDTextBox.Text
-            CURRENT_ProfilGUID = PROFILGUIDTextBox.Text
-            My.Settings.Save()
-            CURRENT_OBJECTTYPE = cmbObjekttypen.Text
-            CURRENT_ProfilName = NAMETextBox.Text
 
-            frmFormDesigner.ProfileId = CURRENT_ProfilGUID
-            frmFormDesigner.ProfileName = CURRENT_ProfilName
-            frmFormDesigner.ProfileObjectType = cmbObjekttypen.Text
-            frmFormDesigner.ShowDialog()
 
-        Else
+    Private Sub btnmovetoFolderDialog_Click(sender As System.Object, e As System.EventArgs)
-            MsgBox("Eindeutiges Profil konnte nicht an den FormDesigner weitergegeben werden:", MsgBoxStyle.Exclamation)
-        End If
-
-    End Sub
-
-    Private Sub btnmovetoFolderDialog_Click(sender As System.Object, e As System.EventArgs) Handles btnmovetoFolderDialog.Click
         ' wenn im Formular der OK-Button geklickt wurde
         If Me.FolderBrowserDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
             ' den Speicherort der windream-Suche in die TextBox eintragen
@@ -418,29 +382,27 @@ Public Class frmAdministration
     '    End If
     'End Sub
 
-    Private Sub btnlicensemanager_open_Click(sender As System.Object, e As System.EventArgs) Handles btnlicensemanager_open.Click
+
-        frmLicense.ShowDialog()
+    'Sub Save_Konfiguration()
-    End Sub
+    '    TBPM_KONFIGURATIONBindingSource.EndEdit()
-    Sub Save_Konfiguration()
+    '    If DD_DMSLiteDataSet.TBPM_KONFIGURATION.GetChanges Is Nothing = False Then
-        TBPM_KONFIGURATIONBindingSource.EndEdit()
+    '        GEAENDERTWERTextBox.Text = USER_USERNAME
-        If DD_DMSLiteDataSet.TBPM_KONFIGURATION.GetChanges Is Nothing = False Then
+    '        TBPM_KONFIGURATIONBindingSource.EndEdit()
-            GEAENDERTWERTextBox.Text = USER_USERNAME
+    '        TBPM_KONFIGURATIONTableAdapter.Update(DD_DMSLiteDataSet.TBPM_KONFIGURATION)
-            TBPM_KONFIGURATIONBindingSource.EndEdit()
+    '        tstrpinfo.Text = "Konfiguration wurde erfolgreich gespeichert"
-            TBPM_KONFIGURATIONTableAdapter.Update(DD_DMSLiteDataSet.TBPM_KONFIGURATION)
+    '        tstrpinfo.Visible = True
-            tstrpinfo.Text = "Konfiguration wurde erfolgreich gespeichert"
+    '    Else
-            tstrpinfo.Visible = True
+    '        tstrpinfo.Visible = False
-        Else
+    '    End If
-            tstrpinfo.Visible = False
+    'End Sub
-        End If
-    End Sub
 
     Private Sub frmProfileDesigner_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown
+        TabControl1.SelectedIndex = 0
         formloaded = True
+        RibbonPageGroup2.Enabled = False
     End Sub
 
-    Private Sub btnSaveKonfig_Click(sender As System.Object, e As System.EventArgs) Handles btnSaveKonfig.Click
+
-        Save_Konfiguration()
-    End Sub
 
     Private Sub Refresh_Final_indexe()
         Try
@@ -455,21 +417,31 @@ Public Class frmAdministration
     End Sub
 
     Private Sub TabControl2_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles tabctrl_Profilkonfig.SelectedIndexChanged
-        If tabctrl_Profilkonfig.SelectedIndex = 1 Then
+        Select Case tabctrl_Profilkonfig.SelectedIndex
+            Case 0
+                RibbonPageGroup2.Enabled = False
+            Case 1
                 CURRENT_OBJECTTYPE = cmbObjekttypen.Text
                 Refresh_Final_indexe()
                 CancelFinalIndexInsert()
-        End If
+        End Select
+
     End Sub
 
     Private Sub TabControl1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
         Select Case TabControl1.SelectedIndex
+            Case 0
+                RibbonPageGroup1.Enabled = True
+
             Case 1
+                RibbonPageGroup1.Enabled = False
+                RibbonPageGroup2.Enabled = False
                 If PROFILGUIDTextBox.Text = String.Empty Then
                     MsgBox("Kein Profil angelegt oder ausgeählt", MsgBoxStyle.Critical)
                 Else
                     FillProfile_User(PROFILGUIDTextBox.Text)
                 End If
+
         End Select
     End Sub
     'Private Sub cmbIndexe_SelectedIndexChanged(sender As System.Object, e As System.EventArgs)
@@ -626,43 +598,8 @@ Public Class frmAdministration
     '    txtindexwert_final.Text = String.Empty
     'End Sub
 
-    Private Sub tsbtnProfilkopieren_Click(sender As System.Object, e As System.EventArgs) Handles tsbtnProfilkopieren.Click
+    Private Sub tsbtnProfilkopieren_Click(sender As System.Object, e As System.EventArgs)
-        Dim result As MsgBoxResult = MsgBox("Wollen Sie das gesamte Profil kopieren?" & vbNewLine & "Alle Einstellungen werden übernommen, das Profil wird angelegt und inaktiv gesetzt!", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
-        'wenn Speichern ja
-        If result = MsgBoxResult.Yes Then
-            Try
-                Dim copySuffix = "_COPY"
 
-                While TBPM_PROFILETableAdapter.cmdProfileExists($"{NAMETextBox.Text}{copySuffix}") > 0
-                    copySuffix = copySuffix & "_COPY"
-                End While
-
-                TBPM_PROFILETableAdapter.cmdInsert_Copy(copySuffix, USER_USERNAME, PROFILGUIDTextBox.Text)
-                Dim NewGUID As Integer = TBPM_PROFILETableAdapter.cmdMaxGuid
-                If NewGUID > 0 Then
-                    Dim _sql = "INSERT INTO TBPM_PROFILE_CONTROLS " &
-                            "(NAME, PROFIL_ID, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, READ_ONLY, " &
-                            "LOAD_IDX_VALUE, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR) " &
-                            "SELECT LOWER(CTRL_TYPE + CONVERT(VARCHAR(4),ROW_NUMBER() OVER (ORDER BY CTRL_TYPE))),@NEW_PROFIL_ID, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, '@User', INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, " &
-                            "READ_ONLY, LOAD_IDX_VALUE, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR " &
-                            "FROM TBPM_PROFILE_CONTROLS AS TBPM_PROFILE_CONTROLS_1 " &
-                            "WHERE (PROFIL_ID = @Copy_profilId) "
-                    _sql = _sql.Replace("@NEW_PROFIL_ID", NewGUID)
-                    _sql = _sql.Replace("@User", USER_USERNAME)
-                    _sql = _sql.Replace("@Copy_profilId", PROFILGUIDTextBox.Text)
-
-                    TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CopyFinalIndex(NewGUID, USER_USERNAME, PROFILGUIDTextBox.Text)
-                    'TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertCopy(NewGUID, USER_USERNAME, PROFILGUIDTextBox.Text)
-                    Execute_SQL(_sql)
-                    MsgBox("Das Profil " & NAMETextBox.Text & " wurde erfolgreich kopiert!", MsgBoxStyle.Information, "Erfolgsmeldung")
-                    Refresh_Profildaten()
-                End If
-            Catch ex As Exception
-                LOGGER.Error(ex)
-                MsgBox("Fehler bei Anlage Profilkopie:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
-            End Try
-
-        End If
     End Sub
     Private Function Execute_SQL(SQL As String)
         Try
@@ -679,55 +616,14 @@ Public Class frmAdministration
             Return False
         End Try
     End Function
-    Private Sub tsbtndeleteProfil_Click(sender As System.Object, e As System.EventArgs) Handles tsbtndeleteProfil.Click
-        Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie das Profil " & NAMETextBox.Text & " löschen wollen?", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
-        ' wenn Speichern ja
-        If result = MsgBoxResult.Yes Then
-            Try
-                Dim profileID = PROFILGUIDTextBox.Text
-                Dim del As String = $"EXEC PRPM_DELETE_PROFILE {profileID}"
-                If ClassDatabase.Execute_non_Query(del) = True Then
-                    MsgBox("Das Profil " & NAMETextBox.Text & " wurde erfolgreich gelöscht!", MsgBoxStyle.Information, "Erfolgsmeldung")
-                    Refresh_Profildaten()
-                End If
 
-            Catch ex As Exception
-                LOGGER.Error(ex)
-                MsgBox("Fehler bei Löschen des Profils:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
-            End Try
 
-        End If
-    End Sub
-
-    Private Sub Button1_Click_2(sender As Object, e As EventArgs) Handles btnTest_Email.Click
-        If txtemailEmpfaenger.Text <> "" And EMAIL_FROMTextBox.Text <> "" And EMAIL_SMTPTextBox.Text <> "" And EMAIL_USERTextBox.Text <> "" And EMAIL_PWTextBox.Text <> "" Then
-            email.Send_Log_Mail("<b>Dies ist eine Testemail! Gesendet vom Softwaremodul Process-Manager DD.</b><p>",
-                                "Testemail Process-Manager", EMAIL_FROMTextBox.Text, EMAIL_SMTPTextBox.Text, EMAIL_USERTextBox.Text, EMAIL_PWTextBox.Text, txtemailEmpfaenger.Text, True)
-            Save_Konfiguration()
-        Else
-            MsgBox("Bitte geben Sie in allen Pflichtfeldern einen Wert ein!", MsgBoxStyle.Exclamation)
-        End If
-    End Sub
-
-    Private Sub EMAIL_ACTIVECheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles EMAIL_ACTIVECheckBox.CheckedChanged
-        If EMAIL_ACTIVECheckBox.Checked Then
-            Me.grpbxEmail.Enabled = True
-        Else
-            Me.grpbxEmail.Enabled = False
-        End If
-    End Sub
-
-    Private Sub btnopen_SQLAdmin_Click(sender As Object, e As EventArgs) Handles btnopen_SQLAdmin.Click
-        frmSQL_Admin.ShowDialog()
-    End Sub
-    Private Sub btnRefreshProfiles_Click(sender As Object, e As EventArgs) Handles btnRefreshProfiles.Click
-        Refresh_Profildaten()
-    End Sub
 
     Private Sub CancelFinalIndexInsert()
         INSERT_ACTIVE = False
-        tsBtnCancel.Visible = False
+        BarButtonItem19.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
-        BindingNavigatorAddNewItem.Visible = True
+
+        BarButtonItem16.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
 
         TBPM_PROFILE_FINAL_INDEXINGBindingSource.CancelEdit()
 
@@ -741,9 +637,7 @@ Public Class frmAdministration
             ACTIVECheckBox.BackColor = Color.Transparent
         End If
     End Sub
-    Private Sub btnConnections_Click(sender As Object, e As EventArgs) Handles btnConnections.Click
+
-        frmConnection.ShowDialog()
-    End Sub
     Private Sub ToolStripButton4_Click(sender As Object, e As EventArgs)
         Cursor = Cursors.WaitCursor
         frmUserKonfig_AddUsers.ShowDialog()
@@ -762,15 +656,7 @@ Public Class frmAdministration
         End Try
     End Sub
 
-    Private Sub Button2_Click_1(sender As Object, e As EventArgs) Handles Button2.Click
+
-        Dim result As MsgBoxResult = MsgBox("Wollen Sie den Tabelleninhalt mit den Profil-Dateien wirklich löschen?" & vbNewLine & "Wenn ja müssen Sie auf die Aktualisierung des Jobs warten bis wieder Dateien zur Bearbeitung frei sind.", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
-        'wenn Speichern ja
-        If result = MsgBoxResult.Yes Then
-            If ClassDatabase.Execute_non_Query("DELETE FROM TBPM_PROFILE_FILES") = True Then
-                MsgBox("Der Inhalt der Tabelle TBPM_PROFILE_FILES wurde erfolgreich gelöscht!", MsgBoxStyle.Information)
-            End If
-        End If
-    End Sub
 
     Private Sub cmbObjekttypen_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbObjekttypen.SelectedIndexChanged
         If formloaded = False Then
@@ -898,57 +784,59 @@ Public Class frmAdministration
     '    frmConnection.ShowDialog()
     'End Sub
 
-    Private Sub btnUserManager_Click(sender As Object, e As EventArgs) Handles btnUserManager.Click
+    'Private Sub btnUserManager_Click(sender As Object, e As EventArgs) Handles btnUserManager.Click
-        Try
+    '    Try
-            'Dim userManagerPath As String = clsModules.GetModulePath("User Manager")
+    '        'Dim userManagerPath As String = clsModules.GetModulePath("User Manager")
 
-            'If userManagerPath Is Nothing Then
+    '        'If userManagerPath Is Nothing Then
-            '    MsgBox("Pfad zu User Manager konnte nicht gefunden werden!", MsgBoxStyle.Critical)
+    '        '    MsgBox("Pfad zu User Manager konnte nicht gefunden werden!", MsgBoxStyle.Critical)
-            'Else
+    '        'Else
 
-            '    Dim exePath As String = Path.Combine(userManagerPath, "DDUserManager.exe")
+    '        '    Dim exePath As String = Path.Combine(userManagerPath, "DDUserManager.exe")
 
-            '    If File.Exists(exePath) Then
+    '        '    If File.Exists(exePath) Then
-            '        Dim psi As New ProcessStartInfo(exePath)
+    '        '        Dim psi As New ProcessStartInfo(exePath)
-            '        Process.Start(psi)
+    '        '        Process.Start(psi)
-            '    Else
+    '        '    Else
-            '        MsgBox("Programm User Manager konnte nicht gefunden werden!", MsgBoxStyle.Critical)
+    '        '        MsgBox("Programm User Manager konnte nicht gefunden werden!", MsgBoxStyle.Critical)
+    '        '    End If
+    '        'End If
+
+    '        If USER_MANAGER_PATH = "" Then
+    '            With OpenFileDialog1
+    '                ' Do
+    '                .Filter = "DDUserManager.Exe|*.exe"
+    '                .FilterIndex = 1
+    '                .Title = "search DDUserManager.exe:"
+    '                If .ShowDialog() = DialogResult.OK Then
+
+    '                    USER_MANAGER_PATH = .FileName
+    '                    CONFIG.Config.UserManagerPath = USER_MANAGER_PATH
+    '                    CONFIG.Save()
+    '                    'SaveMySettingsValue("USRMNGRPATH", .FileName)
     '                End If
+    '            End With
     '        End If
-
+    '        If File.Exists(USER_MANAGER_PATH) Then
-            If USER_MANAGER_PATH = "" Then
+    '            Process.Start(USER_MANAGER_PATH)
-                With OpenFileDialog1
+    '        End If
-                    ' Do
+    '    Catch ex As Exception
-                    .Filter = "DDUserManager.Exe|*.exe"
+    '        LOGGER.Error(ex)
-                    .FilterIndex = 1
+    '        MsgBox("Error while startign User Manager:" & vbCrLf & ex.Message, MsgBoxStyle.Critical)
-                    .Title = "search DDUserManager.exe:"
+    '    End Try
-                    If .ShowDialog() = DialogResult.OK Then
+    'End Sub
-
-                        USER_MANAGER_PATH = .FileName
-                        CONFIG.Config.UserManagerPath = USER_MANAGER_PATH
-                        CONFIG.Save()
-                        'SaveMySettingsValue("USRMNGRPATH", .FileName)
-                    End If
-                End With
-            End If
-            If File.Exists(USER_MANAGER_PATH) Then
-                Process.Start(USER_MANAGER_PATH)
-            End If
-        Catch ex As Exception
-            LOGGER.Error(ex)
-            MsgBox("Error while startign User Manager:" & vbCrLf & ex.Message, MsgBoxStyle.Critical)
-        End Try
-    End Sub
-
-    Private Sub tsBtnCancel_Click(sender As Object, e As EventArgs) Handles tsBtnCancel.Click
-        CancelFinalIndexInsert()
-    End Sub
 
     Private Sub frmProfileDesigner_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
         CancelFinalIndexInsert()
     End Sub
 
     Private Sub TabControl2_SelectedIndexChanged_1(sender As Object, e As EventArgs) Handles TabControl2.SelectedIndexChanged
+        Select Case TabControl2.SelectedIndex
+            Case 0
+                RibbonPageGroup2.Enabled = True
+            Case Else
+                RibbonPageGroup2.Enabled = False
+        End Select
         CancelFinalIndexInsert()
     End Sub
 
@@ -991,8 +879,12 @@ Public Class frmAdministration
             If e.FocusedRowHandle <> GridControl.NewItemRowHandle Then
                 obj = FINALINDICES.SetValue(value, obj, index, MyIndicies, MyIndicies_Types)
             End If
+            If IDB_ACTIVE Then
+                obj.Indicies = MyIndicies.Except(IDBData.IDBSystemIndices).ToList
+            Else
+                obj.Indicies = MyIndicies
+            End If
 
-            obj.Indicies = MyIndicies.Except(IDBData.Source_IDBIndices).ToList
 
             obj.IndiciesType = MyIndicies_Types
             obj.IndexName = index
@@ -1015,14 +907,214 @@ Public Class frmAdministration
         End Try
     End Sub
 
-    Private Sub BindingNavigatorAddNewItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorAddNewItem.Click
-        INSERT_ACTIVE = True
 
-        tsBtnCancel.Visible = True
+    Private Sub PropertyGrid1_PropertyValueChanged(s As Object, e As PropertyValueChangedEventArgs) Handles PropertyGrid1.PropertyValueChanged
-        BindingNavigatorAddNewItem.Visible = False
+        Dim propertyGrid As PropertyGrid = s
+        Dim obj As FinalIndexProperties = propertyGrid.SelectedObject
+
+        If TypeOf (e.ChangedItem.Value) Is SQLValue Then
+            Dim value As SQLValue = e.ChangedItem.Value
+
+            If value.Value <> String.Empty Then
+                obj.ConnectionId = CURRENT_SQL_CON
+                obj.StringValue = "SQL-Command"
+            End If
+
+            propertyGrid.Refresh()
+        Else
+            Dim lbl = e.ChangedItem.Label
+            If e.ChangedItem.Label = "Description" Then
+                obj.Description = e.ChangedItem.Value
+            ElseIf e.ChangedItem.Label = "IndexName" Then
+                Dim type As Integer = FINALINDICES.GetIndexType(e.ChangedItem.Value, MyIndicies, MyIndicies_Types)
+                obj.VectorIndex = FINALINDICES.IsVectorIndex(type)
+            End If
+            propertyGrid.Refresh()
+        End If
     End Sub
 
-    Private Sub ToolStripButton4_Click_1(sender As Object, e As EventArgs) Handles tsBtnSave.Click
+
+    Private Sub tsBtnCancel_Click_1(sender As Object, e As EventArgs)
+        CancelFinalIndexInsert()
+    End Sub
+
+
+    Private Sub PM_VEKTOR_INDEXComboBox_MouseHover(sender As Object, e As EventArgs) Handles PM_VEKTOR_INDEXComboBox.MouseHover
+        ToolTip1.Show("Bitte wählen Sie hier den Vektor-Index den Sie für die Kennzeichnung der PM-Indizes verwenden wollen:", PM_VEKTOR_INDEXComboBox)
+    End Sub
+
+    Private Sub cmbLOGIndex_MouseHover(sender As Object, e As EventArgs) Handles cmbLOGIndex.MouseHover
+        ToolTip1.Show("Bitte wählen Sie hier den Vektor-Index den Sie für das Loggen der Wertänderungen nutzen wollen:", cmbLOGIndex)
+    End Sub
+
+    Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
+        If CInt(PROFILGUIDTextBox.Text) > 0 Then
+            profile_guid = PROFILGUIDTextBox.Text
+            CURRENT_ProfilGUID = PROFILGUIDTextBox.Text
+            My.Settings.Save()
+            CURRENT_OBJECTTYPE = cmbObjekttypen.Text
+            CURRENT_ProfilName = NAMETextBox.Text
+
+            frmFormDesigner.ProfileId = CURRENT_ProfilGUID
+            frmFormDesigner.ProfileName = CURRENT_ProfilName
+            frmFormDesigner.ProfileObjectType = cmbObjekttypen.Text
+            frmFormDesigner.ShowDialog()
+
+        Else
+            MsgBox("Eindeutiges Profil konnte nicht an den FormDesigner weitergegeben werden:", MsgBoxStyle.Exclamation)
+        End If
+    End Sub
+
+    Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+        Refresh_Profildaten()
+    End Sub
+
+    Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
+        Dim result As MsgBoxResult = MsgBox("Wollen Sie das gesamte Profil kopieren?" & vbNewLine & "Alle Einstellungen werden übernommen, das Profil wird angelegt und inaktiv gesetzt!", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
+        'wenn Speichern ja
+        If result = MsgBoxResult.Yes Then
+            Try
+                Dim oEXECSQL As String = $"EXEC PRPM_COPY_PROFILE {PROFILGUIDTextBox.Text},'{USER_USERNAME}'"
+                If ClassDatabase.Execute_non_Query(oEXECSQL) = True Then
+                    MsgBox("Das Profil " & NAMETextBox.Text & " wurde erfolgreich kopiert!", MsgBoxStyle.Information, "Erfolgsmeldung")
+                    Refresh_Profildaten()
+                Else
+                    MsgBox("Error creating a profileCopy - Please check Your log!", MsgBoxStyle.Exclamation)
+                End If
+
+            Catch ex As Exception
+                LOGGER.Error(ex)
+                MsgBox("Fehler bei Anlage Profilkopie:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
+            End Try
+
+        End If
+    End Sub
+
+
+
+    Private Sub BarButtonItem5_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem5.ItemClick
+        Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie das Profil " & NAMETextBox.Text & " löschen wollen?", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
+        ' wenn Speichern ja
+        If result = MsgBoxResult.Yes Then
+            Try
+                Dim profileID = PROFILGUIDTextBox.Text
+                Dim del As String = $"EXEC PRPM_DELETE_PROFILE {profileID}"
+                If ClassDatabase.Execute_non_Query(del) = True Then
+                    MsgBox("Das Profil " & NAMETextBox.Text & " wurde erfolgreich gelöscht!", MsgBoxStyle.Information, "Erfolgsmeldung")
+                    Refresh_Profildaten()
+                End If
+
+            Catch ex As Exception
+                LOGGER.Error(ex)
+                MsgBox("Fehler bei Löschen des Profils:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
+            End Try
+
+        End If
+    End Sub
+
+    Private Sub BarButtonItem6_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem6.ItemClick
+        Dim result As MsgBoxResult = MsgBox("Wollen Sie die Dateien für dieses Profil wirklich entfernen?" & vbNewLine & "Wenn ja müssen Sie auf die Aktualisierung des Jobs warten bis wieder Dateien zur Bearbeitung frei sind.", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
+        'wenn Speichern ja
+        If result = MsgBoxResult.Yes Then
+            If ClassDatabase.Execute_non_Query("DELETE FROM TBPM_PROFILE_FILES WHERE PROFIL_ID = " & PROFILGUIDTextBox.Text) = True Then
+                MsgBox("Die Dateien zum Profil wurden erfolgreich gelöscht!", MsgBoxStyle.Information)
+            End If
+        End If
+    End Sub
+
+    Private Sub BarButtonItem7_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem7.ItemClick
+        Save_Profile
+    End Sub
+    Sub Save_Profile()
+        Try
+            Me.TBPM_PROFILEBindingSource.EndEdit()
+            If DD_DMSLiteDataSet.TBPM_PROFILE.GetChanges Is Nothing = False Then
+                CHANGED_WHOTextBox.Text = USER_USERNAME
+                Me.TBPM_PROFILEBindingSource.EndEdit()
+                Me.TBPM_PROFILETableAdapter.Update(DD_DMSLiteDataSet.TBPM_PROFILE)
+                tsbStaticInfo.Caption = $"ProfileData saved - {Now.ToLongTimeString}"
+
+            Else
+                tsbStaticInfo.Caption = ""
+            End If
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Speichern des Profils:")
+        End Try
+    End Sub
+
+    Private Sub BarButtonItem8_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem8.ItemClick
+        If TBPM_PROFILETableAdapter.cmdAnzProfile + 1 > LICENSE_PROFILES Then
+            MsgBox("Sie haben die maximale Anzahl (" & LICENSE_PROFILES & ") von lizensierten Profilen erreicht!" & vbNewLine & "Bitte löschen Sie Profile oder setzen sich mit Digital Data in Verbindung!", MsgBoxStyle.Exclamation, "Achtung Lizenzhinweis:")
+        Else
+            TBPM_PROFILEBindingSource.AddNew()
+        End If
+    End Sub
+
+    Private Sub BarButtonItem9_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem9.ItemClick
+        frmLicense.ShowDialog()
+    End Sub
+
+    Private Sub BarButtonItem10_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem10.ItemClick
+        Dim result As MsgBoxResult = MsgBox("Do You really want to delete all workflow-Jobs?" & vbNewLine & "If yes You have to wait for the next Sync-Job for the jobs.", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
+        'wenn Speichern ja
+        If result = MsgBoxResult.Yes Then
+            If ClassDatabase.Execute_non_Query("DELETE FROM TBPM_PROFILE_FILES") = True Then
+                MsgBox("All workflow-jobs have been erased!", MsgBoxStyle.Information)
+            End If
+        End If
+    End Sub
+
+    Private Sub BarButtonItem11_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem11.ItemClick
+        frmConnection.ShowDialog()
+    End Sub
+
+    Private Sub BarButtonItem14_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem14.ItemClick
+        frmSQL_Admin.ShowDialog()
+    End Sub
+
+    Private Sub BarButtonItem13_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem13.ItemClick
+        Try
+            Dim oSQL = BASEDATA_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW")
+            Dim oForm As New frmSQL_DESIGNER() With {.SQLCommand = oSQL}
+            Dim oResult = oForm.ShowDialog()
+
+            If oResult = DialogResult.OK Then
+                ClassDatabase.Execute_non_Query(String.Format("UPDATE TBPM_KONFIGURATION SET SQL_PROFILE_MAIN_VIEW = '{0}' WHERE GUID = 1", oForm.SQLCommand.Replace("'", "''")))
+                BASEDATA_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW") = oForm.SQLCommand
+            End If
+        Catch ex As Exception
+            MsgBox("Fehler beim Speichern: " & vbNewLine & vbNewLine & ex.Message)
+            LOGGER.Error(ex)
+        End Try
+    End Sub
+
+    Private Sub BarButtonItem15_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem15.ItemClick
+        Refresh_Final_indexe()
+    End Sub
+
+    Private Sub BarButtonItem16_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem16.ItemClick
+        INSERT_ACTIVE = True
+        BarButtonItem19.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
+        BarButtonItem16.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+        TBPM_PROFILE_FINAL_INDEXINGBindingSource.AddNew()
+    End Sub
+
+    Private Sub BarButtonItem17_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem17.ItemClick
+        Dim selectedRowHandle = viewFinalIndex.GetSelectedRows().First()
+        Dim row As DataRow = viewFinalIndex.GetDataRow(selectedRowHandle)
+
+        If Not IsNothing(row) Then
+            If MsgBox("Wollen Sie den Index wirklich löschen?", MsgBoxStyle.YesNo Or MsgBoxStyle.Question) = MsgBoxResult.Yes Then
+                TBPM_PROFILE_FINAL_INDEXINGTableAdapter.DeleteFinalIndex(row.Item("GUID"))
+                Refresh_Final_indexe()
+
+                MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:")
+            End If
+        End If
+    End Sub
+
+    Private Sub BarButtonItem18_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem18.ItemClick
         Try
             Dim obj As FinalIndexProperties = PropertyGrid1.SelectedObject
 
@@ -1049,14 +1141,15 @@ Public Class frmAdministration
                 Dim preventDuplicates As Integer = IIf(obj.PreventDuplicates, 1, 0)
                 Dim AllowAddNewValues As Integer = IIf(obj.AllowAddNewValues, 1, 0)
                 Dim IF_VEKTOR_BEHAVIOUR As String = NotNull(obj.VectorBehaviour, String.Empty)
+                Dim oDescription As String = NotNull(obj.Description, String.Empty)
 
                 If indexName = String.Empty Then
-                    MsgBox("Das Feld IndexName muss ausgefüllt sein!", MsgBoxStyle.Exclamation)
+                    MsgBox("We need an index!", MsgBoxStyle.Exclamation)
                     Exit Sub
                 End If
 
                 If sqlCommand = String.Empty And value = String.Empty Then
-                    MsgBox("Entweder SQLCommand oder StaticValue müssen ausgefüllt sein!", MsgBoxStyle.Exclamation)
+                    MsgBox("SQLCommand or StaticValue need to be filled!", MsgBoxStyle.Exclamation)
                     Exit Sub
                 End If
 
@@ -1071,16 +1164,17 @@ Public Class frmAdministration
                                      VALUES ({profileId}, {connectionId}, '{sqlCommand}', '{indexName}', '{value}', {active}, {preventDuplicates}, {AllowAddNewValues}, '{addedWho}','{IF_VEKTOR_BEHAVIOUR}')"
 
                     If ClassDatabase.Execute_non_Query(sql, True) Then
+                        tsbStaticInfo.Caption = $"Final index added - {Now.ToLongTimeString}"
                         INSERT_ACTIVE = False
                     End If
                 Else
                     Dim sql As String = $"UPDATE TBPM_PROFILE_FINAL_INDEXING 
-                                      SET CONNECTION_ID = {connectionId}, SQL_COMMAND = '{sqlCommand}', INDEXNAME = '{indexName}', CHANGED_WHO = '{addedWho}',
+                                      SET CONNECTION_ID = {connectionId}, SQL_COMMAND = '{sqlCommand}', INDEXNAME = '{indexName}', CHANGED_WHO = '{addedWho}', DESCRIPTION = '{oDescription}',
                                       VALUE = '{value}', ACTIVE = {active}, ALLOW_NEW_VALUES = {AllowAddNewValues}, PREVENT_DUPLICATES = {preventDuplicates},IF_VEKTOR_BEHAVIOUR = '{IF_VEKTOR_BEHAVIOUR}'
                                       WHERE GUID = {guid}"
 
                     If ClassDatabase.Execute_non_Query(sql, True) Then
-
+                        tsbStaticInfo.Caption = $"Final index saved - {Now.ToLongTimeString}"
                     End If
                 End If
 
@@ -1091,86 +1185,63 @@ Public Class frmAdministration
             MsgBox("Error while Saving Final Index: " & ex.Message, MsgBoxStyle.Critical)
             LOGGER.Info("Error while Saving Final Index: " & ex.Message)
         Finally
-            tsBtnCancel.Visible = False
+            BarButtonItem19.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
-            BindingNavigatorAddNewItem.Visible = True
+            BarButtonItem16.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
             INSERT_ACTIVE = False
         End Try
     End Sub
 
-    Private Sub PropertyGrid1_PropertyValueChanged(s As Object, e As PropertyValueChangedEventArgs) Handles PropertyGrid1.PropertyValueChanged
+    Private Sub BarButtonItem19_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem19.ItemClick
-        Dim propertyGrid As PropertyGrid = s
-        Dim obj As FinalIndexProperties = propertyGrid.SelectedObject
-
-        If TypeOf (e.ChangedItem.Value) Is SQLValue Then
-            Dim value As SQLValue = e.ChangedItem.Value
-
-            If value.Value <> String.Empty Then
-                obj.ConnectionId = CURRENT_SQL_CON
-                obj.StringValue = "SQL-Command"
-            End If
-
-            propertyGrid.Refresh()
-        ElseIf e.ChangedItem.Label = "IndexName" Then
-            Dim type As Integer = FINALINDICES.GetIndexType(e.ChangedItem.Value, MyIndicies, MyIndicies_Types)
-            obj.VectorIndex = FINALINDICES.IsVectorIndex(type)
-
-            propertyGrid.Refresh()
-        End If
-    End Sub
-
-    Private Sub BindingNavigatorDeleteItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorDeleteItem.Click
-        Dim selectedRowHandle = viewFinalIndex.GetSelectedRows().First()
-        Dim row As DataRow = viewFinalIndex.GetDataRow(selectedRowHandle)
-
-        If Not IsNothing(row) Then
-            If MsgBox("Wollen Sie den Index wirklich löschen?", MsgBoxStyle.YesNo Or MsgBoxStyle.Question) = MsgBoxResult.Yes Then
-                TBPM_PROFILE_FINAL_INDEXINGTableAdapter.DeleteFinalIndex(row.Item("GUID"))
-                Refresh_Final_indexe()
-
-                MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:")
-            End If
-        End If
-    End Sub
-
-    Private Sub ToolStripButton5_Click(sender As Object, e As EventArgs) Handles ToolStripButton5.Click
-        Refresh_Final_indexe()
-    End Sub
-
-    Private Sub tsBtnCancel_Click_1(sender As Object, e As EventArgs) Handles tsBtnCancel.Click
         CancelFinalIndexInsert()
     End Sub
 
-    Private Sub tsbtnDeleteProfileData_Click(sender As Object, e As EventArgs) Handles tsbtnDeleteProfileData.Click
+    Private Sub gridFinalIndex_MouseHover(sender As Object, e As EventArgs) Handles gridFinalIndex.MouseHover
-        Dim result As MsgBoxResult = MsgBox("Wollen Sie die Dateien für dieses Profil wirklich entfernen?" & vbNewLine & "Wenn ja müssen Sie auf die Aktualisierung des Jobs warten bis wieder Dateien zur Bearbeitung frei sind.", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
+        RibbonPageGroup2.Enabled = True
-        'wenn Speichern ja
-        If result = MsgBoxResult.Yes Then
-            If ClassDatabase.Execute_non_Query("DELETE FROM TBPM_PROFILE_FILES WHERE PROFIL_ID = " & PROFILGUIDTextBox.Text) = True Then
-                MsgBox("Die Dateien zum Profil wurden erfolgreich gelöscht!", MsgBoxStyle.Information)
-            End If
-        End If
     End Sub
 
-    Private Sub btnSQLProfilehome_Click(sender As Object, e As EventArgs) Handles btnSQLProfilehome.Click
+    Private Sub CHANGED_WHENLabel_Click(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Private Sub BarButtonItem20_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem20.ItemClick
         Try
-            Dim oSQL = CURRENT_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW")
+            Dim oSQL = BASEDATA_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW")
+            CURRENT_DESIGN_TYPE = "SQL_OVERVIEW"
             Dim oForm As New frmSQL_DESIGNER() With {.SQLCommand = oSQL}
             Dim oResult = oForm.ShowDialog()
 
             If oResult = DialogResult.OK Then
                 ClassDatabase.Execute_non_Query(String.Format("UPDATE TBPM_KONFIGURATION SET SQL_PROFILE_MAIN_VIEW = '{0}' WHERE GUID = 1", oForm.SQLCommand.Replace("'", "''")))
-                CURRENT_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW") = oForm.SQLCommand
+                BASEDATA_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW") = oForm.SQLCommand
             End If
         Catch ex As Exception
-            MsgBox("Fehler beim Speichern: " & vbNewLine & vbNewLine & ex.Message)
+            MsgBox("Error in Saving SQL Overview: " & vbNewLine & vbNewLine & ex.Message)
             LOGGER.Error(ex)
         End Try
     End Sub
 
-    Private Sub PM_VEKTOR_INDEXComboBox_MouseHover(sender As Object, e As EventArgs) Handles PM_VEKTOR_INDEXComboBox.MouseHover
+    Private Sub BarButtonItem21_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem21.ItemClick
-        ToolTip1.Show("Bitte wählen Sie hier den Vektor-Index den Sie für die Kennzeichnung der PM-Indizes verwenden wollen:", PM_VEKTOR_INDEXComboBox)
+        Try
-    End Sub
+            profile_guid = PROFILGUIDTextBox.Text
+            CURRENT_ProfilGUID = PROFILGUIDTextBox.Text
+            CURRENT_DESIGN_TYPE = "SQL_PROFILE"
+            Dim oSQL = $"SELECT [SQL_VIEW] FROM TBPM_PROFILE WHERE GUID = {CURRENT_ProfilGUID}"
+            Dim oldSQL = ClassDatabase.Execute_Scalar(oSQL, CONNECTION_STRING)
+            Dim oForm As New frmSQL_DESIGNER() With {.SQLCommand = oldSQL}
+            Dim oResult = oForm.ShowDialog()
 
-    Private Sub cmbLOGIndex_MouseHover(sender As Object, e As EventArgs) Handles cmbLOGIndex.MouseHover
+            If oResult = DialogResult.OK Then
-        ToolTip1.Show("Bitte wählen Sie hier den Vektor-Index den Sie für das Loggen der Wertänderungen nutzen wollen:", cmbLOGIndex)
+                If oldSQL <> oForm.SQLCommand Then
+                    Dim oUpdate As String = $"Update TBPM_PROFILE SET CHANGED_WHO = '{USER_USERNAME}', SQL_VIEW = '{oForm.SQLCommand.Replace("'", "''")}' WHERE GUID = {CURRENT_ProfilGUID}"
+                    If ClassDatabase.Execute_non_Query(oUpdate) = True Then
+                        tsbStaticInfo.Caption = $"Profile SQL saved - {Now.ToLongTimeString}"
+                    End If
+
+                End If
+            End If
+        Catch ex As Exception
+            MsgBox("Error in Saving Profile SQL: " & vbNewLine & vbNewLine & ex.Message)
+            LOGGER.Error(ex)
+        End Try
     End Sub
 End Class

app/DD_PM_WINDREAM/frmAnnotations.Designer.vb

@@ -35,7 +35,7 @@ Partial Class frmAnnotations
         'Button1
         '
         Me.Button1.Cursor = System.Windows.Forms.Cursors.Default
-        Me.Button1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.add
+        Me.Button1.Image = Global.DD_ProcessManager.My.Resources.Resources.add
         resources.ApplyResources(Me.Button1, "Button1")
         Me.Button1.Name = "Button1"
         Me.Button1.UseVisualStyleBackColor = True

app/DD_PM_WINDREAM/frmConnection.Designer.vb

@@ -32,6 +32,8 @@ Partial Class frmConnection
         Me.chkOR_ohne_TNS = New System.Windows.Forms.CheckBox()
         Me.Chckwin_aut = New System.Windows.Forms.CheckBox()
         Me.txtBezeichnung = New System.Windows.Forms.TextBox()
+        Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
         Me.Label1 = New System.Windows.Forms.Label()
         Me.btnCheck_Con = New System.Windows.Forms.Button()
         Me.lblDatasource2 = New System.Windows.Forms.Label()
@@ -59,14 +61,6 @@ Partial Class frmConnection
         Me.TBDD_CONNECTIONBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
         Me.TBDD_CONNECTIONDataGridView = New System.Windows.Forms.DataGridView()
-        Me.GEANDERTWERTextBox = New System.Windows.Forms.TextBox()
-        Me.GEAENDERTWANNTextBox = New System.Windows.Forms.TextBox()
-        Me.SERVERTextBox = New System.Windows.Forms.TextBox()
-        Me.GUIDTextBox = New System.Windows.Forms.TextBox()
-        Me.DATENBANKComboBox = New System.Windows.Forms.ComboBox()
-        Me.BEMERKUNGTextBox = New System.Windows.Forms.TextBox()
-        Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
         Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
         Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
         Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewTextBoxColumn()
@@ -75,18 +69,26 @@ Partial Class frmConnection
         Me.DataGridViewTextBoxColumn6 = New System.Windows.Forms.DataGridViewTextBoxColumn()
         Me.DataGridViewTextBoxColumn8 = New System.Windows.Forms.DataGridViewTextBoxColumn()
         Me.DataGridViewCheckBoxColumn1 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
-        Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.GEANDERTWERTextBox = New System.Windows.Forms.TextBox()
-        Me.TBDD_CONNECTIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter()
+        Me.GEAENDERTWANNTextBox = New System.Windows.Forms.TextBox()
+        Me.SERVERTextBox = New System.Windows.Forms.TextBox()
+        Me.GUIDTextBox = New System.Windows.Forms.TextBox()
+        Me.DATENBANKComboBox = New System.Windows.Forms.ComboBox()
+        Me.BEMERKUNGTextBox = New System.Windows.Forms.TextBox()
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.TBDD_CONNECTIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter()
         Me.SYS_CONNECTIONCheckBox = New System.Windows.Forms.CheckBox()
+        Me.GroupBox1 = New System.Windows.Forms.GroupBox()
         GEANDERTWERLabel = New System.Windows.Forms.Label()
         GEAENDERTWANNLabel = New System.Windows.Forms.Label()
         GUIDLabel = New System.Windows.Forms.Label()
         BEMERKUNGLabel = New System.Windows.Forms.Label()
+        CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.TBDD_CONNECTIONBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.TBDD_CONNECTIONBindingNavigator.SuspendLayout()
         CType(Me.TBDD_CONNECTIONDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.GroupBox1.SuspendLayout()
-        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'GEANDERTWERLabel
@@ -110,7 +112,7 @@ Partial Class frmConnection
         'GUIDLabel
         '
         GUIDLabel.AutoSize = True
-        GUIDLabel.Location = New System.Drawing.Point(529, 36)
+        GUIDLabel.Location = New System.Drawing.Point(523, 19)
         GUIDLabel.Name = "GUIDLabel"
         GUIDLabel.Size = New System.Drawing.Size(25, 16)
         GUIDLabel.TabIndex = 64
@@ -119,17 +121,17 @@ Partial Class frmConnection
         'BEMERKUNGLabel
         '
         BEMERKUNGLabel.AutoSize = True
-        BEMERKUNGLabel.Location = New System.Drawing.Point(532, 83)
+        BEMERKUNGLabel.Location = New System.Drawing.Point(526, 66)
         BEMERKUNGLabel.Name = "BEMERKUNGLabel"
         BEMERKUNGLabel.Size = New System.Drawing.Size(82, 16)
         BEMERKUNGLabel.TabIndex = 66
-        BEMERKUNGLabel.Text = "Bermerkung:"
+        BEMERKUNGLabel.Text = "Bemerkung:"
         '
         'chkOR_ohne_TNS
         '
         Me.chkOR_ohne_TNS.AutoSize = True
         Me.chkOR_ohne_TNS.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.chkOR_ohne_TNS.Location = New System.Drawing.Point(15, 191)
+        Me.chkOR_ohne_TNS.Location = New System.Drawing.Point(9, 174)
         Me.chkOR_ohne_TNS.Name = "chkOR_ohne_TNS"
         Me.chkOR_ohne_TNS.Size = New System.Drawing.Size(139, 20)
         Me.chkOR_ohne_TNS.TabIndex = 45
@@ -141,7 +143,7 @@ Partial Class frmConnection
         '
         Me.Chckwin_aut.AutoSize = True
         Me.Chckwin_aut.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Chckwin_aut.Location = New System.Drawing.Point(12, 191)
+        Me.Chckwin_aut.Location = New System.Drawing.Point(6, 174)
         Me.Chckwin_aut.Name = "Chckwin_aut"
         Me.Chckwin_aut.Size = New System.Drawing.Size(180, 20)
         Me.Chckwin_aut.TabIndex = 8
@@ -153,16 +155,26 @@ Partial Class frmConnection
         '
         Me.txtBezeichnung.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEZEICHNUNG", True))
         Me.txtBezeichnung.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtBezeichnung.Location = New System.Drawing.Point(232, 53)
+        Me.txtBezeichnung.Location = New System.Drawing.Point(226, 36)
         Me.txtBezeichnung.Name = "txtBezeichnung"
         Me.txtBezeichnung.Size = New System.Drawing.Size(294, 23)
         Me.txtBezeichnung.TabIndex = 1
         '
+        'TBDD_CONNECTIONBindingSource
+        '
+        Me.TBDD_CONNECTIONBindingSource.DataMember = "TBDD_CONNECTION"
+        Me.TBDD_CONNECTIONBindingSource.DataSource = Me.DD_DMSLiteDataSet
+        '
+        'DD_DMSLiteDataSet
+        '
+        Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
+        Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
+        '
         'Label1
         '
         Me.Label1.AutoSize = True
         Me.Label1.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label1.Location = New System.Drawing.Point(229, 36)
+        Me.Label1.Location = New System.Drawing.Point(223, 19)
         Me.Label1.Name = "Label1"
         Me.Label1.Size = New System.Drawing.Size(154, 17)
         Me.Label1.TabIndex = 40
@@ -171,9 +183,9 @@ Partial Class frmConnection
         'btnCheck_Con
         '
         Me.btnCheck_Con.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnCheck_Con.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.world_link
+        Me.btnCheck_Con.Image = Global.DD_ProcessManager.My.Resources.Resources.world_link
         Me.btnCheck_Con.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnCheck_Con.Location = New System.Drawing.Point(374, 150)
+        Me.btnCheck_Con.Location = New System.Drawing.Point(368, 133)
         Me.btnCheck_Con.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.btnCheck_Con.Name = "btnCheck_Con"
         Me.btnCheck_Con.Size = New System.Drawing.Size(152, 28)
@@ -187,7 +199,7 @@ Partial Class frmConnection
         '
         Me.lblDatasource2.AutoSize = True
         Me.lblDatasource2.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblDatasource2.Location = New System.Drawing.Point(229, 82)
+        Me.lblDatasource2.Location = New System.Drawing.Point(223, 65)
         Me.lblDatasource2.Name = "lblDatasource2"
         Me.lblDatasource2.Size = New System.Drawing.Size(91, 17)
         Me.lblDatasource2.TabIndex = 34
@@ -199,7 +211,7 @@ Partial Class frmConnection
         Me.btnMdbLöschen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
         Me.btnMdbLöschen.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.btnMdbLöschen.Image = CType(resources.GetObject("btnMdbLöschen.Image"), System.Drawing.Image)
-        Me.btnMdbLöschen.Location = New System.Drawing.Point(532, 150)
+        Me.btnMdbLöschen.Location = New System.Drawing.Point(526, 133)
         Me.btnMdbLöschen.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.btnMdbLöschen.Name = "btnMdbLöschen"
         Me.btnMdbLöschen.Size = New System.Drawing.Size(29, 26)
@@ -211,7 +223,7 @@ Partial Class frmConnection
         '
         Me.btnMdbLocation.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
         Me.btnMdbLocation.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnMdbLocation.Location = New System.Drawing.Point(497, 101)
+        Me.btnMdbLocation.Location = New System.Drawing.Point(491, 84)
         Me.btnMdbLocation.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.btnMdbLocation.Name = "btnMdbLocation"
         Me.btnMdbLocation.Size = New System.Drawing.Size(29, 26)
@@ -224,7 +236,7 @@ Partial Class frmConnection
         '
         Me.txtPassword.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "PASSWORD", True))
         Me.txtPassword.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtPassword.Location = New System.Drawing.Point(231, 153)
+        Me.txtPassword.Location = New System.Drawing.Point(225, 136)
         Me.txtPassword.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.txtPassword.Name = "txtPassword"
         Me.txtPassword.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
@@ -237,7 +249,7 @@ Partial Class frmConnection
         '
         Me.txtUserId.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "USERNAME", True))
         Me.txtUserId.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtUserId.Location = New System.Drawing.Point(15, 153)
+        Me.txtUserId.Location = New System.Drawing.Point(9, 136)
         Me.txtUserId.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.txtUserId.Name = "txtUserId"
         Me.txtUserId.Size = New System.Drawing.Size(200, 23)
@@ -248,7 +260,7 @@ Partial Class frmConnection
         '
         Me.lblPassword.AutoSize = True
         Me.lblPassword.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblPassword.Location = New System.Drawing.Point(229, 132)
+        Me.lblPassword.Location = New System.Drawing.Point(223, 115)
         Me.lblPassword.Name = "lblPassword"
         Me.lblPassword.Size = New System.Drawing.Size(63, 17)
         Me.lblPassword.TabIndex = 4
@@ -259,7 +271,7 @@ Partial Class frmConnection
         '
         Me.lblUserId.AutoSize = True
         Me.lblUserId.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblUserId.Location = New System.Drawing.Point(12, 132)
+        Me.lblUserId.Location = New System.Drawing.Point(6, 115)
         Me.lblUserId.Name = "lblUserId"
         Me.lblUserId.Size = New System.Drawing.Size(49, 17)
         Me.lblUserId.TabIndex = 3
@@ -270,7 +282,7 @@ Partial Class frmConnection
         '
         Me.lblDataSource.AutoSize = True
         Me.lblDataSource.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblDataSource.Location = New System.Drawing.Point(12, 82)
+        Me.lblDataSource.Location = New System.Drawing.Point(6, 65)
         Me.lblDataSource.Name = "lblDataSource"
         Me.lblDataSource.Size = New System.Drawing.Size(83, 17)
         Me.lblDataSource.TabIndex = 2
@@ -284,7 +296,7 @@ Partial Class frmConnection
         Me.cmbDbArt.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.cmbDbArt.FormattingEnabled = True
         Me.cmbDbArt.Items.AddRange(New Object() {"MS-SQL", "ODBC", "ORACLE"})
-        Me.cmbDbArt.Location = New System.Drawing.Point(15, 53)
+        Me.cmbDbArt.Location = New System.Drawing.Point(9, 36)
         Me.cmbDbArt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.cmbDbArt.Name = "cmbDbArt"
         Me.cmbDbArt.Size = New System.Drawing.Size(210, 24)
@@ -294,7 +306,7 @@ Partial Class frmConnection
         '
         Me.lblDatenbanktyp.AutoSize = True
         Me.lblDatenbanktyp.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblDatenbanktyp.Location = New System.Drawing.Point(12, 36)
+        Me.lblDatenbanktyp.Location = New System.Drawing.Point(6, 19)
         Me.lblDatenbanktyp.Name = "lblDatenbanktyp"
         Me.lblDatenbanktyp.Size = New System.Drawing.Size(96, 17)
         Me.lblDatenbanktyp.TabIndex = 0
@@ -388,7 +400,7 @@ Partial Class frmConnection
         '
         'ToolStripButton3
         '
-        Me.ToolStripButton3.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.refresh_16xLG
+        Me.ToolStripButton3.Image = Global.DD_ProcessManager.My.Resources.Resources.refresh_16xLG
         Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
         Me.ToolStripButton3.Name = "ToolStripButton3"
         Me.ToolStripButton3.Size = New System.Drawing.Size(95, 22)
@@ -396,7 +408,7 @@ Partial Class frmConnection
         '
         'ToolStripButton1
         '
-        Me.ToolStripButton1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.add
+        Me.ToolStripButton1.Image = Global.DD_ProcessManager.My.Resources.Resources.add
         Me.ToolStripButton1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
         Me.ToolStripButton1.Name = "ToolStripButton1"
@@ -413,7 +425,7 @@ Partial Class frmConnection
         '
         'ToolStripButton2
         '
-        Me.ToolStripButton2.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.delete_12x12
+        Me.ToolStripButton2.Image = Global.DD_ProcessManager.My.Resources.Resources.delete_12x12
         Me.ToolStripButton2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
         Me.ToolStripButton2.Name = "ToolStripButton2"
@@ -439,68 +451,6 @@ Partial Class frmConnection
         Me.TBDD_CONNECTIONDataGridView.Size = New System.Drawing.Size(1166, 316)
         Me.TBDD_CONNECTIONDataGridView.TabIndex = 53
         '
-        'GEANDERTWERTextBox
-        '
-        Me.GEANDERTWERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GEANDERTWER", True))
-        Me.GEANDERTWERTextBox.Location = New System.Drawing.Point(12, 246)
-        Me.GEANDERTWERTextBox.Name = "GEANDERTWERTextBox"
-        Me.GEANDERTWERTextBox.ReadOnly = True
-        Me.GEANDERTWERTextBox.Size = New System.Drawing.Size(147, 23)
-        Me.GEANDERTWERTextBox.TabIndex = 57
-        '
-        'GEAENDERTWANNTextBox
-        '
-        Me.GEAENDERTWANNTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GEAENDERTWANN", True))
-        Me.GEAENDERTWANNTextBox.Location = New System.Drawing.Point(165, 246)
-        Me.GEAENDERTWANNTextBox.Name = "GEAENDERTWANNTextBox"
-        Me.GEAENDERTWANNTextBox.ReadOnly = True
-        Me.GEAENDERTWANNTextBox.Size = New System.Drawing.Size(155, 23)
-        Me.GEAENDERTWANNTextBox.TabIndex = 63
-        '
-        'SERVERTextBox
-        '
-        Me.SERVERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "SERVER", True))
-        Me.SERVERTextBox.Location = New System.Drawing.Point(15, 103)
-        Me.SERVERTextBox.Name = "SERVERTextBox"
-        Me.SERVERTextBox.Size = New System.Drawing.Size(210, 23)
-        Me.SERVERTextBox.TabIndex = 2
-        '
-        'GUIDTextBox
-        '
-        Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GUID", True))
-        Me.GUIDTextBox.Location = New System.Drawing.Point(532, 53)
-        Me.GUIDTextBox.Name = "GUIDTextBox"
-        Me.GUIDTextBox.ReadOnly = True
-        Me.GUIDTextBox.Size = New System.Drawing.Size(72, 23)
-        Me.GUIDTextBox.TabIndex = 65
-        '
-        'DATENBANKComboBox
-        '
-        Me.DATENBANKComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "DATENBANK", True))
-        Me.DATENBANKComboBox.FormattingEnabled = True
-        Me.DATENBANKComboBox.Location = New System.Drawing.Point(232, 102)
-        Me.DATENBANKComboBox.Name = "DATENBANKComboBox"
-        Me.DATENBANKComboBox.Size = New System.Drawing.Size(259, 24)
-        Me.DATENBANKComboBox.TabIndex = 66
-        '
-        'BEMERKUNGTextBox
-        '
-        Me.BEMERKUNGTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEMERKUNG", True))
-        Me.BEMERKUNGTextBox.Location = New System.Drawing.Point(535, 102)
-        Me.BEMERKUNGTextBox.Name = "BEMERKUNGTextBox"
-        Me.BEMERKUNGTextBox.Size = New System.Drawing.Size(219, 23)
-        Me.BEMERKUNGTextBox.TabIndex = 67
-        '
-        'TBDD_CONNECTIONBindingSource
-        '
-        Me.TBDD_CONNECTIONBindingSource.DataMember = "TBDD_CONNECTION"
-        Me.TBDD_CONNECTIONBindingSource.DataSource = Me.DD_DMSLiteDataSet
-        '
-        'DD_DMSLiteDataSet
-        '
-        Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
-        Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
-        '
         'DataGridViewTextBoxColumn1
         '
         Me.DataGridViewTextBoxColumn1.DataPropertyName = "GUID"
@@ -550,11 +500,65 @@ Partial Class frmConnection
         Me.DataGridViewCheckBoxColumn1.HeaderText = "Aktiv"
         Me.DataGridViewCheckBoxColumn1.Name = "DataGridViewCheckBoxColumn1"
         '
+        'GEANDERTWERTextBox
+        '
+        Me.GEANDERTWERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GEANDERTWER", True))
+        Me.GEANDERTWERTextBox.Location = New System.Drawing.Point(12, 246)
+        Me.GEANDERTWERTextBox.Name = "GEANDERTWERTextBox"
+        Me.GEANDERTWERTextBox.ReadOnly = True
+        Me.GEANDERTWERTextBox.Size = New System.Drawing.Size(147, 23)
+        Me.GEANDERTWERTextBox.TabIndex = 57
+        '
+        'GEAENDERTWANNTextBox
+        '
+        Me.GEAENDERTWANNTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GEAENDERTWANN", True))
+        Me.GEAENDERTWANNTextBox.Location = New System.Drawing.Point(165, 246)
+        Me.GEAENDERTWANNTextBox.Name = "GEAENDERTWANNTextBox"
+        Me.GEAENDERTWANNTextBox.ReadOnly = True
+        Me.GEAENDERTWANNTextBox.Size = New System.Drawing.Size(155, 23)
+        Me.GEAENDERTWANNTextBox.TabIndex = 63
+        '
+        'SERVERTextBox
+        '
+        Me.SERVERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "SERVER", True))
+        Me.SERVERTextBox.Location = New System.Drawing.Point(9, 86)
+        Me.SERVERTextBox.Name = "SERVERTextBox"
+        Me.SERVERTextBox.Size = New System.Drawing.Size(210, 23)
+        Me.SERVERTextBox.TabIndex = 2
+        '
+        'GUIDTextBox
+        '
+        Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "GUID", True))
+        Me.GUIDTextBox.Location = New System.Drawing.Point(526, 36)
+        Me.GUIDTextBox.Name = "GUIDTextBox"
+        Me.GUIDTextBox.ReadOnly = True
+        Me.GUIDTextBox.Size = New System.Drawing.Size(72, 23)
+        Me.GUIDTextBox.TabIndex = 65
+        '
+        'DATENBANKComboBox
+        '
+        Me.DATENBANKComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "DATENBANK", True))
+        Me.DATENBANKComboBox.FormattingEnabled = True
+        Me.DATENBANKComboBox.Location = New System.Drawing.Point(226, 85)
+        Me.DATENBANKComboBox.Name = "DATENBANKComboBox"
+        Me.DATENBANKComboBox.Size = New System.Drawing.Size(259, 24)
+        Me.DATENBANKComboBox.TabIndex = 66
+        '
+        'BEMERKUNGTextBox
+        '
+        Me.BEMERKUNGTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEMERKUNG", True))
+        Me.BEMERKUNGTextBox.Location = New System.Drawing.Point(529, 85)
+        Me.BEMERKUNGTextBox.Name = "BEMERKUNGTextBox"
+        Me.BEMERKUNGTextBox.Size = New System.Drawing.Size(219, 23)
+        Me.BEMERKUNGTextBox.TabIndex = 67
+        '
         '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
@@ -564,7 +568,7 @@ Partial Class frmConnection
         Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
-        Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
         'TBDD_CONNECTIONTableAdapter
         '
@@ -573,56 +577,67 @@ Partial Class frmConnection
         'SYS_CONNECTIONCheckBox
         '
         Me.SYS_CONNECTIONCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBDD_CONNECTIONBindingSource, "SYS_CONNECTION", True))
-        Me.SYS_CONNECTIONCheckBox.Location = New System.Drawing.Point(627, 53)
+        Me.SYS_CONNECTIONCheckBox.Location = New System.Drawing.Point(621, 36)
         Me.SYS_CONNECTIONCheckBox.Name = "SYS_CONNECTIONCheckBox"
-        Me.SYS_CONNECTIONCheckBox.Size = New System.Drawing.Size(104, 24)
+        Me.SYS_CONNECTIONCheckBox.Size = New System.Drawing.Size(127, 24)
         Me.SYS_CONNECTIONCheckBox.TabIndex = 68
-        Me.SYS_CONNECTIONCheckBox.Text = "CheckBox1"
+        Me.SYS_CONNECTIONCheckBox.Text = "SYS Connection"
         Me.SYS_CONNECTIONCheckBox.UseVisualStyleBackColor = True
         '
+        'GroupBox1
+        '
+        Me.GroupBox1.Controls.Add(Me.lblDatenbanktyp)
+        Me.GroupBox1.Controls.Add(Me.SYS_CONNECTIONCheckBox)
+        Me.GroupBox1.Controls.Add(Me.chkOR_ohne_TNS)
+        Me.GroupBox1.Controls.Add(BEMERKUNGLabel)
+        Me.GroupBox1.Controls.Add(Me.btnCheck_Con)
+        Me.GroupBox1.Controls.Add(Me.BEMERKUNGTextBox)
+        Me.GroupBox1.Controls.Add(Me.lblDatasource2)
+        Me.GroupBox1.Controls.Add(Me.DATENBANKComboBox)
+        Me.GroupBox1.Controls.Add(Me.Label1)
+        Me.GroupBox1.Controls.Add(GUIDLabel)
+        Me.GroupBox1.Controls.Add(Me.cmbDbArt)
+        Me.GroupBox1.Controls.Add(Me.GUIDTextBox)
+        Me.GroupBox1.Controls.Add(Me.Chckwin_aut)
+        Me.GroupBox1.Controls.Add(Me.SERVERTextBox)
+        Me.GroupBox1.Controls.Add(Me.btnMdbLöschen)
+        Me.GroupBox1.Controls.Add(Me.txtBezeichnung)
+        Me.GroupBox1.Controls.Add(Me.lblDataSource)
+        Me.GroupBox1.Controls.Add(Me.txtUserId)
+        Me.GroupBox1.Controls.Add(Me.btnMdbLocation)
+        Me.GroupBox1.Controls.Add(Me.lblUserId)
+        Me.GroupBox1.Controls.Add(Me.txtPassword)
+        Me.GroupBox1.Controls.Add(Me.lblPassword)
+        Me.GroupBox1.Location = New System.Drawing.Point(12, 28)
+        Me.GroupBox1.Name = "GroupBox1"
+        Me.GroupBox1.Size = New System.Drawing.Size(773, 196)
+        Me.GroupBox1.TabIndex = 69
+        Me.GroupBox1.TabStop = False
+        '
         'frmConnection
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(1187, 619)
-        Me.Controls.Add(Me.SYS_CONNECTIONCheckBox)
+        Me.Controls.Add(Me.GroupBox1)
-        Me.Controls.Add(BEMERKUNGLabel)
-        Me.Controls.Add(Me.BEMERKUNGTextBox)
-        Me.Controls.Add(Me.DATENBANKComboBox)
-        Me.Controls.Add(GUIDLabel)
-        Me.Controls.Add(Me.GUIDTextBox)
-        Me.Controls.Add(Me.SERVERTextBox)
         Me.Controls.Add(GEAENDERTWANNLabel)
-        Me.Controls.Add(Me.lblDatenbanktyp)
-        Me.Controls.Add(Me.txtUserId)
         Me.Controls.Add(Me.GEAENDERTWANNTextBox)
-        Me.Controls.Add(Me.txtPassword)
         Me.Controls.Add(GEANDERTWERLabel)
-        Me.Controls.Add(Me.lblPassword)
         Me.Controls.Add(Me.GEANDERTWERTextBox)
-        Me.Controls.Add(Me.lblUserId)
         Me.Controls.Add(Me.TBDD_CONNECTIONDataGridView)
-        Me.Controls.Add(Me.btnMdbLocation)
         Me.Controls.Add(Me.TBDD_CONNECTIONBindingNavigator)
-        Me.Controls.Add(Me.lblDataSource)
-        Me.Controls.Add(Me.txtBezeichnung)
-        Me.Controls.Add(Me.btnMdbLöschen)
-        Me.Controls.Add(Me.Chckwin_aut)
-        Me.Controls.Add(Me.cmbDbArt)
-        Me.Controls.Add(Me.Label1)
-        Me.Controls.Add(Me.lblDatasource2)
-        Me.Controls.Add(Me.btnCheck_Con)
-        Me.Controls.Add(Me.chkOR_ohne_TNS)
         Me.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.Name = "frmConnection"
         Me.Text = "Verwaltung der Connections"
+        CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.TBDD_CONNECTIONBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
         Me.TBDD_CONNECTIONBindingNavigator.ResumeLayout(False)
         Me.TBDD_CONNECTIONBindingNavigator.PerformLayout()
         CType(Me.TBDD_CONNECTIONDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.GroupBox1.ResumeLayout(False)
-        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.GroupBox1.PerformLayout()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -638,9 +653,9 @@ Partial Class frmConnection
     Friend WithEvents lblDataSource As System.Windows.Forms.Label
     Friend WithEvents cmbDbArt As System.Windows.Forms.ComboBox
     Friend WithEvents lblDatenbanktyp As System.Windows.Forms.Label
-    Friend WithEvents DD_DMSLiteDataSet As DD_PM_WINDREAM.DD_DMSLiteDataSet
+    Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
     Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
+    Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
     Friend WithEvents TBDD_CONNECTIONBindingNavigator As System.Windows.Forms.BindingNavigator
     Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
     Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
@@ -676,4 +691,5 @@ Partial Class frmConnection
     Friend WithEvents DATENBANKComboBox As ComboBox
     Friend WithEvents BEMERKUNGTextBox As TextBox
     Friend WithEvents SYS_CONNECTIONCheckBox As CheckBox
+    Friend WithEvents GroupBox1 As GroupBox
 End Class

app/DD_PM_WINDREAM/frmConnection.vb

@@ -335,4 +335,12 @@ Public Class frmConnection
             Me.Cursor = Cursors.Default
         End Try
     End Sub
+
+    Private Sub SYS_CONNECTIONCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles SYS_CONNECTIONCheckBox.CheckedChanged
+        If SYS_CONNECTIONCheckBox.Checked Then
+            GroupBox1.Enabled = False
+        Else
+            GroupBox1.Enabled = True
+        End If
+    End Sub
 End Class

app/DD_PM_WINDREAM/frmControl_Detail.Designer.vb

@@ -47,9 +47,9 @@ Partial Class frmControl_Detail
         Me.REGEX_MATCHTextBox = New System.Windows.Forms.TextBox()
         Me.Button1 = New System.Windows.Forms.Button()
         Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
-        Me.TBPM_CONTROL_TABLETableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
+        Me.TBPM_CONTROL_TABLETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
-        Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
         Me.REGEX_MESSAGE_DETextBox = New System.Windows.Forms.TextBox()
         Me.ADDED_WHOTextBox = New System.Windows.Forms.TextBox()
         Me.ADDED_WHENTextBox = New System.Windows.Forms.TextBox()
@@ -131,7 +131,7 @@ Partial Class frmControl_Detail
         '
         'btnSave
         '
-        Me.btnSave.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.save
+        Me.btnSave.Image = Global.DD_ProcessManager.My.Resources.Resources.save
         resources.ApplyResources(Me.btnSave, "btnSave")
         Me.btnSave.Name = "btnSave"
         Me.btnSave.UseVisualStyleBackColor = True
@@ -144,13 +144,13 @@ Partial Class frmControl_Detail
         '
         'tslblAenderungen
         '
-        Me.tslblAenderungen.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.flag_red
+        Me.tslblAenderungen.Image = Global.DD_ProcessManager.My.Resources.Resources.flag_red
         Me.tslblAenderungen.Name = "tslblAenderungen"
         resources.ApplyResources(Me.tslblAenderungen, "tslblAenderungen")
         '
         'btnDelete
         '
-        Me.btnDelete.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.cancel
+        Me.btnDelete.Image = Global.DD_ProcessManager.My.Resources.Resources.cancel
         resources.ApplyResources(Me.btnDelete, "btnDelete")
         Me.btnDelete.Name = "btnDelete"
         Me.btnDelete.UseVisualStyleBackColor = True
@@ -199,7 +199,7 @@ Partial Class frmControl_Detail
         Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
-        Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
         'REGEX_MESSAGE_DETextBox
         '
@@ -302,10 +302,10 @@ Partial Class frmControl_Detail
         Me.PerformLayout
 
 End Sub
-    Friend WithEvents DD_DMSLiteDataSet As DD_PM_WINDREAM.DD_DMSLiteDataSet
+    Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
     Friend WithEvents TBPM_CONTROL_TABLEBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBPM_CONTROL_TABLETableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter
+    Friend WithEvents TBPM_CONTROL_TABLETableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter
-    Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
+    Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
     Friend WithEvents SPALTENNAMETextBox As System.Windows.Forms.TextBox
     Friend WithEvents SPALTEN_HEADERTextBox As System.Windows.Forms.TextBox
     Friend WithEvents SPALTENBREITETextBox As System.Windows.Forms.TextBox

app/DD_PM_WINDREAM/frmControl_Detail.resx

@@ -883,19 +883,19 @@
     <value>DD_DMSLiteDataSet</value>
   </data>
   <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Name" xml:space="preserve">
     <value>TBPM_CONTROL_TABLETableAdapter</value>
   </data>
   <data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
     <value>TableAdapterManager</value>
   </data>
   <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
     <value>frmControl_Detail</value>

app/DD_PM_WINDREAM/frmDesignerLayout.Designer.vb

@@ -0,0 +1,301 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmDesignerLayout
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()>
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDesignerLayout))
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarListItem1 = New DevExpress.XtraBars.BarListItem()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
+        Me.LayoutControlMain = New DevExpress.XtraLayout.LayoutControl()
+        Me.LayoutControlGroupMain = New DevExpress.XtraLayout.LayoutControlGroup()
+        Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
+        Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
+        Me.PropertyGridMain = New DevExpress.XtraVerticalGrid.PropertyGridControl()
+        Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
+        Me.ToolboxControlMain = New DevExpress.XtraToolbox.ToolboxControl()
+        Me.ToolboxGroupMain = New DevExpress.XtraToolbox.ToolboxGroup()
+        Me.ToolboxItemTextbox = New DevExpress.XtraToolbox.ToolboxItem()
+        Me.ToolboxItemMemoedit = New DevExpress.XtraToolbox.ToolboxItem()
+        Me.ToolboxItemDatepicker = New DevExpress.XtraToolbox.ToolboxItem()
+        Me.ToolboxItemCheckbox = New DevExpress.XtraToolbox.ToolboxItem()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl1.SuspendLayout()
+        CType(Me.LayoutControlMain, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlGroupMain, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.XtraTabControl1.SuspendLayout()
+        Me.XtraTabPage1.SuspendLayout()
+        CType(Me.PropertyGridMain, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.XtraTabPage2.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarListItem1, Me.BarButtonItem1, Me.BarButtonItem2})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 5
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.Size = New System.Drawing.Size(1196, 158)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarListItem1
+        '
+        Me.BarListItem1.Caption = "Layout auswählen"
+        Me.BarListItem1.Id = 1
+        Me.BarListItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarListItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarListItem1.Name = "BarListItem1"
+        Me.BarListItem1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "Layout anpassen"
+        Me.BarButtonItem1.Id = 2
+        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        Me.BarButtonItem1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
+        '
+        'BarButtonItem2
+        '
+        Me.BarButtonItem2.Caption = "Layout speichern"
+        Me.BarButtonItem2.Id = 3
+        Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem2.Name = "BarButtonItem2"
+        Me.BarButtonItem2.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "RibbonPage1"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarListItem1)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 598)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1196, 24)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'SplitContainerControl1
+        '
+        Me.SplitContainerControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 158)
+        Me.SplitContainerControl1.Name = "SplitContainerControl1"
+        Me.SplitContainerControl1.Panel1.Controls.Add(Me.LayoutControlMain)
+        Me.SplitContainerControl1.Panel1.Text = "Panel1"
+        Me.SplitContainerControl1.Panel2.Controls.Add(Me.XtraTabControl1)
+        Me.SplitContainerControl1.Panel2.Text = "Panel2"
+        Me.SplitContainerControl1.Size = New System.Drawing.Size(1196, 440)
+        Me.SplitContainerControl1.SplitterPosition = 818
+        Me.SplitContainerControl1.TabIndex = 8
+        '
+        'LayoutControlMain
+        '
+        Me.LayoutControlMain.AllowDrop = True
+        Me.LayoutControlMain.BackColor = System.Drawing.Color.Transparent
+        Me.LayoutControlMain.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.LayoutControlMain.Location = New System.Drawing.Point(0, 0)
+        Me.LayoutControlMain.Name = "LayoutControlMain"
+        Me.LayoutControlMain.OptionsCustomizationForm.DefaultPage = DevExpress.XtraLayout.CustomizationPage.LayoutTreeView
+        Me.LayoutControlMain.OptionsCustomizationForm.DesignTimeCustomizationFormPositionAndSize = New System.Drawing.Rectangle(1143, 263, 650, 400)
+        Me.LayoutControlMain.OptionsCustomizationForm.ShowLoadButton = False
+        Me.LayoutControlMain.OptionsCustomizationForm.ShowPropertyGrid = True
+        Me.LayoutControlMain.OptionsCustomizationForm.ShowSaveButton = False
+        Me.LayoutControlMain.Root = Me.LayoutControlGroupMain
+        Me.LayoutControlMain.Size = New System.Drawing.Size(818, 440)
+        Me.LayoutControlMain.TabIndex = 3
+        Me.LayoutControlMain.Text = "LayoutControl1"
+        '
+        'LayoutControlGroupMain
+        '
+        Me.LayoutControlGroupMain.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
+        Me.LayoutControlGroupMain.GroupBordersVisible = False
+        Me.LayoutControlGroupMain.Name = "Root"
+        Me.LayoutControlGroupMain.Size = New System.Drawing.Size(818, 440)
+        Me.LayoutControlGroupMain.TextVisible = False
+        '
+        'XtraTabControl1
+        '
+        Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
+        Me.XtraTabControl1.Name = "XtraTabControl1"
+        Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1
+        Me.XtraTabControl1.Size = New System.Drawing.Size(368, 440)
+        Me.XtraTabControl1.TabIndex = 0
+        Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1, Me.XtraTabPage2})
+        '
+        'XtraTabPage1
+        '
+        Me.XtraTabPage1.Controls.Add(Me.PropertyGridMain)
+        Me.XtraTabPage1.Name = "XtraTabPage1"
+        Me.XtraTabPage1.Size = New System.Drawing.Size(366, 415)
+        Me.XtraTabPage1.Text = "Eigenschaften"
+        '
+        'PropertyGridMain
+        '
+        Me.PropertyGridMain.Cursor = System.Windows.Forms.Cursors.Hand
+        Me.PropertyGridMain.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.PropertyGridMain.Location = New System.Drawing.Point(0, 0)
+        Me.PropertyGridMain.MenuManager = Me.RibbonControl1
+        Me.PropertyGridMain.Name = "PropertyGridMain"
+        Me.PropertyGridMain.Size = New System.Drawing.Size(366, 415)
+        Me.PropertyGridMain.TabIndex = 0
+        '
+        'XtraTabPage2
+        '
+        Me.XtraTabPage2.Controls.Add(Me.ToolboxControlMain)
+        Me.XtraTabPage2.Name = "XtraTabPage2"
+        Me.XtraTabPage2.Size = New System.Drawing.Size(366, 415)
+        Me.XtraTabPage2.Text = "Controls"
+        '
+        'ToolboxControlMain
+        '
+        Me.ToolboxControlMain.Caption = "Form Controls"
+        Me.ToolboxControlMain.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.ToolboxControlMain.Groups.Add(Me.ToolboxGroupMain)
+        Me.ToolboxControlMain.Location = New System.Drawing.Point(0, 0)
+        Me.ToolboxControlMain.Name = "ToolboxControlMain"
+        Me.ToolboxControlMain.OptionsMinimizing.AllowMinimizing = False
+        Me.ToolboxControlMain.OptionsView.ShowMenuButton = False
+        Me.ToolboxControlMain.OptionsView.ShowSearchPanel = False
+        Me.ToolboxControlMain.OptionsView.ShowToolboxCaption = True
+        Me.ToolboxControlMain.SelectedGroup = Me.ToolboxGroupMain
+        Me.ToolboxControlMain.SelectedGroupIndex = 0
+        Me.ToolboxControlMain.Size = New System.Drawing.Size(366, 415)
+        Me.ToolboxControlMain.TabIndex = 5
+        Me.ToolboxControlMain.Text = "Form Controls"
+        '
+        'ToolboxGroupMain
+        '
+        Me.ToolboxGroupMain.Caption = "Basis Controls"
+        Me.ToolboxGroupMain.Items.Add(Me.ToolboxItemTextbox)
+        Me.ToolboxGroupMain.Items.Add(Me.ToolboxItemMemoedit)
+        Me.ToolboxGroupMain.Items.Add(Me.ToolboxItemDatepicker)
+        Me.ToolboxGroupMain.Items.Add(Me.ToolboxItemCheckbox)
+        Me.ToolboxGroupMain.Name = "ToolboxGroupMain"
+        '
+        'ToolboxItemTextbox
+        '
+        Me.ToolboxItemTextbox.Caption = "Textbox"
+        Me.ToolboxItemTextbox.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.TextBox
+        Me.ToolboxItemTextbox.Name = "ToolboxItemTextbox"
+        Me.ToolboxItemTextbox.Tag = "TextBox"
+        '
+        'ToolboxItemMemoedit
+        '
+        Me.ToolboxItemMemoedit.Caption = "Multiline Textbox"
+        Me.ToolboxItemMemoedit.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.TextBox
+        Me.ToolboxItemMemoedit.Name = "ToolboxItemMemoedit"
+        Me.ToolboxItemMemoedit.Tag = "Memoedit"
+        '
+        'ToolboxItemDatepicker
+        '
+        Me.ToolboxItemDatepicker.Caption = "Datepicker"
+        Me.ToolboxItemDatepicker.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.DateOrTimePicker_675
+        Me.ToolboxItemDatepicker.Name = "ToolboxItemDatepicker"
+        Me.ToolboxItemDatepicker.Tag = "Datepicker"
+        '
+        'ToolboxItemCheckbox
+        '
+        Me.ToolboxItemCheckbox.Caption = "Checkbox"
+        Me.ToolboxItemCheckbox.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.checkbox_16xLG
+        Me.ToolboxItemCheckbox.Name = "ToolboxItemCheckbox"
+        Me.ToolboxItemCheckbox.Tag = "Checkbox"
+        '
+        'frmDesignerLayout
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(1196, 622)
+        Me.Controls.Add(Me.SplitContainerControl1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.Name = "frmDesignerLayout"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "frmDesignerLayout"
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl1.ResumeLayout(False)
+        CType(Me.LayoutControlMain, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlGroupMain, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.XtraTabControl1.ResumeLayout(False)
+        Me.XtraTabPage1.ResumeLayout(False)
+        CType(Me.PropertyGridMain, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.XtraTabPage2.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents SplitContainerControl1 As DevExpress.XtraEditors.SplitContainerControl
+    Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
+    Friend WithEvents XtraTabPage1 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents ToolboxControlMain As DevExpress.XtraToolbox.ToolboxControl
+    Friend WithEvents ToolboxGroupMain As DevExpress.XtraToolbox.ToolboxGroup
+    Friend WithEvents ToolboxItemTextbox As DevExpress.XtraToolbox.ToolboxItem
+    Friend WithEvents ToolboxItemMemoedit As DevExpress.XtraToolbox.ToolboxItem
+    Friend WithEvents ToolboxItemDatepicker As DevExpress.XtraToolbox.ToolboxItem
+    Friend WithEvents ToolboxItemCheckbox As DevExpress.XtraToolbox.ToolboxItem
+    Friend WithEvents BarListItem1 As DevExpress.XtraBars.BarListItem
+    Friend WithEvents PropertyGridMain As DevExpress.XtraVerticalGrid.PropertyGridControl
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents LayoutControlMain As DevExpress.XtraLayout.LayoutControl
+    Friend WithEvents LayoutControlGroupMain As DevExpress.XtraLayout.LayoutControlGroup
+End Class

app/DD_PM_WINDREAM/frmDesignerLayout.resx

@@ -0,0 +1,189 @@
+<?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="DevExpress.Data.v19.2" name="DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="BarListItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABgEAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
+        Qmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9CgkuWWVsbG93e2ZpbGw6I0ZG
+        QjExNTt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iTG9hZENoYXJ0
+        Ij4NCiAgICA8cGF0aCBkPSJNMjkuMywxOEg5LjZMNCwyOGgxOS44YzAuNSwwLDEuMS0wLjIsMS4zLTAu
+        Nmw0LjktOC45QzMwLjEsMTguMiwyOS44LDE4LDI5LjMsMTh6IiBjbGFzcz0iWWVsbG93IiAvPg0KICAg
+        IDxnIGNsYXNzPSJzdDEiPg0KICAgICAgPHBhdGggZD0iTTIzLDEyaC0yLjJjLTAuNCwwLjUtMC43LDEt
+        MC44LDEuNWMtMC4yLDAuOS0xLDEuNi0yLDEuNmMwLDAsMCwwLDAsMGMtMSwwLTEuOC0wLjctMS45LTEu
+        NyAgICBDMTYsMTIuOSwxNiwxMi40LDE2LDEyaC00VjljMC0wLjYtMC40LTEtMS0xSDNDMi40LDgsMiw4
+        LjUsMiw5djE4YzAsMC4yLDAsMC4zLDAuMSwwLjRjMCwwLDAuMS0wLjEsMC4xLTAuMmw1LjUtMTAgICAg
+        QzgsMTYuNSw4LjcsMTYsOS41LDE2SDI0di0zQzI0LDEyLjUsMjMuNSwxMiwyMywxMnoiIGNsYXNzPSJZ
+        ZWxsb3ciIC8+DQogICAgPC9nPg0KICAgIDxwYXRoIGQ9Ik0zMiw2bC02LTZ2NGMtNC40LDAtOCwzLjYt
+        OCw4YzAsMC40LDAsMC44LDAuMSwxLjFDMTguNiwxMC4yLDIyLDgsMjYsOHY0TDMyLDZ6IiBjbGFzcz0i
+        R3JlZW4iIC8+DQogIDwvZz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAMEDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
+        LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuQmx1ZXtmaWxsOiMxMTc3
+        RDc7fQoJLldoaXRle2ZpbGw6I0ZGRkZGRjt9CgkuR3JlZW57ZmlsbDojMDM5QzIzO30KCS5zdDB7b3Bh
+        Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tm
+        aWxsOiNGRkIxMTU7fQo8L3N0eWxlPg0KICA8ZyAvPg0KICA8ZyBpZD0iRWRpdFF1ZXJ5Ij4NCiAgICA8
+        ZyBjbGFzcz0ic3QxIj4NCiAgICAgIDxwYXRoIGQ9Ik0wLDI0aDh2LTZIMFYyNHogTTIwLDhoOFYyaC04
+        Vjh6IE0xOCwyMS4yVjE4aC04djZoNS4yTDE4LDIxLjJ6IE0yMCwxMGg4djEuMkwyMy4yLDE2SDIwVjEw
+        eiIgY2xhc3M9IkJsYWNrIiAvPg0KICAgIDwvZz4NCiAgICA8cGF0aCBkPSJNMjksMjFsLTgsOGwtNC00
+        bDgtOEwyOSwyMXogTTMwLDIwbDEuNy0xLjdjMC40LTAuNCwwLjQtMSwwLTEuM0wyOSwxNC4zYy0wLjQt
+        MC40LTEtMC40LTEuMywwTDI2LDE2TDMwLDIweiAgICBNMTYsMjZ2NGg0TDE2LDI2eiIgY2xhc3M9IkJs
+        dWUiIC8+DQogICAgPHBhdGggZD0iTTgsMTBIMHY2aDhWMTB6IE04LDJIMHY2aDhWMnogTTE4LDJoLTh2
+        Nmg4VjJ6IE0xOCwxMGgtOHY2aDhWMTB6IiBjbGFzcz0iR3JlZW4iIC8+DQogIDwvZz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <data name="BarButtonItem2.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOsCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
+        WWVsbG93e2ZpbGw6I0ZGQjExNTt9CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAz
+        OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQo8L3N0eWxl
+        Pg0KICA8ZyBpZD0iRXhwb3J0Ij4NCiAgICA8cGF0aCBkPSJNMTAsMTJINlY2aDRWMTJ6IE0yMiwxMnY2
+        djljMCwwLjYtMC40LDEtMSwxSDFjLTAuNiwwLTEtMC40LTEtMVY3YzAtMC42LDAuNC0xLDEtMWgzdjho
+        MTR2LTJIMjJ6IE0xOCwxOEg0ICAgdjZoMTRWMTh6IiBjbGFzcz0iQmxhY2siIC8+DQogICAgPHBvbHln
+        b24gcG9pbnRzPSIxNiwxMCAyNCwxMCAyNCwxNCAzMiw4IDI0LDIgMjQsNiAxNiw2ICAiIGNsYXNzPSJH
+        cmVlbiIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
+</value>
+  </data>
+</root>

app/DD_PM_WINDREAM/frmDesignerLayout.vb

@@ -0,0 +1,199 @@
+Imports System.IO
+Imports System.Text.Encoding
+Imports DD_ProcessManager.Controls
+Imports DevExpress.XtraBars
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraLayout
+Imports DevExpress.XtraLayout.Customization
+Imports DevExpress.XtraLayout.Dragging
+Imports DevExpress.XtraLayout.HitInfo
+Imports DevExpress.XtraToolbox
+
+Public Class frmDesignerLayout
+    Private SelectedLayoutId As Integer = 0
+    Private FormsDatatable As DataTable
+    Private _ControlLoader As ControlLoader
+
+#Region "Drag Helper"
+    Private _DragItem As BaseLayoutItem
+    Private _Window As DragFrameWindow
+    Private _DragController As LayoutItemDragController = Nothing
+    Private _LayoutSerializer As LayoutControlSerializer = Nothing
+
+    Protected ReadOnly Property DragFrameWindow As DragFrameWindow
+        Get
+            If _Window Is Nothing Then
+                _Window = New DragFrameWindow(LayoutControlMain)
+            End If
+            Return _Window
+        End Get
+    End Property
+
+    Private Sub ShowDragHelper()
+        DragFrameWindow.Visible = True
+    End Sub
+
+    Private Sub HideDragHelper()
+        DragFrameWindow.Reset()
+        DragFrameWindow.Visible = False
+    End Sub
+
+    Private Sub UpdateDragHelper(p As Point)
+        p = LayoutControlMain.PointToClient(p)
+        _DragController = New LayoutItemDragController(_DragItem, LayoutControlMain.Root, New Point(p.X, p.Y))
+        DragFrameWindow.DragController = _DragController
+    End Sub
+#End Region
+#Region "Drag Drop Actions"
+    Private Sub ToolboxControlMain_DragItemDrop(sender As Object, e As ToolboxDragItemDropEventArgs) Handles ToolboxControlMain.DragItemDrop
+        Dim oPosition As Point = LayoutControlMain.PointToClient(MousePosition)
+        Dim oHitInfo As BaseLayoutItemHitInfo = LayoutControlMain.CalcHitInfo(oPosition)
+        Dim oLayoutControl As LayoutControlItem = DirectCast(_DragItem, LayoutControlItem)
+        Dim oControlName As String = oLayoutControl.Tag & Guid.NewGuid().ToString().GetHashCode().ToString("x")
+        Dim oControl As BaseEdit = _ControlLoader.CreateLayoutControl(oLayoutControl.Tag, oControlName, 0)
+
+        If oLayoutControl IsNot Nothing Then
+            HideDragHelper()
+            oLayoutControl.Control = oControl
+            oLayoutControl.Text = oControlName
+            oLayoutControl.Name = "Container-" & oControlName
+
+
+            If (_DragController IsNot Nothing AndAlso _DragItem IsNot Nothing) Then
+                If (_DragItem.Owner Is Nothing OrElse _DragItem.Parent Is Nothing) Then
+                    _DragController.DragWildItem()
+                Else
+                    _DragController.Drag()
+                End If
+                Focus()
+            End If
+            HideDragHelper()
+            _DragItem = Nothing
+        End If
+    End Sub
+
+    Private Sub ToolboxControlMain_DragItemStart(sender As Object, e As ToolboxDragItemStartEventArgs) Handles ToolboxControlMain.DragItemStart
+        _DragItem = CreateLayoutControlItem(e.Item.Tag)
+    End Sub
+
+    Private Sub ToolboxControlMain_DragItemMove(sender As Object, e As DevExpress.XtraToolbox.ToolboxDragItemMoveEventArgs) Handles ToolboxControlMain.DragItemMove
+        If (CType(LayoutControlMain, ILayoutControl)).EnableCustomizationMode OrElse Me.DesignMode Then Return
+        Dim oFormPosition As Point = PointToClient(e.Location)
+        Dim oLayoutPosition As Point = LayoutControlMain.PointToClient(e.Location)
+
+        If LayoutControlMain.Bounds.Contains(oFormPosition) Then
+
+            If Not DragFrameWindow.Visible Then
+                DragFrameWindow.Visible = True
+                Return
+            End If
+
+            UpdateDragHelper(e.Location)
+        Else
+            DragFrameWindow.Visible = False
+        End If
+    End Sub
+
+    Private Function CreateLayoutControlItem(Id As String) As LayoutControlItem
+        Return New LayoutControlItem() With {.Tag = Id}
+    End Function
+#End Region
+
+    Private Sub frmDesignerLayout_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Try
+            _ControlLoader = New ControlLoader(LOGCONFIG, LayoutControlGroupMain)
+            _LayoutSerializer = New LayoutControlSerializer(LOGCONFIG)
+
+            Dim oSQL = "Select * from TBIDB_LAYOUT_CONFIG"
+            FormsDatatable = ClassDatabase.Return_Datatable_ConStr(oSQL, CONNECTION_STRING_IDB)
+            If Not IsNothing(FormsDatatable) Then
+                For Each oRow As DataRow In FormsDatatable.Rows
+                    Dim oItem As New BarButtonItem(RibbonControl1.Manager, oRow.Item("TITLE"))
+                    oItem.Tag = oRow.Item("GUID")
+                    AddHandler oItem.ItemClick, AddressOf Item_Click
+
+                    BarListItem1.ItemLinks.Add(oItem)
+                Next
+            End If
+        Catch ex As Exception
+            MsgBox("Unexpected Error in FormLoad:" & ex.Message, MsgBoxStyle.Critical)
+        End Try
+    End Sub
+
+    Private Sub Item_Click(sender As Object, e As ItemClickEventArgs)
+        Try
+            SelectedLayoutId = e.Item.Tag
+            Dim oRow As DataRow = FormsDatatable.Select($"GUID = {SelectedLayoutId}").First()
+            'Dim oXml = oRow.Item("XML_CONTENT")
+
+            Dim oLayout As Byte() = System.Convert.FromBase64String(oRow.Item("XML_LAYOUT"))
+            Dim oControls As Byte() = System.Convert.FromBase64String(oRow.Item("XML_CONTENT"))
+
+            Using oLayoutStream As New MemoryStream(oLayout, False)
+                Using oControlStream As New MemoryStream(oControls, False)
+                    _LayoutSerializer.RestoreLayoutExFromStream(LayoutControlMain, oLayoutStream, oControlStream)
+                End Using
+            End Using
+        Catch ex As Exception
+            MsgBox("Unexpected Error in FormSave:" & ex.Message, MsgBoxStyle.Critical)
+        End Try
+    End Sub
+
+    Private Sub BarButtonItem2_ItemClick(sender As Object, e As ItemClickEventArgs) Handles BarButtonItem2.ItemClick
+        Using oLayoutStream As New MemoryStream()
+            Using oControlStream As New MemoryStream()
+                _LayoutSerializer.SaveLayoutExToStream(LayoutControlMain, oLayoutStream, oControlStream)
+
+                Dim oLayout = System.Convert.ToBase64String(oLayoutStream.ToArray())
+                Dim oControls = System.Convert.ToBase64String(oControlStream.ToArray())
+
+                Dim oSql As String = $"UPDATE TBIDB_LAYOUT_CONFIG SET XML_CONTENT = '{oControls}', XML_LAYOUT = '{oLayout}', CHANGED_WHO = '{Environment.UserName}' WHERE GUID = {SelectedLayoutId}"
+
+                ClassDatabase.Execute_non_Query_ConStr(oSql, CONNECTION_STRING_IDB)
+            End Using
+        End Using
+    End Sub
+
+    Private Sub BarButtonItem1_ItemClick(sender As Object, e As ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+        LayoutControlMain.ShowCustomizationForm()
+    End Sub
+
+    Private Sub LayoutControlMain_ItemSelectionChanged(sender As Object, e As EventArgs) Handles LayoutControlMain.ItemSelectionChanged
+        ' only layout control items have properties
+        If TypeOf sender IsNot LayoutControlItem Then
+            Exit Sub
+        End If
+
+        Dim oLayoutItem As LayoutControlItem = DirectCast(sender, LayoutControlItem)
+        Dim oSelectedControl As BaseEdit = oLayoutItem.Control
+        Dim oMetadata As New Metadata
+
+        ' Don't load properties for layout items like splitters, separators, etc.
+        If oLayoutItem.Control Is Nothing Then
+            Exit Sub
+        End If
+
+        Select Case oSelectedControl.GetType
+            Case GetType(MemoEdit)
+                PropertyGridMain.SelectedObject = New Properties.MemoeditProperties() With {
+                    .Id = 0,
+                    .Name = oSelectedControl.Name
+                }
+            Case GetType(TextEdit)
+                PropertyGridMain.SelectedObject = New Properties.TextboxProperties() With {
+                    .Id = 0,
+                    .Name = oSelectedControl.Name
+                }
+            Case GetType(DateEdit)
+                PropertyGridMain.SelectedObject = New Properties.DatepickerProperties() With {
+                    .Id = 0,
+                    .Name = oSelectedControl.Name
+                }
+            Case GetType(CheckEdit)
+                PropertyGridMain.SelectedObject = New Properties.CheckboxProperties() With {
+                    .Id = 0,
+                    .Name = oSelectedControl.Name
+                }
+        End Select
+    End Sub
+End Class

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/DatasourceEditor.vb

@@ -0,0 +1,48 @@
+Imports System.ComponentModel
+'Imports System.ComponentModel.Design
+Imports System.Drawing.Design
+'Imports System.Windows.Forms
+Imports System.Windows.Forms.Design
+
+Namespace Controls.Editors
+    Public Class DatasourceEditor
+        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 oDatasource As DatasourceType = DirectCast(value, DatasourceType)
+
+            If oService IsNot Nothing AndAlso oDatasource IsNot Nothing Then
+                Using oForm As New frmDatasourceEditor()
+                    oForm.Value = oDatasource
+                    If oService.ShowDialog(oForm) = DialogResult.OK Then
+
+                        value = oForm.Value
+                    End If
+                End Using
+            End If
+
+            Return value
+        End Function
+    End Class
+
+    Public Class DatasourceTypeConverter
+        Inherits TypeConverter
+
+        Public Overrides Function ToString() As String
+            Return MyBase.ToString()
+        End Function
+
+        ' Diese Funktion gibt den String zurück, der im PropertyGrid für den Benutzer sichtbar ist, kann ruhig etwas hübscher sein als foo;bar;baz
+        Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As Globalization.CultureInfo, value As Object, destinationType As Type) As Object
+            Return "Datasource"
+        End Function
+    End Class
+
+End Namespace
+
+

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/DatasourceType.vb

@@ -0,0 +1,23 @@
+Imports System.ComponentModel
+Imports System.Drawing.Design
+Imports DigitalData.GUIs.ClientSuite.Controls.Editors
+
+Namespace Controls.Editors
+    <Editor(GetType(DatasourceEditor), GetType(UITypeEditor))>
+    <TypeConverter(GetType(DatasourceTypeConverter))>
+    Public Class DatasourceType
+        Public Property StaticList As New List(Of String)
+        Public Property SQLCommand As String = String.Empty
+
+        Public Sub New()
+        End Sub
+
+        Public Sub New(Values As List(Of String))
+            _StaticList = Values
+        End Sub
+
+        Public Sub New(SQLCommand As String)
+            _SQLCommand = SQLCommand
+        End Sub
+    End Class
+End Namespace

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/StaticListEditor.vb

@@ -0,0 +1,72 @@
+Imports System.ComponentModel
+'Imports System.ComponentModel.Design
+Imports System.Drawing.Design
+'Imports System.Windows.Forms
+Imports System.Windows.Forms.Design
+
+Public Class StaticListEditor
+    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 oStaticListString As String = DirectCast(value, StaticList).Value
+
+        If oService IsNot Nothing AndAlso oStaticListString IsNot Nothing Then
+            Using oForm As New frmStaticListEditor()
+                oStaticListString = oStaticListString.Replace(";", vbNewLine) ' Semikolon zu vbNewLine
+                oForm.Value = oStaticListString
+                If oService.ShowDialog(oForm) = DialogResult.OK Then
+                    Dim oString As String = oForm.Value.Replace(vbNewLine, ";") ' vbNewLine zu Semikolon
+                    Dim oStaticList As New StaticList(oString)
+                    value = oStaticList
+                End If
+            End Using
+        End If
+
+        Return value
+    End Function
+End Class
+
+<Editor(GetType(StaticListEditor), GetType(UITypeEditor))>
+<TypeConverter(GetType(StaticListTypeConverter))>
+Public Class StaticList
+
+    Public Sub New()
+        _Value = String.Empty
+    End Sub
+
+    Public Sub New(Value As String)
+        _Value = Value
+    End Sub
+
+    Public Property Value As String
+End Class
+
+Public Class StaticListTypeConverter
+    Inherits TypeConverter
+
+
+    Public Overrides Function ToString() As String
+        Return MyBase.ToString()
+    End Function
+
+    ' Diese Funktion gibt den String zurück, der im PropertyGrid für den Benutzer sichtbar ist, kann ruhig etwas hübscher sein als foo;bar;baz
+    Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As Globalization.CultureInfo, value As Object, destinationType As Type) As Object
+        Dim oStaticListString = String.Empty
+
+        If TypeOf value Is StaticList Then
+            Dim oStaticList As StaticList = DirectCast(value, StaticList)
+            oStaticListString = oStaticList.Value
+        ElseIf TypeOf value Is String Then
+            oStaticListString = value
+        Else
+            MsgBox("Error in Converting StaticList value")
+        End If
+
+        Return oStaticListString.Replace(";", ", ")
+    End Function
+End Class

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/frmDatasourceEditor.Designer.vb

@@ -0,0 +1,63 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmDatasourceEditor
+    Inherits DevExpress.XtraEditors.XtraForm
+
+    '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.PanelEditor = New DevExpress.XtraEditors.PanelControl()
+        Me.btnSave = New System.Windows.Forms.Button()
+        CType(Me.PanelEditor, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'PanelEditor
+        '
+        Me.PanelEditor.Dock = System.Windows.Forms.DockStyle.Top
+        Me.PanelEditor.Location = New System.Drawing.Point(0, 0)
+        Me.PanelEditor.Name = "PanelEditor"
+        Me.PanelEditor.Size = New System.Drawing.Size(800, 394)
+        Me.PanelEditor.TabIndex = 0
+        '
+        'btnSave
+        '
+        Me.btnSave.Location = New System.Drawing.Point(713, 415)
+        Me.btnSave.Name = "btnSave"
+        Me.btnSave.Size = New System.Drawing.Size(75, 23)
+        Me.btnSave.TabIndex = 1
+        Me.btnSave.Text = "Speichern"
+        Me.btnSave.UseVisualStyleBackColor = True
+        '
+        'frmDatasourceEditor
+        '
+        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.btnSave)
+        Me.Controls.Add(Me.PanelEditor)
+        Me.Name = "frmDatasourceEditor"
+        Me.Text = "frmDatasourceEditor"
+        CType(Me.PanelEditor, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents PanelEditor As DevExpress.XtraEditors.PanelControl
+    Friend WithEvents btnSave As Button
+End Class

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/frmDatasourceEditor.resx

@@ -0,0 +1,120 @@
+<?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>
+</root>

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/frmDatasourceEditor.vb

@@ -0,0 +1,54 @@
+Imports DD_ProcessManager.Controls.Editors
+'Imports ScintillaNET
+
+Public Class frmDatasourceEditor
+    Public Value As DatasourceType
+
+    'Private _Editor As Scintilla
+    Private _Editor As TextBox
+
+    Private Sub frmDatasourceEditor_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+
+
+        '_Editor = New Scintilla() With {
+        '    .Dock = DockStyle.Fill,
+        '    .BorderStyle = BorderStyle.None,
+        '    .Text = Value.SQLCommand
+        '}
+
+        '_Editor.StyleResetDefault()
+        'With _Editor.Styles(Style.Default)
+        '    .Font = "Consolas"
+        '    .Size = 10
+        'End With
+        '_Editor.StyleClearAll()
+        '_Editor.Lexer = Lexer.Sql
+
+        '_Editor.Styles(Style.LineNumber).ForeColor = Color.FromArgb(255, 128, 128, 128)
+        '_Editor.Styles(Style.LineNumber).BackColor = Color.FromArgb(255, 228, 228, 228)
+        '_Editor.Styles(Style.Sql.Comment).ForeColor = Color.Green
+        '_Editor.Styles(Style.Sql.CommentLine).ForeColor = Color.Green
+        '_Editor.Styles(Style.Sql.CommentLineDoc).ForeColor = Color.Green
+        '_Editor.Styles(Style.Sql.Number).ForeColor = Color.Maroon
+        '_Editor.Styles(Style.Sql.Word).ForeColor = Color.Blue
+        '_Editor.Styles(Style.Sql.Word2).ForeColor = Color.Fuchsia
+        '_Editor.Styles(Style.Sql.User1).ForeColor = Color.Gray
+        '_Editor.Styles(Style.Sql.User2).ForeColor = Color.FromArgb(255, 0, 128, 192)
+        '_Editor.Styles(Style.Sql.String).ForeColor = Color.Red
+        '_Editor.Styles(Style.Sql.Character).ForeColor = Color.Red
+        '_Editor.Styles(Style.Sql.[Operator]).ForeColor = Color.Black
+        '_Editor.SetKeywords(0, "add alter as authorization backup begin bigint binary bit break browse bulk by cascade case catch check checkpoint close clustered column commit compute constraint containstable continue create current cursor cursor database date datetime datetime2 datetimeoffset dbcc deallocate decimal declare default delete deny desc disk distinct distributed double drop dump else end errlvl escape except exec execute exit external fetch file fillfactor float for foreign freetext freetexttable from full function goto grant group having hierarchyid holdlock identity identity_insert identitycol if image index insert int intersect into key kill lineno load merge money national nchar nocheck nocount nolock nonclustered ntext numeric nvarchar of off offsets on open opendatasource openquery openrowset openxml option order over percent plan precision primary print proc procedure public raiserror read readtext real reconfigure references replication restore restrict return revert revoke rollback rowcount rowguidcol rule save schema securityaudit select set setuser shutdown smalldatetime smallint smallmoney sql_variant statistics table table tablesample text textsize then time timestamp tinyint to top tran transaction trigger truncate try union unique uniqueidentifier update updatetext use user values varbinary varchar varying view waitfor when where while with writetext xml go ")
+        '_Editor.SetKeywords(1, "ascii cast char charindex ceiling coalesce collate contains convert current_date current_time current_timestamp current_user floor isnull max min nullif object_id session_user substring system_user tsequal ")
+        '_Editor.SetKeywords(4, "all and any between cross exists in inner is join left like not null or outer pivot right some unpivot ( ) * ")
+        '_Editor.SetKeywords(5, "sys objects sysobjects ")
+
+        'PanelEditor.Controls.Add(_Editor)
+        _Editor = New TextBox With {.Multiline = True}
+
+        PanelEditor.Controls.Add(_Editor)
+    End Sub
+
+    Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
+        Value.SQLCommand = _Editor.Text
+    End Sub
+End Class

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/frmStaticListEditor.Designer.vb

@@ -0,0 +1,81 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmStaticListEditor
+    Inherits System.Windows.Forms.Form
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmStaticListEditor))
+        Me.txtValue = New System.Windows.Forms.TextBox()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.SuspendLayout()
+        '
+        'txtValue
+        '
+        resources.ApplyResources(Me.txtValue, "txtValue")
+        Me.txtValue.Name = "txtValue"
+        '
+        'Button1
+        '
+        resources.ApplyResources(Me.Button1, "Button1")
+        Me.Button1.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.Button1.Name = "Button1"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Label1
+        '
+        resources.ApplyResources(Me.Label1, "Label1")
+        Me.Label1.Name = "Label1"
+        '
+        'Label2
+        '
+        resources.ApplyResources(Me.Label2, "Label2")
+        Me.Label2.Name = "Label2"
+        '
+        'Button2
+        '
+        resources.ApplyResources(Me.Button2, "Button2")
+        Me.Button2.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.Button2.Name = "Button2"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'frmStaticListEditor
+        '
+        resources.ApplyResources(Me, "$this")
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.Controls.Add(Me.Button2)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.txtValue)
+        Me.Name = "frmStaticListEditor"
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Friend WithEvents txtValue As System.Windows.Forms.TextBox
+    Friend WithEvents Button1 As System.Windows.Forms.Button
+    Friend WithEvents Label1 As System.Windows.Forms.Label
+    Friend WithEvents Label2 As System.Windows.Forms.Label
+    Friend WithEvents Button2 As System.Windows.Forms.Button
+End Class

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/frmStaticListEditor.en-US.resx

@@ -0,0 +1,136 @@
+<?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="Button1.Text" xml:space="preserve">
+    <value>Save</value>
+  </data>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="Label2.Size" type="System.Drawing.Size, System.Drawing">
+    <value>159, 13</value>
+  </data>
+  <data name="Label2.Text" xml:space="preserve">
+    <value>Enter Listelements (One per line)</value>
+  </data>
+  <data name="Button2.Text" xml:space="preserve">
+    <value>Cancel</value>
+  </data>
+  <data name="$this.Text" xml:space="preserve">
+    <value>Edit Static List</value>
+  </data>
+</root>

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/frmStaticListEditor.resx

@@ -0,0 +1,279 @@
+<?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="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="Label2.TabIndex" type="System.Int32, mscorlib">
+    <value>3</value>
+  </data>
+  <data name="&gt;&gt;Label2.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
+    <value>6, 13</value>
+  </data>
+  <data name="Label2.Text" xml:space="preserve">
+    <value>Listenelemente eingeben (Ein Element pro Zeile)</value>
+  </data>
+  <data name="Label2.Location" type="System.Drawing.Point, System.Drawing">
+    <value>12, 235</value>
+  </data>
+  <data name="$this.Text" xml:space="preserve">
+    <value>Statische Liste bearbeiten</value>
+  </data>
+  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="Button2.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
+    <value>Bottom, Right</value>
+  </data>
+  <data name="Label2.Size" type="System.Drawing.Size, System.Drawing">
+    <value>234, 13</value>
+  </data>
+  <data name="txtValue.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
+    <value>Top, Bottom, Left, Right</value>
+  </data>
+  <data name="Button1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>75, 23</value>
+  </data>
+  <data name="&gt;&gt;Button2.Name" xml:space="preserve">
+    <value>Button2</value>
+  </data>
+  <data name="Label1.AutoSize" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="Label2.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
+    <value>Bottom, Left</value>
+  </data>
+  <data name="Label1.Location" type="System.Drawing.Point, System.Drawing">
+    <value>12, 227</value>
+  </data>
+  <data name="&gt;&gt;Button1.ZOrder" xml:space="preserve">
+    <value>3</value>
+  </data>
+  <data name="&gt;&gt;$this.Type" xml:space="preserve">
+    <value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="&gt;&gt;Label2.Type" xml:space="preserve">
+    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="Label2.AutoSize" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>0, 13</value>
+  </data>
+  <data name="Button1.Location" type="System.Drawing.Point, System.Drawing">
+    <value>431, 230</value>
+  </data>
+  <data name="&gt;&gt;txtValue.ZOrder" xml:space="preserve">
+    <value>4</value>
+  </data>
+  <data name="&gt;&gt;txtValue.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="&gt;&gt;Label1.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="Button2.Size" type="System.Drawing.Size, System.Drawing">
+    <value>75, 23</value>
+  </data>
+  <data name="txtValue.Location" type="System.Drawing.Point, System.Drawing">
+    <value>0, 0</value>
+  </data>
+  <data name="&gt;&gt;Label2.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="&gt;&gt;Button2.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="Button1.TabIndex" type="System.Int32, mscorlib">
+    <value>1</value>
+  </data>
+  <data name="&gt;&gt;Button2.ZOrder" xml:space="preserve">
+    <value>0</value>
+  </data>
+  <data name="$this.StartPosition" type="System.Windows.Forms.FormStartPosition, System.Windows.Forms">
+    <value>CenterScreen</value>
+  </data>
+  <data name="&gt;&gt;Label1.Type" xml:space="preserve">
+    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="&gt;&gt;Button1.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="&gt;&gt;txtValue.Type" xml:space="preserve">
+    <value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
+    <value>518, 265</value>
+  </data>
+  <data name="txtValue.Size" type="System.Drawing.Size, System.Drawing">
+    <value>516, 224</value>
+  </data>
+  <data name="&gt;&gt;Label1.Name" xml:space="preserve">
+    <value>Label1</value>
+  </data>
+  <data name="&gt;&gt;Label2.Name" xml:space="preserve">
+    <value>Label2</value>
+  </data>
+  <data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
+    <value>2</value>
+  </data>
+  <data name="Button2.TabIndex" type="System.Int32, mscorlib">
+    <value>4</value>
+  </data>
+  <data name="txtValue.TabIndex" type="System.Int32, mscorlib">
+    <value>0</value>
+  </data>
+  <data name="&gt;&gt;txtValue.Name" xml:space="preserve">
+    <value>txtValue</value>
+  </data>
+  <data name="&gt;&gt;Button2.Type" xml:space="preserve">
+    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="&gt;&gt;Button1.Name" xml:space="preserve">
+    <value>Button1</value>
+  </data>
+  <data name="Button1.Text" xml:space="preserve">
+    <value>Speichern</value>
+  </data>
+  <data name="txtValue.Multiline" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="Button2.Location" type="System.Drawing.Point, System.Drawing">
+    <value>350, 230</value>
+  </data>
+  <data name="Label1.TabIndex" type="System.Int32, mscorlib">
+    <value>2</value>
+  </data>
+  <data name="&gt;&gt;Button1.Type" xml:space="preserve">
+    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="Button1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
+    <value>Bottom, Right</value>
+  </data>
+  <data name="&gt;&gt;$this.Name" xml:space="preserve">
+    <value>frmStaticListEditor</value>
+  </data>
+  <data name="Button2.Text" xml:space="preserve">
+    <value>Abbrechen</value>
+  </data>
+  <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+</root>

app/DD_PM_WINDREAM/frmDesignerLayout/Editors/frmStaticListEditor.vb

@@ -0,0 +1,19 @@
+Public Class frmStaticListEditor
+
+    Public Property Value() As String
+        Get
+            Return txtValue.Text
+        End Get
+        Set(value As String)
+            txtValue.Text = value
+        End Set
+    End Property
+
+    Private Sub frmStaticListEditor_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        'noop
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+
+    End Sub
+End Class

app/DD_PM_WINDREAM/frmDesignerLayout/Loader.vb

@@ -0,0 +1,110 @@
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraLayout
+Imports DigitalData.Modules.Logging
+
+
+Public Class ControlLoader
+    Public Const CONTROL_TEXTEDIT = "TextBox"
+    Public Const CONTROL_MEMOEDIT = "Memoedit"
+    Public Const CONTROL_COMBOEDIT = "Combobox"
+    Public Const CONTROL_CHECKEDIT = "Checkbox"
+    Public Const CONTROL_RADIOEDIT = "Radiobutton"
+    Public Const CONTROL_DATEEDIT = "Datepicker"
+
+    Private _LayoutControlGroup As LayoutControlGroup
+    Private _LayoutControls As List(Of BaseEdit)
+    Private _LogConfig As LogConfig
+    Private _LOgger As Logger
+
+    Public ReadOnly Property LayoutControls As List(Of BaseEdit)
+        Get
+            If _LayoutControls Is Nothing Then
+                _LayoutControls = New List(Of BaseEdit)
+            End If
+            Return _LayoutControls
+        End Get
+    End Property
+
+    Public Sub New(LogConfig As LogConfig, LayoutControlGroup As LayoutControlGroup)
+        _LayoutControlGroup = LayoutControlGroup
+        _LogConfig = LogConfig
+        _LOgger = LogConfig.GetLogger
+    End Sub
+
+    Public Sub AddControl(Name As String, Value As String, LayoutControlGroup As LayoutControlGroup)
+        Dim oTextEdit As New SimpleLabelItem() With {
+        .Name = Name,
+        .Text = Name & " - " & Value
+    }
+
+        LayoutControlGroup.AddItem(oTextEdit)
+    End Sub
+    Public Sub AddControl(Name As String, Value As String)
+        AddControl(Name, Value, _LayoutControlGroup)
+    End Sub
+
+    Public Sub AddSeparator(LayoutControlGroup As LayoutControlGroup)
+        Dim oSeparator = New SimpleSeparator()
+
+        LayoutControlGroup.AddItem(oSeparator)
+    End Sub
+    Public Sub AddSeparator()
+        AddSeparator(_LayoutControlGroup)
+    End Sub
+
+    Public Sub LoadControls(Datatable As DataTable, LayoutControlGroup As LayoutControlGroup)
+        For Each oRow As DataRow In Datatable.Rows
+            Dim oCaption As String = oRow.Item("COLNAME")
+            Dim oControlType As String = oRow.Item("CTRLTYPE")
+            Dim oControlId As Int64 = oRow.Item("RECORD_ID")
+            Dim oEditor As BaseEdit = CreateLayoutControl(oControlType, oControlId, oControlId)
+
+            If oEditor Is Nothing Then
+                Continue For
+            End If
+
+            oEditor.Tag = New Metadata() With {
+                .Id = oControlId,
+                .Type = oControlType,
+                .Caption = oCaption
+            }
+
+            LayoutControls.Add(oEditor)
+            LayoutControlGroup.AddItem(oCaption, oEditor)
+        Next
+
+        LayoutControlGroup.AddItem(New EmptySpaceItem())
+    End Sub
+    Public Sub LoadControls(Datatable As DataTable)
+        LoadControls(Datatable, _LayoutControlGroup)
+    End Sub
+
+    Public Function CreateLayoutControl(Type As String, Name As String, Id As Int64)
+        Dim oEditor As BaseEdit = Nothing
+
+        LOGGER.Debug("Create new Control of type {0} with name {1}", Type, Name)
+
+        Select Case Type
+            Case CONTROL_TEXTEDIT
+                Dim oTextEdit As New TextEdit() With {.Name = Name}
+                oEditor = oTextEdit
+            Case CONTROL_MEMOEDIT
+                Dim oMemoEdit As New MemoEdit() With {.Name = Name}
+                oEditor = oMemoEdit
+            Case CONTROL_DATEEDIT
+                Dim oDateEdit As New DateEdit() With {.Name = Name}
+                oEditor = oDateEdit
+            Case CONTROL_CHECKEDIT
+                Dim oCheckEdit As New CheckEdit() With {.Name = Name}
+                oEditor = oCheckEdit
+            Case Else
+                oEditor = Nothing
+        End Select
+
+        Return oEditor
+    End Function
+End Class
+
+
+
+

app/DD_PM_WINDREAM/frmDesignerLayout/Localization.vb

@@ -0,0 +1,31 @@
+Imports System.ComponentModel
+
+Namespace Controls
+    Public Class Localization
+        Private Shared Function Lookup(key As String)
+            Try
+                'Return My.Resources.ControlProperties.ResourceManager.GetString(key)
+                Return key
+            Catch ex As Exception
+                Return key
+            End Try
+        End Function
+
+        Public Class LocalizedDescriptionAttribute
+            Inherits DescriptionAttribute
+
+            Public Sub New(key As String)
+                MyBase.New(Lookup(key))
+            End Sub
+        End Class
+
+        Public Class LocalizedCategoryAttribute
+            Inherits CategoryAttribute
+
+            Public Sub New(key As String)
+                MyBase.New(Lookup(key))
+            End Sub
+        End Class
+    End Class
+End Namespace
+

app/DD_PM_WINDREAM/frmDesignerLayout/Metadata.vb

@@ -0,0 +1,5 @@
+Public Class Metadata
+    Public Id As Int64
+    Public Type As String
+    Public Caption As String
+End Class

app/DD_PM_WINDREAM/frmDesignerLayout/Properties/BaseProperties.vb

@@ -0,0 +1,17 @@
+Imports System.ComponentModel
+Imports DD_ProcessManager.Controls.Localization
+
+Namespace Controls.Properties
+    Public MustInherit Class BaseProperties
+
+        <LocalizedCategory("category_info")>
+        <LocalizedDescription("desc_id")>
+        <[ReadOnly](True)>
+        Public Property Id As Integer
+
+        <LocalizedCategory("category_info")>
+        <LocalizedDescription("desc_name")>
+        Public Property Name As String
+    End Class
+End Namespace
+

app/DD_PM_WINDREAM/frmDesignerLayout/Properties/CheckboxProperties.vb

@@ -0,0 +1,7 @@
+Namespace Controls.Properties
+    Public Class CheckboxProperties
+        Inherits BaseProperties
+    End Class
+End Namespace
+
+

app/DD_PM_WINDREAM/frmDesignerLayout/Properties/ComboboxProperties.vb

@@ -0,0 +1,14 @@
+Imports System.ComponentModel
+Imports DD_ProcessManager.Controls.Editors
+Imports DD_ProcessManager.Controls.Localization
+
+Namespace Controls.Properties
+    Public Class ComboboxProperties
+        Inherits BaseProperties
+
+        <LocalizedCategory("category_data")>
+        <LocalizedDescription("desc_datasource")>
+        Public Property Datasource As DatasourceType
+    End Class
+End Namespace
+

app/DD_PM_WINDREAM/frmDesignerLayout/Properties/DatepickerProperties.vb

@@ -0,0 +1,6 @@
+Namespace Controls.Properties
+    Public Class DatepickerProperties
+        Inherits BaseProperties
+    End Class
+
+End Namespace

app/DD_PM_WINDREAM/frmDesignerLayout/Properties/MemoeditProperties.vb

@@ -0,0 +1,7 @@
+Namespace Controls.Properties
+    Public Class MemoeditProperties
+        Inherits BaseProperties
+    End Class
+End Namespace
+
+

app/DD_PM_WINDREAM/frmDesignerLayout/Properties/TextboxProperties.vb

@@ -0,0 +1,7 @@
+Namespace Controls.Properties
+    Public Class TextboxProperties
+        Inherits BaseProperties
+    End Class
+End Namespace
+
+

app/DD_PM_WINDREAM/frmDesignerLayout/Serializer.vb

@@ -0,0 +1,297 @@
+Imports System.ComponentModel
+Imports DevExpress.XtraEditors
+Imports DevExpress.Utils.Serializing
+Imports DevExpress.XtraLayout
+Imports DevExpress.Utils.Serializing.Helpers
+Imports System.IO
+Imports DigitalData.Modules.Logging
+
+Public Class LayoutControlSerializer
+    Private appName As String = System.Reflection.Assembly.GetExecutingAssembly().FullName
+    Private serializer As XmlXtraSerializer = New MyXmlXtraSerializer()
+    Private LogConfig As LogConfig
+    Private Logger As Logger
+
+    Public Sub New(LogConfig As LogConfig)
+        Me.LogConfig = LogConfig
+        Logger = LogConfig.GetLogger
+    End Sub
+
+    'Public Sub SaveLayoutExToXml(ByVal layoutControl As LayoutControl, ByVal filePath As String)
+    '    Try
+    '        Dim objects As New ObjectInfoCollection()
+    '        For Each ctrl As Control In layoutControl.Controls
+    '            If layoutControl.GetItemByControl(ctrl) IsNot Nothing Then
+    '                objects.Collection.Add(New ObjectInfo(ctrl))
+    '            End If
+    '        Next ctrl
+    '        Dim filePathForControls As String = filePath.Replace(".xml", "Controls.xml")
+    '        layoutControl.SaveLayoutToXml(filePath)
+    '        serializer.SerializeObject(objects, filePathForControls, appName)
+    '    Catch ex As Exception
+    '        Logger.Error(ex)
+    '    End Try
+    'End Sub
+
+    Public Sub SaveLayoutExToStream(ByVal LayoutControl As LayoutControl, ByVal LayoutStream As Stream, ByVal ControlStream As Stream)
+        Try
+            Dim objects As New ObjectInfoCollection()
+            For Each ctrl As Control In LayoutControl.Controls
+                If LayoutControl.GetItemByControl(ctrl) IsNot Nothing Then
+                    objects.Collection.Add(New ObjectInfo(ctrl))
+                End If
+            Next ctrl
+            LayoutControl.SaveLayoutToStream(LayoutStream)
+            serializer.SerializeObject(objects, ControlStream, appName)
+        Catch ex As Exception
+            Logger.Error(ex)
+        End Try
+    End Sub
+
+    'Public Sub RestoreLayoutExFromXml(ByVal layoutControl As LayoutControl, ByVal filePath As String)
+    '    Try
+    '        Dim objects As New ObjectInfoCollection()
+    '        Dim filePathForControls As String = filePath.Replace(".xml", "Controls.xml")
+    '        serializer.DeserializeObject(objects, filePathForControls, appName)
+    '        For Each info As ObjectInfo In objects.Collection
+    '            Dim ctrl As Control = TryCast(info.SerializableObject, Control)
+    '            If ctrl IsNot Nothing Then
+    '                Dim controls() As Control = layoutControl.Controls.Find(ctrl.Name, False)
+    '                If controls.Length > 0 Then
+    '                    layoutControl.Controls.Remove(controls(0))
+    '                End If
+    '                layoutControl.Controls.Add(ctrl)
+    '            End If
+    '        Next info
+    '        layoutControl.RestoreLayoutFromXml(filePath)
+    '    Catch ex As Exception
+    '        Logger.Error(ex)
+    '    End Try
+    'End Sub
+
+    Public Sub RestoreLayoutExFromStream(ByVal layoutControl As LayoutControl, ByVal LayoutStream As Stream, ByVal ControlStream As Stream)
+        Try
+            Dim objects As New ObjectInfoCollection()
+            serializer.DeserializeObject(objects, ControlStream, appName)
+            For Each info As ObjectInfo In objects.Collection
+                Dim ctrl As Control = TryCast(info.SerializableObject, Control)
+                If ctrl IsNot Nothing Then
+                    Dim controls() As Control = layoutControl.Controls.Find(ctrl.Name, False)
+                    If controls.Length > 0 Then
+                        layoutControl.Controls.Remove(controls(0))
+                    End If
+                    layoutControl.Controls.Add(ctrl)
+                End If
+            Next info
+            layoutControl.RestoreLayoutFromStream(LayoutStream)
+        Catch ex As Exception
+            Logger.Error(ex)
+        End Try
+    End Sub
+End Class
+
+Public Class MyXmlXtraSerializer
+    Inherits XmlXtraSerializer
+
+    Public Sub New()
+    End Sub
+
+    Protected Overrides Function CreateSerializeHelper(ByVal rootObj As Object, ByVal useRootObj As Boolean) As SerializeHelper
+        Return If(useRootObj, New MySerializeHelper(rootObj), New MySerializeHelper())
+    End Function
+
+    Protected Overrides Function CreateDeserializeHelper(ByVal rootObj As Object, ByVal useRootObj As Boolean) As DeserializeHelper
+        Return If(useRootObj, New MyDeserializeHelper(rootObj), New MyDeserializeHelper())
+    End Function
+
+End Class
+
+Public Class ObjectInfoCollection
+    Implements IXtraSupportDeserializeCollectionItem
+
+    Public Sub New()
+        _Collection = New List(Of ObjectInfo)()
+    End Sub
+
+    ' Fields...
+    Private _Collection As List(Of ObjectInfo)
+
+    <XtraSerializableProperty(XtraSerializationVisibility.Collection, True)>
+    Public Property Collection() As List(Of ObjectInfo)
+        Get
+            Return _Collection
+        End Get
+        Set(ByVal value As List(Of ObjectInfo))
+            _Collection = value
+        End Set
+    End Property
+
+    Public Function CreateCollectionItem(ByVal propertyName As String, ByVal e As XtraItemEventArgs) As Object Implements IXtraSupportDeserializeCollectionItem.CreateCollectionItem
+        Dim info As New ObjectInfo()
+        Collection.Add(info)
+        Return info
+    End Function
+
+    Public Sub SetIndexCollectionItem(ByVal propertyName As String, ByVal e As XtraSetItemIndexEventArgs) Implements IXtraSupportDeserializeCollectionItem.SetIndexCollectionItem
+    End Sub
+End Class
+
+Public Class ObjectInfo
+    Public Sub New(ByVal serializableObject As Object)
+        Me.SerializableObject = serializableObject
+    End Sub
+
+    Public Sub New()
+    End Sub
+
+
+    ' Fields...
+    Private _type As String
+    Private _SerializableObject As Object
+
+    <XtraSerializableProperty>
+    Public Property Type1() As String
+        Get
+            Return _type
+        End Get
+        Set(ByVal value As String)
+            _type = value
+            Try
+                If _SerializableObject Is Nothing Then
+                    Dim index As Integer = _type.LastIndexOf("."c)
+                    Dim [nameSpace] = _type.Substring(0, index)
+                    Dim type = System.Type.GetType(_type & ", " & [nameSpace])
+                    _SerializableObject = Activator.CreateInstance(type)
+                End If
+            Catch
+            End Try
+        End Set
+    End Property
+
+    <XtraSerializableProperty(XtraSerializationVisibility.Content)>
+    Public Property SerializableObject() As Object
+        Get
+            Return _SerializableObject
+        End Get
+        Set(ByVal value As Object)
+            _SerializableObject = value
+            _type = _SerializableObject.GetType().ToString()
+        End Set
+    End Property
+
+    <XtraSerializableProperty(2)>
+    Public Property SerializableObjectName() As String
+        Get
+            Dim ctrl As Control = TryCast(SerializableObject, Control)
+            If ctrl IsNot Nothing Then
+                Return ctrl.Name
+            End If
+            Return String.Empty
+        End Get
+        Set(ByVal value As String)
+            Dim ctrl As Control = TryCast(SerializableObject, Control)
+            If ctrl IsNot Nothing Then
+                ctrl.Name = value
+            End If
+        End Set
+    End Property
+End Class
+
+Public Class MySerializeHelper
+    Inherits SerializeHelper
+
+    Public Sub New()
+    End Sub
+
+    Public Sub New(ByVal rootObject As Object)
+        MyBase.New(rootObject)
+    End Sub
+
+    Public Sub New(ByVal rootObject As Object, ByVal context As SerializationContext)
+        MyBase.New(rootObject, context)
+    End Sub
+
+    Protected Overrides Sub SerializeProperty(ByVal store As XtraPropertyInfoCollection, ByVal obj As Object, ByVal pair As SerializablePropertyDescriptorPair, ByVal parentFlags As XtraSerializationFlags, ByVal options As DevExpress.Utils.OptionsLayoutBase)
+        Dim name = pair.Property.Name
+
+        If name = "Tag" Then
+            Console.WriteLine()
+        End If
+
+        Dim prop As PropertyDescriptor = pair.Property
+        Dim attr As XtraSerializableProperty = pair.Attribute
+        If attr Is Nothing AndAlso prop.IsBrowsable AndAlso prop.ShouldSerializeValue(obj) Then
+            If prop.PropertyType IsNot GetType(String) AndAlso prop.PropertyType.IsClass Then
+                pair = New SerializablePropertyDescriptorPair(prop, New XtraSerializableProperty(XtraSerializationVisibility.Content))
+            Else
+                pair = New SerializablePropertyDescriptorPair(prop, New XtraSerializableProperty())
+            End If
+        End If
+        MyBase.SerializeProperty(store, obj, pair, parentFlags, options)
+    End Sub
+End Class
+
+Public Class MyDeserializeHelper
+    Inherits DeserializeHelper
+
+    Public Sub New(ByVal rootObject As Object)
+        MyBase.New(rootObject)
+    End Sub
+
+    Public Sub New(ByVal rootObject As Object, ByVal resetProperties As Boolean)
+        MyBase.New(rootObject, resetProperties)
+    End Sub
+
+    Public Sub New(ByVal rootObject As Object, ByVal resetProperties As Boolean, ByVal context As SerializationContext)
+        MyBase.New(rootObject, resetProperties, context)
+    End Sub
+
+    Public Sub New()
+    End Sub
+
+    Protected Overrides Function CreateSerializationContext() As SerializationContext
+        Return New MySerializationContext()
+    End Function
+End Class
+
+Public Class MySerializationContext
+    Inherits SerializationContext
+
+    Public Sub New()
+    End Sub
+
+    Protected Overrides Sub CustomGetSerializableProperties(ByVal obj As Object, ByVal pairsList As List(Of SerializablePropertyDescriptorPair), ByVal props As PropertyDescriptorCollection)
+        MyBase.CustomGetSerializableProperties(obj, pairsList, props)
+        Dim i As Integer = 0
+        Do While i < pairsList.Count
+            Dim pair As SerializablePropertyDescriptorPair = pairsList(i)
+            Dim prop As PropertyDescriptor = pair.Property
+            Dim attr As XtraSerializableProperty = pair.Attribute
+            If attr Is Nothing AndAlso prop.IsBrowsable Then
+                If prop.PropertyType IsNot GetType(String) AndAlso prop.PropertyType.IsClass Then
+                    pair = New SerializablePropertyDescriptorPair(prop, New XtraSerializableProperty(XtraSerializationVisibility.Content))
+                Else
+                    pair = New SerializablePropertyDescriptorPair(prop, New XtraSerializableProperty())
+                End If
+                pairsList.RemoveAt(i)
+                pairsList.Insert(i, pair)
+            End If
+            i += 1
+        Loop
+    End Sub
+
+    Protected Overrides Function GetProperties(ByVal obj As Object, ByVal store As IXtraPropertyCollection) As PropertyDescriptorCollection
+        Dim propertyDescriptors As PropertyDescriptorCollection = MyBase.GetProperties(obj, store)
+        If store Is Nothing Then
+            Return propertyDescriptors
+        End If
+        Dim newPropertyDescriptors As New PropertyDescriptorCollection(Nothing)
+        For Each info As XtraPropertyInfo In store
+            Dim pd As PropertyDescriptor = propertyDescriptors(info.Name)
+            If pd IsNot Nothing Then
+                newPropertyDescriptors.Add(pd)
+            End If
+        Next info
+        Return newPropertyDescriptors
+    End Function
+End Class

app/DD_PM_WINDREAM/frmDocView.Designer.vb

@@ -32,7 +32,7 @@ Partial Class frmDocView
         '
         Me.DocumentViewer1.Dock = System.Windows.Forms.DockStyle.Fill
         Me.DocumentViewer1.Location = New System.Drawing.Point(0, 0)
-        Me.DocumentViewer1.Name = "DocumentViewer1"
+        Me.DocumentViewer1.Name = "DocumentViewerfrmDocView"
         Me.DocumentViewer1.Size = New System.Drawing.Size(800, 450)
         Me.DocumentViewer1.TabIndex = 0
         '

app/DD_PM_WINDREAM/frmFormDesigner.Designer.vb

@@ -33,7 +33,7 @@ Partial Class frmFormDesigner
         Me.btndtp = New System.Windows.Forms.Button()
         Me.btntextbox = New System.Windows.Forms.Button()
         Me.btnlabel = New System.Windows.Forms.Button()
-        Me.pnldesigner = New DD_PM_WINDREAM.ClassSnapPanel()
+        Me.pnldesigner = New DD_ProcessManager.ClassSnapPanel()
         Me.Label1 = New System.Windows.Forms.Label()
         Me.lblhintergrund = New System.Windows.Forms.Label()
         Me.TabControlEigenschaften = New System.Windows.Forms.TabControl()
@@ -47,20 +47,20 @@ Partial Class frmFormDesigner
         Me.btnwidth_minus = New System.Windows.Forms.Button()
         Me.btnwidth_plus = New System.Windows.Forms.Button()
         Me.TBPM_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
         Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.btndelete = New System.Windows.Forms.Button()
         Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
         Me.tslblAenderungen = New System.Windows.Forms.ToolStripStatusLabel()
         Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
         Me.btnrefresh = New System.Windows.Forms.Button()
-        Me.TBPM_PROFILE_CONTROLSTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter()
+        Me.TBPM_PROFILE_CONTROLSTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter()
-        Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
-        Me.TBDD_CONNECTIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter()
+        Me.TBDD_CONNECTIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter()
         Me.TBWH_CHECK_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.TBWH_CHECK_PROFILE_CONTROLSTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter()
+        Me.TBWH_CHECK_PROFILE_CONTROLSTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter()
         Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.TBPM_CONTROL_TABLETableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
+        Me.TBPM_CONTROL_TABLETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
         Me.GridControlContextMenu = New System.Windows.Forms.ContextMenuStrip(Me.components)
         Me.MenuItemAddColumn = New System.Windows.Forms.ToolStripMenuItem()
         Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
@@ -131,7 +131,7 @@ Partial Class frmFormDesigner
         'btnTabelle
         '
         Me.btnTabelle.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnTabelle.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.table_add
+        Me.btnTabelle.Image = Global.DD_ProcessManager.My.Resources.Resources.table_add
         Me.btnTabelle.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnTabelle.Location = New System.Drawing.Point(151, 22)
         Me.btnTabelle.Name = "btnTabelle"
@@ -144,7 +144,7 @@ Partial Class frmFormDesigner
         'btnCheckbox
         '
         Me.btnCheckbox.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnCheckbox.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.checkbox_16xLG
+        Me.btnCheckbox.Image = Global.DD_ProcessManager.My.Resources.Resources.checkbox_16xLG
         Me.btnCheckbox.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnCheckbox.Location = New System.Drawing.Point(151, 90)
         Me.btnCheckbox.Name = "btnCheckbox"
@@ -157,7 +157,7 @@ Partial Class frmFormDesigner
         'btnVektor
         '
         Me.btnVektor.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnVektor.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.ComboBox_16xLG
+        Me.btnVektor.Image = Global.DD_ProcessManager.My.Resources.Resources.ComboBox_16xLG
         Me.btnVektor.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnVektor.Location = New System.Drawing.Point(13, 88)
         Me.btnVektor.Name = "btnVektor"
@@ -170,7 +170,7 @@ Partial Class frmFormDesigner
         'btndtp
         '
         Me.btndtp.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btndtp.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.DateOrTimePicker_675
+        Me.btndtp.Image = Global.DD_ProcessManager.My.Resources.Resources.DateOrTimePicker_675
         Me.btndtp.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btndtp.Location = New System.Drawing.Point(151, 55)
         Me.btndtp.Name = "btndtp"
@@ -183,7 +183,7 @@ Partial Class frmFormDesigner
         'btntextbox
         '
         Me.btntextbox.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btntextbox.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.TextBox_708
+        Me.btntextbox.Image = Global.DD_ProcessManager.My.Resources.Resources.TextBox_708
         Me.btntextbox.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btntextbox.Location = New System.Drawing.Point(13, 55)
         Me.btntextbox.Name = "btntextbox"
@@ -196,7 +196,7 @@ Partial Class frmFormDesigner
         'btnlabel
         '
         Me.btnlabel.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnlabel.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.Label_684
+        Me.btnlabel.Image = Global.DD_ProcessManager.My.Resources.Resources.Label_684
         Me.btnlabel.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnlabel.Location = New System.Drawing.Point(12, 22)
         Me.btnlabel.Name = "btnlabel"
@@ -297,7 +297,7 @@ Partial Class frmFormDesigner
         'btnheight_minus
         '
         Me.btnheight_minus.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnheight_minus.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.zoom_out
+        Me.btnheight_minus.Image = Global.DD_ProcessManager.My.Resources.Resources.zoom_out
         Me.btnheight_minus.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnheight_minus.Location = New System.Drawing.Point(94, 69)
         Me.btnheight_minus.Name = "btnheight_minus"
@@ -310,7 +310,7 @@ Partial Class frmFormDesigner
         'btnheight_plus
         '
         Me.btnheight_plus.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnheight_plus.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.zoom_in
+        Me.btnheight_plus.Image = Global.DD_ProcessManager.My.Resources.Resources.zoom_in
         Me.btnheight_plus.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnheight_plus.Location = New System.Drawing.Point(13, 69)
         Me.btnheight_plus.Name = "btnheight_plus"
@@ -341,7 +341,7 @@ Partial Class frmFormDesigner
         'btnwidth_minus
         '
         Me.btnwidth_minus.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnwidth_minus.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.zoom_out
+        Me.btnwidth_minus.Image = Global.DD_ProcessManager.My.Resources.Resources.zoom_out
         Me.btnwidth_minus.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnwidth_minus.Location = New System.Drawing.Point(94, 22)
         Me.btnwidth_minus.Name = "btnwidth_minus"
@@ -354,7 +354,7 @@ Partial Class frmFormDesigner
         'btnwidth_plus
         '
         Me.btnwidth_plus.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnwidth_plus.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.zoom_in
+        Me.btnwidth_plus.Image = Global.DD_ProcessManager.My.Resources.Resources.zoom_in
         Me.btnwidth_plus.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnwidth_plus.Location = New System.Drawing.Point(13, 22)
         Me.btnwidth_plus.Name = "btnwidth_plus"
@@ -382,7 +382,7 @@ Partial Class frmFormDesigner
         'btndelete
         '
         Me.btndelete.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.btndelete.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.delete_12x12
+        Me.btndelete.Image = Global.DD_ProcessManager.My.Resources.Resources.delete_12x12
         Me.btndelete.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btndelete.Location = New System.Drawing.Point(7, 624)
         Me.btndelete.Name = "btndelete"
@@ -403,7 +403,7 @@ Partial Class frmFormDesigner
         '
         'tslblAenderungen
         '
-        Me.tslblAenderungen.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.database_save
+        Me.tslblAenderungen.Image = Global.DD_ProcessManager.My.Resources.Resources.database_save
         Me.tslblAenderungen.Name = "tslblAenderungen"
         Me.tslblAenderungen.Size = New System.Drawing.Size(152, 17)
         Me.tslblAenderungen.Text = "Noch keine Änderungen"
@@ -411,7 +411,7 @@ Partial Class frmFormDesigner
         'btnrefresh
         '
         Me.btnrefresh.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.btnrefresh.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.arrow_refresh
+        Me.btnrefresh.Image = Global.DD_ProcessManager.My.Resources.Resources.arrow_refresh
         Me.btnrefresh.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnrefresh.Location = New System.Drawing.Point(260, 624)
         Me.btnrefresh.Name = "btnrefresh"
@@ -440,7 +440,7 @@ Partial Class frmFormDesigner
         Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
-        Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
         'TBDD_CONNECTIONTableAdapter
         '
@@ -532,14 +532,14 @@ Partial Class frmFormDesigner
         Me.PerformLayout()
 
     End Sub
-    Friend WithEvents DD_DMSLiteDataSet As DD_PM_WINDREAM.DD_DMSLiteDataSet
+    Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
     Friend WithEvents TBPM_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBPM_PROFILE_CONTROLSTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter
+    Friend WithEvents TBPM_PROFILE_CONTROLSTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter
-    Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
+    Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
     Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
     Friend WithEvents btnlabel As System.Windows.Forms.Button
     Friend WithEvents btntextbox As System.Windows.Forms.Button
-    Friend WithEvents pnldesigner As DD_PM_WINDREAM.ClassSnapPanel
+    Friend WithEvents pnldesigner As DD_ProcessManager.ClassSnapPanel
     Friend WithEvents btndtp As System.Windows.Forms.Button
     Friend WithEvents lblhintergrund As System.Windows.Forms.Label
     Friend WithEvents btndelete As System.Windows.Forms.Button
@@ -556,14 +556,14 @@ Partial Class frmFormDesigner
     Friend WithEvents Label2 As System.Windows.Forms.Label
     Friend WithEvents btnVektor As System.Windows.Forms.Button
     Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBDD_CONNECTIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter
+    Friend WithEvents TBDD_CONNECTIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter
     Friend WithEvents btnCheckbox As System.Windows.Forms.Button
     Friend WithEvents TBWH_CHECK_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBWH_CHECK_PROFILE_CONTROLSTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter
+    Friend WithEvents TBWH_CHECK_PROFILE_CONTROLSTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter
     Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip
     Friend WithEvents btnTabelle As System.Windows.Forms.Button
     Friend WithEvents TBPM_CONTROL_TABLEBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBPM_CONTROL_TABLETableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter
+    Friend WithEvents TBPM_CONTROL_TABLETableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter
     Friend WithEvents btnrefresh As System.Windows.Forms.Button
     Friend WithEvents pageProperties As TabPage
     Friend WithEvents pgControls As PropertyGrid

app/DD_PM_WINDREAM/frmFormDesigner.vb

@@ -44,15 +44,20 @@ Public Class frmFormDesigner
             ' Windream initialisieren
             If IDB_ACTIVE = False Then
                 clsWindream.Create_Session()
+                btnButton.Visible = False
+            Else
+                btnButton.Visible = True
             End If
 
 
             'Windream Abfragen, sollten einmal beim Start des Formulars geladen werden
             Dim unsortedIndicies
-            Dim sortedIndicies
+            Dim sortedIndicies As List(Of String)
             If IDB_ACTIVE = False Then
                 unsortedIndicies = clsWD_GET.GetIndicesByObjecttype(CURRENT_OBJECTTYPE).ToList()
-                sortedIndicies = unsortedIndicies.OrderBy(Function(index As String) index).ToList()
+
+                sortedIndicies = unsortedIndicies '.OrderBy(Function(index As String) index).ToList()
+                sortedIndicies = sortedIndicies.OrderBy(Function(index As String) index).ToList
             Else
                 sortedIndicies = IDBData.GetIndicesByBE(CURRENT_OBJECTTYPE).ToList()
             End If
@@ -252,11 +257,10 @@ Public Class frmFormDesigner
                         SetMovementHandlers(dgv)
 
                     Case "TABLE"
-                        Dim findControlColumnsQuery = (From r As DD_DMSLiteDataSet.TBPM_CONTROL_TABLERow In DD_DMSLiteDataSet.TBPM_CONTROL_TABLE
+                        Dim oDTColumnsPerDevExGrid As DataTable = ClassDatabase.Return_Datatable($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {guid} ORDER BY [SEQUENCE]")
-                                                       Where r.CONTROL_ID = guid
+
-                                                       Select r)
+
-                        Dim columns As List(Of DD_DMSLiteDataSet.TBPM_CONTROL_TABLERow) = findControlColumnsQuery.ToList()
+                        Dim table = ClassControlCreator.CreateExistingGridControl(row, oDTColumnsPerDevExGrid, True)
-                        Dim table = ClassControlCreator.CreateExistingGridControl(row, columns, True)
 
                         AddHandler table.MouseClick, AddressOf gridControl_MouseClick
                         ' AddHandler table.ColumnHeaderMouseClick, AddressOf table_ColumnHeaderMouseClick
@@ -518,7 +522,7 @@ Public Class frmFormDesigner
                             oControl.BackColor = Color.Transparent
                         Case "System.Windows.Forms.CheckBox"
                             oControl.BackColor = Color.Transparent
-                        Case "DD_PM_WINDREAM.ClassControlCreator+LineLabel"
+                        Case "DD_ProcessManager.ClassControlCreator+LineLabel"
                             oControl.BackColor = oControl.ForeColor
                         Case "DigitalData.Controls.LookupGrid.LookupControl2"
                             oControl.BackColor = Color.White
@@ -1024,7 +1028,9 @@ Public Class frmFormDesigner
                 CurrentControl.ForeColor = color
             Case "SQLCommand"
                 UpdateSingleValue("SQL_UEBERPRUEFUNG", newValue)
+                UpdateSingleValue("CONNECTION_ID", CURRENT_CONN_ID)
                 UpdateSingleValue("CHOICE_LIST", "")
+
             Case "Enable_SQL"
                 UpdateSingleValue("SQL_ENABLE", newValue)
             Case "Override_SQL"
@@ -1034,6 +1040,7 @@ Public Class frmFormDesigner
             Case "ChoiceList"
                 UpdateSingleValue("CHOICE_LIST", newValue)
                 UpdateSingleValue("SQL_UEBERPRUEFUNG", "")
+                UpdateSingleValue("CONNECTION_ID", "NULL")
 
             Case "MultiSelect"
                 UpdateSingleValue("MULTISELECT", IIf(newValue = True, 1, 0))
@@ -1079,9 +1086,9 @@ Public Class frmFormDesigner
 
         Catch ex As Exception
             LOGGER.Error(ex)
-            Dim msg = $"UpdateImage - Error while saving Control (Id: {CURRENT_CONTROL_ID}): {vbCrLf}{ex.Message}"
+            Dim oMsg = $"UpdateImage - Error while saving Control (Id: {CURRENT_CONTROL_ID}): {vbCrLf}{ex.Message}"
-            MsgBox(msg)
+            MsgBox(oMsg)
-            LOGGER.Info(msg)
+            LOGGER.Info(oMsg)
             Return False
         End Try
     End Function
@@ -1112,9 +1119,9 @@ Public Class frmFormDesigner
 
         Catch ex As Exception
             LOGGER.Error(ex)
-            Dim msg = $"UpdateSingleValue - Fehler beim Speichern von Control (Id: {guid}, column: {columnName}): {vbCrLf}{ex.Message}"
+            Dim oMsg = $"UpdateSingleValue - Fehler beim Speichern von Control (Id: {guid}, column: {columnName}): {vbCrLf}{ex.Message}"
-            MsgBox(msg)
+            MsgBox(oMsg)
-            LOGGER.Info(msg)
+            LOGGER.Info(oMsg)
             Return False
         End Try
     End Function
@@ -1131,8 +1138,8 @@ Public Class frmFormDesigner
                 LoadControls()
             End If
         Catch ex As Exception
-            Dim msg = $"MenuItemAddColumn_Click - Fehler beim Hinzufügen von einer neuen Spalte: {vbCrLf}{ex.Message}"
+            Dim oMsg = $"MenuItemAddColumn_Click - Fehler beim Hinzufügen von einer neuen Spalte: {vbCrLf}{ex.Message}"
-            MsgBox(msg)
+            MsgBox(oMsg)
             LOGGER.Error(ex)
         End Try
     End Sub

app/DD_PM_WINDREAM/frmInvDashboard.Designer.vb

@@ -0,0 +1,258 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmInvDashboard
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    '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 TableColumnDefinition1 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableRowDefinition1 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableRowDefinition2 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableRowDefinition3 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TileViewItemElement1 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement2 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement3 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Me.colTitle = New DevExpress.XtraGrid.Columns.TileViewColumn()
+        Me.colAnzahl = New DevExpress.XtraGrid.Columns.TileViewColumn()
+        Me.colNettoSumme = New DevExpress.XtraGrid.Columns.TileViewColumn()
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
+        Me.VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
+        Me.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter()
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
+        Me.TileView1 = New DevExpress.XtraGrid.Views.Tile.TileView()
+        Me.Label1 = New System.Windows.Forms.Label()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.TileView1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'colTitle
+        '
+        Me.colTitle.FieldName = "Title"
+        Me.colTitle.Name = "colTitle"
+        Me.colTitle.Visible = True
+        Me.colTitle.VisibleIndex = 0
+        '
+        'colAnzahl
+        '
+        Me.colAnzahl.FieldName = "Anzahl"
+        Me.colAnzahl.Name = "colAnzahl"
+        Me.colAnzahl.Visible = True
+        Me.colAnzahl.VisibleIndex = 1
+        '
+        'colNettoSumme
+        '
+        Me.colNettoSumme.DisplayFormat.FormatString = "c0"
+        Me.colNettoSumme.DisplayFormat.FormatType = DevExpress.Utils.FormatType.Numeric
+        Me.colNettoSumme.FieldName = "NettoSumme"
+        Me.colNettoSumme.Name = "colNettoSumme"
+        Me.colNettoSumme.Visible = True
+        Me.colNettoSumme.VisibleIndex = 2
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 1
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.Size = New System.Drawing.Size(800, 146)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "RibbonPage1"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 429)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 21)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'DD_DMSLiteDataSet
+        '
+        Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
+        Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
+        '
+        'VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource
+        '
+        Me.VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource.DataMember = "VWPM_CHART_INVOICE_MONITOR_SERIES"
+        Me.VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource.DataSource = Me.DD_DMSLiteDataSet
+        '
+        'VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter
+        '
+        Me.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter.ClearBeforeFill = True
+        '
+        '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
+        '
+        'GridControl1
+        '
+        Me.GridControl1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.GridControl1.DataSource = Me.VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource
+        Me.GridControl1.Location = New System.Drawing.Point(12, 168)
+        Me.GridControl1.MainView = Me.TileView1
+        Me.GridControl1.MenuManager = Me.RibbonControl1
+        Me.GridControl1.Name = "GridControl1"
+        Me.GridControl1.Size = New System.Drawing.Size(776, 112)
+        Me.GridControl1.TabIndex = 5
+        Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.TileView1})
+        '
+        'TileView1
+        '
+        Me.TileView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colTitle, Me.colAnzahl, Me.colNettoSumme})
+        Me.TileView1.GridControl = Me.GridControl1
+        Me.TileView1.Name = "TileView1"
+        Me.TileView1.OptionsTiles.IndentBetweenItems = 7
+        Me.TileView1.OptionsTiles.ItemPadding = New System.Windows.Forms.Padding(13)
+        Me.TileView1.OptionsTiles.ItemSize = New System.Drawing.Size(144, 86)
+        Me.TileView1.OptionsTiles.Padding = New System.Windows.Forms.Padding(5)
+        Me.TileView1.TileColumns.Add(TableColumnDefinition1)
+        Me.TileView1.TileRows.Add(TableRowDefinition1)
+        Me.TileView1.TileRows.Add(TableRowDefinition2)
+        Me.TileView1.TileRows.Add(TableRowDefinition3)
+        TileViewItemElement1.AnchorAlignment = DevExpress.Utils.AnchorAlignment.Left
+        TileViewItemElement1.Appearance.Normal.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        TileViewItemElement1.Appearance.Normal.Options.UseFont = True
+        TileViewItemElement1.Column = Me.colTitle
+        TileViewItemElement1.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement1.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement1.RowIndex = 2
+        TileViewItemElement1.Text = "colTitle"
+        TileViewItemElement1.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
+        TileViewItemElement2.Appearance.Normal.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        TileViewItemElement2.Appearance.Normal.ForeColor = System.Drawing.Color.DimGray
+        TileViewItemElement2.Appearance.Normal.Options.UseFont = True
+        TileViewItemElement2.Appearance.Normal.Options.UseForeColor = True
+        TileViewItemElement2.Column = Me.colAnzahl
+        TileViewItemElement2.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement2.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement2.Text = "colAnzahl"
+        TileViewItemElement2.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
+        TileViewItemElement3.AnchorAlignment = DevExpress.Utils.AnchorAlignment.Left
+        TileViewItemElement3.Appearance.Normal.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        TileViewItemElement3.Appearance.Normal.ForeColor = System.Drawing.Color.SteelBlue
+        TileViewItemElement3.Appearance.Normal.Options.UseFont = True
+        TileViewItemElement3.Appearance.Normal.Options.UseForeColor = True
+        TileViewItemElement3.Column = Me.colNettoSumme
+        TileViewItemElement3.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement3.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
+        TileViewItemElement3.RowIndex = 1
+        TileViewItemElement3.Text = "colNettoSumme"
+        TileViewItemElement3.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
+        Me.TileView1.TileTemplate.Add(TileViewItemElement1)
+        Me.TileView1.TileTemplate.Add(TileViewItemElement2)
+        Me.TileView1.TileTemplate.Add(TileViewItemElement3)
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("Tahoma", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.Location = New System.Drawing.Point(9, 149)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(160, 16)
+        Me.Label1.TabIndex = 8
+        Me.Label1.Text = "Alle Belege - Verteilung"
+        '
+        'frmInvDashboard
+        '
+        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.Label1)
+        Me.Controls.Add(Me.GridControl1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.Name = "frmInvDashboard"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "frmInvDashboard"
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.TileView1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents DD_DMSLiteDataSet As DD_DMSLiteDataSet
+    Friend WithEvents VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource As BindingSource
+    Friend WithEvents VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter As DD_DMSLiteDataSetTableAdapters.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter
+    Friend WithEvents TableAdapterManager As DD_DMSLiteDataSetTableAdapters.TableAdapterManager
+    Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl
+    Friend WithEvents TileView1 As DevExpress.XtraGrid.Views.Tile.TileView
+    Friend WithEvents colAnzahl As DevExpress.XtraGrid.Columns.TileViewColumn
+    Friend WithEvents colNettoSumme As DevExpress.XtraGrid.Columns.TileViewColumn
+    Friend WithEvents colTitle As DevExpress.XtraGrid.Columns.TileViewColumn
+    Friend WithEvents Label1 As Label
+End Class

app/DD_PM_WINDREAM/frmInvDashboard.resx

@@ -0,0 +1,132 @@
+<?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>17, 17</value>
+  </metadata>
+  <metadata name="VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>179, 17</value>
+  </metadata>
+  <metadata name="VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>545, 17</value>
+  </metadata>
+  <metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>905, 17</value>
+  </metadata>
+</root>

app/DD_PM_WINDREAM/frmInvDashboard.vb

@@ -0,0 +1,26 @@
+Imports DevExpress.XtraGrid.Views.Tile
+
+Public Class frmInvDashboard
+    Private Sub frmInvDashboard_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        'TODO: Diese Codezeile lädt Daten in die Tabelle "DD_DMSLiteDataSet.VWPM_CHART_INVOICE_MONITOR_SERIES". Sie können sie bei Bedarf verschieben oder entfernen.
+        Me.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter.Fill(Me.DD_DMSLiteDataSet.VWPM_CHART_INVOICE_MONITOR_SERIES)
+
+    End Sub
+
+    Private Sub TileView1_ItemCustomize(sender As Object, e As DevExpress.XtraGrid.Views.Tile.TileViewItemCustomizeEventArgs) Handles TileView1.ItemCustomize
+        Dim oView As TileView = sender
+        Dim ovalue = oView.GetRowCellValue(e.RowHandle, "Title")
+        If ovalue = "Alle Rechnungen" Then
+            e.Item.AppearanceItem.Normal.BackColor = Color.Blue
+            'e.Item.Elements(1).Text = ""
+            e.Item.Elements(0).Appearance.Normal.ForeColor = Color.White
+            e.Item.Elements(1).Appearance.Normal.ForeColor = Color.White
+            e.Item.Elements(2).Appearance.Normal.ForeColor = Color.White
+            'Console.WriteLine("")
+        ElseIf ovalue = "Zeitkritisch" Then
+            e.Item.Elements(0).Appearance.Normal.ForeColor = Color.Red
+            e.Item.Elements(1).Appearance.Normal.ForeColor = Color.Red
+            e.Item.Elements(2).Appearance.Normal.ForeColor = Color.Red
+        End If
+    End Sub
+End Class

app/DD_PM_WINDREAM/frmKonfig.Designer.vb

@@ -50,7 +50,6 @@ Partial Class frmKonfig
         Me.chkLogErrorsOnly = New System.Windows.Forms.CheckBox()
         Me.Button3 = New System.Windows.Forms.Button()
         Me.LinkLabel1 = New System.Windows.Forms.LinkLabel()
-        Me.Button2 = New System.Windows.Forms.Button()
         Me.Button1 = New System.Windows.Forms.Button()
         Me.btnLogMail = New System.Windows.Forms.Button()
         Me.TabPage4 = New System.Windows.Forms.TabPage()
@@ -59,10 +58,10 @@ Partial Class frmKonfig
         Me.LogNachrichtenLeerenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.SpeichereLogAlsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.gvLogs = New DevExpress.XtraGrid.Views.Grid.GridView()
-        Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
         Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.TBPM_KONFIGURATIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
+        Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
-        Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
         Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
         Me.TabControl1.SuspendLayout()
         Me.TabPage2.SuspendLayout()
@@ -174,7 +173,7 @@ Partial Class frmKonfig
         '
         'BtnConnect
         '
-        Me.BtnConnect.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.database_save
+        Me.BtnConnect.Image = Global.DD_ProcessManager.My.Resources.Resources.database_save
         resources.ApplyResources(Me.BtnConnect, "BtnConnect")
         Me.BtnConnect.Name = "BtnConnect"
         Me.BtnConnect.UseVisualStyleBackColor = True
@@ -202,7 +201,6 @@ Partial Class frmKonfig
         Me.TabPage3.Controls.Add(Me.chkLogErrorsOnly)
         Me.TabPage3.Controls.Add(Me.Button3)
         Me.TabPage3.Controls.Add(Me.LinkLabel1)
-        Me.TabPage3.Controls.Add(Me.Button2)
         Me.TabPage3.Controls.Add(Me.Button1)
         Me.TabPage3.Controls.Add(Me.btnLogMail)
         resources.ApplyResources(Me.TabPage3, "TabPage3")
@@ -222,10 +220,10 @@ Partial Class frmKonfig
         '
         'txtIntervall
         '
-        Me.txtIntervall.DataBindings.Add(New System.Windows.Forms.Binding("Text", Global.DD_PM_WINDREAM.My.MySettings.Default, "IntervallReminder", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
+        Me.txtIntervall.DataBindings.Add(New System.Windows.Forms.Binding("Text", Global.DD_ProcessManager.My.MySettings.Default, "IntervallReminder", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
         resources.ApplyResources(Me.txtIntervall, "txtIntervall")
         Me.txtIntervall.Name = "txtIntervall"
-        Me.txtIntervall.Text = Global.DD_PM_WINDREAM.My.MySettings.Default.IntervallReminder
+        Me.txtIntervall.Text = Global.DD_ProcessManager.My.MySettings.Default.IntervallReminder
         '
         'Label6
         '
@@ -256,12 +254,6 @@ Partial Class frmKonfig
         Me.LinkLabel1.Name = "LinkLabel1"
         Me.LinkLabel1.TabStop = True
         '
-        'Button2
-        '
-        resources.ApplyResources(Me.Button2, "Button2")
-        Me.Button2.Name = "Button2"
-        Me.Button2.UseVisualStyleBackColor = True
-        '
         'Button1
         '
         resources.ApplyResources(Me.Button1, "Button1")
@@ -270,7 +262,7 @@ Partial Class frmKonfig
         '
         'btnLogMail
         '
-        Me.btnLogMail.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.email_go
+        Me.btnLogMail.Image = Global.DD_ProcessManager.My.Resources.Resources.email_go
         resources.ApplyResources(Me.btnLogMail, "btnLogMail")
         Me.btnLogMail.Name = "btnLogMail"
         Me.btnLogMail.UseVisualStyleBackColor = True
@@ -308,7 +300,7 @@ Partial Class frmKonfig
         '
         'gvLogs
         '
-        Me.gvLogs.Appearance.OddRow.BackColor = CType(resources.GetObject("gvLogs.Appearance.OddRow.BackColor"), System.Drawing.Color)
+        Me.gvLogs.Appearance.OddRow.BackColor = System.Drawing.Color.LightCyan
         Me.gvLogs.Appearance.OddRow.Options.UseBackColor = True
         Me.gvLogs.GridControl = Me.GridControlLogs
         Me.gvLogs.Name = "gvLogs"
@@ -334,6 +326,8 @@ Partial Class frmKonfig
         '
         Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
         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
@@ -343,7 +337,7 @@ Partial Class frmKonfig
         Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
-        Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
         'frmKonfig
         '
@@ -383,12 +377,11 @@ Partial Class frmKonfig
     Friend WithEvents chkbxUserAut As System.Windows.Forms.CheckBox
     Friend WithEvents TabPage3 As System.Windows.Forms.TabPage
     Friend WithEvents btnLogMail As System.Windows.Forms.Button
-    Friend WithEvents DD_DMSLiteDataSet As DD_PM_WINDREAM.DD_DMSLiteDataSet
+    Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
     Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
+    Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
-    Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
+    Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
     Friend WithEvents Button1 As System.Windows.Forms.Button
-    Friend WithEvents Button2 As System.Windows.Forms.Button
     Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel
     Friend WithEvents Button3 As System.Windows.Forms.Button
     Friend WithEvents chkLogErrorsOnly As System.Windows.Forms.CheckBox

app/DD_PM_WINDREAM/frmKonfig.resx

@@ -643,7 +643,7 @@
     <value>True</value>
   </data>
   <data name="chkLogErrorsOnly.Location" type="System.Drawing.Point, System.Drawing">
-    <value>506, 28</value>
+    <value>438, 29</value>
   </data>
   <data name="chkLogErrorsOnly.Size" type="System.Drawing.Size, System.Drawing">
     <value>117, 21</value>
@@ -717,32 +717,8 @@
   <data name="&gt;&gt;LinkLabel1.ZOrder" xml:space="preserve">
     <value>7</value>
   </data>
-  <data name="Button2.Location" type="System.Drawing.Point, System.Drawing">
-    <value>506, 105</value>
-  </data>
-  <data name="Button2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>219, 28</value>
-  </data>
-  <data name="Button2.TabIndex" type="System.Int32, mscorlib">
-    <value>38</value>
-  </data>
-  <data name="Button2.Text" xml:space="preserve">
-    <value>List all processes</value>
-  </data>
-  <data name="&gt;&gt;Button2.Name" xml:space="preserve">
-    <value>Button2</value>
-  </data>
-  <data name="&gt;&gt;Button2.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Button2.Parent" xml:space="preserve">
-    <value>TabPage3</value>
-  </data>
-  <data name="&gt;&gt;Button2.ZOrder" xml:space="preserve">
-    <value>8</value>
-  </data>
   <data name="Button1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>506, 71</value>
+    <value>438, 64</value>
   </data>
   <data name="Button1.Size" type="System.Drawing.Size, System.Drawing">
     <value>219, 29</value>
@@ -763,7 +739,7 @@
     <value>TabPage3</value>
   </data>
   <data name="&gt;&gt;Button1.ZOrder" xml:space="preserve">
-    <value>9</value>
+    <value>8</value>
   </data>
   <data name="btnLogMail.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
     <value>MiddleLeft</value>
@@ -793,7 +769,7 @@
     <value>TabPage3</value>
   </data>
   <data name="&gt;&gt;btnLogMail.ZOrder" xml:space="preserve">
-    <value>10</value>
+    <value>9</value>
   </data>
   <data name="TabPage3.Location" type="System.Drawing.Point, System.Drawing">
     <value>4, 26</value>
@@ -838,7 +814,7 @@
     <value>Speichere Log als...</value>
   </data>
   <data name="ContextMenuInternalLog.Size" type="System.Drawing.Size, System.Drawing">
-    <value>198, 48</value>
+    <value>198, 70</value>
   </data>
   <data name="&gt;&gt;ContextMenuInternalLog.Name" xml:space="preserve">
     <value>ContextMenuInternalLog</value>
@@ -855,9 +831,6 @@
   <data name="GridControlLogs.Location" type="System.Drawing.Point, System.Drawing">
     <value>3, 3</value>
   </data>
-  <data name="gvLogs.Appearance.OddRow.BackColor" type="System.Drawing.Color, System.Drawing">
-    <value>LightCyan</value>
-  </data>
   <data name="GridControlLogs.Size" type="System.Drawing.Size, System.Drawing">
     <value>826, 312</value>
   </data>
@@ -991,7 +964,7 @@
     <value>DD_DMSLiteDataSet</value>
   </data>
   <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;TBPM_KONFIGURATIONBindingSource.Name" xml:space="preserve">
     <value>TBPM_KONFIGURATIONBindingSource</value>
@@ -1003,13 +976,13 @@
     <value>TBPM_KONFIGURATIONTableAdapter</value>
   </data>
   <data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
     <value>TableAdapterManager</value>
   </data>
   <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;SaveFileDialog1.Name" xml:space="preserve">
     <value>SaveFileDialog1</value>

app/DD_PM_WINDREAM/frmKonfig.vb

@@ -150,22 +150,6 @@ Public Class frmKonfig
         MsgBox("Culture-Name: " & CultureInfo.CurrentCulture.Name & vbNewLine & "Culture-ThreeLetterISOLanguageName: " & CultureInfo.CurrentCulture.ThreeLetterISOLanguageName & vbNewLine &
                "CurrentUICulture-Name: " & CultureInfo.CurrentUICulture.Name & vbNewLine & "CurrentUICulture-ThreeLetterISOLanguageName: " & CultureInfo.CurrentUICulture.ThreeLetterISOLanguageName)
     End Sub
-
-    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
-        Dim p As Process
-        Dim processes As Process()
-        processes = Process.GetProcesses()
-        Dim msg As String
-        For Each p In processes
-            If p.ProcessName <> "svchost" Then
-                msg = msg & p.ProcessName & vbNewLine
-            End If
-
-
-        Next
-        MsgBox("Liste der Processnames: " & vbNewLine & msg, MsgBoxStyle.Information)
-    End Sub
-
     Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs)
         My.Settings.Save()
     End Sub

app/DD_PM_WINDREAM/frmLicense.Designer.vb

@@ -39,10 +39,10 @@ Partial Class frmLicense
         Me.txtNewlizences = New System.Windows.Forms.TextBox()
         Me.lblnewlicenses = New System.Windows.Forms.Label()
         Me.lblAktuelleLizenzen = New System.Windows.Forms.Label()
-        Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
         Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.TBPM_KONFIGURATIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
+        Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
-        Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
         Me.grbBoxlicense.SuspendLayout()
         CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -121,7 +121,7 @@ Partial Class frmLicense
         '
         'btnnewLicenses
         '
-        Me.btnnewLicenses.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.key_go
+        Me.btnnewLicenses.Image = Global.DD_ProcessManager.My.Resources.Resources.key_go
         resources.ApplyResources(Me.btnnewLicenses, "btnnewLicenses")
         Me.btnnewLicenses.Name = "btnnewLicenses"
         Me.btnnewLicenses.UseVisualStyleBackColor = True
@@ -169,7 +169,7 @@ Partial Class frmLicense
         Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
-        Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
         'frmLicense
         '
@@ -199,10 +199,10 @@ Partial Class frmLicense
     Friend WithEvents txtNewlizences As System.Windows.Forms.TextBox
     Friend WithEvents lblnewlicenses As System.Windows.Forms.Label
     Friend WithEvents lblAktuelleLizenzen As System.Windows.Forms.Label
-    Friend WithEvents DD_DMSLiteDataSet As DD_PM_WINDREAM.DD_DMSLiteDataSet
+    Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
     Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
+    Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
-    Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
+    Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
     Friend WithEvents Label1 As System.Windows.Forms.Label
     Friend WithEvents dtp_Gültigkeit As System.Windows.Forms.DateTimePicker
     Friend WithEvents Label3 As System.Windows.Forms.Label

app/DD_PM_WINDREAM/frmLicense.resx

@@ -571,7 +571,7 @@
     <value>DD_DMSLiteDataSet</value>
   </data>
   <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;TBPM_KONFIGURATIONBindingSource.Name" xml:space="preserve">
     <value>TBPM_KONFIGURATIONBindingSource</value>
@@ -583,13 +583,13 @@
     <value>TBPM_KONFIGURATIONTableAdapter</value>
   </data>
   <data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
     <value>TableAdapterManager</value>
   </data>
   <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
     <value>frmLicense</value>

app/DD_PM_WINDREAM/frmLoginAdmin.Designer.vb

@@ -28,10 +28,10 @@ Partial Class frmLoginAdmin
         Me.Label1 = New System.Windows.Forms.Label()
         Me.btnAbbruch = New System.Windows.Forms.Button()
         Me.btnok = New System.Windows.Forms.Button()
-        Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
         Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.TBPM_KONFIGURATIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
+        Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
-        Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
         Me.Button1 = New System.Windows.Forms.Button()
         CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -88,11 +88,11 @@ Partial Class frmLoginAdmin
         Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
-        Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
         'Button1
         '
-        Me.Button1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.asterisk_yellow
+        Me.Button1.Image = Global.DD_ProcessManager.My.Resources.Resources.asterisk_yellow
         resources.ApplyResources(Me.Button1, "Button1")
         Me.Button1.Name = "Button1"
         Me.Button1.UseVisualStyleBackColor = True
@@ -120,9 +120,9 @@ Partial Class frmLoginAdmin
     Friend WithEvents Label1 As System.Windows.Forms.Label
     Friend WithEvents btnAbbruch As System.Windows.Forms.Button
     Friend WithEvents btnok As System.Windows.Forms.Button
-    Friend WithEvents DD_DMSLiteDataSet As DD_PM_WINDREAM.DD_DMSLiteDataSet
+    Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
     Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
+    Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
-    Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
+    Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
     Friend WithEvents Button1 As System.Windows.Forms.Button
 End Class

app/DD_PM_WINDREAM/frmLoginAdmin.resx

@@ -280,7 +280,7 @@
     <value>DD_DMSLiteDataSet</value>
   </data>
   <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;TBPM_KONFIGURATIONBindingSource.Name" xml:space="preserve">
     <value>TBPM_KONFIGURATIONBindingSource</value>
@@ -292,13 +292,13 @@
     <value>TBPM_KONFIGURATIONTableAdapter</value>
   </data>
   <data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
     <value>TableAdapterManager</value>
   </data>
   <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
-    <value>DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
     <value>frmLoginAdmin</value>

app/DD_PM_WINDREAM/frmMassValidator.Designer.vb

@@ -22,7 +22,6 @@ Partial Class frmMassValidator
     '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(frmMassValidator))
         Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
         Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
@@ -31,13 +30,10 @@ Partial Class frmMassValidator
         Me.pnldesigner = New System.Windows.Forms.Panel()
         Me.btnSave = New System.Windows.Forms.Button()
         Me.DESCRIPTIONLabel = New System.Windows.Forms.Label()
-        Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
-        Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
+        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
-        Me.TBPM_CONTROL_TABLETableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
-        Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
         Me.StatusStrip1.SuspendLayout()
         CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'ToolStrip1
@@ -96,7 +92,7 @@ Partial Class frmMassValidator
         Me.btnSave.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.btnSave.Font = New System.Drawing.Font("Tahoma", 9.75!)
-        Me.btnSave.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.flag_pink
+        Me.btnSave.Image = Global.DD_ProcessManager.My.Resources.Resources.flag_pink
         Me.btnSave.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
         Me.btnSave.ImeMode = System.Windows.Forms.ImeMode.NoControl
         Me.btnSave.Location = New System.Drawing.Point(12, 464)
@@ -122,21 +118,13 @@ Partial Class frmMassValidator
         Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
         Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
         '
-        'TBPM_CONTROL_TABLEBindingSource
-        '
-        Me.TBPM_CONTROL_TABLEBindingSource.DataMember = "TBPM_CONTROL_TABLE"
-        Me.TBPM_CONTROL_TABLEBindingSource.DataSource = Me.DD_DMSLiteDataSet
-        '
-        'TBPM_CONTROL_TABLETableAdapter
-        '
-        Me.TBPM_CONTROL_TABLETableAdapter.ClearBeforeFill = True
-        '
         'TableAdapterManager
         '
         Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
         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 = Me.TBPM_CONTROL_TABLETableAdapter
         Me.TableAdapterManager.TBPM_ERROR_LOGTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_KONFIGURATIONTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_PROFILE_CONTROLSTableAdapter = Nothing
@@ -144,7 +132,7 @@ Partial Class frmMassValidator
         Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
         Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
         Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
-        Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
+        Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
         'frmMassValidator
         '
@@ -165,7 +153,6 @@ Partial Class frmMassValidator
         Me.StatusStrip1.ResumeLayout(False)
         Me.StatusStrip1.PerformLayout()
         CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -179,7 +166,5 @@ Partial Class frmMassValidator
     Friend WithEvents tslblCountDocs As ToolStripStatusLabel
     Friend WithEvents DESCRIPTIONLabel As Label
     Friend WithEvents DD_DMSLiteDataSet As DD_DMSLiteDataSet
-    Friend WithEvents TBPM_CONTROL_TABLEBindingSource As BindingSource
-    Friend WithEvents TBPM_CONTROL_TABLETableAdapter As DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter
     Friend WithEvents TableAdapterManager As DD_DMSLiteDataSetTableAdapters.TableAdapterManager
 End Class

app/DD_PM_WINDREAM/frmMassValidator.resx

@@ -126,12 +126,6 @@
   <metadata name="DD_DMSLiteDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>241, 17</value>
   </metadata>
-  <metadata name="TBPM_CONTROL_TABLEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>403, 17</value>
-  </metadata>
-  <metadata name="TBPM_CONTROL_TABLETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>664, 17</value>
-  </metadata>
   <metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>919, 17</value>
   </metadata>

app/DD_PM_WINDREAM/frmMassValidator.vb

@@ -68,7 +68,7 @@ Public Class frmMassValidator
         End Try
 
         ' Try
-        Delimiter = CURRENT_DT_CONFIG.Rows(0).Item("VEKTOR_DELIMITER")
+        Delimiter = BASEDATA_DT_CONFIG.Rows(0).Item("VEKTOR_DELIMITER")
 
         If CURRENT_DT_PROFILE.Rows.Count = 0 Then
             LOGGER.Info(">> Profildaten konnten nicht geladen werden - Übergebenes Profil: : " & CURRENT_ProfilName, True)
@@ -83,6 +83,7 @@ Public Class frmMassValidator
                 For Each dr In CURRENT_DT_PROFILE.Rows
                     PROFIL_VEKTORINDEX = dr.Item("PM_VEKTOR_INDEX")
                     PROFIL_LOGINDEX = dr.Item("LOG_INDEX")
+                    CURRENT_PROFILE_LOG_INDEX = PROFIL_LOGINDEX
                     Me.Text = "Process Manager - " & dr.Item("TITLE")
                     TITLELabel1.Text = dr.Item("TITLE")
                     DESCRIPTIONLabel.Text = IIf(IsDBNull(dr.Item("DESCRIPTION")), "", dr.Item("DESCRIPTION"))
@@ -352,15 +353,9 @@ Public Class frmMassValidator
 
                     Case "TABLE"
                         LOGGER.Debug("Versuch Tabelle zu laden")
+                        Dim oDTMyColumns As DataTable = ClassDatabase.Return_Datatable($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {oControlRow.Item("GUID")} ORDER BY SEQUENCE")
 
-                        TBPM_CONTROL_TABLETableAdapter.Connection.ConnectionString = CONNECTION_STRING
+                        oControl = ClassControlCreator.CreateExistingGridControl(oControlRow, oDTMyColumns, False)
-                        TBPM_CONTROL_TABLETableAdapter.Fill(DD_DMSLiteDataSet.TBPM_CONTROL_TABLE, oControlRow.Item("GUID"))
-
-                        Dim columns As List(Of DD_DMSLiteDataSet.TBPM_CONTROL_TABLERow) = (From r As DD_DMSLiteDataSet.TBPM_CONTROL_TABLERow In DD_DMSLiteDataSet.TBPM_CONTROL_TABLE
-                                                                                           Where r.CONTROL_ID = oControlRow.Item("GUID")
-                                                                                           Select r).ToList()
-
-                        oControl = ClassControlCreator.CreateExistingGridControl(oControlRow, columns, False)
                 End Select
 
                 If oControl IsNot Nothing AndAlso TypeOf oControl IsNot Label Then
@@ -545,7 +540,7 @@ Public Class frmMassValidator
                                     Select Case Typ
                                             'Tabellendarstellung
                                         Case "TABLE"
-                                            Dim dt As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = " & CONTROL_ID)
+                                            Dim dt As DataTable = ClassDatabase.Return_Datatable($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {CONTROL_ID} ORDER BY SEQUENCE")
                                             Dim SpaltenWerte As String()
                                             If dt.Rows.Count > 1 Then
                                                 For Each Zeile As Object In wertWD
@@ -1329,7 +1324,7 @@ Public Class frmMassValidator
     Private Function CreateWMObject() As String
         CURRENT_WMFILE = Nothing
         LOGGER.Debug($"in GetWMDocFileString...'")
-        Dim oWMRELPATH As String = CURRENT_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH")
+        Dim oWMRELPATH As String = BASEDATA_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH")
         If oWMRELPATH.EndsWith("\") = False Then
             oWMRELPATH = oWMRELPATH & "\"
         End If

app/DD_PM_WINDREAM/frmMetadataFile.Designer.vb

@@ -0,0 +1,116 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmMetadataFile
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMetadataFile))
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl1.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 1
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.Size = New System.Drawing.Size(1155, 158)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "RibbonPage1"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 586)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1155, 24)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'SplitContainerControl1
+        '
+        Me.SplitContainerControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 158)
+        Me.SplitContainerControl1.Name = "SplitContainerControl1"
+        Me.SplitContainerControl1.Panel1.Text = "Panel1"
+        Me.SplitContainerControl1.Panel2.Text = "Panel2"
+        Me.SplitContainerControl1.Size = New System.Drawing.Size(1155, 428)
+        Me.SplitContainerControl1.SplitterPosition = 387
+        Me.SplitContainerControl1.TabIndex = 2
+        '
+        'frmMetadataFile
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(1155, 610)
+        Me.Controls.Add(Me.SplitContainerControl1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.LargeImage = CType(resources.GetObject("frmMetadataFile.IconOptions.LargeImage"), System.Drawing.Image)
+        Me.Name = "frmMetadataFile"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "Metadaten Objekt"
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl1.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents SplitContainerControl1 As DevExpress.XtraEditors.SplitContainerControl
+End Class

app/DD_PM_WINDREAM/frmMetadataFile.resx

@@ -0,0 +1,132 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="frmMetadataFile.IconOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAE3RFWHRUaXRsZQBQcm9qZWN0
+        O0ZpbGU7PfuNggAAANNJREFUWEftkl8OwiAMh3c+E67kg+HJiDfgHl6Gi+hDpYuQ4lqBzeCftMmXFDZ+
+        /ZYxAcBHYTdHUizM4SJhItCIoZk1ikU8LMENEqGZNYpFPCyRwrlnlP8VaIJmtZKbGNBz0dayuKBUgDvw
+        dtK8xM8KzP/8GRrcSm5iADdIYrLWQo29Pebee7+jgxO5YYa8YhZoLXz35M6sxDCBEAIrkRsEg1vpFcBC
+        CefcjUrQ4dyXSqwSwHpIXJPEMAGOWGMEuFIBFVABFVgI9KICKvAVAlsBgOkOw0LU8llAlxoAAAAASUVO
+        RK5CYII=
+</value>
+  </data>
+</root>

app/DD_PM_WINDREAM/frmMetadataFile.vb

@@ -0,0 +1,3 @@
+Public Class frmMetadataFile
+
+End Class

app/DD_PM_WINDREAM/frmMonitor.Designer.vb

@@ -27,6 +27,9 @@ Partial Class frmMonitor
         Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
         Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
         Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarStaticItemInfoDoc = New DevExpress.XtraBars.BarStaticItem()
+        Me.BarStaticItemInfo = New DevExpress.XtraBars.BarStaticItem()
         Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
@@ -43,7 +46,8 @@ Partial Class frmMonitor
         Me.GridControl4 = New DevExpress.XtraGrid.GridControl()
         Me.GridView4 = New DevExpress.XtraGrid.Views.Grid.GridView()
         Me.XtraSaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
-        Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
+        Me.SplitContainerControlMain = New DevExpress.XtraEditors.SplitContainerControl()
+        Me.DocumentViewerMonitor = New DigitalData.Controls.DocumentViewer.DocumentViewer()
         CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SplitContainerControl1.SuspendLayout()
@@ -59,15 +63,17 @@ Partial Class frmMonitor
         CType(Me.GridView3, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridControl4, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridView4, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControlMain, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControlMain.SuspendLayout()
         Me.SuspendLayout()
         '
         'RibbonControl1
         '
         Me.RibbonControl1.AutoHideEmptyItems = True
         Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4})
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarStaticItemInfoDoc, Me.BarStaticItemInfo})
         Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
-        Me.RibbonControl1.MaxItemId = 5
+        Me.RibbonControl1.MaxItemId = 7
         Me.RibbonControl1.Name = "RibbonControl1"
         Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
         Me.RibbonControl1.Size = New System.Drawing.Size(1202, 158)
@@ -96,6 +102,31 @@ Partial Class frmMonitor
         Me.BarButtonItem3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImage"), System.Drawing.Image)
         Me.BarButtonItem3.Name = "BarButtonItem3"
         '
+        'BarButtonItem4
+        '
+        Me.BarButtonItem4.Caption = "Layouts zurücksetzen"
+        Me.BarButtonItem4.Id = 4
+        Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image)
+        Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image)
+        Me.BarButtonItem4.Name = "BarButtonItem4"
+        '
+        'BarStaticItemInfoDoc
+        '
+        Me.BarStaticItemInfoDoc.Caption = "No Row Selected"
+        Me.BarStaticItemInfoDoc.Id = 5
+        Me.BarStaticItemInfoDoc.Name = "BarStaticItemInfoDoc"
+        '
+        'BarStaticItemInfo
+        '
+        Me.BarStaticItemInfo.Caption = "BarStaticItemInfo"
+        Me.BarStaticItemInfo.Id = 6
+        Me.BarStaticItemInfo.ItemAppearance.Normal.BackColor = System.Drawing.Color.OrangeRed
+        Me.BarStaticItemInfo.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Black
+        Me.BarStaticItemInfo.ItemAppearance.Normal.Options.UseBackColor = True
+        Me.BarStaticItemInfo.ItemAppearance.Normal.Options.UseForeColor = True
+        Me.BarStaticItemInfo.Name = "BarStaticItemInfo"
+        Me.BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+        '
         'RibbonPage1
         '
         Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
@@ -112,6 +143,8 @@ Partial Class frmMonitor
         '
         'RibbonStatusBar1
         '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItemInfoDoc)
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItemInfo)
         Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 673)
         Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
         Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
@@ -125,13 +158,13 @@ Partial Class frmMonitor
         'SplitContainerControl1
         '
         Me.SplitContainerControl1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 158)
+        Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 0)
         Me.SplitContainerControl1.Name = "SplitContainerControl1"
         Me.SplitContainerControl1.Panel1.Controls.Add(Me.GridControl1)
         Me.SplitContainerControl1.Panel1.Text = "Panel1"
         Me.SplitContainerControl1.Panel2.Controls.Add(Me.SplitContainerControl2)
         Me.SplitContainerControl1.Panel2.Text = "Panel2"
-        Me.SplitContainerControl1.Size = New System.Drawing.Size(1202, 515)
+        Me.SplitContainerControl1.Size = New System.Drawing.Size(866, 515)
         Me.SplitContainerControl1.SplitterPosition = 510
         Me.SplitContainerControl1.TabIndex = 2
         '
@@ -154,6 +187,9 @@ Partial Class frmMonitor
         Me.GridView1.Name = "GridView1"
         Me.GridView1.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
         Me.GridView1.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
+        Me.GridView1.OptionsBehavior.Editable = False
+        Me.GridView1.OptionsBehavior.ReadOnly = True
+        Me.GridView1.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False]
         Me.GridView1.OptionsView.EnableAppearanceEvenRow = True
         Me.GridView1.OptionsView.ShowAutoFilterRow = True
         Me.GridView1.OptionsView.ShowViewCaption = True
@@ -170,7 +206,7 @@ Partial Class frmMonitor
         Me.SplitContainerControl2.Panel1.Text = "Panel1"
         Me.SplitContainerControl2.Panel2.Controls.Add(Me.SplitContainerControl3)
         Me.SplitContainerControl2.Panel2.Text = "Panel2"
-        Me.SplitContainerControl2.Size = New System.Drawing.Size(682, 515)
+        Me.SplitContainerControl2.Size = New System.Drawing.Size(346, 515)
         Me.SplitContainerControl2.SplitterPosition = 270
         Me.SplitContainerControl2.TabIndex = 0
         '
@@ -181,7 +217,7 @@ Partial Class frmMonitor
         Me.GridControl2.MainView = Me.GridView2
         Me.GridControl2.MenuManager = Me.RibbonControl1
         Me.GridControl2.Name = "GridControl2"
-        Me.GridControl2.Size = New System.Drawing.Size(682, 270)
+        Me.GridControl2.Size = New System.Drawing.Size(346, 270)
         Me.GridControl2.TabIndex = 1
         Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
         '
@@ -193,6 +229,9 @@ Partial Class frmMonitor
         Me.GridView2.Name = "GridView2"
         Me.GridView2.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
         Me.GridView2.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
+        Me.GridView2.OptionsBehavior.Editable = False
+        Me.GridView2.OptionsBehavior.ReadOnly = True
+        Me.GridView2.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False]
         Me.GridView2.OptionsView.EnableAppearanceEvenRow = True
         Me.GridView2.OptionsView.ShowAutoFilterRow = True
         Me.GridView2.OptionsView.ShowViewCaption = True
@@ -208,7 +247,7 @@ Partial Class frmMonitor
         Me.SplitContainerControl3.Panel1.Text = "Panel1"
         Me.SplitContainerControl3.Panel2.Controls.Add(Me.GridControl4)
         Me.SplitContainerControl3.Panel2.Text = "Panel2"
-        Me.SplitContainerControl3.Size = New System.Drawing.Size(682, 235)
+        Me.SplitContainerControl3.Size = New System.Drawing.Size(346, 235)
         Me.SplitContainerControl3.SplitterPosition = 400
         Me.SplitContainerControl3.TabIndex = 0
         '
@@ -219,7 +258,7 @@ Partial Class frmMonitor
         Me.GridControl3.MainView = Me.GridView3
         Me.GridControl3.MenuManager = Me.RibbonControl1
         Me.GridControl3.Name = "GridControl3"
-        Me.GridControl3.Size = New System.Drawing.Size(400, 235)
+        Me.GridControl3.Size = New System.Drawing.Size(336, 235)
         Me.GridControl3.TabIndex = 2
         Me.GridControl3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView3})
         '
@@ -231,6 +270,9 @@ Partial Class frmMonitor
         Me.GridView3.Name = "GridView3"
         Me.GridView3.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
         Me.GridView3.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
+        Me.GridView3.OptionsBehavior.Editable = False
+        Me.GridView3.OptionsBehavior.ReadOnly = True
+        Me.GridView3.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False]
         Me.GridView3.OptionsView.EnableAppearanceEvenRow = True
         Me.GridView3.OptionsView.ShowAutoFilterRow = True
         Me.GridView3.OptionsView.ShowViewCaption = True
@@ -243,7 +285,7 @@ Partial Class frmMonitor
         Me.GridControl4.MainView = Me.GridView4
         Me.GridControl4.MenuManager = Me.RibbonControl1
         Me.GridControl4.Name = "GridControl4"
-        Me.GridControl4.Size = New System.Drawing.Size(272, 235)
+        Me.GridControl4.Size = New System.Drawing.Size(0, 0)
         Me.GridControl4.TabIndex = 3
         Me.GridControl4.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView4})
         '
@@ -264,22 +306,37 @@ Partial Class frmMonitor
         '
         Me.XtraSaveFileDialog1.Filter = """xlsx-Dateien|*.xlsx"""
         '
-        'BarButtonItem4
+        'SplitContainerControlMain
         '
-        Me.BarButtonItem4.Caption = "Layouts zurücksetzen"
+        Me.SplitContainerControlMain.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel1
-        Me.BarButtonItem4.Id = 4
+        Me.SplitContainerControlMain.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image)
+        Me.SplitContainerControlMain.Location = New System.Drawing.Point(0, 158)
-        Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image)
+        Me.SplitContainerControlMain.Name = "SplitContainerControlMain"
-        Me.BarButtonItem4.Name = "BarButtonItem4"
+        Me.SplitContainerControlMain.Panel1.Controls.Add(Me.DocumentViewerMonitor)
+        Me.SplitContainerControlMain.Panel1.Text = "Panel1"
+        Me.SplitContainerControlMain.Panel2.Controls.Add(Me.SplitContainerControl1)
+        Me.SplitContainerControlMain.Panel2.Text = "Panel2"
+        Me.SplitContainerControlMain.Size = New System.Drawing.Size(1202, 515)
+        Me.SplitContainerControlMain.SplitterPosition = 326
+        Me.SplitContainerControlMain.TabIndex = 5
+        '
+        'DocumentViewerMonitor
+        '
+        Me.DocumentViewerMonitor.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.DocumentViewerMonitor.Location = New System.Drawing.Point(0, 0)
+        Me.DocumentViewerMonitor.Name = "DocumentViewerMonitor"
+        Me.DocumentViewerMonitor.Size = New System.Drawing.Size(326, 515)
+        Me.DocumentViewerMonitor.TabIndex = 0
         '
         'frmMonitor
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(1202, 697)
-        Me.Controls.Add(Me.SplitContainerControl1)
+        Me.Controls.Add(Me.SplitContainerControlMain)
         Me.Controls.Add(Me.RibbonStatusBar1)
         Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.LargeImage = CType(resources.GetObject("frmMonitor.IconOptions.LargeImage"), System.Drawing.Image)
         Me.Name = "frmMonitor"
         Me.Ribbon = Me.RibbonControl1
         Me.StatusBar = Me.RibbonStatusBar1
@@ -299,6 +356,8 @@ Partial Class frmMonitor
         CType(Me.GridView3, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridControl4, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridView4, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControlMain, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControlMain.ResumeLayout(False)
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -325,4 +384,8 @@ Partial Class frmMonitor
     Friend WithEvents XtraSaveFileDialog1 As SaveFileDialog
     Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents SplitContainerControlMain As DevExpress.XtraEditors.SplitContainerControl
+    Friend WithEvents BarStaticItemInfoDoc As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents BarStaticItemInfo As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents DocumentViewerMonitor As DigitalData.Controls.DocumentViewer.DocumentViewer
 End Class

app/DD_PM_WINDREAM/frmMonitor.resx

@@ -170,28 +170,37 @@
   </data>
   <data name="BarButtonItem4.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
-        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAJXRFWHRUaXRsZQBDbGVhcjtF
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAENsZWFyO0VyYXNlO1JlbW92ZTtC
-        cmFzZTtSZW1vdmU7QmFycztSaWJib247h4CDcwAAAIxJREFUOE+lkNsNgCAQBO3JFvylCjuxKkuxm5Ml
+        YXJzO1JpYmJvbjuHgINzAAAAjElEQVQ4T6WQ2w2AIBAE7ckW/KUKO7EqS7GbkyV3eMCCBj8mvnYmwUVE
-        d3jAggY/Jr52JsFFRH5BX1775gkRUXBfbIsHAyPFyzRSiAYGOqxlI0caGeiAiZ6A7aycwH5aBixAhx3a
+        fkFfXvvmCRFRcF9siwcDI8XLNFKIBgY6rGUjRxoZ6ICJnoDtrJzAfloGLECHHdojkFGP5yeG41wjgqt+
-        I5BRj+cnhuNcI4KrfmCCJ8nAApCNt0iWAQuMIo1cH2EUKWTgA92IjUZYgEbqMYO+/I4sN6ixgsCcjQTu
+        YIInycACkI23SJYBC4wijVwfYRQpZOAD3YiNRliARuoxg778jiw3qLGCwJyNBO4AAAAASUVORK5CYII=
-        AAAAAElFTkSuQmCC
 </value>
   </data>
   <data name="BarButtonItem4.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
-        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAJXRFWHRUaXRsZQBDbGVhcjtF
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAENsZWFyO0VyYXNlO1JlbW92ZTtC
-        cmFzZTtSZW1vdmU7QmFycztSaWJib247h4CDcwAAATVJREFUWEfFkdFtwzAMRLNTV+ivp+gmnaqjZBtV
+        YXJzO1JpYmJvbjuHgINzAAABNUlEQVRYR8WR0W3DMAxEs1NX6K+n6CadqqNkG1Vn6ASSPtmSJTgfD7EJ
-        Z+gEkj7ZkiU4Hw+xCfLeIX6llD6KHD6JHFreP98jbJlUwLPMtMihBSGdWHl3CTm0IKADJSd7iQjznUyh
+        8t4hfqWUPoocPokcWt4/3yNsmVTAs8y0yKEFIZ1YeXcJObQgoAMlJ3uJCPOdTKGOA2dycijBfCdTxMNA
-        jgNncnIowXwnU8TDQI+cuBLMdzKFPQqMyEktwXwnU/AgcEdO9hLMdzIFlgMzcrIx/yCM5OXV8h3mH4SR
+        j5y4Esx3MoU9CozISS3BfCdT8CBwR072Esx3MgWWAzNysjH/IIzk5dXyHeYfhJG8vFwOmH8QRvLycnlm
-        vLxcDph/EEby8nJ5ZugTLJdnar6TRcqyCrnLLgd0OKGlLKuQu1Q5oMdJLeVoFVIO3IulHK7AyYH1uJft
+        6BMsl2dqvpNFyrIKucsuB3Q4oaUsq5C7VDmgx0kt5WgVUg7ci6UcrsDJgfW4l+337yuT8FsOVeAIBzmw
-        9+8rk/BbDlXgCAc5sE4lJ7MlpBy0Clj5bImmHIwUAKMlTuWgVSB+AktviUs5aBWYLdElB2cF7pboloOr
+        TiUnsyWkHLQKWPlsiaYcjBQAoyVO5aBVIH4CS2+JSzloFZgt0SUHZwXuluiWg6sCoyWG5KCnwGUJGzJD
-        AqMlhuSgp8BlCRsyQ33IoYpmCd7NUh9yaAtVYv0/8Cnk8Enk8DnS6x9vj+lSV2uHuAAAAABJRU5ErkJg
+        fcihimYJ3s1SH3JoC1Vi/T/wKeTwSeTwOdLrH2+P6VJXa4e4AAAAAElFTkSuQmCC
-        gg==
 </value>
   </data>
   <metadata name="XtraSaveFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>17, 17</value>
   </metadata>
+  <data name="frmMonitor.IconOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAG3RFWHRUaXRsZQBGaW5kO0lk
+        O0xvY2F0ZTtTZWFyY2jIzddfAAAA8UlEQVRYR+2SUQ7CMAxDd0GuwUHQLsFNuF1GUItcz62ydRti2seT
+        iHEcUzGY2U+R4pFI8UikyNweLyOUZ+Zjj0KKTDQ46kOkyESDoz5EihkOZJb6FFLMpIA7hiHkU3x2s08h
+        xQyGVECf4irwxwUoqEbYi9mIFJ202Pr1UZqvIEUHlzvZrwB5aywrQMubw/eKwUnGLZ6ekS9RDA6aN+Zk
+        BSp7La4CuxcIwXsz4W3yA6sKjONoS/C9IsRJB7oKoC7mJ/q+X2TSge4XcE3NqPvnIsThQzXE3kkK9JCD
+        +RDOqPtnGbQWDEaN5vafsIccHMXMhglfvuDzjoUOrAAAAABJRU5ErkJggg==
+</value>
+  </data>
 </root>

app/DD_PM_WINDREAM/frmMonitor.vb

@@ -14,7 +14,7 @@ Public Class frmMonitor
     Dim GRID4_TITLE As String
     Dim GRID4_SQL As String
     Private _ActiveGrid As GridControl = Nothing
-    Private _frmDocView As frmDocView 'You need a reference to Form1
+    ' Private _frmDocView As frmDocView 'You need a reference to Form1
     Dim FormShown As Boolean = False
     Private Sub GridView1_FocusedRowChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.FocusedRowChangedEventArgs) Handles GridView1.FocusedRowChanged
         If FormShown = False Then Exit Sub
@@ -32,58 +32,98 @@ Public Class frmMonitor
                 oDocPath = GridView1.GetFocusedRowCellValue(GridView1.Columns("FULL_FILE_PATH"))
             Catch ex As Exception
                 LOGGER.Warn($"Error getting DocPath in Monitor: {ex.Message}")
+                oDocPath = String.Empty
             End Try
+            BarStaticItemInfoDoc.Caption = $"DocID: {oDocID} - Docpath: {oDocPath}"
             Dim oDetailSQL = GRID2_SQL
             oDetailSQL = oDetailSQL.Replace("@DocID", oDocID)
-            oDetailSQL = oDetailSQL.ToLower.Replace("@idbobjid", oDocID)
+            oDetailSQL = oDetailSQL.Replace("@IDBOBJID", oDocID)
             oDetailSQL = oDetailSQL.Replace("@UserID", USER_ID)
             oDetailSQL = oDetailSQL.Replace("@UserName", USER_USERNAME)
             Dim oDT2 As DataTable = ClassDatabase.Return_Datatable(oDetailSQL)
             If Not IsNothing(oDT2) Then
+                LOGGER.Debug($"Found {oDT2.Rows.Count} rows for GridView2")
                 GridView2.Columns.Clear()
                 GridControl2.DataSource = oDT2
+                Try
+                    GridView2.Columns("Wann").DisplayFormat.FormatType = FormatType.DateTime
+                    GridView2.Columns("Wann").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
+                Catch ex As Exception
+                    GridView2.Columns("When").DisplayFormat.FormatType = FormatType.DateTime
+                    GridView2.Columns("When").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
+                End Try
+
             End If
             If DT_MONITOR_KONFIG.Rows.Count > 2 Then
                 oDetailSQL = GRID3_SQL
                 oDetailSQL = oDetailSQL.Replace("@DocID", oDocID)
-                oDetailSQL = oDetailSQL.ToLower.Replace("@idbobjid", oDocID)
+                oDetailSQL = oDetailSQL.Replace("@IDBOBJID", oDocID)
                 oDetailSQL = oDetailSQL.Replace("@UserID", USER_ID)
                 oDetailSQL = oDetailSQL.Replace("@UserName", USER_USERNAME)
                 Dim oDT3 As DataTable = ClassDatabase.Return_Datatable(oDetailSQL)
                 If Not IsNothing(oDT3) Then
+                    LOGGER.Debug($"Found {oDT3.Rows.Count} rows for GridView3")
                     GridView3.Columns.Clear()
                     GridControl3.DataSource = oDT3
                 End If
                 If DT_MONITOR_KONFIG.Rows.Count = 4 Then
                     oDetailSQL = GRID4_SQL
                     oDetailSQL = oDetailSQL.Replace("@DocID", oDocID)
-                    oDetailSQL = oDetailSQL.ToLower.Replace("@idbobjid", oDocID)
+                    oDetailSQL = oDetailSQL.Replace("@IDBOBJID", oDocID)
                     oDetailSQL = oDetailSQL.Replace("@UserID", USER_ID)
                     oDetailSQL = oDetailSQL.Replace("@UserName", USER_USERNAME)
                     Dim oDT4 As DataTable = ClassDatabase.Return_Datatable(oDetailSQL)
                     If Not IsNothing(oDT4) Then
+                        LOGGER.Debug($"Found {oDT4.Rows.Count} rows for GridView4")
                         GridView4.Columns.Clear()
                         GridControl4.DataSource = oDT4
+                        Try
+                            GridView4.Columns("Geändert wann").DisplayFormat.FormatType = FormatType.DateTime
+                            GridView4.Columns("Geändert wann").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
+                        Catch ex As Exception
+                            GridView4.Columns("Changed when").DisplayFormat.FormatType = FormatType.DateTime
+                            GridView4.Columns("Changed when").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
+                        End Try
                     End If
                 End If
             End If
 
-
+            Load_Doc(oDocPath)
-            If BarButtonItem3.Caption <> "DocView aktivieren" And oDocPath <> "" Then
-                If Not Application.OpenForms().OfType(Of frmValidator).Any Then
-                    frmDocView.Show()
-                    _frmDocView = frmDocView
-                End If
-                _frmDocView.LoadFile(oDocPath)
-
-            End If
-
 
         Catch ex As Exception
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Error GridView1.FocusedRowChanged:")
         End Try
     End Sub
+    Sub Load_Doc(oDocPath As String)
+        Try
+            If SplitContainerControlMain.Collapsed = False And oDocPath <> String.Empty Then
+                'If Not Application.OpenForms().OfType(Of frmValidator).Any Then
+                '    frmDocView.Show()
+                '    _frmDocView = frmDocView
+                'End If
+                '_frmDocView.LoadFile(oDocPath)
+
+                If File.Exists(oDocPath) Then
+                    DocumentViewerMonitor.LoadFile(oDocPath)
+                    BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+                    DocumentViewerMonitor.Visible = True
+                    DocumentViewerMonitor.RightOnlyView(USER_RIGHT_VIEW_ONLY)
+
+                Else
+                    BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
+                    BarStaticItemInfo.Caption = $"File is not existing or accessible!"
+                    DocumentViewerMonitor.Visible = False
+                End If
+
+
+            End If
+        Catch ex As Exception
+            LOGGER.Error(ex.Message)
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in LoadDoc:")
+        End Try
+    End Sub
     Private Sub frmMonitor_Load(sender As Object, e As EventArgs) Handles Me.Load
+        SplitContainerControlMain.Collapsed = True
         Load_Grid_Data()
 
         Select Case DT_MONITOR_KONFIG.Rows.Count
@@ -106,7 +146,11 @@ Public Class frmMonitor
                 SplitContainerControl2.SplitterPosition = CONFIG.Config.MonitorSplitter2_Distance
                 SplitContainerControl3.SplitterPosition = CONFIG.Config.MonitorSplitter3_Distance
         End Select
-
+        Try
+            DocumentViewerMonitor.Init(LOGCONFIG, GDPICTURE_LICENSE)
+        Catch ex As Exception
+            LOGGER.Error(ex)
+        End Try
     End Sub
     Sub Load_Grid_Data()
         Try
@@ -146,8 +190,8 @@ Public Class frmMonitor
                                 GRID3_SQL = DT_MONITOR_KONFIG.Rows(2).Item("GRID_SQL")
                                 GridView3.ViewCaption = GRID3_TITLE
                             Case 4
-                                GRID3_TITLE = DT_MONITOR_KONFIG.Rows(3).Item("GRID_TITLE")
+                                GRID3_TITLE = DT_MONITOR_KONFIG.Rows(2).Item("GRID_TITLE")
-                                GRID3_SQL = DT_MONITOR_KONFIG.Rows(3).Item("GRID_SQL")
+                                GRID3_SQL = DT_MONITOR_KONFIG.Rows(2).Item("GRID_SQL")
                                 GridView3.ViewCaption = GRID3_TITLE
                                 GRID4_TITLE = DT_MONITOR_KONFIG.Rows(3).Item("GRID_TITLE")
                                 GRID4_SQL = DT_MONITOR_KONFIG.Rows(3).Item("GRID_SQL")
@@ -318,9 +362,10 @@ Public Class frmMonitor
         End Select
         CONFIG.Save()
         Try
-            _frmDocView.Close()
+            DocumentViewerMonitor.Done()
+            '_frmDocView.Close()
         Catch ex As Exception
-
+            LOGGER.Error(ex)
         End Try
     End Sub
 
@@ -365,25 +410,43 @@ Public Class frmMonitor
     End Sub
 
     Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
-        If BarButtonItem3.Caption = "DocView aktivieren" Then
+        If SplitContainerControlMain.Collapsed = True Then
+            SplitContainerControlMain.Collapsed = False
+
+            If USER_LANGUAGE = "de-DE" Then
                 BarButtonItem3.Caption = "DocView deaktivieren"
+            Else
+                BarButtonItem3.Caption = "Deactivate DocView"
+            End If
+
             BarButtonItem3.Down = True
             Dim oDocPath
             Try
                 oDocPath = GridView1.GetFocusedRowCellValue(GridView1.Columns("FULL_FILE_PATH"))
+
+
             Catch ex As Exception
                 LOGGER.Warn($"Error getting DocPath in Monitor: {ex.Message}")
+                Exit Sub
             End Try
-            If oDocPath <> "" Then
+            DocumentViewerMonitor?.LoadFile(oDocPath)
-                If Not Application.OpenForms().OfType(Of frmValidator).Any Then
+
-                    frmDocView.Show()
+            'If oDocPath <> "" Then
-                    _frmDocView = frmDocView
+            '    If Not Application.OpenForms().OfType(Of frmValidator).Any Then
-                End If
+            '        frmDocView.Show()
-                _frmDocView.LoadFile(oDocPath)
+            '        _frmDocView = frmDocView
-                Me.SendToBack()
+            '    End If
-            End If
+            '    _frmDocView.LoadFile(oDocPath)
+            '    Me.SendToBack()
+            'End If
         Else
+            SplitContainerControlMain.Collapsed = True
+
+            If USER_LANGUAGE = "de-DE" Then
                 BarButtonItem3.Caption = "DocView aktivieren"
+            Else
+                BarButtonItem3.Caption = "Activate DocView"
+            End If
             BarButtonItem3.Down = False
         End If
 

app/DD_PM_WINDREAM/frmSQL_Admin.Designer.vb

@@ -77,14 +77,14 @@ Partial Class frmSQL_Admin
         'Button1
         '
         resources.ApplyResources(Me.Button1, "Button1")
-        Me.Button1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.book_open
+        Me.Button1.Image = Global.DD_ProcessManager.My.Resources.Resources.book_open
         Me.Button1.Name = "Button1"
         Me.Button1.UseVisualStyleBackColor = True
         '
         'btnrunSQL
         '
         resources.ApplyResources(Me.btnrunSQL, "btnrunSQL")
-        Me.btnrunSQL.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.database_go
+        Me.btnrunSQL.Image = Global.DD_ProcessManager.My.Resources.Resources.database_go
         Me.btnrunSQL.Name = "btnrunSQL"
         Me.btnrunSQL.UseVisualStyleBackColor = True
         '