Nuget packages wiederhergestellt

Buttons, Nicht zuständig

.vs/VSWorkspaceState.json

@@ -2,6 +2,6 @@
   "ExpandedNodes": [
     ""
   ],
-  "SelectedNode": "\\.gitignore",
+  "SelectedNode": "\\TaskFlow.sln",
   "PreviewInSolutionExplorer": false
 }

MARVIN_IST_COOL.txt

@@ -0,0 +1 @@
+Aber El Raho ist cooler!

app/SetupVS19/Config.wxi

@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="utf-8"?>
 <Include>
-  <?define ProgramName="TaskFlow"?>
+  <?define ProgramName="taskFLOW"?>
-  <?define ProductName="TaskFlow"?>
+  <?define ProductName="taskFLOW"?>
   <?define Manufacturer="Digital Data"?>
   <?define Description="Beschreibung des Programms"?>
   <?define Comments="Kommentar wie Copyright-Hinweis"?>

app/SetupVS19/Product.wxs

@@ -1,5 +1,5 @@
-<?define ProgramName="TaskFlow"?>
+<?define ProgramName="taskFLOW"?>
-<?define ProductName="TaskFlow"?>
+<?define ProductName="taskFLOW"?>
 <?define Manufacturer="Digital Data"?>
 <?define Description="Beschreibung des Programms"?>
 <?define Comments="Kommentar wie Copyright-Hinweis"?>
@@ -42,7 +42,7 @@
 		</Upgrade>
 
 		<!-- Legt das Icon fest -->
-		<Icon Id="AppIcon.exe" SourceFile="..\TaskFlow\bin\$(var.Configuration)\$(var.ProgramName).exe" />
+		<Icon Id="AppIcon.exe" SourceFile="..\taskFLOW\bin\$(var.Configuration)\$(var.ProgramName).exe" />
 		<!-- Zeige Icon in Systemsteuerung > Programme entfernen -->
 		<Property Id="ARPPRODUCTICON" Value="AppIcon.exe" />
 
@@ -85,18 +85,18 @@
 		<DirectoryRef Id="INSTALLDIR">
 
 			<Component Id="MainApplicationExe" Guid="71B06048-F595-40CE-B429-79C2F2D6001B" KeyPath="yes">
-				<File Id="MainApplicationExe" Source="..\TaskFlow\bin\$(var.Configuration)\$(var.ProgramName).exe" Name="$(var.ProgramName).exe" KeyPath="no" Checksum="yes" />
+				<File Id="MainApplicationExe" Source="..\taskFLOW\bin\$(var.Configuration)\$(var.ProgramName).exe" Name="$(var.ProgramName).exe" KeyPath="no" Checksum="yes" />
-				<File Id="MainApplicationExeConfig" Source="..\TaskFlow\bin\$(var.Configuration)\$(var.ProgramName).exe.config" Name="$(var.ProgramName).exe.config" KeyPath="no" Checksum="yes" />
+				<File Id="MainApplicationExeConfig" Source="..\taskFLOW\bin\$(var.Configuration)\$(var.ProgramName).exe.config" Name="$(var.ProgramName).exe.config" KeyPath="no" Checksum="yes" />
 				<!--
         <Shortcut Id="DesktopShortcut" Directory="DesktopFolder" Name="$(var.ProductName)" WorkingDirectory="INSTALLDIR" Icon="AppIcon.exe" IconIndex="0" Advertise="no" Target="[#MainApplicationExe]" />
         <Shortcut Id="StartMenuShortcut" Directory="ProgramMenuDir" Name="$(var.ProductName)" WorkingDirectory="INSTALLDIR" Icon="AppIcon.exe" IconIndex="0" Advertise="no" Target="[#MainApplicationExe]" />
         -->
 			</Component>
 
-			<Component Id="ReleaseNotes" Guid="D1496E4D-98C2-4849-9914-DB47D47CC6BE">
+			<!--<Component Id="ReleaseNotes" Guid="D1496E4D-98C2-4849-9914-DB47D47CC6BE">
 				<File Id="ReleaseNote" Name="Release Notes.txt" Source="P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DD_MODULE\DD Process Manager\Release_Notes.txt" KeyPath="yes">
 				</File>
-			</Component>
+			</Component>-->
 
 			<Component Id="WindreamLibs" Guid="4D11FC99-50D9-4E54-B18A-8885C9112646">
 				<File Id="WINDREAMLibDLL" Name="Interop.WINDREAMLib.dll" Source="P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll" KeyPath="yes"/>
@@ -121,19 +121,18 @@
 				<File Id="DDCommonGUIs" Name="DigitalData.GUIs.Common.dll" Source="DigitalData.GUIs.Common.dll"/>
 				<File Id="DDConfig" Name="DigitalData.Modules.Config.dll" Source="DigitalData.Modules.Config.dll"/>
 				<File Id="DDLogging" Name="DigitalData.Modules.Logging.dll" Source="DigitalData.Modules.Logging.dll"/>
+				<File Id="DDInterfaces" Name="DigitalData.Modules.Interfaces.dll" Source="DigitalData.Modules.Interfaces.dll"/>
 				<File Id="DDBase" Name="DigitalData.Modules.Base.dll" Source="DigitalData.Modules.Base.dll"/>
 				<File Id="DDLanguage" Name="DigitalData.Modules.Language.dll" Source="DigitalData.Modules.Language.dll"/>
 				<File Id="DDFilesystem" Name="DigitalData.Modules.Filesystem.dll" Source="DigitalData.Modules.Filesystem.dll"/>
 				<File Id="DDEncryption" Name="DigitalData.Modules.Encryption.dll" Source="DigitalData.Modules.Encryption.dll"/>
-        <File Id="DDWindream" Name="DigitalData.Modules.Windream.dll" Source="DigitalData.Modules.Windream.dll"/>
+				<File Id="DDWindream" Name="DigitalData.Modules.Windream.dll" Source="DigitalData.Modules.Windream.dll"/>
 				<File Id="DDWindows" Name="DigitalData.Modules.Windows.dll" Source="DigitalData.Modules.Windows.dll"/>
 				<File Id="DDZooflow" Name="DigitalData.Modules.Zooflow.dll" Source="DigitalData.Modules.Zooflow.dll"/>
 				<File Id="DDDatabase" Name="DigitalData.Modules.Database.dll" Source="DigitalData.Modules.Database.dll"/>
 				<File Id="DDPatterns" Name="DigitalData.Modules.Patterns.dll" Source="DigitalData.Modules.Patterns.dll"/>
 				<File Id="DDEDMIAPI" Name="DigitalData.Modules.EDMI.API.dll" Source="DigitalData.Modules.EDMI.API.dll"/>
 				<File Id="DDDocumentViewer" Name="DigitalData.Controls.DocumentViewer.dll" Source="DigitalData.Controls.DocumentViewer.dll"/>
-				<File Id="DDChatControl" Name="DigitalData.Controls.ChatControl.dll" Source="DigitalData.Controls.ChatControl.dll"/>
-				<File Id="DDNewConv" Name="DigitalData.Controls.ChatNewConv.dll" Source="DigitalData.Controls.ChatNewConv.dll"/>
 				<File Id="Messaging" Name="DigitalData.Modules.Messaging.dll" Source="DigitalData.Modules.Messaging.dll" KeyPath="no" />
 				<File Id="Messaging.License" Name="MailLicense.xml" Source="MailLicense.xml" KeyPath="no" />
 				<File Id="Limilabs.Mail" Name="Mail.dll" Source="Mail.dll" KeyPath="no" />
@@ -149,14 +148,26 @@
 			</Component>
 
 			<Component Id="GDPictureLibs" Guid="9ea5ab43-58ff-4813-9a8b-f854784f0275">
-				<File Id="GdPicture.NET.14" Name="GdPicture.NET.14.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll" KeyPath="yes" />
+				<File Id="GdPicture.NET.14" Name="GdPicture.NET.14.dll" KeyPath="yes" />
-				<File Id="GdPicture.NET.14.filters" Name="GdPicture.NET.14.filters.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.filters.dll" />
+				<File Id="GdPicture.NET.14.filters" Name="GdPicture.NET.14.filters.dll" />
-				<File Id="GdPicture.NET.14.filters64" Name="GdPicture.NET.14.filters.64.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.filters.64.dll" />
+				<File Id="GdPicture.NET.14.filters64" Name="GdPicture.NET.14.filters.64.dll" />
-				<File Id="GdPicture.NET.14.image" Name="GdPicture.NET.14.image.gdimgplug.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.image.gdimgplug.dll" />
+				<File Id="GdPicture.NET.14.image" Name="GdPicture.NET.14.image.gdimgplug.dll" />
-				<File Id="GdPicture.NET.14.image64" Name="GdPicture.NET.14.image.gdimgplug.64.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.image.gdimgplug.64.dll" />
+				<File Id="GdPicture.NET.14.image64" Name="GdPicture.NET.14.image.gdimgplug.64.dll" />
-				<File Id="GdPicture.NET.14.Imaging" Name="GdPicture.NET.14.Imaging.Rendering.Skia.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.Imaging.Rendering.Skia.dll" />
+				<File Id="GdPicture.NET.14.Imaging.Rendering.Skia" Name="GdPicture.NET.14.Imaging.Rendering.Skia.dll" />
-				<File Id="GdPicture.NET.14.Imaging64" Name="GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" Source="D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" />
+				<File Id="GdPicture.NET.14..Rendering.Skia.64" Name="GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" />
-			</Component>
+        <File Id="GdPicture.NET.14.Imaging" Name="GdPicture.NET.14.Imaging.dll" />
+        <File Id="GdPicture.NET.14.Common" Name="GdPicture.NET.14.Common.dll" />
+        <File Id="GdPicture.NET.14.Imaging.Rendering" Name="GdPicture.NET.14.Imaging.Rendering.dll" />
+        <File Id="GdPicture.NET.14.Document" Name="GdPicture.NET.14.Document.dll" />
+        <File Id="GdPicture.NET.14.PDF" Name="GdPicture.NET.14.PDF.dll" />
+        <File Id="GdPicture.NET.14.Imaging.Formats" Name="GdPicture.NET.14.Imaging.Formats.dll" />
+        <File Id="GdPicture.NET.14.RTF" Name="GdPicture.NET.14.RTF.dll" />
+        <File Id="GdPicture.NET.14.OpenDocument" Name="GdPicture.NET.14.OpenDocument.dll" />
+        <File Id="GdPicture.NET.14.OpenXML" Name="GdPicture.NET.14.OpenXML.dll" />
+        <File Id="GdPicture.NET.14.Email" Name="GdPicture.NET.14.Email.dll" />
+        <File Id="GdPicture.NET.14.HTML" Name="GdPicture.NET.14.HTML.dll" />
+        
+      </Component>
 
 			<Component Id="DevExpressLibs" Guid="CB40DAAE-348E-4BD3-B275-9A526EB8F191">
 				<File Id="DevExpress.Images.v21.2" Name="DevExpress.Images.v21.2.dll" KeyPath="yes"/>
@@ -268,7 +279,7 @@
 		<Feature Id="MainApplication" Title="Main Application" Level="1">
 			<ComponentRef Id="MainApplicationExe" />
 			<ComponentRef Id="RegistryKeys" />
-			<ComponentRef Id="ReleaseNotes" />
+			<!--<ComponentRef Id="ReleaseNotes" />-->
 			<ComponentRef Id="WindreamLibs" />
 			<ComponentRef Id="FormsUtilsLibs"/>
 			<ComponentRef Id="DDLibs" />

app/SetupVS19/SetupVS19.wixproj

@@ -13,12 +13,12 @@
     <OutputPath>bin\$(Configuration)\</OutputPath>
     <IntermediateOutputPath>obj\$(Configuration)\</IntermediateOutputPath>
     <DefineConstants>Debug</DefineConstants>
-    <LinkerAdditionalOptions>-b "$(SolutionDir)TaskFlow\bin\$(Configuration)"</LinkerAdditionalOptions>
+    <LinkerAdditionalOptions>-b "$(SolutionDir)taskFLOW\bin\$(Configuration)"</LinkerAdditionalOptions>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
     <OutputPath>bin\$(Configuration)\</OutputPath>
     <IntermediateOutputPath>obj\$(Configuration)\</IntermediateOutputPath>
-    <LinkerAdditionalOptions>-b "$(SolutionDir)TaskFlow\bin\$(Configuration)"</LinkerAdditionalOptions>
+    <LinkerAdditionalOptions>-b "$(SolutionDir)taskFLOW\bin\$(Configuration)"</LinkerAdditionalOptions>
   </PropertyGroup>
   <ItemGroup>
     <Compile Include="Product.wxs" />
@@ -43,7 +43,7 @@
   </Target>
   <Target Name="BeforeBuild">
     <!-- Get the programs assembly version from the .exe file -->
-    <GetAssemblyIdentity AssemblyFiles="..\TaskFlow\bin\$(Configuration)\TaskFlow.exe">
+    <GetAssemblyIdentity AssemblyFiles="..\taskFLOW\bin\$(Configuration)\TaskFlow.exe">
       <Output TaskParameter="Assemblies" ItemName="AsmInfo" />
     </GetAssemblyIdentity>
     <!-- Store the assembly version number in ProductVersion preprocessor variable -->

app/TaskFlow.sln

@@ -5,37 +5,106 @@ VisualStudioVersion = 17.3.32929.385
 MinimumVisualStudioVersion = 10.0.40219.1
 Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "SetupVS19", "SetupVS19\SetupVS19.wixproj", "{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}"
 EndProject
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "TaskFlow", "TaskFlow\TaskFlow.vbproj", "{6ACA1432-09A2-47EF-A704-C0AA73905756}"
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "taskFLOW", "TaskFlow\taskFLOW.vbproj", "{6ACA1432-09A2-47EF-A704-C0AA73905756}"
+EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Windream", "..\..\..\2_DLL Projekte\DDModules\Windream\Windream.vbproj", "{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}"
+EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "LookupControl", "..\..\..\2_DLL Projekte\DDMonorepo\Controls.LookupGrid\LookupControl.vbproj", "{3DCD6D1A-C830-4241-B7E4-27430E7EA483}"
 EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
+		CD_ROM|Any CPU = CD_ROM|Any CPU
 		CD_ROM|x86 = CD_ROM|x86
+		Debug|Any CPU = Debug|Any CPU
 		Debug|x86 = Debug|x86
+		DVD-5|Any CPU = DVD-5|Any CPU
 		DVD-5|x86 = DVD-5|x86
+		Release|Any CPU = Release|Any CPU
 		Release|x86 = Release|x86
+		SingleImage|Any CPU = SingleImage|Any CPU
 		SingleImage|x86 = SingleImage|x86
 	EndGlobalSection
 	GlobalSection(ProjectConfigurationPlatforms) = postSolution
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|Any CPU.ActiveCfg = Debug|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|Any CPU.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|x86.ActiveCfg = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|x86.Build.0 = Release|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|Any CPU.ActiveCfg = Debug|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|Any CPU.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.ActiveCfg = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.Build.0 = Debug|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|Any CPU.ActiveCfg = Debug|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|Any CPU.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|x86.ActiveCfg = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|x86.Build.0 = Debug|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|Any CPU.ActiveCfg = Release|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|Any CPU.Build.0 = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.ActiveCfg = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.Build.0 = Release|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|Any CPU.ActiveCfg = Debug|x86
+		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|Any CPU.Build.0 = Debug|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.ActiveCfg = Release|x86
 		{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.Build.0 = Release|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|Any CPU.ActiveCfg = Release|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|Any CPU.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.Build.0 = Debug|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|Any CPU.ActiveCfg = Debug|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|Any CPU.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.Build.0 = Debug|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|Any CPU.ActiveCfg = Debug|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|Any CPU.Build.0 = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.Build.0 = Debug|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|Any CPU.ActiveCfg = Release|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|Any CPU.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.ActiveCfg = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.Build.0 = Release|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|Any CPU.ActiveCfg = Release|x86
+		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|Any CPU.Build.0 = Release|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.ActiveCfg = Debug|x86
 		{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.Build.0 = Debug|x86
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|Any CPU.ActiveCfg = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|Any CPU.Build.0 = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|x86.ActiveCfg = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|x86.Build.0 = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|x86.Build.0 = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|Any CPU.ActiveCfg = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|Any CPU.Build.0 = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|x86.ActiveCfg = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|x86.Build.0 = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|Any CPU.Build.0 = Release|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|x86.ActiveCfg = Release|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|x86.Build.0 = Release|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|Any CPU.ActiveCfg = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|Any CPU.Build.0 = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|x86.ActiveCfg = Debug|Any CPU
+		{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|x86.Build.0 = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|Any CPU.ActiveCfg = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|Any CPU.Build.0 = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|x86.ActiveCfg = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|x86.Build.0 = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|x86.Build.0 = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|Any CPU.ActiveCfg = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|Any CPU.Build.0 = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|x86.ActiveCfg = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|x86.Build.0 = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|Any CPU.Build.0 = Release|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|x86.ActiveCfg = Release|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|x86.Build.0 = Release|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|Any CPU.ActiveCfg = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|Any CPU.Build.0 = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|x86.ActiveCfg = Debug|Any CPU
+		{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|x86.Build.0 = Debug|Any CPU
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE

app/TaskFlow/App.config

@@ -1,13 +1,15 @@
-<?xml version="1.0" encoding="utf-8"?>
+<?xml version="1.0" encoding="utf-8"?>
 <configuration>
   <configSections>
     <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
-      <section name="DD_ProcessManager.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false"/>
+      <section name="DD_ProcessManager.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
-      <section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection" requirePermission="false"/>
+      <section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection" requirePermission="false" />
     </sectionGroup>
     <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-      <section name="DD_ProcessManager.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false"/>
+      <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>
+    <!-- For more information on Entity Framework configuration, visit http://go.microsoft.com/fwlink/?LinkID=237468 -->
+    <section name="entityFramework" type="System.Data.Entity.Internal.ConfigFile.EntityFrameworkSection, EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
   </configSections>
   <applicationSettings>
     <DD_ProcessManager.My.MySettings>
@@ -15,7 +17,10 @@
         <value>False</value>
       </setting>
       <setting name="UserConfig_Prefix" serializeAs="String">
-        <value>PROD</value>
+        <value>TEST</value>
+      </setting>
+      <setting name="GDPICTURE_VERSION" serializeAs="String">
+        <value>11.2024</value>
       </setting>
     </DD_ProcessManager.My.MySettings>
     <DevExpress.LookAndFeel.Design.AppSettings>
@@ -26,59 +31,68 @@
         <value>Custom/Digital Data</value>
       </setting>
       <setting name="TouchUI" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="TouchScaleFactor" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="DirectX" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="RegisterUserSkins" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="FontBehavior" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="DefaultAppFont" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="DPIAwarenessMode" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="CompactUI" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="RegisterBonusSkins" serializeAs="String">
-        <value></value>
+        <value>
+        </value>
       </setting>
       <setting name="CustomPaletteCollection" serializeAs="Xml">
         <value>
           <CustomPaletteCollection>
             <Skin Name="Office 2019 White">
               <SvgPalette Name="Digital Data">
-                <SvgColor Name="Paint" Value="White"/>
+                <SvgColor Name="Paint" Value="White" />
-                <SvgColor Name="Paint High" Value="White"/>
+                <SvgColor Name="Paint High" Value="White" />
-                <SvgColor Name="Paint Shadow" Value="240,240,240"/>
+                <SvgColor Name="Paint Shadow" Value="240,240,240" />
-                <SvgColor Name="Paint Deep Shadow" Value="230,230,230"/>
+                <SvgColor Name="Paint Deep Shadow" Value="230,230,230" />
-                <SvgColor Name="Brush" Value="72,70,68"/>
+                <SvgColor Name="Brush" Value="72,70,68" />
-                <SvgColor Name="Brush High" Value="72,70,68"/>
+                <SvgColor Name="Brush High" Value="72,70,68" />
-                <SvgColor Name="Brush Light" Value="119,119,119"/>
+                <SvgColor Name="Brush Light" Value="119,119,119" />
-                <SvgColor Name="Brush Major" Value="171,171,171"/>
+                <SvgColor Name="Brush Major" Value="171,171,171" />
-                <SvgColor Name="Brush Minor" Value="225,225,225"/>
+                <SvgColor Name="Brush Minor" Value="225,225,225" />
-                <SvgColor Name="Accent Paint" Value="165,36,49"/>
+                <SvgColor Name="Accent Paint" Value="165,36,49" />
-                <SvgColor Name="Accent Paint Dark" Value="133,28,38"/>
+                <SvgColor Name="Accent Paint Dark" Value="133,28,38" />
-                <SvgColor Name="Accent Paint Light" Value="250,220,221"/>
+                <SvgColor Name="Accent Paint Light" Value="250,220,221" />
-                <SvgColor Name="Accent Paint Lighter" Value="251,233,234"/>
+                <SvgColor Name="Accent Paint Lighter" Value="251,233,234" />
-                <SvgColor Name="Accent Brush" Value="255,255,255"/>
+                <SvgColor Name="Accent Brush" Value="255,255,255" />
-                <SvgColor Name="Accent Brush Light" Value="218,175,176"/>
+                <SvgColor Name="Accent Brush Light" Value="218,175,176" />
-                <SvgColor Name="Red" Value="237,61,59"/>
+                <SvgColor Name="Red" Value="237,61,59" />
-                <SvgColor Name="Green" Value="48,144,72"/>
+                <SvgColor Name="Green" Value="48,144,72" />
-                <SvgColor Name="Blue" Value="30,139,205"/>
+                <SvgColor Name="Blue" Value="30,139,205" />
-                <SvgColor Name="Yellow" Value="251,152,59"/>
+                <SvgColor Name="Yellow" Value="251,152,59" />
-                <SvgColor Name="Black" Value="87,87,85"/>
+                <SvgColor Name="Black" Value="87,87,85" />
-                <SvgColor Name="Gray" Value="169,168,168"/>
+                <SvgColor Name="Gray" Value="169,168,168" />
-                <SvgColor Name="White" Value="255,255,255"/>
+                <SvgColor Name="White" Value="255,255,255" />
               </SvgPalette>
             </Skin>
           </CustomPaletteCollection>
@@ -87,12 +101,10 @@
     </DevExpress.LookAndFeel.Design.AppSettings>
   </applicationSettings>
   <connectionStrings>
-    <add name="DD_ProcessManager.My.MySettings.ConnectionString"
+    <add name="DD_ProcessManager.My.MySettings.ConnectionString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=False" providerName="System.Data.SqlClient" />
-      connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd"
-      providerName="System.Data.SqlClient" />
   </connectionStrings>
   <startup>
-    <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2"/>
+    <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2" />
   </startup>
   <userSettings>
     <DD_ProcessManager.My.MySettings>
@@ -140,9 +152,72 @@
   <runtime>
     <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
       <dependentAssembly>
-        <assemblyIdentity name="NLog" publicKeyToken="5120e14c03d0593c" culture="neutral"/>
+        <assemblyIdentity name="NLog" publicKeyToken="5120e14c03d0593c" culture="neutral" />
-        <bindingRedirect oldVersion="0.0.0.0-5.0.0.0" newVersion="5.0.0.0"/>
+        <bindingRedirect oldVersion="0.0.0.0-5.0.0.0" newVersion="5.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="GdPicture.NET.14" publicKeyToken="f52a2e60ad468dbb" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-14.3.3.0" newVersion="14.3.3.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="Newtonsoft.Json" publicKeyToken="30ad4fe6b2a6aeed" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-13.0.0.0" newVersion="13.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.Memory" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-4.0.2.0" newVersion="4.0.2.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.Runtime.CompilerServices.Unsafe" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-6.0.1.0" newVersion="6.0.1.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.Buffers" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-4.0.4.0" newVersion="4.0.4.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.Collections.Immutable" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.Numerics.Vectors" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-4.1.5.0" newVersion="4.1.5.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="GdPicture.NET.14.Common" publicKeyToken="f52a2e60ad468dbb" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-14.3.1.0" newVersion="14.3.1.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="GdPicture.NET.14.Imaging" publicKeyToken="f52a2e60ad468dbb" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-14.3.1.0" newVersion="14.3.1.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.Security.Cryptography.Pkcs" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.IO.Packaging" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.Text.Json" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="FirebirdSql.Data.FirebirdClient" publicKeyToken="3750abcc3150b00c" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-7.5.0.0" newVersion="7.5.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="protobuf-net" publicKeyToken="257b51d87d2e4d67" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-3.0.0.0" newVersion="3.0.0.0" />
       </dependentAssembly>
     </assemblyBinding>
   </runtime>
-</configuration>
+  <entityFramework>
+    <providers>
+      <provider invariantName="System.Data.SqlClient" type="System.Data.Entity.SqlServer.SqlProviderServices, EntityFramework.SqlServer" />
+      <provider invariantName="FirebirdSql.Data.FirebirdClient" type="EntityFramework.Firebird.FbProviderServices, EntityFramework.Firebird" />
+    </providers>
+    <defaultConnectionFactory type="EntityFramework.Firebird.FbConnectionFactory, EntityFramework.Firebird" />
+  </entityFramework>
+</configuration>

app/TaskFlow/Changelog.md

@@ -0,0 +1,16 @@
+# CHANGELOG
+
+## 2.4.7.0
+
+### Features
+
+- Modernisierung von verschiedenen Elementen (Validator, Startseite)
+- Format Strings für Textboxen (Währung, Fließkommazahlen, Datum & Uhrzeit)
+- Tabellen Filter im Hauptfenster speichern 
+
+### Bugfixes
+
+- Anzeige-/Indexierungsfehler bei Mehrzeiligen Textboxen
+- Formatierungsfehler bei Fließkomma-Indexen
+- Fehlerhafte Verkettung von Werten bei abhängigen Controls
+

app/TaskFlow/ClassAllgemeineFunktionen.vb

@@ -2,6 +2,7 @@
 Imports System.Data.OracleClient
 Imports System.IO
 Imports WINDREAMLib
+Imports DevExpress.Utils.CommonDialogs
 
 Public Class ClassAllgemeineFunktionen
     Public Shared Function GUI_LANGUAGE_INFO(pTITLE As String)
@@ -91,20 +92,6 @@ Public Class ClassAllgemeineFunktionen
         End Try
     End Function
 
-    Public Function Insert_LogEntry(ERR_MSG As String)
-        Try
-            ERR_MSG = ERR_MSG.Replace("'", "''")
-            Dim insert As String = $"INSERT INTO TBPM_LOG_DEBUG (USERID, LOGMSG) VALUES ({USER_ID},'{ERR_MSG}')"
-            If ExecuteonMSSQL(insert, CONNECTION_STRING_ECM) <> "" Then
-                LOGGER.Warn("...Eintrag in Log-Tabelle konnte nicht erstellt werden!!", True)
-            End If
-        Catch ex As Exception
-            LOGGER.Error(ex)
-            LOGGER.Info("Error in Insert_LogEntry: " & ex.Message)
-        End Try
-
-
-    End Function
     Public Function ExecuteonMSSQL(ByVal sqlcommand As String, ConString As String)
         Try
             ' die nötigen Variablen definieren
@@ -181,41 +168,6 @@ Public Class ClassAllgemeineFunktionen
         End If
 
     End Sub
-    'Public Function Delete_xffres(originFile As String, clsWD As ClassWindream_allgemein)
-    '    Try
-    '        Dim Stammname As String = System.IO.Path.GetFileNameWithoutExtension(originFile)
-    '        Dim Path As String = System.IO.Path.GetDirectoryName(originFile)
-    '        Dim xffres As String = Path & "\" & Stammname & ".xffres"
-    '        If file_exists(xffres, clsWD) = True Then
-    '            System.IO.File.Delete(xffres)
-    '            LOGGER.Info("Datei " & xffres & " erfolgreich gelöscht")
-    '            Return True
-    '        Else
-    '            Return Nothing
-    '        End If
-    '    Catch ex As Exception
-    '        LOGGER.Error(ex)
-    '        LOGGER.Info(" Fehler bei Delete_xffres", True)
-    '        LOGGER.Info("Fehlermeldung: " & ex.Message)
-    '    End Try
-    'End Function
-    'Public Function Delete_File(originFile As String)
-    '    Try
-
-    '        If file_exists(originFile, False) = True Then
-    '            System.IO.File.Delete(originFile)
-    '            LOGGER.Info("Manuelles Löschen: Datei " & originFile & " erfolgreich gelöscht", False)
-    '            Return True
-    '        Else
-    '            MsgBox("Die Datei konnte nicht gelsöcht werden. File NOT EXISTS", MsgBoxStyle.Exclamation)
-    '            Return False
-    '        End If
-    '    Catch ex As Exception
-    '        LOGGER.Info(" Fehler bei Delete_File", True)
-    '        LOGGER.Info("Fehlermeldung: " & ex.Message)
-    '    End Try
-    'End Function
-
     Public Function Move2Folder(ByVal vMove_File As String, ByVal vZiel_Pfad As String, Profile_ID As Integer, clsWD As ClassWindream_allgemein)
         Try
 
@@ -244,7 +196,6 @@ Public Class ClassAllgemeineFunktionen
             LOGGER.Info("Fehler bei Move2Folder", True)
             LOGGER.Info("Fehlermeldung")
             LOGGER.Info(ex.Message)
-            Insert_LogEntry($"ERROR {ex.Message}")
             Return ex.Message
         End Try
     End Function
@@ -296,7 +247,7 @@ Public Class ClassAllgemeineFunktionen
             End If
         Catch ex As Exception
             LOGGER.Error(ex)
-            MsgBox("Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei checkValue_Exists:")
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error checkValue_Exists:")
             LOGGER.Info(" - Unvorhergesehener Fehler bei checkValue_Exists - Fehler: " & vbNewLine & ex.Message)
             Return False
         End Try
@@ -329,8 +280,7 @@ Public Class ClassAllgemeineFunktionen
 
         Catch ex As Exception
             LOGGER.Error(ex)
-            MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:")
+            MsgBox("Unexpected error Execute_Scalar_SQLServer" & vbNewLine & "Automatic Index (j/n): " & check.ToString & vbNewLine & "ERROR:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error Execute_Scalar_SQL sql:")
-            Insert_LogEntry($"ERROR Execute_Scalar_SQLServer{ex.Message}")
             LOGGER.Info(" - Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
             LOGGER.Info(" - SQL: " & vsql_statement)
             LOGGER.Info(" - Connection: " & vconnectionString)
@@ -363,12 +313,57 @@ Public Class ClassAllgemeineFunktionen
             cnn.Close()
         Catch ex As Exception
             LOGGER.Error(ex)
-            MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:")
+            MsgBox("Unexpected error Execute_Scalar_Oracle" & vbNewLine & "Automatic Index (y/n): " & check.ToString & vbNewLine & "Error:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error Execute_Scalar_oracle sql:")
-            Insert_LogEntry($"ERROR Execute_Scalar_Oracle{ex.Message}")
             LOGGER.Info(" - Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
             LOGGER.Info(" - SQL: " & vsql_statement)
             LOGGER.Info(" - Connection: " & vconnectionString)
             Return 99
         End Try
     End Function
+    Public Shared Sub Save_Logfiles()
+        Try
+            Dim saveFileDialog1 As New SaveFileDialog()
+            If File.Exists(LOGCONFIG.LogFile) Then
+                saveFileDialog1.Filter = "log file|*.log"
+                saveFileDialog1.FileName = Path.GetFileName(LOGCONFIG.LogFile)
+                If saveFileDialog1.ShowDialog() = DialogResult.OK Then
+                    If File.Exists(saveFileDialog1.FileName) Then
+                        File.Delete(saveFileDialog1.FileName)
+                    End If
+                    File.Copy(LOGCONFIG.LogFile, saveFileDialog1.FileName)
+                End If
+            End If
+
+            If DEBUG = True Then
+                Dim oDebuglogFilename_only = Path.GetFileNameWithoutExtension(LOGCONFIG.LogFile) + "-Debug.log"
+                Dim oDebuglogFilename = LOGCONFIG.LogDirectory + "\" + oDebuglogFilename_only
+                If File.Exists(oDebuglogFilename) Then
+                    saveFileDialog1.Filter = "log file|*.log"
+                    saveFileDialog1.FileName = oDebuglogFilename_only
+                    If saveFileDialog1.ShowDialog() = DialogResult.OK Then
+                        If File.Exists(saveFileDialog1.FileName) Then
+                            File.Delete(saveFileDialog1.FileName)
+                        End If
+                        File.Copy(oDebuglogFilename, saveFileDialog1.FileName)
+                    End If
+                End If
+            End If
+            Dim oErrorlogFilename_only = Path.GetFileNameWithoutExtension(LOGCONFIG.LogFile) + "-Error.log"
+            Dim oErrorlogFilename = LOGCONFIG.LogDirectory + "\" + oErrorlogFilename_only
+            If File.Exists(oErrorlogFilename) Then
+                saveFileDialog1.Filter = "log file|*.log"
+                saveFileDialog1.FileName = oErrorlogFilename_only
+                If saveFileDialog1.ShowDialog() = DialogResult.OK Then
+                    If File.Exists(saveFileDialog1.FileName) Then
+                        File.Delete(saveFileDialog1.FileName)
+                    End If
+                    File.Copy(oErrorlogFilename, saveFileDialog1.FileName)
+                End If
+            End If
+            Dim oMSG = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("ExportLogFiles_Result")
+            MsgBox(oMSG, MsgBoxStyle.Information, ADDITIONAL_TITLE)
+        Catch ex As Exception
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error saving log file")
+        End Try
+    End Sub
 End Class

app/TaskFlow/ClassConfig.vb

@@ -30,6 +30,8 @@ Public Class ClassConfig
     ' Misc Settings
     Public Property DEBUG As Boolean = False
     Public Property ReminderTimer As Integer = 5
+    Public Property OverviewRefresh_Intervall As Integer = 2
+
     Public Property MonitorSplitter1_Distance As Integer = 510
     Public Property MonitorSplitter2_Distance As Integer = 270
     Public Property MonitorSplitter3_Distance As Integer = 400
@@ -38,6 +40,7 @@ Public Class ClassConfig
 
     Public Property LastExportPath As String = ""
     Public Property ADDITIONAL_SEARCHES_LOAD_ONCLICK As Boolean = True
+    Public Property NOTES_ONCLICK As Boolean = True
     Public Property GridFontSizeDelta As Integer = 0
     Public Property ProfileConfig As New ProfileUserConfig
 

app/TaskFlow/ClassControlCreator.vb

@@ -14,9 +14,11 @@ Imports DigitalData.Controls.LookupGrid
 Imports DigitalData.Modules.Language.Utils
 Imports DigitalData.GUIs.Common
 Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.Language
 Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
 Imports DigitalData.Modules.EDMI.API.Constants
 Imports DigitalData.Modules.Language.DataTableEx
+Imports DigitalData.Modules.Base
 
 Public Class ClassControlCreator
 
@@ -47,18 +49,29 @@ Public Class ClassControlCreator
     Public Const AGGREGATE_NONE = "NONE"
     Public Const AGGREGATE_TOTAL_INTEGER = "TOTAL_INTEGER"
     Public Const AGGREGATE_TOTAL_FLOAT = "TOTAL_FLOAT"
+    Public Const AGGREGATE_TOTAL_CURRENCY = "TOTAL_CURRENCY"
     Public Const AGGREGATE_TOTAL_MIN = "TOTAL_MIN"
     Public Const AGGREGATE_TOTAL_MAX = "TOTAL_MAX"
     Public Const AGGREGATE_TOTAL_AVG = "TOTAL_AVG"
     Public Const AGGREGATE_TOTAL_COUNT = "TOTAL_COUNT"
 
-    Public Shared Property Logger As Logger
+    Public Const CONTROL_TYPE_TEXT = "TEXT"
+    Public Const CONTROL_TYPE_INTEGER = "INTEGER"
+    Public Const CONTROL_TYPE_BOOLEAN = "BOOLEAN"
+    Public Const CONTROL_TYPE_DOUBLE = "DOUBLE"
+    Public Const CONTROL_TYPE_CURRENCY = "CURRENCY"
+    Public Const CONTROL_TYPE_DATE = "DATE"
+    Public Const CONTROL_TYPE_DATETIME = "DATETIME"
+
+
+    Public ReadOnly Property Logger As Logger
+    Public ReadOnly Property LogConfig As LogConfig
 
     ''' <summary>
     ''' Saves the column data for each grid and each column in that grid
     ''' </summary>
-    Public Shared Property GridTables As New Dictionary(Of Integer, Dictionary(Of String, RepositoryItem))
+    Public Property GridTables As New Dictionary(Of Integer, Dictionary(Of String, RepositoryItem))
-    Public Shared Property GridColumns As New Dictionary(Of Integer, DataTable)
+    Public Property GridColumns As New Dictionary(Of Integer, DataTable)
 
     ''' <summary>
     ''' Standard Eigenschaften für alle Controls
@@ -66,19 +79,29 @@ Public Class ClassControlCreator
     Private Class ControlDBProps
         Public Guid As Integer
         Public Name As String
+        Public Attribute As String
         Public Location As Point
         Public [Font] As Font
         Public [Color] As Color
         Public [ReadOnly] As Boolean
+        Public AddNewItems As Boolean = False
     End Class
 
     Public Class ControlMetadata
         Public Guid As Integer
         Public Name As String
+        Public Attribute As String
         Public [ReadOnly] As Boolean = False
+        Public BackColor As Color = Color.White
+
     End Class
 
-    Private Shared Function TransformDataRow(row As DataRow) As ControlDBProps
+    Public Sub New(pLogConfig As LogConfig)
+        LogConfig = pLogConfig
+        Logger = pLogConfig.GetLogger()
+    End Sub
+
+    Private Function TransformDataRow(row As DataRow) As ControlDBProps
         Dim x As Integer = row.Item("X_LOC")
         Dim y As Integer = row.Item("Y_LOC")
         Dim style As FontStyle = NotNull(row.Item("FONT_STYLE"), DEFAULT_FONT_STYLE)
@@ -87,28 +110,33 @@ Public Class ClassControlCreator
         Dim family As FontFamily = New FontFamily(familyString)
 
         Dim oGuid As Integer = row.Item("GUID")
-        Dim oName As String = row.Item("NAME")
+        Dim oName As String = NotNull(row.Item("NAME"), "")
+        Dim oAttribute As String = NotNull(row.Item("INDEX_NAME"), "")
         Dim oLocation As New Point(x, y)
         Dim oFont As New Font(family, size, style, GraphicsUnit.Point)
         Dim oColor As Color = IntToColor(NotNull(row.Item("FONT_COLOR"), DEFAULT_COLOR))
         Dim oReadOnly As Boolean = row.Item("READ_ONLY")
+        Dim oAddNewItems As Boolean = row.Item("VKT_ADD_ITEM")
 
         Return New ControlDBProps() With {
             .Guid = oGuid,
             .Name = oName,
+            .Attribute = oAttribute,
             .Location = oLocation,
             .Font = oFont,
             .Color = oColor,
-            .ReadOnly = oReadOnly
+            .ReadOnly = oReadOnly,
+            .AddNewItems = oAddNewItems
         }
     End Function
 
-    Public Shared Function CreateBaseControl(ctrl As Control, OControlRow As DataRow, designMode As Boolean) As Control
+    Public Function CreateBaseControl(ctrl As Control, OControlRow As DataRow, designMode As Boolean) As Control
         Try
             Dim props As ControlDBProps = TransformDataRow(OControlRow)
 
             ctrl.Tag = New ControlMetadata() With {
                 .Guid = props.Guid,
+                .Attribute = props.Attribute,
                 .ReadOnly = props.ReadOnly,
                 .Name = props.Name
             }
@@ -136,8 +164,8 @@ Public Class ClassControlCreator
 
     ' ----------------------- NEW CONTROLS -----------------------
 
-    Public Shared Function CreateNewTextBox(location As Point) As TextBox
+    Public Function CreateNewTextBox(location As Point) As TextEdit
-        Dim control As New TextBox With {
+        Dim control As New TextEdit With {
             .Name = $"{PREFIX_TEXTBOX}_{clsTools.ShortGuid()}",
             .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
             .Location = location,
@@ -149,7 +177,7 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateNewLabel(location As Point) As Label
+    Public Function CreateNewLabel(location As Point) As Label
         Dim control As New Label With {
             .Name = $"{PREFIX_LABEL}_{clsTools.ShortGuid}",
             .Text = DEFAULT_TEXT,
@@ -161,7 +189,7 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateNewCheckbox(location As Point) As CheckBox
+    Public Function CreateNewCheckbox(location As Point) As CheckBox
         Dim control As New CheckBox With {
             .Name = $"{PREFIX_CHECKBOX}_{clsTools.ShortGuid}",
             .AutoSize = True,
@@ -174,8 +202,8 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateNewCombobox(location As Point) As ComboBox
+    Public Function CreateNewCombobox(location As Point) As Windows.Forms.ComboBox
-        Dim control As New ComboBox With {
+        Dim control As New Windows.Forms.ComboBox With {
             .Name = $"{PREFIX_COMBOBOX}_{clsTools.ShortGuid}",
             .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
             .Cursor = Cursors.Hand,
@@ -185,7 +213,7 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateNewDatetimepicker(location As Point) As DateTimePicker
+    Public Function CreateNewDatetimepicker(location As Point) As DateTimePicker
         Dim control As New DateTimePicker With {
             .Name = $"{PREFIX_DATETIMEPICKER}_{clsTools.ShortGuid}",
             .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
@@ -197,7 +225,7 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateNewDatagridview(location As Point) As DataGridView
+    Public Function CreateNewDatagridview(location As Point) As DataGridView
         Dim control As New DataGridView With {
             .Name = $"{PREFIX_DATAGRIDVIEW}_{clsTools.ShortGuid}",
             .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT_TABLE),
@@ -217,7 +245,7 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Friend Shared Function CreateNewLookupControl(location As Point) As LookupControl3
+    Friend Function CreateNewLookupControl(location As Point) As LookupControl3
         Dim control As New LookupControl3 With {
             .Name = $"{PREFIX_LOOKUP}_{clsTools.ShortGuid}",
             .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
@@ -227,14 +255,14 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateNewTable(location As Point) As GridControl
+    Public Function CreateNewTable(location As Point) As GridControl
         Dim oControl As New GridControl With {
             .Name = $"{PREFIX_TABLE}_{clsTools.ShortGuid}",
             .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT_TABLE),
             .Cursor = Cursors.Hand,
-            .Location = location
+            .Location = location,
+            .UseEmbeddedNavigator = True
         }
-        oControl.UseEmbeddedNavigator = True
         oControl.ForceInitialize()
         Dim oView As GridView = oControl.DefaultView
         oView.OptionsView.ShowGroupPanel = False
@@ -247,7 +275,7 @@ Public Class ClassControlCreator
         Return oControl
     End Function
 
-    Public Shared Function CreateNewLine(location As Point) As LineLabel
+    Public Function CreateNewLine(location As Point) As LineLabel
         Dim control As New LineLabel With {
             .Name = $"{PREFIX_LINE}_{clsTools.ShortGuid}",
             .Text = "---------------------------------",
@@ -257,7 +285,7 @@ Public Class ClassControlCreator
 
         Return control
     End Function
-    Public Shared Function CreateNewButton(location As Point) As Button
+    Public Function CreateNewButton(location As Point) As Button
         Dim control As New Button With {
             .Name = $"{PREFIX_BUTTON}_{clsTools.ShortGuid}",
             .Size = New Size(108, 28),
@@ -270,38 +298,59 @@ Public Class ClassControlCreator
 
     ' ----------------------- EXISITING CONTROLS -----------------------
 
-    Public Shared Function CreateExistingTextbox(oControlRow As DataRow, designMode As Boolean) As TextBox
+    Public Function CreateExistingTextbox(oControlRow As DataRow, designMode As Boolean) As BaseEdit
         Try
-            Dim control As TextBox = CreateBaseControl(New TextBox(), oControlRow, designMode)
+            Dim oHeight = oControlRow.ItemEx("HEIGHT", 0)
+            Dim oWidth = oControlRow.ItemEx("WIDTH", 0)
+            Dim oReadOnly = oControlRow.ItemEx("READ_ONLY", False)
+            Dim oFormatString = oControlRow.ItemEx("FORMAT_STRING", String.Empty)
+            Dim oBackColorIf = oControlRow.ItemEx("CTRL_BACKCOLOR_IF", String.Empty)
 
-            control.BackColor = Color.White
+            Dim oControl As BaseEdit = Nothing
-
-            If oControlRow.Item("HEIGHT") > 27 Then
-                control.Multiline = True
 
+            If oHeight > 27 Then
+                oControl = CreateBaseControl(New MemoEdit(), oControlRow, designMode)
+            Else
+                oControl = CreateBaseControl(New TextEdit(), oControlRow, designMode)
             End If
 
-            control.Height = oControlRow.Item("HEIGHT")
+            Dim oMeta As ControlMetadata = oControl.Tag
-            control.Width = oControlRow.Item("WIDTH")
+
+            oControl.BackColor = Color.White
+            oMeta.BackColor = Color.White
+
+            oControl.Height = oHeight
+            oControl.Width = oWidth
 
             If Not designMode Then
-                control.AcceptsReturn = True
+                oControl.ReadOnly = oReadOnly
-                control.ReadOnly = oControlRow.Item("READ_ONLY")
+                oControl.TabStop = Not oReadOnly
-                control.TabStop = Not oControlRow.Item("READ_ONLY")
+                oControl.BackColor = IIf(oReadOnly, Color.LightGray, Color.White)
-                control.BackColor = IIf(oControlRow.Item("READ_ONLY"), Color.LightGray, Color.White)
+
-                control.ScrollBars = ScrollBars.Vertical
+                ' If there is a format string defined, set it for display only.
+                ' Editing will be without format string, according to current user-culture.
+                If oFormatString <> String.Empty Then
+                    oControl.Properties.DisplayFormat.FormatType = FormatType.Custom
+                    oControl.Properties.DisplayFormat.FormatString = ClassFormat.GetFormatString(oFormatString)
+                End If
+
+                ' For read only controls, don't show the raw value when a user clicks into it
+                If oReadOnly Then
+                    oControl.Properties.EditFormat.FormatType = FormatType.Custom
+                    oControl.Properties.EditFormat.FormatString = ClassFormat.GetFormatString(oFormatString)
+                End If
             Else
-                control.ReadOnly = True
+                oControl.ReadOnly = True
             End If
 
-            Return control
+            Return oControl
         Catch ex As Exception
             Logger.Error(ex)
+            Return Nothing
         End Try
-
     End Function
 
-    Public Shared Function CreateExistingLabel(row As DataRow, designMode As Boolean) As Label
+    Public Function CreateExistingLabel(row As DataRow, designMode As Boolean) As Label
         Dim control As Label = CreateBaseControl(New Label(), row, designMode)
         Try
             control.Text = row.Item("CTRL_CAPTION_LANG")
@@ -314,7 +363,8 @@ Public Class ClassControlCreator
 
         Return control
     End Function
-    Public Shared Function CreateExistingButton(row As DataRow, designMode As Boolean) As Button
+
+    Public Function CreateExistingButton(row As DataRow, designMode As Boolean) As Button
         Dim oControl As Button = CreateBaseControl(New Button(), row, designMode)
 
         Dim ctrl_image As Bitmap = Nothing
@@ -343,7 +393,7 @@ Public Class ClassControlCreator
 
         Return oControl
     End Function
-    Public Shared Function CreateExistingCombobox(row As DataRow, designMode As Boolean) As Windows.Forms.ComboBox
+    Public Function CreateExistingCombobox(row As DataRow, designMode As Boolean) As Windows.Forms.ComboBox
         Dim control As Windows.Forms.ComboBox = CreateBaseControl(New Windows.Forms.ComboBox(), row, designMode)
 
         control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
@@ -360,7 +410,7 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateExistingDatepicker(row As DataRow, designMode As Boolean) As DateTimePicker
+    Public Function CreateExistingDatepicker(row As DataRow, designMode As Boolean) As DateTimePicker
         Dim control As DateTimePicker = CreateBaseControl(New DateTimePicker(), row, designMode)
 
         control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
@@ -374,7 +424,7 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateExisingCheckbox(row As DataRow, designMode As Boolean) As CheckBox
+    Public Function CreateExisingCheckbox(row As DataRow, designMode As Boolean) As CheckBox
         Dim oCheckBox As CheckBox = CreateBaseControl(New CheckBox(), row, designMode)
 
         oCheckBox.AutoSize = True
@@ -393,7 +443,7 @@ Public Class ClassControlCreator
         Return oCheckBox
     End Function
 
-    Public Shared Function CreateExistingDataGridView(row As DataRow, designMode As Boolean) As DataGridView
+    Public Function CreateExistingDataGridView(row As DataRow, designMode As Boolean) As DataGridView
         Dim control As DataGridView = CreateBaseControl(New DataGridView(), row, designMode)
 
         control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
@@ -417,11 +467,12 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateExistingLookupControl(row As DataRow, designMode As Boolean) As LookupControl3
+    Public Function CreateExistingLookupControl(row As DataRow, designMode As Boolean) As LookupControl3
         Dim control As LookupControl3 = CreateBaseControl(New LookupControl3(), row, designMode)
         control.Properties.Name = control.Name
         control.Width = row.Item("WIDTH")
         control.ReadOnly = row.Item("READ_ONLY")
+        control.Properties.AllowAddNewValues = row.Item("VKT_ADD_ITEM")
 
         If designMode Then
             control.Cursor = Cursors.Hand
@@ -430,12 +481,13 @@ Public Class ClassControlCreator
         Return control
     End Function
 
-    Public Shared Function CreateExistingGridControl(row As DataRow, DT_MY_COLUMNS As DataTable, designMode As Boolean) As GridControl
+    Public Function CreateExistingGridControl(row As DataRow, DT_MY_COLUMNS As DataTable, designMode As Boolean) As GridControl
+        Dim oGridControlCreator = New ControlCreator.GridControl(LogConfig, GridTables)
         Dim oControl As GridControl = CreateBaseControl(New GridControl(), row, designMode)
         Dim oControlId = DirectCast(oControl.Tag, ControlMetadata).Guid
-        Dim oDatatable As New DataTable
         Dim oView As GridView
 
+
         oControl.ForceInitialize()
 
         oView = oControl.MainView
@@ -449,7 +501,9 @@ Public Class ClassControlCreator
             oView.OptionsBehavior.Editable = Not row.Item("READ_ONLY")
             oView.OptionsBehavior.ReadOnly = row.Item("READ_ONLY")
             'oView.OptionsBehavior.EditorShowMode = EditorShowMode.Click
-
+            If oView.OptionsBehavior.ReadOnly = True Then
+                oView.OptionsBehavior.Editable = False
+            End If
             oControl.UseEmbeddedNavigator = Not row.Item("READ_ONLY")
 
             oView.OptionsBehavior.EditorShowMode = EditorShowMode.MouseDown
@@ -458,17 +512,18 @@ Public Class ClassControlCreator
             oView.OptionsSelection.MultiSelectMode = GridMultiSelectMode.CellSelect
             oView.OptionsSelection.MultiSelect = True
             oView.OptionsClipboard.CopyColumnHeaders = DefaultBoolean.False
-
+            'oView.OptionsView.ColumnAutoWidth = True
-
+            If oView.OptionsBehavior.ReadOnly = False Then
-            If row.Item("VKT_ADD_ITEM") = True Then
+                If row.Item("VKT_ADD_ITEM") = True Then
-                oView.OptionsBehavior.AllowAddRows = DefaultBoolean.True
+                    oView.OptionsBehavior.AllowAddRows = DefaultBoolean.True
-                oView.OptionsBehavior.AllowDeleteRows = DefaultBoolean.True
+                    oView.OptionsBehavior.AllowDeleteRows = DefaultBoolean.True
-                oView.OptionsView.NewItemRowPosition = NewItemRowPosition.Bottom
+                    oView.OptionsView.NewItemRowPosition = NewItemRowPosition.Bottom
-            Else
+                Else
-                oView.OptionsBehavior.AllowAddRows = DefaultBoolean.False
+                    oView.OptionsBehavior.Editable = False
-                oView.OptionsBehavior.AllowDeleteRows = DefaultBoolean.False
+                    oView.OptionsView.NewItemRowPosition = NewItemRowPosition.None
-                oView.OptionsView.NewItemRowPosition = NewItemRowPosition.None
+                End If
             End If
+
         End If
 
         oControl.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
@@ -500,62 +555,8 @@ Public Class ClassControlCreator
             GridTables.Add(oControlId, New Dictionary(Of String, RepositoryItem)())
         End If
 
-        For Each oRow As DataRow In DT_MY_COLUMNS.Rows
+        Dim oDataTable = oGridControlCreator.CreateGridColumns(DT_MY_COLUMNS)
-            ' Create Columns in Datatable
+        GridTables = oGridControlCreator.FillGridTables(DT_MY_COLUMNS, oControlId, oControl.Name)
-
-            Dim oColumn = New DataColumn() With {
-                .ColumnName = oRow.Item("SPALTENNAME"),
-                .Caption = oRow.Item("SPALTEN_HEADER_LANG"),
-                .ReadOnly = False
-            }
-            Select Case oRow.Item("TYPE_COLUMN")
-                Case "TEXT"
-                    oColumn.DataType = GetType(String)
-                Case "INTEGER"
-                    oColumn.DataType = GetType(Integer)
-                Case "BOOLEAN"
-                    oColumn.DataType = GetType(Boolean)
-                Case Else
-                    oColumn.DataType = GetType(String)
-            End Select
-
-
-
-            oDatatable.Columns.Add(oColumn)
-
-            ' Fetch and cache Combobox results
-            Dim oConnectionId As Integer = NotNull(oRow.Item("CONNECTION_ID"), 0)
-            Dim oSqlCommand As String = NotNull(oRow.Item("SQL_COMMAND"), "")
-
-            If oConnectionId > 0 And oSqlCommand <> "" Then
-                Try
-                    Dim oComboboxDataTable As DataTable = Nothing
-                    Dim oColumnName As String = oRow.Item("SPALTENNAME")
-                    Logger.Debug("Working on SQL for Column[{0}]...", oColumnName)
-                    If Not clsPatterns.HasComplexPatterns(oSqlCommand) Then
-                        Logger.Debug("SQL has no complex patterns!")
-                        'oComboboxDataTable = ClassDatabase.Return_Datatable_ConId(oSqlCommand, oConnectionId)
-                        oComboboxDataTable = DatabaseFallback.GetDatatable(New GetDatatableOptions(oSqlCommand, DatabaseType.ECM) With {
-                            .ConnectionId = oConnectionId
-                        })
-                    Else
-                        Logger.Debug("...has complex patterns!!")
-                    End If
-
-                    Dim oRepositoryItem = GridTables_GetRepositoryItemForColumn(oColumnName, oComboboxDataTable, oRow.Item("ADVANCED_LOOKUP"))
-
-                    If GridTables.Item(oControlId).ContainsKey(oColumnName) Then
-                        GridTables.Item(oControlId).Item(oColumnName) = oRepositoryItem
-                    Else
-                        GridTables.Item(oControlId).Add(oColumnName, oRepositoryItem)
-                    End If
-                Catch ex As Exception
-                    Logger.Warn("Could not load data for column {0} in control {1}", oRow.Item("SPALTENNAME"), oControl.Name)
-                    Logger.Error(ex)
-                End Try
-            End If
-        Next
-
         oView.PopulateColumns(oDatatable)
         oControl.DataSource = oDatatable
         oControl.RefreshDataSource()
@@ -584,135 +585,8 @@ Public Class ClassControlCreator
             End Try
         End If
 
-
+        oGridControlCreator.ConfigureViewColumns(DT_MY_COLUMNS, oView, oControl)
-        Dim oShouldDisplayFooter As Boolean = False
+        oGridControlCreator.ConfigureViewEvents(DT_MY_COLUMNS, oView, oControl, oControlId)
-
-        For Each oCol As GridColumn In oView.Columns
-            Dim oColumnData As DataRow = DT_MY_COLUMNS.
-                Select($"SPALTENNAME = '{oCol.FieldName}'").
-                FirstOrDefault()
-
-            If oColumnData Is Nothing Then
-                Continue For
-            End If
-
-            Dim oSequence As Integer = oColumnData.Item("SEQUENCE")
-            oCol.VisibleIndex = oSequence
-
-            Dim oSummaryFunction As String = oColumnData.Item("SUMMARY_FUNCTION")
-
-            Select Case oSummaryFunction
-                Case AGGREGATE_TOTAL_INTEGER
-                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum
-                    oCol.SummaryItem.DisplayFormat = "SUM: {0:0}"
-                    oShouldDisplayFooter = True
-
-                Case AGGREGATE_TOTAL_FLOAT
-                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum
-                    oCol.SummaryItem.DisplayFormat = "SUM: {0:n2}"
-                    oShouldDisplayFooter = True
-
-                Case AGGREGATE_TOTAL_AVG
-                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Average
-                    oCol.SummaryItem.DisplayFormat = "AVG: {0}"
-                    oShouldDisplayFooter = True
-
-                Case AGGREGATE_TOTAL_MAX
-                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Max
-                    oCol.SummaryItem.DisplayFormat = "MAX: {0}"
-                    oShouldDisplayFooter = True
-
-                Case AGGREGATE_TOTAL_MIN
-                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Min
-                    oCol.SummaryItem.DisplayFormat = "MIN: {0}"
-                    oShouldDisplayFooter = True
-
-                Case AGGREGATE_TOTAL_COUNT
-                    oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Count
-                    oCol.SummaryItem.DisplayFormat = "NUM: {0}"
-                    oShouldDisplayFooter = True
-
-            End Select
-        Next
-
-        oView.OptionsView.ShowFooter = oShouldDisplayFooter
-
-        AddHandler oView.InitNewRow, Sub(sender As Object, e As InitNewRowEventArgs)
-                                         Try
-                                             Logger.Debug("Initialzing new row")
-
-                                             For Each oColumnData As DataRow In DT_MY_COLUMNS.Rows
-                                                 For Each oGridColumn As GridColumn In oView.Columns
-                                                     If oGridColumn.FieldName <> oColumnData.Item("SPALTENNAME") Then
-                                                         Continue For
-                                                     End If
-
-                                                     Dim oDefaultValue = NotNull(oColumnData.Item("DEFAULT_VALUE"), String.Empty)
-
-                                                     If oDefaultValue <> String.Empty Then
-                                                         Logger.Debug("Setting default value [{0}] for column [{1}]", oDefaultValue, oGridColumn.FieldName)
-                                                         oView.SetRowCellValue(e.RowHandle, oGridColumn.FieldName, oDefaultValue)
-                                                     End If
-                                                 Next
-                                             Next
-
-                                         Catch ex As Exception
-                                             Logger.Error(ex)
-                                         Finally
-                                             newRowModified = False
-                                         End Try
-                                     End Sub
-
-        AddHandler oView.CustomRowCellEdit, Sub(sender As Object, e As CustomRowCellEditEventArgs)
-                                                Try
-                                                    For Each oRow As DataRow In DT_MY_COLUMNS.Rows
-                                                        Dim oColumnName = oRow.Item("SPALTENNAME")
-                                                        Dim oEditorExists = GridTables_TestEditorExistsByControlAndColumn(oControlId, oColumnName)
-                                                        If oColumnName <> e.Column.FieldName Then
-                                                            Continue For
-                                                        End If
-
-                                                        If oEditorExists Then
-                                                            Dim oEditor = GridTables.Item(oControlId).Item(oColumnName)
-                                                            Logger.Debug("Assigning Editor to Column [{0}]", oColumnName)
-                                                            e.RepositoryItem = oEditor
-                                                        Else
-                                                            Logger.Debug("Editor for Column [{0}] does not exist", oColumnName)
-                                                        End If
-                                                    Next
-                                                Catch ex As Exception
-                                                    Logger.Warn("Error in CustomRowCellEdit for [{0}]", e.CellValue)
-                                                    Logger.Error(ex)
-                                                End Try
-                                            End Sub
-
-        AddHandler oView.ValidatingEditor, Sub(sender As Object, e As BaseContainerValidateEditorEventArgs)
-                                               Dim oRow As DataRowView = oView.GetRow(oView.FocusedRowHandle)
-                                               Dim oColumnName = oView.FocusedColumn.FieldName
-                                               Logger.Debug("Validating Editor for Column [{0}]", oColumnName)
-                                               GridTables_ValidateColumn(oView, DT_MY_COLUMNS, oColumnName, e.Value, e.Valid, e.ErrorText)
-                                           End Sub
-
-        AddHandler oView.InvalidRowException, AddressOf View_InvalidRowException
-        AddHandler oView.ValidatingEditor, AddressOf View_ValidatingEditor
-
-        ' These handlers are all used for the custom DefaultValue functionality, additionally some code in the 'InitNewRow' event.
-        ' https://supportcenter.devexpress.com/ticket/details/t1035580/how-to-default-a-value-in-a-column-when-add-new-row-in-data-grid
-        AddHandler oView.ShowingEditor, AddressOf View_ShowingEditor
-        AddHandler oView.ShownEditor, AddressOf View_ShownEditor
-        AddHandler oView.ValidateRow, AddressOf View_ValidateRow
-        AddHandler oControl.LostFocus, Sub(sender As GridControl, e As EventArgs)
-                                           Dim oView2 As GridView = sender.FocusedView
-
-                                           ' 19.08.2022: 
-                                           ' Calling UpdateCurrentRow when newRowModified Is true
-                                           ' leads to some weird jumping of focus in the current cell.
-                                           ' This seems to fix it.
-                                           If newRowModified = False Then
-                                               oView2.UpdateCurrentRow()
-                                           End If
-
-                                       End Sub
 
         ' 08.11.2021: Fix editor being empty on first open
         oView.FocusInvalidRow()
@@ -720,53 +594,11 @@ Public Class ClassControlCreator
         Return oControl
     End Function
 
-    Private Shared newRowModified As Boolean = False
+    Private newRowModified As Boolean = False
 
-    Private Shared Sub View_ShowingEditor(sender As Object, e As CancelEventArgs)
-        Dim view As GridView = TryCast(sender, GridView)
-        Logger.Debug("Showing editor.")
-        If view.IsNewItemRow(view.FocusedRowHandle) AndAlso Not newRowModified Then
-            Logger.Debug("Adding new row.")
-            view.AddNewRow()
-        End If
-    End Sub
 
-    Private Shared Sub View_ShownEditor(sender As Object, e As EventArgs)
-        Dim view As GridView = TryCast(sender, GridView)
-        If view.IsNewItemRow(view.FocusedRowHandle) Then
-            Logger.Debug("Attaching Modified Handler.")
-            AddHandler view.ActiveEditor.Modified, Sub()
-                                                       Logger.Debug("Row was modified.")
-                                                       newRowModified = True
-                                                   End Sub
-        End If
-    End Sub
 
-    Private Shared Sub View_ValidateRow(sender As Object, e As ValidateRowEventArgs)
+    Public Function CreateExistingLine(row As DataRow, designMode As Boolean) As LineLabel
-        Dim view As GridView = TryCast(sender, GridView)
-        If view.IsNewItemRow(e.RowHandle) AndAlso Not newRowModified Then
-            Logger.Debug("Deleting unused row")
-            view.DeleteRow(e.RowHandle)
-        End If
-
-        Logger.Debug("Validating row. Resetting Modified.")
-        newRowModified = False
-    End Sub
-
-    Private Shared Sub View_ValidatingEditor(sender As Object, e As BaseContainerValidateEditorEventArgs)
-        Dim oValue As String = NotNull(e.Value, "")
-
-        If oValue.Contains(" | ") Then
-            oValue = oValue.Split(" | ").ToList().First()
-            e.Value = oValue
-        End If
-    End Sub
-
-    Private Shared Sub View_InvalidRowException(sender As Object, e As InvalidRowExceptionEventArgs)
-        e.ExceptionMode = ExceptionMode.NoAction
-    End Sub
-
-    Public Shared Function CreateExistingLine(row As DataRow, designMode As Boolean) As LineLabel
         Dim control As LineLabel = CreateBaseControl(New LineLabel(), row, designMode)
         control.Text = "------------------------------"
         control.BorderStyle = BorderStyle.None
@@ -794,7 +626,7 @@ Public Class ClassControlCreator
         End Sub
     End Class
 
-    Public Shared Function GET_CONTROL_PROPERTIES(DT_CONTROL As DataTable, ControlName As String)
+    Public Function GET_CONTROL_PROPERTIES(DT_CONTROL As DataTable, ControlName As String)
         Try
             CURRENT_CONTROL_ID = 0
             CURR_CON_ID = 0
@@ -828,7 +660,7 @@ Public Class ClassControlCreator
         End Try
 
     End Function
-    Public Shared Function GET_CONTROL_PROPERTY(DT_CONTROL As DataTable, ControlGUID As Integer, ColNAME As String)
+    Public Function GET_CONTROL_PROPERTY(DT_CONTROL As DataTable, ControlGUID As Integer, ColNAME As String)
         Try
             CURRENT_CONTROL_ID = 0
             CURR_CON_ID = 0
@@ -855,7 +687,8 @@ Public Class ClassControlCreator
         End Try
 
     End Function
-    Public Shared Function GET_DEPENDING_CONTROLS(DT_CONTROLS As DataTable, ControlName As String)
+
+    Public Function GetDependingControls(DT_CONTROLS As DataTable, ControlName As String) As Boolean
         Try
             Dim dt As New DataTable
             dt = DT_CONTROLS
@@ -871,13 +704,12 @@ Public Class ClassControlCreator
         Catch ex As Exception
             Logger.Error(ex)
             Logger.Info("Unexpected Error in GET_DEPENDING_CONTROLS (" & ControlName & "):" & ex.Message)
-            Return 0
+            Return False
         End Try
     End Function
 
-    Public Shared Function GET_CONNECTION_INFO(CON_ID As Integer)
+    Public Function GET_CONNECTION_INFO(CON_ID As Integer) As DataRow()
         Try
-
             Dim dt As New DataTable
             dt = BASEDATA_DT_TBDD_CONNECTION
             '  Define the filter
@@ -894,10 +726,9 @@ Public Class ClassControlCreator
             Logger.Info("Unexpected Error in GET_CONNECTION_INFO (" & CON_ID.ToString & "):" & ex.Message)
             Return Nothing
         End Try
-
     End Function
 
-    Public Shared Sub GridTables_CacheDatatableForColumn(pControlId As Object, pColumnName As Object, pSqlStatement As Object, pConnectionId As Integer, pAdvancedLookup As Boolean)
+    Public Sub GridTables_CacheDatatableForColumn(pControlId As Object, pColumnName As Object, pSqlStatement As Object, pConnectionId As Integer, pAdvancedLookup As Boolean)
         Try
             'Dim oTable As DataTable = ClassDatabase.Return_Datatable_ConId(pSqlStatement, pConnectionId)
             Dim oTable As DataTable = DatabaseFallback.GetDatatable(New GetDatatableOptions(pSqlStatement, DatabaseType.ECM) With {
@@ -922,7 +753,7 @@ Public Class ClassControlCreator
         End Try
     End Sub
 
-    Public Shared Function GridTables_GetRepositoryItemForColumn(pColumnName As String, pDataTable As DataTable, pIsAdvancedLookup As Boolean) As RepositoryItem
+    Public Function GridTables_GetRepositoryItemForColumn(pColumnName As String, pDataTable As DataTable, pIsAdvancedLookup As Boolean) As RepositoryItem
         If pIsAdvancedLookup Then
 
             Dim oEditor = New RepositoryItemLookupControl3
@@ -952,7 +783,9 @@ Public Class ClassControlCreator
                     Dim oValue = oRow2.Item(0)
 
                     Try
-                        oValue &= $" | {oRow2.Item(1)}"
+                        If oRow2.ItemArray.Length > 1 Then
+                            oValue &= $" | {oRow2.Item(1)}"
+                        End If
                     Catch ex As Exception
                     End Try
 
@@ -965,7 +798,7 @@ Public Class ClassControlCreator
         End If
     End Function
 
-    Public Shared Sub GridTables_HandleControlValueChange(pControlPanel As Panel, pColumnsWithSqlAndControlPlaceholders As DataTable)
+    Public Sub GridTables_HandleControlValueChange(pControlPanel As XtraScrollableControl, pColumnsWithSqlAndControlPlaceholders As DataTable)
         If Not IsNothing(pColumnsWithSqlAndControlPlaceholders) AndAlso pColumnsWithSqlAndControlPlaceholders.Rows.Count > 0 Then
             For Each oRow As DataRow In pColumnsWithSqlAndControlPlaceholders.Rows
                 Try
@@ -1007,56 +840,8 @@ Public Class ClassControlCreator
         End If
     End Sub
 
-    Private Shared Function GridTables_TestEditorExistsByControlAndColumn(oControlId As Integer, pColumn As String) As Boolean
-        If GridTables.ContainsKey(oControlId) Then
-            Dim oContainsKey = GridTables.Item(oControlId).ContainsKey(pColumn)
-            If oContainsKey AndAlso GridTables.Item(oControlId).Item(pColumn) IsNot Nothing Then
-                Return True
-            Else
-                Return False
-            End If
-        Else
-            Return False
-        End If
-    End Function
 
-    Private Shared Function GridTables_ValidateColumn(pView As GridView, pColumnDefinition As DataTable, ColumnName As String, pValue As Object, ByRef pIsValid As Boolean, ByRef pErrorText As String) As Boolean
-        Dim oColumn As DataRow = (From r As DataRow In pColumnDefinition.Rows
-                                  Where r.Item("SPALTENNAME") = ColumnName
-                                  Select r).FirstOrDefault()
 
-        Dim oGridColumn As GridColumn = (From c As GridColumn In pView.Columns
-                                         Where c.FieldName = ColumnName
-                                         Select c).FirstOrDefault()
 
-        Dim oIsRequired = oColumn.Item("VALIDATION")
-
-        Try
-            Dim oRegex = NotNull(oColumn.Item("REGEX_MATCH"), String.Empty)
-            Dim oRegexMessage = NotNull(oColumn.Item("REGEX_MESSAGE_DE"), String.Empty)
-            If oRegex <> String.Empty Then
-                Dim oMatch = New Regex(oRegex).IsMatch(pValue.ToString)
-                Dim oDefaultMessage = "Wert entspricht nicht dem gefordertem Format!"
-                Dim oMessage = IIf(oRegexMessage <> String.Empty, oRegexMessage, oDefaultMessage)
-
-                If oMatch = False Then
-                    pErrorText = oMessage
-                    pIsValid = False
-                    Return False
-                End If
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-        End Try
-
-        If oIsRequired And (pValue IsNot Nothing AndAlso pValue.ToString = "") Then
-            pErrorText = "Spalte muss ausgefüllt werden!"
-            pIsValid = False
-            Return False
-
-        End If
-
-        Return True
-    End Function
 
 End Class

app/TaskFlow/ClassEmail.vb

@@ -48,17 +48,17 @@ Public Class ClassEmail
                 '*Send the message */
                 emailClient.Send(message)
                 If test = True Then
-                    MsgBox("Die Test-Email wurde erfolgreich versendet!", MsgBoxStyle.Information, "Erfolgsmeldung:")
+                    MsgBox("TestMail sent successfully!", MsgBoxStyle.Information, "Success:")
                 End If
                 If Log = True Then
-                    MsgBox("Die Support-Email wurde erfolgreich versendet!", MsgBoxStyle.Information, "Erfolgsmeldung:")
+                    MsgBox("The Support-Email has been sent successfully!", MsgBoxStyle.Information, "Success:")
                 End If
                 'LOGGER.Info(">> Support/Log Email erfolgreich an " & _mailempfaenger & " versendet!", False)
             Next
             Return True
         Catch ex As Exception
             LOGGER.Error(ex)
-            LOGGER.Info("### Fehler im Mailversand: " & ex.Message)
+            LOGGER.Info("### Error in Mailversand: " & ex.Message)
             Return False
         End Try
     End Function

app/TaskFlow/ClassFinalizeDoc.vb

@@ -1,4 +1,5 @@
-Imports DigitalData.Modules.EDMI.API.Constants
+Imports DevExpress.DataAccess.Native.Json
+Imports DigitalData.Modules.EDMI.API.Constants
 Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
 
 Public Class ClassFinalizeDoc
@@ -18,10 +19,11 @@ Public Class ClassFinalizeDoc
                 'Jetzt finale Indexe setzen
                 LOGGER.Debug("working final indices for doc: " & WMObject.aName)
                 For Each dr As DataRow In CURRENT_DT_FINAL_INDEXING.Rows
-                    Dim value As String = dr.Item("VALUE").ToString
+                    Dim ovalueString As String = dr.Item("VALUE").ToString
                     Dim INDEXNAME = dr.Item("INDEXNAME").ToString
                     Dim oContinueOnIndifferentState As Boolean = CBool(dr.Item("CONTINUE_INDETERMINED"))
-                    If value.ToUpper = "SQL-Command".ToUpper Then '###### Indexierung mit variablen SQL ###
+                    Dim VektorBeahaviour = dr.Item("IF_VEKTOR_BEHAVIOUR").ToString
+                    If ovalueString.ToUpper = "SQL-Command".ToUpper Then '###### Indexierung mit variablen SQL ###
                         LOGGER.Debug("indexing with dynamic sql...")
                         'Dim SQL_COMMAND = dr.Item("SQL_COMMAND")
                         '' Regulären Ausdruck zum Auslesen der Indexe definieren
@@ -52,32 +54,32 @@ Public Class ClassFinalizeDoc
                         LOGGER.Debug("sql after ReplaceAllValues: " & sql_Statement)
                         Dim oDynamic_value = DatabaseFallback.GetScalarValueECM(sql_Statement) ', CONNECTION_STRING_ECM, "Write_Final_Metadata/dynamic_value")
                         If Not IsNothing(oDynamic_value) Then
-                            value = oDynamic_value
+                            ovalueString = oDynamic_value
                         Else
                             Continue For
                         End If
                     Else
-                        If value.StartsWith("v") Then
+                        If ovalueString.StartsWith("v") Then
                             Select Case dr.Item("VALUE").ToString
                                 Case "vDate"
-                                    value = Now.ToShortDateString
+                                    ovalueString = Now.ToShortDateString
                                 Case "vUserName"
-                                    value = USER_USERNAME
+                                    ovalueString = USER_USERNAME
                                 Case Else
-                                    value = dr.Item("VALUE")
+                                    ovalueString = dr.Item("VALUE")
                             End Select
                         End If
                     End If
 
                     Dim result() As String
                     ReDim Preserve result(0)
-                    result(0) = value
+                    result(0) = ovalueString
 
                     Dim oIndexType = WINDREAM.GetTypeOfIndex(INDEXNAME)
                     LOGGER.Debug($"oIndexType {oIndexType.ToString}")
                     If oIndexType > 4000 And oIndexType < 5000 Then
                         'Hier muss nun separat als Vektorfeld indexiert werden
-                        If Indexiere_VektorfeldPM(value, INDEXNAME, WMObject) = True Then
+                        If Indexiere_VektorfeldPM(ovalueString, INDEXNAME, WMObject) = True Then
                             LOGGER.Debug("FINALER INDEX '" & INDEXNAME.Replace("[%VKT", "") & "' WURDE ERFOLGREICH GESETZT")
                         Else
 
@@ -87,12 +89,13 @@ Public Class ClassFinalizeDoc
                         End If
                     Else
                         LOGGER.Debug("now indexing..")
-                        If Indexiere_File(INDEXNAME, result, WMObject) = True Then
+
+                        If WINDREAM_MOD.SetFileIndex(CURRENT_DOC_PATH, INDEXNAME, ovalueString, CURRENT_WMObjecttype) = True Then 'Indexiere_File(INDEXNAME, result, WMObject) = True Then
                             LOGGER.Debug("FINALER INDEX '" & INDEXNAME & "' WURDE ERFOLGREICH GESETZT")
                             LOGGER.Debug("")
                             'Nun das Logging
                             If CURRENT_PROFILE_LOG_INDEX <> "" Then
-                                Dim logstr = Return_LOGString(value, "DDFINALINDEX", INDEXNAME)
+                                Dim logstr = Return_LOGString(ovalueString, "DDFINALINDEX", INDEXNAME)
                                 Indexiere_VektorfeldPM(logstr, CURRENT_PROFILE_LOG_INDEX, WMObject)
                             End If
 
@@ -120,39 +123,73 @@ Public Class ClassFinalizeDoc
         End Try
     End Function
 
-    Private Shared Function Indexiere_File(idxxname As String, idxvalue As Object, WMObject As WINDREAMLib.WMObject)
+    Private Shared Function Indexiere_File(pIndexName As String, pIndexValues As Object, WMObject As WINDREAMLib.WMObject) As Boolean
-        Dim File_indexiert As Boolean = False
+        LOGGER.Debug("### Indexiere_File Begin ###")
+        Dim indexierung_erfolgreich As Boolean = False
+        Try
+            Dim oIndexType As Integer = WINDREAM_MOD.GetIndexType(pIndexName)
+            If oIndexType > 4095 Then
+                LOGGER.Debug("Es Handelt sich um einen VektorIndex...")
+                Dim oExistingItems = WINDREAM_MOD.GetIndexValue(CURRENT_DOC_PATH, pIndexName)
+
+                Dim oListofString As New List(Of String)
+                If pIndexValues.Length = 0 Then
+                    LOGGER.Debug("oSplitArray.Length = 0")
+                    oListofString.Add(pIndexValues(0))
+                Else
+                    LOGGER.Debug($"pIndexValues.Length is > 0 [{pIndexValues.length}] ...")
+                    For Each oStr In pIndexValues
+                        LOGGER.Debug("pIndexValues - oString : {0}", oStr)
+                        oListofString.Add(oStr)
+                    Next
+                End If
+
+                If oExistingItems.Count > 0 Then
+                    LOGGER.Debug("oOverwrite = False and WMObject already contains [{0}] values in attribute,Values will be concatted", oExistingItems.Count)
+                    oListofString = oExistingItems.Concat(oListofString).ToList()
+                End If
+                oListofString = oListofString.Distinct().ToList()
+                indexierung_erfolgreich = WINDREAM_MOD.SetFileIndexLoS(CURRENT_DOC_PATH, pIndexName, oListofString, CURRENT_WMObjecttype)
+            Else
+                Dim oStringValue As String = pIndexValues(0).ToString
+                indexierung_erfolgreich = WINDREAM_MOD.SetFileIndex(CURRENT_DOC_PATH, pIndexName, oStringValue, CURRENT_WMObjecttype)
+            End If
+            Return indexierung_erfolgreich
+        Catch ex As Exception
+            LOGGER.Warn("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString)
+            Return False
+        End Try
 
         ' Try
-        'Die Arrays vorbereiten
+        ''Die Arrays vorbereiten
-        Dim arrIndex() As String = Nothing
+        'Dim arrIndex() As String = Nothing
-        Dim arrValue() As String = Nothing
+        'Dim arrValue() As String = Nothing
-        arrIndex = Nothing
+        'arrIndex = Nothing
-        arrValue = Nothing
+        'arrValue = Nothing
-        'Den Indexnamen übergeben
+        ''Den Indexnamen übergeben
-        ReDim Preserve arrIndex(0)
+        'ReDim Preserve arrIndex(0)
-        arrIndex(0) = idxxname
+        'arrIndex(0) = idxxname
-        'Das Array der Idnexwerte überprüfen
+        ''Das Array der Idnexwerte überprüfen
-        If idxvalue Is Nothing = False Then
+        'If idxvalue Is Nothing = False Then
-            If idxvalue.Length() > 1 Then
+        '    If idxvalue.Length() > 1 Then
-                LOGGER.Debug("Indexing Index '" & idxxname & "' with Arrayvalue")
+        '        LOGGER.Debug("Indexing Index '" & idxxname & "' with Arrayvalue")
-                Dim anzahl As Integer = 0
+        '        Dim anzahl As Integer = 0
-                For Each indexvalue As String In idxvalue
+        '        For Each indexvalue As String In idxvalue
-                    ReDim Preserve arrValue(anzahl)
+        '            ReDim Preserve arrValue(anzahl)
-                    arrValue(anzahl) = indexvalue
+        '            arrValue(anzahl) = indexvalue
-                    anzahl += 1
+        '            anzahl += 1
-                Next
+        '        Next
-            Else
+        '    Else
-                LOGGER.Debug("Indexing Index '" & idxxname & "' with value '" & idxvalue(0) & "'")
+        '        LOGGER.Debug("Indexing Index '" & idxxname & "' with value '" & idxvalue(0) & "'")
-                ReDim Preserve arrValue(0)
+        '        ReDim Preserve arrValue(0)
-                arrValue(0) = idxvalue(0).ToString
+        '        arrValue(0) = idxvalue(0).ToString
-            End If
+        '    End If
-            'Dim _windreamPM As New ClassPMWindream
+        '    'Dim _windreamPM As New ClassPMWindream
-            'Jetzt das eigentliche Indexieren der Datei
+        '    'Jetzt das eigentliche Indexieren der Datei
-            File_indexiert = WINDREAM.RunIndexing(WMObject, arrIndex, arrValue)
+        'File_indexiert = WINDREAM.RunIndexing(WMObject, arrIndex, arrValue)
 
-            Return File_indexiert
+        'Return File_indexiert
-        End If
+        ' End If
 
         'Catch ex As Exception
         '    LOGGER.Info("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString, True)

app/TaskFlow/ClassFormat.vb

@@ -0,0 +1,104 @@
+Imports System.Globalization
+Imports DevExpress.CodeParser
+Imports DevExpress.Data.Controls
+Imports DevExpress.XtraPrinting
+
+Public Class ClassFormat
+    Public Const CURRENCY_FORMAT = "C2"
+    Public Const DECIMAL_FORMAT = "F"
+    Public Const DATE_FORMAT = "d"
+    Public Const DATETIME_FORMAT = "G"
+
+    Public Shared Function GetFormatString(pFormatString As String) As String
+        Select Case pFormatString
+            Case ClassControlCreator.CONTROL_TYPE_CURRENCY
+                Return CURRENCY_FORMAT
+
+            Case ClassControlCreator.CONTROL_TYPE_DOUBLE
+                Return DECIMAL_FORMAT
+
+            Case ClassControlCreator.CONTROL_TYPE_DATE
+                Return DATE_FORMAT
+
+            Case ClassControlCreator.CONTROL_TYPE_DATETIME
+                Return DATETIME_FORMAT
+
+            Case Else
+                Return String.Empty
+
+        End Select
+    End Function
+
+    ''' <summary>
+    ''' Converts a string according to the type information, using the invariant culture
+    ''' </summary>
+    ''' <param name="pValue"></param>
+    ''' <param name="pType"></param>
+    ''' <returns></returns>
+    Public Shared Function GetConvertedValue(pValue As Object, pType As String) As Object
+        Dim oConvertedValue
+        LOGGER.Debug($"GetConvertedValue: {pType}")
+
+        Select Case pType
+            Case ClassControlCreator.CONTROL_TYPE_DOUBLE
+                If Double.TryParse(pValue, NumberStyles.Float, CultureInfo.InvariantCulture, oConvertedValue) Then
+                    Return oConvertedValue
+                End If
+
+            Case ClassControlCreator.CONTROL_TYPE_CURRENCY
+                Try
+                    LOGGER.Debug($"GetConvertedValue: Converting {pValue.ToString} to Currency ")
+                    If Double.TryParse(pValue, NumberStyles.Currency, CultureInfo.InvariantCulture, oConvertedValue) Then
+                        Return oConvertedValue
+                    End If
+                Catch ex As Exception
+                    LOGGER.Error(ex)
+                End Try
+
+
+            Case ClassControlCreator.CONTROL_TYPE_INTEGER
+                If Integer.TryParse(pValue, NumberStyles.Integer, CultureInfo.InvariantCulture, oConvertedValue) Then
+                    Return oConvertedValue
+                End If
+            Case Else
+                LOGGER.Debug($"GetConvertedValue - Case ELSE - pType is {pType}")
+                Try
+                    oConvertedValue = pValue.ToString
+                Catch ex As Exception
+                    LOGGER.Warn($"Error in GetConvertedValue:  pType is {pType} - converting value to String")
+                    oConvertedValue = ""
+                End Try
+
+        End Select
+
+        Return oConvertedValue
+    End Function
+
+    ''' <summary>
+    ''' Converts values to their respective data type and then back to string 
+    ''' according to the current culture
+    ''' </summary>
+    ''' <param name="pValue"></param>
+    ''' <returns></returns>
+    Public Shared Function GetStringValue(pValue As Object) As String
+        Select Case pValue.GetType
+            Case GetType(Single)
+                Return DirectCast(pValue, Single).ToString(CultureInfo.CurrentCulture)
+
+            Case GetType(Double)
+                Return DirectCast(pValue, Double).ToString(CultureInfo.CurrentCulture)
+
+            Case GetType(Decimal)
+                Return DirectCast(pValue, Decimal).ToString(CultureInfo.CurrentCulture)
+
+            Case GetType(Date)
+                Return DirectCast(pValue, Date).ToString(CultureInfo.CurrentCulture)
+
+            Case GetType(DateTime)
+                Return DirectCast(pValue, DateTime).ToString(CultureInfo.CurrentCulture)
+
+            Case Else
+                Return pValue.ToString
+        End Select
+    End Function
+End Class

app/TaskFlow/ClassIDBData.vb

@@ -133,7 +133,6 @@
     End Function
     Public Function Delete_Term_Object_From_Metadata(oAttributeName As String, oTerm2Delete As String) As Object
         Try
-            Dim oAttributeValue
             Dim oID_IS_FOREIGN As Integer
             oID_IS_FOREIGN = 0
             If IDB_USES_WMFILESTORE Then
@@ -234,6 +233,7 @@
                     Dim oSuccess As Boolean = False
 
                     Dim oPRSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oNewValueRow.Item(1).ToString}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT"
+                    LOGGER.Debug(oPRSQL)
                     oSuccess = DatabaseFallback.ExecuteNonQueryIDB(oPRSQL)
                     If oSuccess = False Then
                         Return False
@@ -242,6 +242,7 @@
                 Return True
             Else
                 Dim oFNSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oNewValue}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT"
+                LOGGER.Debug(oFNSQL)
                 Return DatabaseFallback.ExecuteNonQueryIDB(oFNSQL)
             End If
 

app/TaskFlow/ClassInit.vb

@@ -5,6 +5,7 @@ Imports DigitalData.Modules.EDMI.API
 Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
 Imports DigitalData.Modules.EDMI.API.Constants
 Imports DigitalData.Modules.Database
+Imports System.Windows.Forms.VisualStyles.VisualStyleElement
 
 Public Class ClassInit
     Public _lizenzManager As ClassLicenseManager
@@ -12,19 +13,17 @@ Public Class ClassInit
 
     <STAThread()>
     Public Sub InitLogger()
-        Dim oConfigPrefix As String = My.Settings.UserConfig_Prefix
         Dim oLocalUserAppDataPath As String = Application.LocalUserAppDataPath
-        If oConfigPrefix.Length > 0 Then
-            oLocalUserAppDataPath = IO.Path.Combine(oLocalUserAppDataPath, oConfigPrefix)
-        End If
         LOGCONFIG = New LogConfig(LogConfig.PathType.CustomPath,
                                        oLocalUserAppDataPath & "\Log",
-                                        Nothing,
+                                       My.Settings.UserConfig_Prefix,
                                         My.Application.Info.CompanyName,
                                         My.Application.Info.ProductName)
-        LOGGER = LOGCONFIG.GetLogger("ProcessManager")
 
-        LOGGER.Info("## ProcessManager started - {0}", Now)
+
+        LOGGER = LOGCONFIG.GetLogger("taskFLOW")
+
+        LOGGER.Info("## taskFLOW started - {0}", Now)
         Try
             Dim directory As New IO.DirectoryInfo(Application.LocalUserAppDataPath & "\Log")
 
@@ -46,23 +45,11 @@ Public Class ClassInit
     Public Sub InitUserConfig()
         Try
             Dim oUserAppDataPath As String = Application.UserAppDataPath
-            Dim oLegacyAppDataPath As String = Application.UserAppDataPath
+            If My.Settings.UserConfig_Prefix <> String.Empty Then
+                oUserAppDataPath += "\" + My.Settings.UserConfig_Prefix
+            End If
             Dim oCommonAppDataPath = Application.CommonAppDataPath
             Dim oStartupPath = Application.StartupPath
-            Dim oConfigPrefix As String = My.Settings.UserConfig_Prefix
-
-            ' If prefix is configured, use it to create a subfolder in app data and migrate existing data
-            If oConfigPrefix.Length > 0 Then
-                oUserAppDataPath = IO.Path.Combine(Application.UserAppDataPath, oConfigPrefix)
-
-                Dim oConfigUtils As New ConfigUtils(LOGCONFIG)
-
-                If oConfigUtils.TestMigrationNeeded(oUserAppDataPath) Then
-                    LOGCONFIG.Debug = True
-                    oConfigUtils.MigrateConfig(oLegacyAppDataPath, oUserAppDataPath)
-                    LOGCONFIG.Debug = False
-                End If
-            End If
 
             ' If AppConfig from Startup Path should be forced, rewrite the common app data path
             If My.Settings.UseAppConfigConString = True Then
@@ -122,6 +109,19 @@ Public Class ClassInit
                 DEBUG = True
                 LOGCONFIG.Debug = True
             End If
+
+            USER_CONFIG_DIRECTORY = CONFIG.UserConfigPath.Replace("UserConfig.xml", "")
+            If USER_LANGUAGE <> String.Empty Then
+                USER_CONFIG_DIRECTORY = System.IO.Path.Combine(USER_CONFIG_DIRECTORY, USER_LANGUAGE)
+            End If
+            Try
+                If Not System.IO.Directory.Exists(USER_CONFIG_DIRECTORY) Then
+                    System.IO.Directory.CreateDirectory(USER_CONFIG_DIRECTORY)
+                End If
+            Catch ex As Exception
+                LOGGER.Error(ex)
+            End Try
+
         Catch ex As Exception
             LOGGER.Error(ex)
         End Try
@@ -208,6 +208,7 @@ Public Class ClassInit
         ' We initialize the Class in anycase.
         ' If there is no client, it will fall back to the db by itself
         DatabaseFallback = New DatabaseWithFallback(LOGCONFIG, _Client, Database_ECM, Database_IDB)
+
         If dbECMInitialized = True And CONNECTION_STRING_IDB = String.Empty Then
             Return True
         ElseIf dbECMInitialized = True And CONNECTION_STRING_IDB <> String.Empty Then
@@ -239,7 +240,21 @@ Public Class ClassInit
             If split.Length >= 2 Then
                 LICENSE_VALID = True
             End If
-            Dim oLICDATE = CDate(split(1))
+            Dim oLICDATE As Date
+            Try
+                oLICDATE = CDate(split(1))
+            Catch ex As Exception
+                LOGGER.Warn($"Error Converting Value {split(1)} to DATE")
+                Try
+                    Dim expenddt As Date = Date.ParseExact(split(1), "dd.MM.yyyy", System.Globalization.DateTimeFormatInfo.InvariantInfo)
+                    oLICDATE = expenddt
+                Catch ex1 As Exception
+                    LOGGER.Warn($"Second Error Converting DATE with ParseExact - Setting Date = Today")
+                    oLICDATE = Now.Date
+                End Try
+
+            End Try
+
             If oLICDATE < CDate(Now) Then
                 MsgBox("Your license has expired!" & vbNewLine & "Last valid date: " & split(1) & vbNewLine & "Please contact Your sysadmin", MsgBoxStyle.Exclamation)
                 LICENSE_EXPIRED = True
@@ -270,13 +285,13 @@ Public Class ClassInit
         oStopWatch.Done()
     End Sub
     <STAThread()>
-    Public Sub InitUserLogin(Optional pUSRNAME As String = "")
+    Public Sub InitUserLogin()
         Dim oStopWatch As New RefreshHelper.SW("InitUserLogin")
         Dim oSQL As String
         Try
-            If pUSRNAME <> String.Empty Then
+            If USER_GHOST_MODE_USRNAME <> String.Empty Then
-                LOGGER.Info($"InitUserLogin with GhostUSer [{pUSRNAME}]")
+                LOGGER.Info($"InitUserLogin with GhostUser [{USER_GHOST_MODE_USRNAME}]")
-                USER_USERNAME = pUSRNAME
+                USER_USERNAME = USER_GHOST_MODE_USRNAME
             Else
                 USER_USERNAME = Environment.UserName
             End If
@@ -312,8 +327,8 @@ Public Class ClassInit
             End Try
 
             LOGGER.Debug("Username: " & USER_USERNAME)
-            Dim oFnct As New RefreshHelper.SW("FNDD_CHECK_USER_MODULE")
+            Dim oFnct As New RefreshHelper.SW("FNDD_LOGIN_USER_MODULE")
-            oSQL = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','PM',{1},'')", USER_USERNAME, CLIENT_SELECTED)
+            oSQL = String.Format("SELECT * FROM [dbo].[FNDD_LOGIN_USER_MODULE] ('{0}','PM',{1})", USER_USERNAME, CLIENT_SELECTED)
             Dim DT_CHECKUSER_MODULE As DataTable
 
 
@@ -333,11 +348,7 @@ Public Class ClassInit
 
             If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
                 LOGGER.Info($"Got a CheckUserDefintion for User [{USER_USERNAME}]")
-                If DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID") <> 0 Then
+
-                    USER_EXISTS = True
-                Else
-                    USER_EXISTS = False
-                End If
 
                 USER_ID = DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID")
                 USER_SURNAME = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME"))
@@ -349,6 +360,13 @@ Public Class ClassInit
 
 
                 USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS")
+                If USER_IN_MODULE = True Then
+                    USER_EXISTS = True
+                Else
+                    USER_EXISTS = False
+                End If
+
+
                 USER_IS_ADMIN = DT_CHECKUSER_MODULE.Rows(0).Item("IS_ADMIN")
 
                 User.IsAdmin = USER_IS_ADMIN
@@ -378,9 +396,7 @@ Public Class ClassInit
 
                 FINALINDICES = New ClassFinalIndex()
                 FINALINDICES.init()
-                If IDB_ACTIVE = True Then
+
-                    IDBData = New ClassIDBData()
-                End If
 
                 Try
                     USER_RIGHT_VIEW_ONLY = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT2")
@@ -399,7 +415,6 @@ Public Class ClassInit
                 End Try
                 LOGGER.Debug("User exists....")
 
-
                 'Am System anmelden
                 Refresh_Licence()
                 'Check_User_Exists_in_PMGroups()
@@ -427,6 +442,7 @@ Public Class ClassInit
                         ERROR_STATE = "START INCOMPLETE"
                     End If
                 End If
+
                 'Alles OK bis hierhin...nun die FolderwatchKonfig laden
                 LOGGER.Debug("Init Userlogin successfull completed....")
             End If
@@ -468,11 +484,13 @@ Public Class ClassInit
             oTBDD_3RD_PARTY_MODULES = DatabaseFallback.GetDatatable("TBDD_3RD_PARTY_MODULES", New GetDatatableOptions(oSql, DatabaseType.ECM))
 
             For Each oROW As DataRow In oTBDD_3RD_PARTY_MODULES.Rows
-                If oROW.Item("NAME") = "GDPICTURE" Then
+                If oROW.Item("NAME") = "GDPICTURE" And oROW.Item("VERSION") = My.Settings.GDPICTURE_VERSION Then
                     GDPICTURE_LICENSE = oROW.Item("LICENSE")
                 End If
             Next
-
+            If GDPICTURE_LICENSE = String.Empty Then
+                LOGGER.Warn($"Keine GDPICTURE-Lizenz gefunden. Version Konfiguration: {My.Settings.GDPICTURE_VERSION} - Prüfe TBDD_3RD_PARTY_MODULES")
+            End If
             oStep = "TBDD_SQL_COMMANDS"
             oSql = "Select * FROM TBDD_SQL_COMMANDS"
 
@@ -484,7 +502,6 @@ Public Class ClassInit
             BASEDATA_DT_GUI_LANGUAGE_PHRASES = DatabaseFallback.GetDatatable("TBDD_GUI_LANGUAGE_PHRASE", New GetDatatableOptions(oSql, DatabaseType.ECM))
             oStep = "TBPM_PROFILE_SEARCH"
             oSql = "select * from TBPM_PROFILE_SEARCH where TYPE = 'DOC' AND ACTIVE = 1 ORDER BY PROFILE_ID,TAB_INDEX"
-            'BASEDATA_DT_PROFILES_SEARCHES_DOC = DataASorDB.GetDatatable("DD_ECM", oSql, "TBPM_PROFILE_SEARCH", "TYPE = 'DOC'", "PROFILE_ID,TAB_INDEX")
             BASEDATA_DT_PROFILES_SEARCHES_DOC = DatabaseFallback.GetDatatable("TBPM_PROFILE_SEARCH", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
                 .FilterExpression = "TYPE = 'DOC'",
                 .SortByColumn = "PROFILE_ID,TAB_INDEX"

app/TaskFlow/ClassPMWindream.vb

@@ -45,24 +45,11 @@ Public Class ClassPMWindream
     Private Function IsNotEmpty(ByVal aValue As Object)
         If aValue IsNot Nothing Then
             Return True
-
-            'If TypeOf aValue Is String Then
-            '    ' Änderung 28.08.2018: Auch ein leerer String gilt als Wert, damit indexfelder auch geleert werden können
-            '    'If Not aValue = "" Then
-            '    '    Return True
-            '    'End If
-
-            '    Return False
-            'Else
-            '    Return True
-            'End If
         Else
             Return False
         End If
     End Function
-    Private Function return_type(ByVal _wert As Object)
+
-        Return _wert.GetType
-    End Function
     Public Function GetValuesfromAuswahlliste(ByVal listname As String)
         Try
             If listname = "" Then
@@ -99,19 +86,7 @@ Public Class ClassPMWindream
             Return Nothing
         End Try
     End Function
-    Public Function Return_Type(Indexname As String)
+
-        Try
-            ' das entsprechende Attribut aus windream auslesen
-            Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, Indexname)
-            ' den Variablentyp (String, Integer, ...) auslesen 
-            Dim vType = oAttribute.getVariableValue("dwAttrType")
-            Return vType.ToString
-        Catch ex As Exception
-            LOGGER.Error(ex)
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler in Return_Type:")
-            Return ""
-        End Try
-    End Function
 
     Public Function RunIndexing(ByVal oDocument As WMObject, ByVal Indizes() As String, ByVal aValues() As Object)
         Dim vType
@@ -184,13 +159,19 @@ Public Class ClassPMWindream
                                     Case WMObjectVariableValueTypeInteger
                                         LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeInteger")
                                         If IsNumeric(value) = False Then
-                                            frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
+                                            If value = "String.Empty" Then
-                                            LOGGER.Debug("Achtung: Value " & value & " kann nicht in Zahl konvertiert werden!")
+                                                convertValue = vbEmpty
-                                            oDocument.Save()
+                                            Else
-                                            oDocument.unlock()
+                                                frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
-                                            Return False
+                                                LOGGER.Debug("Achtung: Value " & value & " kann nicht in Zahl konvertiert werden!")
+                                                oDocument.Save()
+                                                oDocument.unlock()
+                                                Return False
+                                            End If
+                                        Else
+                                            convertValue = CInt(value)
                                         End If
-                                        convertValue = CInt(value)
+
                                         _int = True
                                     Case WMObjectVariableValueTypeInteger64bit
                                         LOGGER.Debug("Typ des windream-Indexes: Integer64bit")
@@ -314,7 +295,10 @@ Public Class ClassPMWindream
                                         'ReDim ArrName(0)
                                         'ArrName(0) = "Tournr"
                                         'oDocument.SetValues(ArrName, ArrValues)
-                                        If _int = True Then
+                                        If convertValue = "String.Empty" Or convertValue = vbEmpty Then
+                                            LOGGER.Debug("Now Indexing simpleAttribute with vbEmpty ...")
+                                            oDocument.SetVariableValue(aName, String.Empty)
+                                        ElseIf _int = True Then
                                             oDocument.SetVariableValue(aName, CInt(convertValue))
                                         ElseIf _date = True Then
                                             oDocument.SetVariableValue(aName, CDate(convertValue))
@@ -439,7 +423,13 @@ Public Class ClassPMWindream
                                     LOGGER.Debug("Wert für Index vor Indexierung: [{0}]", myArray)
 
                                     'Jetzt die Nachindexierung für Vektor-Felder
-                                    oDocument.SetVariableValue(aName, myArray)
+                                    If myArray(0) = "String.Empty" Then
+                                        LOGGER.Debug("Now Indexing vektor-attribute with vbEmpty ...")
+                                        oDocument.SetVariableValue(aName, vbEmpty)
+                                    Else
+                                        oDocument.SetVariableValue(aName, myArray)
+                                    End If
+
                                     LOGGER.Debug("'SetVariableValue' für VEKTOR erfolgreich", False)
                                 End If
                             End If
@@ -465,195 +455,14 @@ Public Class ClassPMWindream
             LOGGER.Error(ex)
             LOGGER.Info("ClassSearchResult.RunIndexing - " & ex.Message, True)
             frmValidator.idxerr_message = "Unvorhergesehener Fehler in Indexing: " & ex.Message & vbNewLine & "vType: " & vType.ToString
-            allgFunk.Insert_LogEntry($"ERROR RunIndexing>> {ex.Message}")
             oDocument.Save()
             oDocument.unlock()
             Return False
         End Try
     End Function
 
-    Public Sub SetfinalIndex(ByVal oDocument As WMObject, ByVal Indexname As String, ByVal _state As Boolean)
-        Try
-            If Indexname IsNot Nothing Then
-                If Not oDocument.aLocked Then
-                    oDocument.LockFor(WMObjectEditModeIndexEdit)
-                    Dim i As Integer = 0
-
-                    ' das entsprechende Attribut aus windream auslesen
-                    Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, Indexname)
-                    ' den Variablentyp (String, Integer, ...) auslesen 
-                    Dim vType = oAttribute.getVariableValue("dwAttrType")
-                    'MsgBox("Typ: " & vType.ToString, MsgBoxStyle.Critical, "_state: " & _state.ToString)
-                    ' wenn in aValues an Position i ein Wert steht
-                    'MsgBox(oDocument.aName & vbNewLine & aValues(i) & vbNewLine & vType, MsgBoxStyle.Exclamation, "Zeile 87")
-                    Dim value = _state
-                    Dim convertValue
-                    'Den Typ des Index-Feldes auslesen
-                    LOGGER.Debug(">> Typ des windream-Indexes: " & vType.ToString)
-                    Select Case (vType)
-                        Case WMObjectVariableValueTypeBoolean
-                            convertValue = CBool(value)
-                        Case Else
-                            LOGGER.Info(">> Typ des windream-Indexes ist nicht BOOLEAN also Abbruch:")
-                    End Select
-                    '############################################################################################
-                    '####################### Der eigentliche Indexierungsvorgang ################################
-
-                    oDocument.SetVariableValue(Indexname, convertValue)
-                    LOGGER.Debug(">> Index '" & Indexname & "' wurde gesetzt")
-                    oDocument.Save()
-                    oDocument.unlock()
-                    LOGGER.Info(">> DATEI wurde erfolgreich als fertig nachindexiert gekennzeichnet")
-                Else
-                    LOGGER.Info(">> Dokument ist gesperrt, Indexierung erst im nächsten Durchlauf!")
-                End If
-            End If
-
-
-        Catch ex As Exception
-            LOGGER.Error(ex)
-            LOGGER.Info("ClassSearchResult.SetfinalIndex - " & ex.Message, True)
-            'If My.Settings.vNIMailsenden = True Then
-            '    email.Send_EMail("Fehler bei SetfinalIndex - Datei: " & oDocument.aName.ToString & " - Fehler: " & ex.Message)
-            'End If
-            oDocument.Save()
-            oDocument.unlock()
-        End Try
-    End Sub
 #End Region
 
 
-#Region "+++++ Allgemeine Funktionen die Informationen zurückliefern +++++"
 
-    Public Function Get_No_Documents(Profil As String, WD_Search As String)
-        Try
-            Dim wmsearch_exists As Boolean
-            Try
-                wmsearch_exists = System.IO.File.Exists(WD_Search)
-            Catch ex As Exception
-                LOGGER.Error(ex)
-                wmsearch_exists = clsWM.CheckFileExists(WD_Search)
-
-            End Try
-            If wmsearch_exists = False Then
-
-                LOGGER.Info(">> Windream Suche für Profil: '" & Profil & "' konnte nicht ausgeführt werden! Die Datei '" & WD_Search & "' existiert nicht!", False)
-                MsgBox("Windream Suche für Profil: '" & Profil & "' konnte nicht ausgeführt werden!" & vbNewLine & "Die Datei '" & WD_Search & "' existiert nicht!", MsgBoxStyle.Exclamation, "Achtung:")
-                'wenn die gesuchte File eine Suche ist: per MAil informierne und Indexierung abbrechen
-                'If My.Settings.vNIMailsenden = True Then
-                '    email.Send_EMail("Fehler bei Nachindexierung: <br> >> Profil: " & Me.aktivesProfil.Profilname & "<br> >> die windream-Suche : " & Me.aktivesProfil.WindreamSuche & " konnte nicht gefunden werden!" & _
-                '                     "<br> >> Mögliche Fehlerursache: Das W-Laufwerk ist nicht verfügbar!")
-                'End If
-                Return 0
-            Else
-                ' windream-Suche für Profil starten
-                Dim windreamSucheErgebnisse As WMObjects = Me.GetSearchDocuments(WD_Search)
-
-                If windreamSucheErgebnisse.Count > 0 Then
-                    ' neue Anzahl von Dateien
-                    Return windreamSucheErgebnisse.Count
-                Else
-                    ' keine Dateien zum Importieren
-                    Return 0
-                End If
-            End If
-        Catch ex As Exception
-            LOGGER.Error(ex)
-            LOGGER.Info(ex.Message)
-            Return 0
-        End Try
-
-    End Function
-
-    Public Function GetSearchDocuments(ByVal wdfLocation As String)
-
-        If clsWM.CheckFileExists(wdfLocation) = True Then
-
-            Try
-                Dim ProfileName = wdfLocation.Substring(wdfLocation.LastIndexOf("\") + 1)
-                Dim ProfilePath = wdfLocation.Substring(0, wdfLocation.Length - ProfileName.Length)
-
-                Me.oController.CheckSearchProfile(wdfLocation.ToLower)
-                Dim suchTyp = Me.oController.SearchProfileTargetProgID
-                Dim ExSettings As Object
-                Dim oSearch As Object
-                ExSettings = Me.oController.SearchProfileExSettings
-                If ExSettings = 0 Then ExSettings = 7
-
-                Dim srchQuick As WMOSRCHLib.WMQuickSearch = CreateObject("WMOSrch.WMQuickSearch")
-                Dim srchIndex As WMOSRCHLib.WMIndexSearch = CreateObject("WMOSrch.WMIndexSearch")
-                Dim srchObjectType As WMOSRCHLib.WMObjectTypeSearch = CreateObject("WMOSrch.WMObjectTypeSearch")
-
-                Select Case suchTyp.ToString.ToUpper
-                    Case "WMOSRCH.WMQUICKSEARCH"
-                        srchQuick.WMSession = CreateObject("Windream.WMSession", Me.GetCurrentServer)
-
-                        Me.oConnect.LoginSession(srchQuick.WMSession)
-
-                        srchQuick.ClearSearch()
-                        srchQuick.SearchProfilePath = ProfilePath
-                        srchQuick.LoadSearchProfile(ProfileName)
-
-                        oSearch = srchQuick.GetSearch()
-
-                    Case "WMOSRCH.WMINDEXSEARCH"
-                        srchIndex.WMSession = CreateObject("Windream.WMSession", Me.GetCurrentServer)
-
-                        Me.oConnect.LoginSession(srchIndex.WMSession)
-
-                        srchIndex.ClearSearch()
-                        srchIndex.SearchProfilePath = ProfilePath
-                        srchIndex.LoadSearchProfile(ProfileName)
-
-                        oSearch = srchIndex.GetSearch()
-
-                    Case "WMOSRCH.WMOBJECTTYPESEARCH"
-                        srchObjectType.WMSession = CreateObject("Windream.WMSession", Me.GetCurrentServer)
-
-                        Me.oConnect.LoginSession(srchObjectType.WMSession)
-
-                        srchObjectType.ClearSearch()
-                        srchObjectType.SearchProfilePath = ProfilePath
-                        srchObjectType.LoadSearchProfile(ProfileName)
-
-                        oSearch = srchObjectType.GetSearch()
-
-                    Case Else
-                        LOGGER.Info("KEIN GÜLTIGER WINDREAM-SUCHTYP")
-                        Return Nothing
-                End Select
-                Dim WMObjects As Object
-                WMObjects = oSearch.Execute
-                Return oSearch.execute
-
-            Catch ex As Exception
-                LOGGER.Error(ex)
-                ' bei einem Fehler einen Eintrag in der Logdatei machen
-                LOGGER.Info("Fehler in GetSearchDocuments - " & ex.Message, True)
-                Return Nothing
-            End Try
-
-        End If
-
-        Return Nothing
-
-    End Function
-    ''' Liefert den Wert eines Indexes als String
-    ''' _indexname = Name des zu überprüfenden Indexfeldes
-    Public Function GetValueforIndex(ByVal _fullfilepath As String, _indexname As String)
-        Try
-            Const WMEntityDocument = 1
-            Dim IndexwertAusWindream As Object = Nothing
-            Dim _dok As WINDREAMLib.WMObject
-            _dok = Nothing
-            _dok = oSession.GetWMObjectByPath(WMEntityDocument, _fullfilepath) 'WINDREAMLib.WMEntity.WMEntityDocument
-            IndexwertAusWindream = _dok.GetVariableValue(_indexname)
-            Return IndexwertAusWindream.ToString
-        Catch ex As Exception
-            LOGGER.Error(ex)
-            'MsgBox(ex.Message)
-            Return Nothing
-        End Try
-    End Function
-#End Region
 End Class

app/TaskFlow/ClassParamRefresh.vb

@@ -20,6 +20,9 @@ Public Class ClassParamRefresh
                     ElseIf oRow.Item("TITLE") = "PM_VALIDATOR_SEARCH_DEF" Then
                         SQL_VALIDATOR_SEARCHES = oRow.Item("SQL_COMMAND")
                         LOGGER.Debug($"VALIDATOR-SQL FROM SQLCommands DD: {SQL_VALIDATOR_SEARCHES}")
+                    ElseIf oRow.Item("TITLE") = "TF_WORKFLOW_MESSAGE" Then
+                        SQL_WF_MESSAGES = oRow.Item("SQL_COMMAND")
+                        LOGGER.Debug($"WF_MESSAGES-SQL FROM SQLCommands DD: {SQL_WF_MESSAGES}")
                     End If
                 Next
             End If
@@ -59,7 +62,7 @@ Public Class ClassParamRefresh
                     LOGGER.Debug($"FORCE_LAYOUT_OVERVIEW [{FORCE_LAYOUT_OVERVIEW}]")
                 ElseIf oMode = "PM.NO_MASS_VALIDATOR" Then
                     SHOW_MASS_VALIDATOR = False
-                    LOGGER.Debug($"SHOW_MASS_VALIDATOR [{SHOW_MASS_VALIDATOR}]")
+                    LOGGER.Info($"SHOW_MASS_VALIDATOR [{SHOW_MASS_VALIDATOR}]")
                 ElseIf oMode = "PM.NO_CHARTS" Then
                     SHOW_CHARTS = False
                     LOGGER.Debug($"SHOW_CHARTS [{SHOW_CHARTS}]")
@@ -71,11 +74,14 @@ Public Class ClassParamRefresh
                     If OPERATION_MODE_FS = ClassConstants.OpModeFS_IDBWM Then
                         IDB_USES_WMFILESTORE = True
                     End If
+                    LOGGER.Info("OPERATION_MODE_FS: " + OPERATION_MODE_FS)
                 ElseIf oMode = "PM.IDBWITHWMFS" Then
                     IDB_USES_WMFILESTORE = True
                 ElseIf oMode = "PM.NO_BASICCONF" Then
                     BASIC_CONF_VISIBLE = False
-                    LOGGER.Debug($"BASIC_CONF_VISIBLE [{BASIC_CONF_VISIBLE}]")
+                    LOGGER.Info($"BASIC_CONF_VISIBLE [{BASIC_CONF_VISIBLE}]")
+                ElseIf oMode = "PM.SYS_LOCKED_MAINTENANCE" Then
+                    SYS_LOCKED_MAINTENANCE = True
                 ElseIf oMode.StartsWith("PM.IDB_CONID!") Then
                     If CONNECTION_STRING_IDB <> "" And dbIDBInitialized = True Then
                         IDB_ACTIVE = True
@@ -96,22 +102,15 @@ Public Class ClassParamRefresh
                             IDB_ACTIVE = False
                         End If
                     End If
-
+                ElseIf oMode = "PM.EXCEL_OVERVIEW" Then
-
+                    EXCEL_OVERVIEW = True
-
+                    LOGGER.Info($"EXCEL_OVERVIEW [{EXCEL_OVERVIEW}]")
-                    'ElseIf oMode.StartsWith("PM.IDB_APP_SERV_CONID!") Then
-                    '    Dim CON_ID = oMode.Replace("PM.IDB_APP_SERV_CONID!", "")
-                    '    Dim oConString = ClassDatabase.Get_ConnectionString(CON_ID)
-                    '    CONNECTION_STRING_IDB_APP_SERVER = oConString
-                    '    If ClassDatabase.Init(CONNECTION_STRING_IDB_APP_SERVER) = True Then
-                    '        LOGGER.Info($"Got an IDB APP-Server-Connection [{CON_ID}]!")
-                    '    End If
                 ElseIf oMode = "PM.MONITORING" Then
                     MONITORING_ACTIVE = True
-                    LOGGER.Debug($"SHOW_MASS_VALIDATOR [{SHOW_MASS_VALIDATOR}]")
+                    LOGGER.Debug($"MONITORING_ACTIVE [{MONITORING_ACTIVE}]")
                 ElseIf oMode = "PM.GHOSTMODE" Then
                     GHOSTMODE_ACTIVE = True
-                    LOGGER.Debug($"GHOSTMODE_ACTIVE [{GHOSTMODE_ACTIVE}]")
+                    LOGGER.Info($"GHOSTMODE_ACTIVE [{GHOSTMODE_ACTIVE}]")
                 ElseIf oMode.StartsWith("PM.COLORSCHEME") Then
                     Dim oColorScheme = oMode.Replace("PM.COLORSCHEME=", "")
                     RIBBON_COLOR_SCHEME = oColorScheme.ToUpper
@@ -122,6 +121,14 @@ Public Class ClassParamRefresh
                 ElseIf oMode = "PM.NO_POPUP" Then
                     POPUP_REMINDER_ACTIVE = False
                     LOGGER.Debug($"POPUP_REMINDER_ACTIVE [{POPUP_REMINDER_ACTIVE}]")
+                ElseIf oMode.StartsWith("PM.POPUP_TIMELAPS_OVERRIDE") Then
+                    Dim oTimeLapse = oMode.Replace("PM.POPUP_TIMELAPS_OVERRIDE=", "")
+                    LOGGER.Info($"CENTRAL POPUP_TIMELAPS_OVERRIDE [{oTimeLapse}]")
+                    Try
+                        CONFIG.Config.ReminderTimer = oTimeLapse
+                    Catch ex As Exception
+                    End Try
+
                 ElseIf oMode.StartsWith("PM.CONV_IDENTIFICATION") Then
                     Dim oIdent = oMode.Replace("PM.CONV_IDENTIFICATION=", "")
                     CONV_IDENTIFICATION = oIdent
@@ -151,6 +158,24 @@ Public Class ClassParamRefresh
                     Catch ex As Exception
                         LAST_ADDED_COLUMN = ""
 
+                    End Try
+                ElseIf oMode.StartsWith("PM.MON_COL_CHANGED_WHEN") Then
+                    Dim oLEDITEDCOL = oMode.Replace("PM.MON_COL_CHANGED_WHEN=", "")
+                    Try
+                        MON_EDITED_COLUMN = oLEDITEDCOL
+                        LOGGER.Debug($"MON_EDITED_COLUMN: {oLEDITEDCOL}")
+                    Catch ex As Exception
+
+
+                    End Try
+                ElseIf oMode.StartsWith("PM.MON_COL_ADDED_WHEN") Then
+                    Dim oLEDITEDCOL = oMode.Replace("PM.MON_COL_ADDED_WHEN=", "")
+                    Try
+                        MON_ADDED_COLUMN = oLEDITEDCOL
+                        LOGGER.Debug($"MON_COL_ADDED_WHEN: {oLEDITEDCOL}")
+                    Catch ex As Exception
+
+
                     End Try
                 ElseIf oMode.StartsWith("PM.USE_APPSERVER") Then
                     Dim oUSE_APPSERVER = oMode.Replace("PM.USE_APPSERVER=", "")
@@ -217,10 +242,14 @@ Public Class ClassParamRefresh
                 ElseIf oMode.StartsWith("PM.ButtonExport2FolderCaption") Then
                     Dim oAfterReplace = oMode.Replace("PM.ButtonExport2FolderCaption=", "")
                     ButtonExport2Folder_Caption = oAfterReplace
+                ElseIf oMode.StartsWith("PM.ButtonExport2Folder_Mode") Then
+                    Dim oAfterReplace = oMode.Replace("PM.ButtonExport2Folder_Mode=", "")
+                    ButtonExport2Folder_Mode = oAfterReplace
                 ElseIf oMode.StartsWith("PM.ButtonExport2Folder_RootFolder") Then
                     Dim oAfterReplace = oMode.Replace("PM.ButtonExport2Folder_RootFolder=", "")
                     ButtonExport2Folder_RootFolder = oAfterReplace
-
+                ElseIf oMode = "MAINFORM_ALLOW_LOGFILES" Then
+                    MAINFORM_CREATE_LOG_FILES = True
                 Else
                     LOGGER.Info($"Wrong oMode: {oMode}")
                 End If

app/TaskFlow/ClassRefreshHelper.vb

@@ -29,6 +29,8 @@ Public Class RefreshHelper
 
     Private Property _VisibleRowIndex As Integer = -1
 
+    Private Property _CurrentFilter As String
+
     Private ReadOnly Property ExpansionViewInfoList() As New List(Of RowInfo)
     Private ReadOnly Property SelectionViewInfoList() As New List(Of RowInfo)
     Private ReadOnly Property ExpandedMasterRowList() As New List(Of Object)
@@ -45,6 +47,7 @@ Public Class RefreshHelper
             SaveExpansionViewInfo()
             SaveSelectionViewInfo()
             SaveVisibleIndex()
+            SaveGridFilter()
         Catch ex As Exception
             _Logger.Error(ex)
         End Try
@@ -56,6 +59,7 @@ Public Class RefreshHelper
             LoadExpansionViewInfo()
             LoadSelectionViewInfo()
             LoadVisibleIndex()
+            LoadGridFilter()
         Catch ex As Exception
             _Logger.Error(ex)
         End Try
@@ -181,6 +185,14 @@ Public Class RefreshHelper
         Next
     End Sub
 
+    Private Sub SaveGridFilter()
+        '_CurrentFilter = _View.ActiveFilterString
+    End Sub
+
+    Private Sub LoadGridFilter()
+        '_View.ActiveFilterString = _CurrentFilter
+    End Sub
+
     Private Sub SaveVisibleIndex()
         _VisibleRowIndex = _View.GetVisibleIndex(_View.FocusedRowHandle) - _View.TopRowIndex
     End Sub

app/TaskFlow/ClassSQLEditor.vb

@@ -16,26 +16,34 @@ Public Class ClassSQLEditor
 
         Dim oValueObject = DirectCast(value, SQLValue)
         Dim oSQLString As String = oValueObject.Value
-        Dim oSQLConnection As Integer = oValueObject.ConnectionId
+        'Dim oSQLConnection As Integer = oValueObject.ConnectionId
 
         If oService IsNot Nothing AndAlso oSQLString IsNot Nothing Then
             'CURRENT_DESIGN_TYPE = "INPUT_INDEX"
             Using oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM)
                 oForm.SQLCommand = oSQLString
-                oForm.SQLConnection = oSQLConnection
+                oForm.SQLConnection = 0 'oSQLConnection
 
                 oForm.PlaceholdersManualPrefix = "CTRL"
                 oForm.PlaceholdersManualTitle = "Controls"
                 oForm.PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.
                     ToDictionary(Function(name) name, Function(name) name)
 
+                If IDB_ACTIVE = False Then
+                    oForm.ATTRIBUTE_STORE = "WM"
+                    oForm.PlaceholdersWindream = MVSource_AllIndicies
+                Else
+                    oForm.ATTRIBUTE_STORE = "IDB"
+                End If
                 If oService.ShowDialog(oForm) = DialogResult.OK Then
-                    Dim sql As New SQLValue(oForm.SQLCommand, oForm.SQLConnection)
+                    Dim sql As New SQLValue(oForm.SQLCommand) ', oForm.SQLConnection
                     ' CURRENT_CONN_ID_FINAL_INDEX = oForm.SQLConnection
                     ' CURRENT_CONN_ID = oForm.SQLConnection
                     value = sql
                 End If
+
             End Using
+
         End If
 
         Return value

app/TaskFlow/ClassSQLValue.vb

@@ -7,18 +7,18 @@ Imports System.Drawing.Design
 <TypeConverter(GetType(SQLTypeConverter))>
 Public Class SQLValue
     Public Property Value As String
-    Public Property ConnectionId As Integer
+    'Public Property ConnectionId As Integer
 
     Public Sub New()
         Value = ""
     End Sub
 
-    Public Sub New(value As String)
+    'Public Sub New(value As String)
-        Me.Value = value
+    '    Me.Value = value
-    End Sub
+    'End Sub
 
-    Public Sub New(pValue As String, pConnectionId As Integer)
+    Public Sub New(pValue As String) ', pConnectionId As Integer)
         Value = pValue
-        ConnectionId = pConnectionId
+        ' ConnectionId = pConnectionId
     End Sub
 End Class

app/TaskFlow/ClassValidator.vb

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

app/TaskFlow/ClassWindream_allgemein.vb

@@ -30,14 +30,7 @@ Public Class ClassWindream_allgemein
     ''' </summary>
     ''' <remarks></remarks>
     Sub New()
-        ' wenn ein Fehler bei der Initialisierung auftrat
-        'If Not Me.Init() Then
-        '    ' Nachricht ausgeben
-        '    MsgBox("Es trat ein Fehler bei der Initialisierung der Klasse windream auf. Bitte prüfen Sie ob der windream-Server aktiv ist und alle Dienste gestartet sind.", MsgBoxStyle.Exclamation, "Fehler bei Initialisierung")
 
-        '    ' das Programm "abschießen"
-        '    Process.GetCurrentProcess.Kill()
-        'End If
     End Sub
 
 
@@ -121,13 +114,9 @@ Public Class ClassWindream_allgemein
             Return True
 
         Catch ex As Exception
-LOGGER.Error(ex)
+            LOGGER.Error(ex)
-            If Err.Number = -2147220985 Then
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error Login on windream")
-                MsgBox("Die installierte windream-Version ist nicht ausreichend für den Betrieb der Tool Collection für windream." & vbNewLine &
+
-                       "Bitte kontaktieren Sie Digital Data." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & Err.Description, MsgBoxStyle.Exclamation, "Unzureichende windream-Version")
-            Else
-                MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler beim Login an windream")
-            End If
             Return False
         End Try
 

app/TaskFlow/ControlCreator/Constants.vb

@@ -0,0 +1,21 @@
+Namespace ControlCreator
+    Public Class Constants
+        Public Const CONTROL_TYPE_TEXT = "TEXT"
+        Public Const CONTROL_TYPE_INTEGER = "INTEGER"
+        Public Const CONTROL_TYPE_BOOLEAN = "BOOLEAN"
+        Public Const CONTROL_TYPE_DOUBLE = "DOUBLE"
+        Public Const CONTROL_TYPE_CURRENCY = "CURRENCY"
+        Public Const CONTROL_TYPE_DATE = "DATE"
+        Public Const CONTROL_TYPE_DATETIME = "DATETIME"
+
+        Public Const AGGREGATE_NONE = "NONE"
+        Public Const AGGREGATE_TOTAL_INTEGER = "TOTAL_INTEGER"
+        Public Const AGGREGATE_TOTAL_FLOAT = "TOTAL_FLOAT"
+        Public Const AGGREGATE_TOTAL_CURRENCY = "TOTAL_CURRENCY"
+        Public Const AGGREGATE_TOTAL_MIN = "TOTAL_MIN"
+        Public Const AGGREGATE_TOTAL_MAX = "TOTAL_MAX"
+        Public Const AGGREGATE_TOTAL_AVG = "TOTAL_AVG"
+        Public Const AGGREGATE_TOTAL_COUNT = "TOTAL_COUNT"
+    End Class
+
+End Namespace

app/TaskFlow/ControlCreator/GridControl.vb

@@ -0,0 +1,481 @@
+Imports DevExpress.Utils
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraEditors.Repository
+Imports DevExpress.XtraGrid.Columns
+Imports DevExpress.XtraGrid.Views.Grid
+Imports DigitalData.Controls.LookupGrid
+Imports DigitalData.Modules.EDMI.API.Constants
+Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
+Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.Base
+Imports System.ComponentModel
+Imports DevExpress.XtraEditors.Controls
+Imports DevExpress.XtraGrid.Views.Base
+Imports System.Text.RegularExpressions
+Imports System.Globalization
+Imports DevExpress.Xpo.Helpers.AssociatedCollectionCriteriaHelper
+Imports DevExpress.XtraEditors.Mask
+
+Namespace ControlCreator
+    Public Class GridControl
+        Private ReadOnly _LogConfig As LogConfig
+        Private ReadOnly _Logger As Logger
+        Private ReadOnly _GridTables As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem))
+
+        Private newRowModified As Boolean
+
+        Public Sub New(pLogConfig As LogConfig, pGridTables As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem)))
+            _LogConfig = pLogConfig
+            _Logger = pLogConfig.GetLogger()
+            _GridTables = pGridTables
+        End Sub
+
+        Public Function CreateGridColumns(pColumnTable As DataTable) As DataTable
+            Dim oDataTable As New DataTable
+
+            For Each oRow As DataRow In pColumnTable.Rows
+                ' Create Columns in Datatable
+
+                Dim oColumn = New DataColumn() With {
+                    .ColumnName = oRow.Item("SPALTENNAME"),
+                    .Caption = oRow.Item("SPALTEN_HEADER_LANG"),
+                    .ReadOnly = False
+                }
+                Select Case oRow.Item("TYPE_COLUMN")
+                    Case Constants.CONTROL_TYPE_TEXT
+                        oColumn.DataType = GetType(String)
+                    Case Constants.CONTROL_TYPE_INTEGER
+                        oColumn.DataType = GetType(Integer)
+                    Case Constants.CONTROL_TYPE_DOUBLE
+                        oColumn.DataType = GetType(Double)
+                    Case Constants.CONTROL_TYPE_CURRENCY
+                        oColumn.DataType = GetType(Double)
+                    Case Constants.CONTROL_TYPE_BOOLEAN
+                        oColumn.DataType = GetType(Boolean)
+                    Case Else
+                        oColumn.DataType = GetType(String)
+                End Select
+
+                oDataTable.Columns.Add(oColumn)
+            Next
+
+            Return oDataTable
+        End Function
+
+        Public Function FillGridTables(pColumnTable As DataTable, pControlId As Integer, pControlName As String) As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem))
+            For Each oRow As DataRow In pColumnTable.Rows
+                ' Fetch and cache Combobox results
+                Dim oConnectionId As Integer = oRow.ItemEx("CONNECTION_ID", 0)
+                Dim oSqlCommand As String = oRow.ItemEx("SQL_COMMAND", "")
+
+                If oConnectionId > 0 And oSqlCommand <> "" Then
+                    Try
+                        Dim oComboboxDataTable As DataTable = Nothing
+                        Dim oColumnName As String = oRow.Item("SPALTENNAME")
+                        _Logger.Debug("Working on SQL for Column[{0}]...", oColumnName)
+                        If Not clsPatterns.HasComplexPatterns(oSqlCommand) Then
+                            _Logger.Debug("SQL has no complex patterns!")
+                            'oComboboxDataTable = ClassDatabase.Return_Datatable_ConId(oSqlCommand, oConnectionId)
+                            oComboboxDataTable = DatabaseFallback.GetDatatable(New GetDatatableOptions(oSqlCommand, DatabaseType.ECM) With {
+                                .ConnectionId = oConnectionId
+                            })
+                        Else
+                            _Logger.Debug("...has complex patterns!!")
+                        End If
+
+                        Dim oRepositoryItem = GridTables_GetRepositoryItemForColumn(oColumnName, oComboboxDataTable, oRow.Item("ADVANCED_LOOKUP"))
+
+                        If _GridTables.Item(pControlId).ContainsKey(oColumnName) Then
+                            _GridTables.Item(pControlId).Item(oColumnName) = oRepositoryItem
+                        Else
+                            _GridTables.Item(pControlId).Add(oColumnName, oRepositoryItem)
+                        End If
+                    Catch ex As Exception
+                        _Logger.Warn("Could not load data for column {0} in control {1}", oRow.Item("SPALTENNAME"), pControlName)
+                        _Logger.Error(ex)
+                    End Try
+                End If
+            Next
+
+            Return _GridTables
+        End Function
+
+        Private Function GridTables_GetRepositoryItemForColumn(pColumnName As String, pDataTable As DataTable, pIsAdvancedLookup As Boolean) As RepositoryItem
+            If pIsAdvancedLookup Then
+
+                Dim oEditor = New RepositoryItemLookupControl3
+
+                If pDataTable IsNot Nothing Then
+                    oEditor.DisplayMember = pDataTable.Columns.Item(0).ColumnName
+                    oEditor.ValueMember = pDataTable.Columns.Item(0).ColumnName
+                    oEditor.DataSource = pDataTable
+                End If
+
+                Return oEditor
+            Else
+                Dim oEditor = New RepositoryItemComboBox()
+                Dim oItems As New List(Of String)
+
+                AddHandler oEditor.Validating, Sub(_sender As ComboBoxEdit, _e As CancelEventArgs)
+                                                   If oItems.Contains(_sender.EditValue) Then
+                                                       _e.Cancel = False
+                                                   Else
+                                                       _e.Cancel = True
+                                                   End If
+
+                                               End Sub
+
+                If pDataTable IsNot Nothing Then
+                    For Each oRow2 As DataRow In pDataTable.Rows
+                        Dim oValue = oRow2.Item(0)
+
+                        Try
+                            If oRow2.ItemArray.Length > 1 Then
+                                oValue &= $" | {oRow2.Item(1)}"
+                            End If
+                        Catch ex As Exception
+                        End Try
+
+                        oEditor.Items.Add(oValue)
+                        oItems.Add(oValue)
+                    Next
+                End If
+
+                Return oEditor
+            End If
+        End Function
+
+        Public Sub ConfigureViewColumns(pColumnTable As DataTable, pGridView As GridView, pGrid As DevExpress.XtraGrid.GridControl)
+            Dim oShouldDisplayFooter As Boolean = False
+
+
+
+            For Each oCol As GridColumn In pGridView.Columns
+                Dim oColumnData As DataRow = pColumnTable.
+                    Select($"SPALTENNAME = '{oCol.FieldName}'").
+                    FirstOrDefault()
+
+                If oColumnData Is Nothing Then
+                    Continue For
+                End If
+
+                Dim oSequence As Integer = oColumnData.Item("SEQUENCE")
+                oCol.VisibleIndex = oSequence
+
+                Dim oColumnType As String = oColumnData.Item("TYPE_COLUMN")
+
+                Select Case oColumnType
+                    Case "INTEGER"
+                        oCol.DisplayFormat.FormatType = FormatType.Custom
+                        oCol.DisplayFormat.FormatString = "N0"
+
+                    Case "DOUBLE"
+                        oCol.DisplayFormat.FormatType = FormatType.Custom
+                        oCol.DisplayFormat.FormatString = "N2"
+
+                    Case "CURRENCY"
+                        oCol.DisplayFormat.FormatType = FormatType.Custom
+                        oCol.DisplayFormat.FormatString = "C2"
+                End Select
+
+                Dim oSummaryFunction As String = oColumnData.Item("SUMMARY_FUNCTION")
+
+                Select Case oSummaryFunction
+                    Case Constants.AGGREGATE_TOTAL_INTEGER
+                        oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum
+                        oCol.SummaryItem.DisplayFormat = "SUM: {0:N0}"
+                        oShouldDisplayFooter = True
+
+                    Case Constants.AGGREGATE_TOTAL_FLOAT
+                        oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum
+                        oCol.SummaryItem.DisplayFormat = "SUM: {0:N2}"
+                        oShouldDisplayFooter = True
+
+                    Case Constants.AGGREGATE_TOTAL_CURRENCY
+                        oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum
+                        oCol.SummaryItem.DisplayFormat = "SUM: {0:C2}"
+                        oShouldDisplayFooter = True
+
+                    Case Constants.AGGREGATE_TOTAL_AVG
+                        oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Average
+                        oCol.SummaryItem.DisplayFormat = "AVG: {0}"
+                        oShouldDisplayFooter = True
+
+                    Case Constants.AGGREGATE_TOTAL_MAX
+                        oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Max
+                        oCol.SummaryItem.DisplayFormat = "MAX: {0}"
+                        oShouldDisplayFooter = True
+
+                    Case Constants.AGGREGATE_TOTAL_MIN
+                        oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Min
+                        oCol.SummaryItem.DisplayFormat = "MIN: {0}"
+                        oShouldDisplayFooter = True
+
+                    Case Constants.AGGREGATE_TOTAL_COUNT
+                        oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Count
+                        oCol.SummaryItem.DisplayFormat = "NUM: {0}"
+                        oShouldDisplayFooter = True
+
+                End Select
+            Next
+
+            pGridView.OptionsView.ShowFooter = oShouldDisplayFooter
+        End Sub
+        Public Sub ConfigureViewColumnsCurrency(pColumnTable As DataTable, pGridView As GridView, pGrid As DevExpress.XtraGrid.GridControl, pCurrency As String)
+
+            Dim oCultureInfo As CultureInfo = New CultureInfo("de-DE")
+            oCultureInfo.NumberFormat.CurrencySymbol = pCurrency
+            Dim riTextEdit As RepositoryItemTextEdit = New RepositoryItemTextEdit()
+            riTextEdit.MaskSettings.Configure(Of MaskSettings.Numeric)(Sub(settings)
+                                                                           settings.MaskExpression = "c"
+                                                                           settings.Culture = oCultureInfo
+                                                                       End Sub)
+            riTextEdit.UseMaskAsDisplayFormat = True 'Optional
+            pGrid.RepositoryItems.Add(riTextEdit)
+
+
+            For Each oCol As GridColumn In pGridView.Columns
+                Dim oColumnData As DataRow = pColumnTable.
+                    Select($"SPALTENNAME = '{oCol.FieldName}'").
+                    FirstOrDefault()
+
+                If oColumnData Is Nothing Then
+                    Continue For
+                End If
+
+                Dim oColumnType As String = oColumnData.Item("TYPE_COLUMN")
+
+                Select Case oColumnType
+                    Case "CURRENCY"
+                        oCol.DisplayFormat.FormatType = FormatType.Custom
+                        oCol.ColumnEdit = riTextEdit
+                End Select
+
+            Next
+        End Sub
+        Public Sub ConfigureViewEvents(pColumnTable As DataTable, pGridView As GridView, pControl As Windows.Forms.Control, pControlId As Integer)
+            AddHandler pGridView.InitNewRow, Sub(sender As Object, e As InitNewRowEventArgs)
+                                                 Try
+                                                     _Logger.Debug("Initialzing new row")
+
+                                                     For Each oColumnData As DataRow In pColumnTable.Rows
+                                                         For Each oGridColumn As GridColumn In pGridView.Columns
+                                                             If oGridColumn.FieldName <> oColumnData.Item("SPALTENNAME") Then
+                                                                 Continue For
+                                                             End If
+
+                                                             Dim oDefaultValue = ObjectEx.NotNull(oColumnData.Item("DEFAULT_VALUE"), String.Empty)
+
+                                                             If oDefaultValue <> String.Empty Then
+                                                                 _Logger.Debug("Setting default value [{0}] for column [{1}]", oDefaultValue, oGridColumn.FieldName)
+                                                                 pGridView.SetRowCellValue(e.RowHandle, oGridColumn.FieldName, oDefaultValue)
+                                                             End If
+                                                         Next
+                                                     Next
+
+                                                 Catch ex As Exception
+                                                     _Logger.Error(ex)
+                                                 Finally
+                                                     newRowModified = False
+                                                 End Try
+                                             End Sub
+
+            AddHandler pGridView.CustomRowCellEdit, Sub(sender As Object, e As CustomRowCellEditEventArgs)
+                                                        Try
+                                                            For Each oRow As DataRow In pColumnTable.Rows
+                                                                Dim oColumnName = oRow.Item("SPALTENNAME")
+                                                                Dim oEditorExists = GridTables_TestEditorExistsByControlAndColumn(pControlId, oColumnName)
+                                                                If oColumnName <> e.Column.FieldName Then
+                                                                    Continue For
+                                                                End If
+
+                                                                If oEditorExists Then
+                                                                    Dim oEditor = _GridTables.Item(pControlId).Item(oColumnName)
+                                                                    _Logger.Debug("Assigning Editor to Column [{0}]", oColumnName)
+                                                                    e.RepositoryItem = oEditor
+                                                                Else
+                                                                    _Logger.Debug("Editor for Column [{0}] does not exist", oColumnName)
+                                                                End If
+                                                            Next
+                                                        Catch ex As Exception
+                                                            _Logger.Warn("Error in CustomRowCellEdit for [{0}]", e.CellValue)
+                                                            _Logger.Error(ex)
+                                                        End Try
+                                                    End Sub
+
+            AddHandler pGridView.ValidatingEditor, Sub(sender As Object, e As BaseContainerValidateEditorEventArgs)
+                                                       Dim oRow As DataRowView = pGridView.GetRow(pGridView.FocusedRowHandle)
+                                                       Dim oColumnName = pGridView.FocusedColumn.FieldName
+                                                       _Logger.Debug("Validating Editor for Column [{0}]", oColumnName)
+                                                       GridTables_ValidateColumn(pGridView, pColumnTable, oColumnName, e.Value, e.Valid, e.ErrorText)
+                                                   End Sub
+
+            AddHandler pGridView.PopupMenuShowing, AddressOf View_PopupMenuShowing
+
+            AddHandler pGridView.InvalidRowException, AddressOf View_InvalidRowException
+            AddHandler pGridView.ValidatingEditor, AddressOf View_ValidatingEditor
+            '  AddHandler pGridView.CustomColumnDisplayText, AddressOf View_CustomColumnDisplayText
+
+            ' These handlers are all used for the custom DefaultValue functionality, additionally some code in the 'InitNewRow' event.
+            ' https://supportcenter.devexpress.com/ticket/details/t1035580/how-to-default-a-value-in-a-column-when-add-new-row-in-data-grid
+            AddHandler pGridView.ShowingEditor, AddressOf View_ShowingEditor
+            AddHandler pGridView.ShownEditor, AddressOf View_ShownEditor
+            AddHandler pGridView.ValidateRow, AddressOf View_ValidateRow
+            AddHandler pControl.LostFocus, AddressOf Control_LostFocus
+        End Sub
+        Private Sub View_CustomColumnDisplayText(ByVal eSender As Object, ByVal e As CustomColumnDisplayTextEventArgs)
+            If IsNothing(e.Value) Then
+                Exit Sub
+            End If
+            Dim view As GridView = eSender
+            'Dim view As GridView = TryCast(GridView1, GridView)
+            If e.Column.FieldName = "SpalteCurrency" Then
+                ' e.DisplayText = e.Value.ToString().Replace("€", "CHF")
+            End If
+        End Sub
+        Private Sub View_PopupMenuShowing(sender As Object, e As PopupMenuShowingEventArgs)
+            Dim view As GridView = TryCast(sender, GridView)
+            Dim oFocusedColumn As GridColumn = view.FocusedColumn
+            Dim oColumnType As Type = oFocusedColumn.ColumnType
+            Dim oColumnName As String = oFocusedColumn.FieldName
+
+            If e.MenuType = GridMenuType.Column AndAlso oColumnType Is GetType(Boolean) Then
+                e.Menu.Items.Add(New Menu.DXMenuItem(
+                    "Alle Zeilen anhaken",
+                    Sub(_sender As Object, _e As EventArgs)
+                        SetCellValuesForBooleanColumn(view, oColumnName, True)
+                    End Sub,
+                    My.Resources.itemtypechecked,
+                    Menu.DXMenuItemPriority.Normal))
+
+                e.Menu.Items.Add(New Menu.DXMenuItem(
+                    "Alle Zeilen abhaken",
+                    Sub(_sender As Object, _e As EventArgs)
+                        SetCellValuesForBooleanColumn(view, oColumnName, False)
+                    End Sub,
+                    My.Resources.itemtypechecked,
+                    Menu.DXMenuItemPriority.Normal))
+            End If
+        End Sub
+
+        Private Sub SetCellValuesForBooleanColumn(pView As GridView, pColumnName As String, pValue As Boolean)
+            Dim oRowHandle = 0
+            While (pView.IsValidRowHandle(oRowHandle))
+                Dim oRow = pView.GetDataRow(oRowHandle)
+                Dim oValue = oRow.ItemEx(pColumnName, False)
+                oRow.Item(pColumnName) = pValue
+
+                oRowHandle += 1
+            End While
+        End Sub
+
+
+        Private Sub Control_LostFocus(sender As DevExpress.XtraGrid.GridControl, e As EventArgs)
+            Dim oView2 As GridView = sender.FocusedView
+
+            ' 19.08.2022: 
+            ' Calling UpdateCurrentRow when newRowModified Is true
+            ' leads to some weird jumping of focus in the current cell.
+            ' This seems to fix it.
+            If newRowModified = False Then
+                oView2.UpdateCurrentRow()
+            End If
+        End Sub
+
+        Private Sub View_ShowingEditor(sender As Object, e As CancelEventArgs)
+            Dim view As GridView = TryCast(sender, GridView)
+            _Logger.Debug("Showing editor.")
+            If view.IsNewItemRow(view.FocusedRowHandle) AndAlso Not newRowModified Then
+                _Logger.Debug("Adding new row.")
+                view.AddNewRow()
+            End If
+        End Sub
+
+        Private Sub View_ShownEditor(sender As Object, e As EventArgs)
+            Dim view As GridView = TryCast(sender, GridView)
+            If view.IsNewItemRow(view.FocusedRowHandle) Then
+                _Logger.Debug("Attaching Modified Handler.")
+                AddHandler view.ActiveEditor.Modified, Sub()
+                                                           _Logger.Debug("Row was modified.")
+                                                           newRowModified = True
+                                                       End Sub
+            End If
+        End Sub
+
+        Private Sub View_ValidateRow(sender As Object, e As ValidateRowEventArgs)
+            Dim view As GridView = TryCast(sender, GridView)
+            If view.IsNewItemRow(e.RowHandle) AndAlso Not newRowModified Then
+                _Logger.Debug("Deleting unused row")
+                view.DeleteRow(e.RowHandle)
+            End If
+
+            _Logger.Debug("Validating row. Resetting Modified.")
+            newRowModified = False
+        End Sub
+
+        Private Sub View_ValidatingEditor(sender As Object, e As BaseContainerValidateEditorEventArgs)
+            Dim oValue As String = ObjectEx.NotNull(e.Value, "")
+
+            If oValue.Contains(" | ") Then
+                oValue = oValue.Split(" | ").ToList().First()
+                e.Value = oValue
+            End If
+        End Sub
+
+        Private Sub View_InvalidRowException(sender As Object, e As InvalidRowExceptionEventArgs)
+            e.ExceptionMode = ExceptionMode.NoAction
+        End Sub
+
+        Private Function GridTables_TestEditorExistsByControlAndColumn(oControlId As Integer, pColumn As String) As Boolean
+            If _GridTables.ContainsKey(oControlId) Then
+                Dim oContainsKey = _GridTables.Item(oControlId).ContainsKey(pColumn)
+                If oContainsKey AndAlso _GridTables.Item(oControlId).Item(pColumn) IsNot Nothing Then
+                    Return True
+                Else
+                    Return False
+                End If
+            Else
+                Return False
+            End If
+        End Function
+
+        Private Function GridTables_ValidateColumn(pView As GridView, pColumnDefinition As DataTable, ColumnName As String, pValue As Object, ByRef pIsValid As Boolean, ByRef pErrorText As String) As Boolean
+            Dim oColumn As DataRow = (From r As DataRow In pColumnDefinition.Rows
+                                      Where r.Item("SPALTENNAME") = ColumnName
+                                      Select r).FirstOrDefault()
+
+            Dim oGridColumn As GridColumn = (From c As GridColumn In pView.Columns
+                                             Where c.FieldName = ColumnName
+                                             Select c).FirstOrDefault()
+
+            Dim oIsRequired = oColumn.Item("VALIDATION")
+
+            Try
+                Dim oRegex = ObjectEx.NotNull(oColumn.Item("REGEX_MATCH"), String.Empty)
+                Dim oRegexMessage = ObjectEx.NotNull(oColumn.Item("REGEX_MESSAGE_DE"), String.Empty)
+                If oRegex <> String.Empty Then
+                    Dim oMatch = New Regex(oRegex).IsMatch(pValue.ToString)
+                    Dim oDefaultMessage = "Wert entspricht nicht dem gefordertem Format!"
+                    Dim oMessage = IIf(oRegexMessage <> String.Empty, oRegexMessage, oDefaultMessage)
+
+                    If oMatch = False Then
+                        pErrorText = oMessage
+                        pIsValid = False
+                        Return False
+                    End If
+                End If
+            Catch ex As Exception
+                _Logger.Error(ex)
+            End Try
+
+            If oIsRequired And (pValue IsNot Nothing AndAlso pValue.ToString = "") Then
+                pErrorText = "Spalte muss ausgefüllt werden!"
+                pIsValid = False
+                Return False
+
+            End If
+
+            Return True
+        End Function
+    End Class
+End Namespace

app/TaskFlow/DD_DMSLiteDataSet.Designer.vb

@@ -4583,6 +4583,10 @@ Partial Public Class DD_DMSLiteDataSet
         
         Private columnSAVE_CHANGE_ON_ENABLED As Global.System.Data.DataColumn
         
+        Private columnFORMAT_STRING As Global.System.Data.DataColumn
+        
+        Private columnBACKCOLOR_IF As Global.System.Data.DataColumn
+        
         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
         Public Sub New()
@@ -4946,6 +4950,22 @@ Partial Public Class DD_DMSLiteDataSet
             End Get
         End Property
         
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public ReadOnly Property FORMAT_STRINGColumn() As Global.System.Data.DataColumn
+            Get
+                Return Me.columnFORMAT_STRING
+            End Get
+        End Property
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public ReadOnly Property BACKCOLOR_IFColumn() As Global.System.Data.DataColumn
+            Get
+                Return Me.columnBACKCOLOR_IF
+            End Get
+        End Property
+        
         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
          Global.System.ComponentModel.Browsable(false)>  _
@@ -5023,9 +5043,11 @@ Partial Public Class DD_DMSLiteDataSet
                     ByVal SQL_ENABLE_ON_LOAD_CONID As Byte,  _
                     ByVal CONTROL_ACTIVE As Boolean,  _
                     ByVal TABLE_ORDER_COLUMN As String,  _
-                    ByVal SAVE_CHANGE_ON_ENABLED As Boolean) As TBPM_PROFILE_CONTROLSRow
+                    ByVal SAVE_CHANGE_ON_ENABLED As Boolean,  _
+                    ByVal FORMAT_STRING As String,  _
+                    ByVal BACKCOLOR_IF As String) As TBPM_PROFILE_CONTROLSRow
             Dim rowTBPM_PROFILE_CONTROLSRow As TBPM_PROFILE_CONTROLSRow = CType(Me.NewRow,TBPM_PROFILE_CONTROLSRow)
-            Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED}
+            Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING, BACKCOLOR_IF}
             If (Not (parentTBPM_PROFILERowByFK_TBPM_PROFILE_CONTROLS_PROFILE) Is Nothing) Then
                 columnValuesArray(1) = parentTBPM_PROFILERowByFK_TBPM_PROFILE_CONTROLS_PROFILE(0)
             End If
@@ -5098,6 +5120,8 @@ Partial Public Class DD_DMSLiteDataSet
             Me.columnCONTROL_ACTIVE = MyBase.Columns("CONTROL_ACTIVE")
             Me.columnTABLE_ORDER_COLUMN = MyBase.Columns("TABLE_ORDER_COLUMN")
             Me.columnSAVE_CHANGE_ON_ENABLED = MyBase.Columns("SAVE_CHANGE_ON_ENABLED")
+            Me.columnFORMAT_STRING = MyBase.Columns("FORMAT_STRING")
+            Me.columnBACKCOLOR_IF = MyBase.Columns("BACKCOLOR_IF")
         End Sub
         
         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
@@ -5185,6 +5209,10 @@ Partial Public Class DD_DMSLiteDataSet
             MyBase.Columns.Add(Me.columnTABLE_ORDER_COLUMN)
             Me.columnSAVE_CHANGE_ON_ENABLED = New Global.System.Data.DataColumn("SAVE_CHANGE_ON_ENABLED", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
             MyBase.Columns.Add(Me.columnSAVE_CHANGE_ON_ENABLED)
+            Me.columnFORMAT_STRING = New Global.System.Data.DataColumn("FORMAT_STRING", GetType(String), Nothing, Global.System.Data.MappingType.Element)
+            MyBase.Columns.Add(Me.columnFORMAT_STRING)
+            Me.columnBACKCOLOR_IF = New Global.System.Data.DataColumn("BACKCOLOR_IF", GetType(String), Nothing, Global.System.Data.MappingType.Element)
+            MyBase.Columns.Add(Me.columnBACKCOLOR_IF)
             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
             Me.columnGUID.AutoIncrement = true
             Me.columnGUID.AllowDBNull = false
@@ -5231,6 +5259,7 @@ Partial Public Class DD_DMSLiteDataSet
             Me.columnTABLE_ORDER_COLUMN.DefaultValue = CType("",String)
             Me.columnTABLE_ORDER_COLUMN.MaxLength = 250
             Me.columnSAVE_CHANGE_ON_ENABLED.AllowDBNull = false
+            Me.columnFORMAT_STRING.AllowDBNull = false
         End Sub
         
         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
@@ -12513,6 +12542,32 @@ Partial Public Class DD_DMSLiteDataSet
             End Set
         End Property
         
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Property FORMAT_STRING() As String
+            Get
+                Return CType(Me(Me.tableTBPM_PROFILE_CONTROLS.FORMAT_STRINGColumn),String)
+            End Get
+            Set
+                Me(Me.tableTBPM_PROFILE_CONTROLS.FORMAT_STRINGColumn) = value
+            End Set
+        End Property
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Property BACKCOLOR_IF() As String
+            Get
+                Try 
+                    Return CType(Me(Me.tableTBPM_PROFILE_CONTROLS.BACKCOLOR_IFColumn),String)
+                Catch e As Global.System.InvalidCastException
+                    Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte BACKCOLOR_IF in Tabelle TBPM_PROFILE_CONTROLS ist DBNull.", e)
+                End Try
+            End Get
+            Set
+                Me(Me.tableTBPM_PROFILE_CONTROLS.BACKCOLOR_IFColumn) = value
+            End Set
+        End Property
+        
         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
         Public Property TBPM_PROFILERow() As TBPM_PROFILERow
@@ -12752,6 +12807,18 @@ Partial Public Class DD_DMSLiteDataSet
             Me(Me.tableTBPM_PROFILE_CONTROLS.SQL_ENABLE_ON_LOAD_CONIDColumn) = Global.System.Convert.DBNull
         End Sub
         
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Function IsBACKCOLOR_IFNull() As Boolean
+            Return Me.IsNull(Me.tableTBPM_PROFILE_CONTROLS.BACKCOLOR_IFColumn)
+        End Function
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Sub SetBACKCOLOR_IFNull()
+            Me(Me.tableTBPM_PROFILE_CONTROLS.BACKCOLOR_IFColumn) = Global.System.Convert.DBNull
+        End Sub
+        
         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
         Public Function GetTBPM_CONTROL_TABLERows() As TBPM_CONTROL_TABLERow()
@@ -20216,6 +20283,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
             tableMapping.ColumnMappings.Add("CONTROL_ACTIVE", "CONTROL_ACTIVE")
             tableMapping.ColumnMappings.Add("TABLE_ORDER_COLUMN", "TABLE_ORDER_COLUMN")
             tableMapping.ColumnMappings.Add("SAVE_CHANGE_ON_ENABLED", "SAVE_CHANGE_ON_ENABLED")
+            tableMapping.ColumnMappings.Add("FORMAT_STRING", "FORMAT_STRING")
             Me._adapter.TableMappings.Add(tableMapping)
             Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
             Me._adapter.DeleteCommand.Connection = Me.Connection
@@ -20229,18 +20297,20 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 "N, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FON"& _ 
                 "T_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VK"& _ 
                 "T_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         REGEX_MESSAGE"& _ 
-                "_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SAVE_CHANGE_ON_ENABLED)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES        (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,"& _ 
+                "_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SAVE_CHANGE_ON_ENABLED, "& _ 
-                "@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@INDEX_NAME,@TYP,@VALIDATION,@CHOICE_LIST"& _ 
+                "FORMAT_STRING)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES        (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_"& _ 
-                ",@CONNECTION_ID,@SQL_UEBERPRUEFUNG,@HEIGHT,@WIDTH,@FONT_STYLE,@FONT_SIZE,@FONT_F"& _ 
+                "LOC,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@INDEX_NAME,@TYP,@VALIDATI"& _ 
-                "AMILY,@FONT_COLOR,@READ_ONLY,@LOAD_IDX_VALUE,@DEFAULT_VALUE,@MULTISELECT,@VKT_AD"& _ 
+                "ON,@CHOICE_LIST,@CONNECTION_ID,@SQL_UEBERPRUEFUNG,@HEIGHT,@WIDTH,@FONT_STYLE,@FO"& _ 
-                "D_ITEM,@VKT_PREVENT_MULTIPLE_VALUES,@REGEX_MATCH,@REGEX_MESSAGE_DE,@REGEX_MESSAG"& _ 
+                "NT_SIZE,@FONT_FAMILY,@FONT_COLOR,@READ_ONLY,@LOAD_IDX_VALUE,@DEFAULT_VALUE,@MULT"& _ 
-                "E_EN,@IMAGE_CONTROL,@SQL2,@SQL_ENABLE,@SAVE_CHANGE_ON_ENABLED);   "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID,"& _ 
+                "ISELECT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES,@REGEX_MATCH,@REGEX_MESSAGE_D"& _ 
-                " PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHA"& _ 
+                "E,@REGEX_MESSAGE_EN,@IMAGE_CONTROL,@SQL2,@SQL_ENABLE,@SAVE_CHANGE_ON_ENABLED,@FO"& _ 
-                "NGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID,"& _ 
+                "RMAT_STRING);     "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y"& _ 
-                " SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLO"& _ 
+                "_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDAT"& _ 
-                "R, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREV"& _ 
+                "ION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, F"& _ 
-                "ENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_P"& _ 
+                "ONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MUL"& _ 
-                "ROFILE_CONTROLS WHERE (GUID = SCOPE_IDENTITY()) ORDER BY Y_LOC, X_LOC"
+                "TISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_"& _ 
+                "DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = SCOPE_IDENTITY()) "& _ 
+                "ORDER BY Y_LOC, X_LOC"
             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -20277,6 +20347,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL2", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_ENABLE", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_ENABLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SAVE_CHANGE_ON_ENABLED", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SAVE_CHANGE_ON_ENABLED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORMAT_STRING", Global.System.Data.SqlDbType.VarChar, 200, Global.System.Data.ParameterDirection.Input, 0, 0, "FORMAT_STRING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
             Me._adapter.UpdateCommand.Connection = Me.Connection
             Me._adapter.UpdateCommand.CommandText = "UPDATE       TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET                PROFIL_ID = @PROFIL_ID, NA"& _ 
@@ -20292,13 +20363,14 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 "CH = @REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         REGEX_MESSAGE_DE = @REGEX_MESSAGE_"& _ 
                 "DE, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, IMAGE_CONTROL = @IMAGE_CONTROL, SQL2 ="& _ 
                 " @SQL2, SQL_ENABLE = @SQL_ENABLE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         SAVE_CHANGE_ON_ENAB"& _ 
-                "LED = @SAVE_CHANGE_ON_ENABLED"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (GUID = @Original_GUID);   "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT "& _ 
+                "LED = @SAVE_CHANGE_ON_ENABLED, FORMAT_STRING = @FORMAT_STRING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (GUI"& _ 
-                "GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN"& _ 
+                "D = @Original_GUID);    "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_"& _ 
-                ", CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTIO"& _ 
+                "LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, V"& _ 
-                "N_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT"& _ 
+                "ALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_ST"& _ 
-                "_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT"& _ 
+                "YLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALU"& _ 
-                "_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM T"& _ 
+                "E, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_ME"& _ 
-                "BPM_PROFILE_CONTROLS WHERE (GUID = @GUID) ORDER BY Y_LOC, X_LOC"
+                "SSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = @GUID) ORDER"& _ 
+                " BY Y_LOC, X_LOC"
             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -20332,6 +20404,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL2", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_ENABLE", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_ENABLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SAVE_CHANGE_ON_ENABLED", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SAVE_CHANGE_ON_ENABLED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORMAT_STRING", Global.System.Data.SqlDbType.VarChar, 200, Global.System.Data.ParameterDirection.Input, 0, 0, "FORMAT_STRING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
         End Sub
@@ -20357,8 +20430,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 "             REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL"& _ 
                 "2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, C"& _ 
                 "ONTROL_ACTIVE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENA"& _ 
-                "BLED"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (GUID = @guid)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER "& _ 
+                "BLED, FORMAT_STRING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (GUID ="& _ 
-                "BY Y_LOC, X_LOC"
+                " @guid)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY Y_LOC, X_LOC"
             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
             Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@guid", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
@@ -20438,8 +20511,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 "P, VALIDATION, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, WIDTH, X_LOC, Y_LOC, I"& _ 
                 "MAGE_CONTROL, SQL2, SQL_ENABLE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         SET_CONTROL_DATA, SQL"& _ 
                 "_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, S"& _ 
-                "AVE_CHANGE_ON_ENABLED"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            TBPM_PROFILE_CONTROLS AS T"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        "& _ 
+                "AVE_CHANGE_ON_ENABLED, FORMAT_STRING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            TBPM_PROFILE_CONTROLS AS T"& _ 
-                "(PROFIL_ID = @profil_id)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY Y_LOC, X_LOC"
+                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (PROFIL_ID = @profil_id)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY Y_LOC, X_LOC"
             Me._commandCollection(10).CommandType = Global.System.Data.CommandType.Text
             Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@USER_LANGUAGE", Global.System.Data.SqlDbType.VarChar, 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@profil_id", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -20595,7 +20668,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
                     ByVal IMAGE_CONTROL() As Byte,  _
                     ByVal SQL2 As String,  _
                     ByVal SQL_ENABLE As String,  _
-                    ByVal SAVE_CHANGE_ON_ENABLED As Boolean) As Integer
+                    ByVal SAVE_CHANGE_ON_ENABLED As Boolean,  _
+                    ByVal FORMAT_STRING As String) As Integer
             Me.Adapter.InsertCommand.Parameters(0).Value = CType(PROFIL_ID,Integer)
             If (NAME Is Nothing) Then
                 Throw New Global.System.ArgumentNullException("NAME")
@@ -20719,6 +20793,11 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 Me.Adapter.InsertCommand.Parameters(33).Value = CType(SQL_ENABLE,String)
             End If
             Me.Adapter.InsertCommand.Parameters(34).Value = CType(SAVE_CHANGE_ON_ENABLED,Boolean)
+            If (FORMAT_STRING Is Nothing) Then
+                Throw New Global.System.ArgumentNullException("FORMAT_STRING")
+            Else
+                Me.Adapter.InsertCommand.Parameters(35).Value = CType(FORMAT_STRING,String)
+            End If
             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                         <> Global.System.Data.ConnectionState.Open) Then
@@ -20771,6 +20850,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
                     ByVal SQL2 As String,  _
                     ByVal SQL_ENABLE As String,  _
                     ByVal SAVE_CHANGE_ON_ENABLED As Boolean,  _
+                    ByVal FORMAT_STRING As String,  _
                     ByVal Original_GUID As Integer,  _
                     ByVal GUID As Integer) As Integer
             Me.Adapter.UpdateCommand.Parameters(0).Value = CType(PROFIL_ID,Integer)
@@ -20885,8 +20965,13 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(SQL_ENABLE,String)
             End If
             Me.Adapter.UpdateCommand.Parameters(31).Value = CType(SAVE_CHANGE_ON_ENABLED,Boolean)
-            Me.Adapter.UpdateCommand.Parameters(32).Value = CType(Original_GUID,Integer)
+            If (FORMAT_STRING Is Nothing) Then
-            Me.Adapter.UpdateCommand.Parameters(33).Value = CType(GUID,Integer)
+                Throw New Global.System.ArgumentNullException("FORMAT_STRING")
+            Else
+                Me.Adapter.UpdateCommand.Parameters(32).Value = CType(FORMAT_STRING,String)
+            End If
+            Me.Adapter.UpdateCommand.Parameters(33).Value = CType(Original_GUID,Integer)
+            Me.Adapter.UpdateCommand.Parameters(34).Value = CType(GUID,Integer)
             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                         <> Global.System.Data.ConnectionState.Open) Then
@@ -24103,7 +24188,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 "ORK_HISTORY_ENTRIES] = @Original_ANNOTATE_ALL_WORK_HISTORY_ENTRIES) AND ([ANNOTA"& _ 
                 "TE_WORK_HISTORY_ENTRY] = @Original_ANNOTATE_WORK_HISTORY_ENTRY) AND ((@IsNull_WO"& _ 
                 "RK_HISTORY_ENTRY = 1 AND [WORK_HISTORY_ENTRY] IS NULL) OR ([WORK_HISTORY_ENTRY] "& _ 
-                "= @Original_WORK_HISTORY_ENTRY)) AND ([DISPLAY_MODE] = @Original_DISPLAY_MODE))"
+                "= @Original_WORK_HISTORY_ENTRY)) AND ([DISPLAY_MODE] = @Original_DISPLAY_MODE) A"& _ 
+                "ND ([SHOW_DOCUMENT] = @Original_SHOW_DOCUMENT) AND ([TARGET_PATH_BLIND_FILE] = @"& _ 
+                "Original_TARGET_PATH_BLIND_FILE))"
             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_NAME", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
@@ -24123,7 +24210,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_FINAL_TEXT", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "FINAL_TEXT", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_FINAL_TEXT", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "FINAL_TEXT", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MOVE2FOLDER", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MOVE2FOLDER", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
-            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MOVE2FOLDER", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MOVE2FOLDER", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
+            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MOVE2FOLDER", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MOVE2FOLDER", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_TYPE", Global.System.Data.SqlDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_WD_OBJECTTYPE", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_OBJECTTYPE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SORT_BY_LATEST", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SORT_BY_LATEST", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
@@ -24134,6 +24221,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WORK_HISTORY_ENTRY", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WORK_HISTORY_ENTRY", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DISPLAY_MODE", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DISPLAY_MODE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
+            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SHOW_DOCUMENT", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SHOW_DOCUMENT", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
+            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_TARGET_PATH_BLIND_FILE", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TARGET_PATH_BLIND_FILE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
             Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
             Me._adapter.InsertCommand.Connection = Me.Connection
             Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPM_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         (NAME, TITLE, PRIORITY, DESCRI"& _ 
@@ -24147,12 +24236,12 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 "PROFILE,@FINAL_TEXT,@MOVE2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_VEKTOR"& _ 
                 "_INDEX,@LOG_INDEX,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@ANNOTATE_WORK_HI"& _ 
                 "STORY_ENTRY,@WORK_HISTORY_ENTRY,@DISPLAY_MODE,@SQL_BTN_FINISH,@SHOW_DOCUMENT,@TA"& _ 
-                "RGET_PATH_BLIND_FILE);  "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIV"& _ 
+                "RGET_PATH_BLIND_FILE);    "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACT"& _ 
-                "E, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN,"& _ 
+                "IVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHE"& _ 
-                " FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM"& _ 
+                "N, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, "& _ 
-                "_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_"& _ 
+                "PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTAT"& _ 
-                "WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH FROM TBPM_P"& _ 
+                "E_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH FROM TBPM"& _ 
-                "ROFILE WHERE (GUID = SCOPE_IDENTITY()) ORDER BY NAME"
+                "_PROFILE WHERE (GUID = SCOPE_IDENTITY()) ORDER BY NAME"
             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TITLE", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "TITLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -24196,12 +24285,12 @@ Namespace DD_DMSLiteDataSetTableAdapters
                 "ORK_HISTORY_ENTRY = @WORK_HISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE, SQL_BTN_F"& _ 
                 "INISH = @SQL_BTN_FINISH, SHOW_DOCUMENT = @SHOW_DOCUMENT, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                     "& _ 
                 "    TARGET_PATH_BLIND_FILE = @TARGET_PATH_BLIND_FILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (GUID = @Orig"& _ 
-                "inal_GUID);   "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEAR"& _ 
+                "inal_GUID);     "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SE"& _ 
-                "CH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PRO"& _ 
+                "ARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_P"& _ 
-                "FILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_IN"& _ 
+                "ROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_"& _ 
-                "DEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTO"& _ 
+                "INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HIS"& _ 
-                "RY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH FROM TBPM_PROFILE WHE"& _ 
+                "TORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH FROM TBPM_PROFILE W"& _ 
-                "RE (GUID = @GUID) ORDER BY NAME"
+                "HERE (GUID = @GUID) ORDER BY NAME"
             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TITLE", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "TITLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -24247,13 +24336,12 @@ Namespace DD_DMSLiteDataSetTableAdapters
             Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
             Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
             Me._commandCollection(0).Connection = Me.Connection
-            Me._commandCollection(0).CommandText = "SELECT        GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_"& _ 
+            Me._commandCollection(0).CommandText = "SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMEN"& _ 
-                "DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINA"& _ 
+                "TS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT,"& _ 
-                "L_TEXT, MOVE2FOLDER, TYPE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         WD_OBJECTTYPE, SORT_BY_LAT"& _ 
+                " MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, S"& _ 
-                "EST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, AN"& _ 
+                "QL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HI"& _ 
-                "NOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                 "& _ 
+                "STORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH, SHOW_DOCUMENT, TARGET_PATH_BLIND_FILE"& _ 
-                "        SQL_BTN_FINISH, SHOW_DOCUMENT, TARGET_PATH_BLIND_FILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            T"& _ 
+                " FROM TBPM_PROFILE ORDER BY NAME"
-                "BPM_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY NAME"
             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
         End Sub
         
@@ -24322,7 +24410,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
                     ByVal Original_ACTIVE As Boolean,  _
                     ByVal Original_NO_OF_DOCUMENTS As Integer,  _
                     ByVal Original_ADDED_WHO As String,  _
-                    ByVal Original_ADDED_WHEN As Global.System.Nullable(Of Date),  _
+                    ByVal Original_ADDED_WHEN As Date,  _
                     ByVal Original_CHANGED_WHO As String,  _
                     ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date),  _
                     ByVal Original_FINAL_PROFILE As Boolean,  _
@@ -24336,7 +24424,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
                     ByVal Original_ANNOTATE_ALL_WORK_HISTORY_ENTRIES As Boolean,  _
                     ByVal Original_ANNOTATE_WORK_HISTORY_ENTRY As Boolean,  _
                     ByVal Original_WORK_HISTORY_ENTRY As String,  _
-                    ByVal Original_DISPLAY_MODE As String) As Integer
+                    ByVal Original_DISPLAY_MODE As String,  _
+                    ByVal Original_SHOW_DOCUMENT As Boolean,  _
+                    ByVal Original_TARGET_PATH_BLIND_FILE As String) As Integer
             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_GUID,Integer)
             If (Original_NAME Is Nothing) Then
                 Throw New Global.System.ArgumentNullException("Original_NAME")
@@ -24359,15 +24449,11 @@ Namespace DD_DMSLiteDataSetTableAdapters
             Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_ACTIVE,Boolean)
             Me.Adapter.DeleteCommand.Parameters(7).Value = CType(Original_NO_OF_DOCUMENTS,Integer)
             If (Original_ADDED_WHO Is Nothing) Then
-                Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
+                Throw New Global.System.ArgumentNullException("Original_ADDED_WHO")
             Else
                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_ADDED_WHO,String)
             End If
-            If (Original_ADDED_WHEN.HasValue = true) Then
+            Me.Adapter.DeleteCommand.Parameters(9).Value = CType(Original_ADDED_WHEN,Date)
-                Me.Adapter.DeleteCommand.Parameters(9).Value = CType(Original_ADDED_WHEN.Value,Date)
-            Else
-                Me.Adapter.DeleteCommand.Parameters(9).Value = Global.System.DBNull.Value
-            End If
             If (Original_CHANGED_WHO Is Nothing) Then
                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(1,Object)
                 Me.Adapter.DeleteCommand.Parameters(11).Value = Global.System.DBNull.Value
@@ -24428,6 +24514,12 @@ Namespace DD_DMSLiteDataSetTableAdapters
             Else
                 Me.Adapter.DeleteCommand.Parameters(28).Value = CType(Original_DISPLAY_MODE,String)
             End If
+            Me.Adapter.DeleteCommand.Parameters(29).Value = CType(Original_SHOW_DOCUMENT,Boolean)
+            If (Original_TARGET_PATH_BLIND_FILE Is Nothing) Then
+                Throw New Global.System.ArgumentNullException("Original_TARGET_PATH_BLIND_FILE")
+            Else
+                Me.Adapter.DeleteCommand.Parameters(30).Value = CType(Original_TARGET_PATH_BLIND_FILE,String)
+            End If
             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                         <> Global.System.Data.ConnectionState.Open) Then

app/TaskFlow/DD_DMSLiteDataSet.xsc

@@ -123,11 +123,9 @@
     <TableUISetting Name="TBPM_PROFILE">
       <ColumnUISettings>
         <ColumnUISetting Name="TYPE">
-          <ControlSettings>
+          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
-            <ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
               <BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-            </ControlSetting>
+            </ControlSetting></ControlSettings>
-          </ControlSettings>
         </ColumnUISetting>
       </ColumnUISettings>
     </TableUISetting>

app/TaskFlow/DD_DMSLiteDataSet.xsd

@@ -972,8 +972,8 @@ WHERE        (GUID = @Original_GUID)</CommandText>
                     <CommandText>INSERT INTO TBPM_PROFILE_CONTROLS
                          (PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, 
                          HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, 
-                         REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SAVE_CHANGE_ON_ENABLED)
+                         REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING)
-VALUES        (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@INDEX_NAME,@TYP,@VALIDATION,@CHOICE_LIST,@CONNECTION_ID,@SQL_UEBERPRUEFUNG,@HEIGHT,@WIDTH,@FONT_STYLE,@FONT_SIZE,@FONT_FAMILY,@FONT_COLOR,@READ_ONLY,@LOAD_IDX_VALUE,@DEFAULT_VALUE,@MULTISELECT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES,@REGEX_MATCH,@REGEX_MESSAGE_DE,@REGEX_MESSAGE_EN,@IMAGE_CONTROL,@SQL2,@SQL_ENABLE,@SAVE_CHANGE_ON_ENABLED);   
+VALUES        (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@INDEX_NAME,@TYP,@VALIDATION,@CHOICE_LIST,@CONNECTION_ID,@SQL_UEBERPRUEFUNG,@HEIGHT,@WIDTH,@FONT_STYLE,@FONT_SIZE,@FONT_FAMILY,@FONT_COLOR,@READ_ONLY,@LOAD_IDX_VALUE,@DEFAULT_VALUE,@MULTISELECT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES,@REGEX_MATCH,@REGEX_MESSAGE_DE,@REGEX_MESSAGE_EN,@IMAGE_CONTROL,@SQL2,@SQL_ENABLE,@SAVE_CHANGE_ON_ENABLED,@FORMAT_STRING);     
 SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = SCOPE_IDENTITY()) ORDER BY Y_LOC, X_LOC</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -1011,6 +1011,7 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
                       <Parameter AllowDbNull="true" AutogeneratedName="SQL2" ColumnName="SQL2" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL2" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL2" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="SQL_ENABLE" ColumnName="SQL_ENABLE" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_ENABLE" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_ENABLE" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="SAVE_CHANGE_ON_ENABLED" ColumnName="SAVE_CHANGE_ON_ENABLED" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@SAVE_CHANGE_ON_ENABLED" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="SAVE_CHANGE_ON_ENABLED" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="FORMAT_STRING" ColumnName="FORMAT_STRING" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(200)" DbType="AnsiString" Direction="Input" ParameterName="@FORMAT_STRING" Precision="0" ProviderType="VarChar" Scale="0" Size="200" SourceColumn="FORMAT_STRING" SourceColumnNullMapping="false" SourceVersion="Current" />
                     </Parameters>
                   </DbCommand>
                 </InsertCommand>
@@ -1019,7 +1020,7 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
                     <CommandText>SELECT        GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, 
                          SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, 
                          REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, 
-                         TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED
+                         TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING
 FROM            TBPM_PROFILE_CONTROLS
 WHERE        (GUID = @guid)
 ORDER BY Y_LOC, X_LOC</CommandText>
@@ -1036,8 +1037,8 @@ SET                PROFIL_ID = @PROFIL_ID, NAME = @NAME, CTRL_TYPE = @CTRL_TYPE,
                          FONT_STYLE = @FONT_STYLE, FONT_SIZE = @FONT_SIZE, FONT_FAMILY = @FONT_FAMILY, FONT_COLOR = @FONT_COLOR, READ_ONLY = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE, 
                          DEFAULT_VALUE = @DEFAULT_VALUE, MULTISELECT = @MULTISELECT, VKT_ADD_ITEM = @VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES = @VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH = @REGEX_MATCH, 
                          REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, IMAGE_CONTROL = @IMAGE_CONTROL, SQL2 = @SQL2, SQL_ENABLE = @SQL_ENABLE, 
-                         SAVE_CHANGE_ON_ENABLED = @SAVE_CHANGE_ON_ENABLED
+                         SAVE_CHANGE_ON_ENABLED = @SAVE_CHANGE_ON_ENABLED, FORMAT_STRING = @FORMAT_STRING
-WHERE        (GUID = @Original_GUID);   
+WHERE        (GUID = @Original_GUID);    
 SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = @GUID) ORDER BY Y_LOC, X_LOC</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -1072,6 +1073,7 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
                       <Parameter AllowDbNull="true" AutogeneratedName="SQL2" ColumnName="SQL2" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL2" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL2" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="SQL_ENABLE" ColumnName="SQL_ENABLE" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_ENABLE" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_ENABLE" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="SAVE_CHANGE_ON_ENABLED" ColumnName="SAVE_CHANGE_ON_ENABLED" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@SAVE_CHANGE_ON_ENABLED" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="SAVE_CHANGE_ON_ENABLED" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="FORMAT_STRING" ColumnName="FORMAT_STRING" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(200)" DbType="AnsiString" Direction="Input" ParameterName="@FORMAT_STRING" Precision="0" ProviderType="VarChar" Scale="0" Size="200" SourceColumn="FORMAT_STRING" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" 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.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                     </Parameters>
@@ -1121,6 +1123,7 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
               <Mapping SourceColumn="CONTROL_ACTIVE" DataSetColumn="CONTROL_ACTIVE" />
               <Mapping SourceColumn="TABLE_ORDER_COLUMN" DataSetColumn="TABLE_ORDER_COLUMN" />
               <Mapping SourceColumn="SAVE_CHANGE_ON_ENABLED" DataSetColumn="SAVE_CHANGE_ON_ENABLED" />
+              <Mapping SourceColumn="FORMAT_STRING" DataSetColumn="FORMAT_STRING" />
             </Mappings>
             <Sources>
               <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdControlExists" Modifier="Public" Name="cmdControlExists" QueryType="Scalar" ScalarCallRetval="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="cmdControlExists">
@@ -1248,7 +1251,7 @@ WHERE        (GUID = @Original_GUID);</CommandText>
                     <CommandText>SELECT        dbo.FNPM_LANGUAGE_CONTROL_TEXT(NAME, @USER_LANGUAGE, CTRL_TYPE, CTRL_TEXT) AS CTRL_CAPTION_LANG, ADDED_WHEN, ADDED_WHO, CHANGED_WHEN, CHANGED_WHO, CHOICE_LIST, CONNECTION_ID, 
                          CTRL_TEXT, CTRL_TYPE, DEFAULT_VALUE, FONT_COLOR, FONT_FAMILY, FONT_SIZE, FONT_STYLE, GUID, HEIGHT, INDEX_NAME, LOAD_IDX_VALUE, MULTISELECT, NAME, PROFIL_ID, READ_ONLY, REGEX_MATCH, 
                          REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SQL_UEBERPRUEFUNG, TYP, VALIDATION, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, WIDTH, X_LOC, Y_LOC, IMAGE_CONTROL, SQL2, SQL_ENABLE, 
-                         SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED
+                         SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING
 FROM            TBPM_PROFILE_CONTROLS AS T
 WHERE        (PROFIL_ID = @profil_id)
 ORDER BY Y_LOC, X_LOC</CommandText>
@@ -1805,7 +1808,7 @@ ORDER BY Netto DESC</CommandText>
               <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBPM_PROFILE" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" 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">
                 <DeleteCommand>
                   <DbCommand CommandType="Text" ModifiedByUser="false">
-                    <CommandText>DELETE FROM [TBPM_PROFILE] WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Original_NAME) AND ([TITLE] = @Original_TITLE) AND ([PRIORITY] = @Original_PRIORITY) AND ((@IsNull_DESCRIPTION = 1 AND [DESCRIPTION] IS NULL) OR ([DESCRIPTION] = @Original_DESCRIPTION)) AND ([ACTIVE] = @Original_ACTIVE) AND ([NO_OF_DOCUMENTS] = @Original_NO_OF_DOCUMENTS) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ([ADDED_WHEN] = @Original_ADDED_WHEN) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)) AND ([FINAL_PROFILE] = @Original_FINAL_PROFILE) AND ((@IsNull_FINAL_TEXT = 1 AND [FINAL_TEXT] IS NULL) OR ([FINAL_TEXT] = @Original_FINAL_TEXT)) AND ((@IsNull_MOVE2FOLDER = 1 AND [MOVE2FOLDER] IS NULL) OR ([MOVE2FOLDER] = @Original_MOVE2FOLDER)) AND ([TYPE] = @Original_TYPE) AND ([WD_OBJECTTYPE] = @Original_WD_OBJECTTYPE) AND ([SORT_BY_LATEST] = @Original_SORT_BY_LATEST) AND ([PM_VEKTOR_INDEX] = @Original_PM_VEKTOR_INDEX) AND ([LOG_INDEX] = @Original_LOG_INDEX) AND ([ANNOTATE_ALL_WORK_HISTORY_ENTRIES] = @Original_ANNOTATE_ALL_WORK_HISTORY_ENTRIES) AND ([ANNOTATE_WORK_HISTORY_ENTRY] = @Original_ANNOTATE_WORK_HISTORY_ENTRY) AND ((@IsNull_WORK_HISTORY_ENTRY = 1 AND [WORK_HISTORY_ENTRY] IS NULL) OR ([WORK_HISTORY_ENTRY] = @Original_WORK_HISTORY_ENTRY)) AND ([DISPLAY_MODE] = @Original_DISPLAY_MODE))</CommandText>
+                    <CommandText>DELETE FROM [TBPM_PROFILE] WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Original_NAME) AND ([TITLE] = @Original_TITLE) AND ([PRIORITY] = @Original_PRIORITY) AND ((@IsNull_DESCRIPTION = 1 AND [DESCRIPTION] IS NULL) OR ([DESCRIPTION] = @Original_DESCRIPTION)) AND ([ACTIVE] = @Original_ACTIVE) AND ([NO_OF_DOCUMENTS] = @Original_NO_OF_DOCUMENTS) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ([ADDED_WHEN] = @Original_ADDED_WHEN) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)) AND ([FINAL_PROFILE] = @Original_FINAL_PROFILE) AND ((@IsNull_FINAL_TEXT = 1 AND [FINAL_TEXT] IS NULL) OR ([FINAL_TEXT] = @Original_FINAL_TEXT)) AND ((@IsNull_MOVE2FOLDER = 1 AND [MOVE2FOLDER] IS NULL) OR ([MOVE2FOLDER] = @Original_MOVE2FOLDER)) AND ([TYPE] = @Original_TYPE) AND ([WD_OBJECTTYPE] = @Original_WD_OBJECTTYPE) AND ([SORT_BY_LATEST] = @Original_SORT_BY_LATEST) AND ([PM_VEKTOR_INDEX] = @Original_PM_VEKTOR_INDEX) AND ([LOG_INDEX] = @Original_LOG_INDEX) AND ([ANNOTATE_ALL_WORK_HISTORY_ENTRIES] = @Original_ANNOTATE_ALL_WORK_HISTORY_ENTRIES) AND ([ANNOTATE_WORK_HISTORY_ENTRY] = @Original_ANNOTATE_WORK_HISTORY_ENTRY) AND ((@IsNull_WORK_HISTORY_ENTRY = 1 AND [WORK_HISTORY_ENTRY] IS NULL) OR ([WORK_HISTORY_ENTRY] = @Original_WORK_HISTORY_ENTRY)) AND ([DISPLAY_MODE] = @Original_DISPLAY_MODE) AND ([SHOW_DOCUMENT] = @Original_SHOW_DOCUMENT) AND ([TARGET_PATH_BLIND_FILE] = @Original_TARGET_PATH_BLIND_FILE))</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
@@ -1815,8 +1818,8 @@ ORDER BY Netto DESC</CommandText>
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_DESCRIPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_NO_OF_DOCUMENTS" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="NO_OF_DOCUMENTS" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="true" SourceVersion="Original" />
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
@@ -1825,7 +1828,7 @@ ORDER BY Netto DESC</CommandText>
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_FINAL_TEXT" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="FINAL_TEXT" SourceColumnNullMapping="true" SourceVersion="Original" />
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_FINAL_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="FINAL_TEXT" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_MOVE2FOLDER" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="MOVE2FOLDER" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_MOVE2FOLDER" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="MOVE2FOLDER" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Original_MOVE2FOLDER" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="MOVE2FOLDER" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@Original_TYPE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="TYPE" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WD_OBJECTTYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WD_OBJECTTYPE" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_SORT_BY_LATEST" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="SORT_BY_LATEST" SourceColumnNullMapping="false" SourceVersion="Original" />
@@ -1836,6 +1839,8 @@ ORDER BY Netto DESC</CommandText>
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WORK_HISTORY_ENTRY" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WORK_HISTORY_ENTRY" SourceColumnNullMapping="true" SourceVersion="Original" />
                       <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WORK_HISTORY_ENTRY" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WORK_HISTORY_ENTRY" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_DISPLAY_MODE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DISPLAY_MODE" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_SHOW_DOCUMENT" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="SHOW_DOCUMENT" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_TARGET_PATH_BLIND_FILE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="TARGET_PATH_BLIND_FILE" SourceColumnNullMapping="false" SourceVersion="Original" />
                     </Parameters>
                   </DbCommand>
                 </DeleteCommand>
@@ -1845,7 +1850,7 @@ ORDER BY Netto DESC</CommandText>
                          (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, 
                          SQL_BTN_FINISH, SHOW_DOCUMENT, TARGET_PATH_BLIND_FILE)
-VALUES        (@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,@SQL_BTN_FINISH,@SHOW_DOCUMENT,@TARGET_PATH_BLIND_FILE);  
+VALUES        (@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,@SQL_BTN_FINISH,@SHOW_DOCUMENT,@TARGET_PATH_BLIND_FILE);    
 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, SQL_BTN_FINISH FROM TBPM_PROFILE WHERE (GUID = SCOPE_IDENTITY()) ORDER BY NAME</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM.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" />
@@ -1880,11 +1885,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
                 </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, 
+                    <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, SQL_BTN_FINISH, SHOW_DOCUMENT, TARGET_PATH_BLIND_FILE FROM TBPM_PROFILE ORDER BY NAME</CommandText>
-                         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, SHOW_DOCUMENT, TARGET_PATH_BLIND_FILE
-FROM            TBPM_PROFILE
-ORDER BY NAME</CommandText>
                     <Parameters />
                   </DbCommand>
                 </SelectCommand>
@@ -1897,7 +1898,7 @@ SET                NAME = @NAME, TITLE = @TITLE, PRIORITY = @PRIORITY, DESCRIPTI
                          SQL_VIEW = @SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES = @ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY = @ANNOTATE_WORK_HISTORY_ENTRY, 
                          WORK_HISTORY_ENTRY = @WORK_HISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE, SQL_BTN_FINISH = @SQL_BTN_FINISH, SHOW_DOCUMENT = @SHOW_DOCUMENT, 
                          TARGET_PATH_BLIND_FILE = @TARGET_PATH_BLIND_FILE
-WHERE        (GUID = @Original_GUID);   
+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, 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 WHERE (GUID = @GUID) ORDER BY NAME</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM.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" />
@@ -2664,6 +2665,8 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
                 </xs:simpleType>
               </xs:element>
               <xs:element name="SAVE_CHANGE_ON_ENABLED" msprop:Generator_ColumnPropNameInTable="SAVE_CHANGE_ON_ENABLEDColumn" msprop:Generator_ColumnPropNameInRow="SAVE_CHANGE_ON_ENABLED" msprop:Generator_UserColumnName="SAVE_CHANGE_ON_ENABLED" msprop:Generator_ColumnVarNameInTable="columnSAVE_CHANGE_ON_ENABLED" type="xs:boolean" />
+              <xs:element name="FORMAT_STRING" msprop:Generator_ColumnPropNameInTable="FORMAT_STRINGColumn" msprop:Generator_ColumnPropNameInRow="FORMAT_STRING" msprop:Generator_UserColumnName="FORMAT_STRING" msprop:Generator_ColumnVarNameInTable="columnFORMAT_STRING" type="xs:string" />
+              <xs:element name="BACKCOLOR_IF" msprop:Generator_ColumnPropNameInTable="BACKCOLOR_IFColumn" msprop:Generator_ColumnPropNameInRow="BACKCOLOR_IF" msprop:Generator_UserColumnName="BACKCOLOR_IF" msprop:Generator_ColumnVarNameInTable="columnBACKCOLOR_IF" type="xs:string" minOccurs="0" />
             </xs:sequence>
           </xs:complexType>
         </xs:element>
@@ -3268,8 +3271,8 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="SHOW_DOCUMENT" msprop:Generator_UserColumnName="SHOW_DOCUMENT" msprop:Generator_ColumnPropNameInTable="SHOW_DOCUMENTColumn" msprop:Generator_ColumnPropNameInRow="SHOW_DOCUMENT" msprop:Generator_ColumnVarNameInTable="columnSHOW_DOCUMENT" type="xs:boolean" default="true" />
+              <xs:element name="SHOW_DOCUMENT" msprop:Generator_ColumnPropNameInTable="SHOW_DOCUMENTColumn" msprop:Generator_ColumnPropNameInRow="SHOW_DOCUMENT" msprop:Generator_UserColumnName="SHOW_DOCUMENT" msprop:Generator_ColumnVarNameInTable="columnSHOW_DOCUMENT" type="xs:boolean" default="true" />
-              <xs:element name="TARGET_PATH_BLIND_FILE" msprop:Generator_ColumnPropNameInRow="TARGET_PATH_BLIND_FILE" msprop:Generator_ColumnPropNameInTable="TARGET_PATH_BLIND_FILEColumn" msprop:Generator_ColumnVarNameInTable="columnTARGET_PATH_BLIND_FILE" msprop:Generator_UserColumnName="TARGET_PATH_BLIND_FILE" default="">
+              <xs:element name="TARGET_PATH_BLIND_FILE" msprop:Generator_ColumnPropNameInTable="TARGET_PATH_BLIND_FILEColumn" msprop:Generator_ColumnPropNameInRow="TARGET_PATH_BLIND_FILE" msprop:Generator_UserColumnName="TARGET_PATH_BLIND_FILE" msprop:Generator_ColumnVarNameInTable="columnTARGET_PATH_BLIND_FILE" default="">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="500" />
@@ -3352,9 +3355,9 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
   </xs:element>
   <xs:annotation>
     <xs:appinfo>
-      <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_UserParentTable="TBPM_PROFILE_CONTROLS" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_ParentPropName="TBPM_PROFILE_CONTROLSRow" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL1" />
+      <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_UserParentTable="TBPM_PROFILE_CONTROLS" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL1" 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_UserParentTable="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL" 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_UserParentTable="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_ParentPropName="TBWH_CHECK_PROFILE_CONTROLSRow" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL" />
-      <msdata:Relationship name="FK_TBPM_PROFILE_CONTROLS_PROFILE" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_PROFILE_CONTROLS" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserParentTable="TBPM_PROFILE" msprop:Generator_UserChildTable="TBPM_PROFILE_CONTROLS" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_CONTROLS_PROFILE" msprop:Generator_ChildPropName="GetTBPM_PROFILE_CONTROLSRows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_CONTROLS_PROFILE" msprop:Generator_ParentPropName="TBPM_PROFILERow" />
+      <msdata:Relationship name="FK_TBPM_PROFILE_CONTROLS_PROFILE" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_PROFILE_CONTROLS" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserParentTable="TBPM_PROFILE" msprop:Generator_UserChildTable="TBPM_PROFILE_CONTROLS" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_CONTROLS_PROFILE" msprop:Generator_ChildPropName="GetTBPM_PROFILE_CONTROLSRows" msprop:Generator_ParentPropName="TBPM_PROFILERow" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_CONTROLS_PROFILE" />
     </xs:appinfo>
   </xs:annotation>
 </xs:schema>

app/TaskFlow/DD_DMSLiteDataSet.xss

@@ -4,7 +4,7 @@
      Changes to this file may cause incorrect behavior and will be lost if
      the code is regenerated.
 </autogenerated>-->
-<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="801" ViewPortY="-84" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
+<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="-27" ViewPortY="-97" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
   <Shapes>
     <Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="14" X="1688" Y="-74" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
     <Shape ID="DesignTable:TBPM_KONFIGURATION" ZOrder="2" X="-17" Y="232" Height="262" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
@@ -25,7 +25,7 @@
     <Shape ID="DesignTable:VWPM_CHART_INVOICE_MONITOR" ZOrder="10" X="1828" Y="457" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
     <Shape ID="DesignTable:VWPM_CHART_INVOICE_MONITOR_SERIES" ZOrder="9" X="1903" Y="311" Height="153" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
     <Shape ID="DesignTable:VWPM_CHART_TOP5" ZOrder="8" X="1302" Y="15" Height="153" Width="267" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
-    <Shape ID="DesignTable:TBPM_PROFILE" ZOrder="6" X="858" Y="-71" Height="305" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBPM_PROFILE" ZOrder="6" X="862" Y="-66" Height="305" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
     <Shape ID="DesignTable:TBWH_CONNECTION" ZOrder="24" X="625" Y="114" Height="276" Width="189" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="272" />
   </Shapes>
   <Connectors>
@@ -60,11 +60,11 @@
     <Connector ID="DesignRelation:FK_TBPM_PROFILE_CONTROLS_PROFILE" ZOrder="5" LineWidth="11">
       <RoutePoints>
         <Point>
-          <X>961</X>
+          <X>965</X>
-          <Y>234</Y>
+          <Y>239</Y>
         </Point>
         <Point>
-          <X>961</X>
+          <X>965</X>
           <Y>400</Y>
         </Point>
       </RoutePoints>

app/TaskFlow/FinalIndexDataSet.xss

@@ -4,7 +4,7 @@
      Changes to this file may cause incorrect behavior and will be lost if
      the code is regenerated.
 </autogenerated>-->
-<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="0" ViewPortY="0" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
+<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="0" ViewPortY="0" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
   <Shapes>
     <Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="1" X="93" Y="35" Height="362" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
   </Shapes>

app/TaskFlow/ModuleControlProperties.vb

@@ -84,7 +84,7 @@ Public Module ModuleControlProperties
 
         Private _index_type As String
         Private _sql_command As String
-        Friend _sql_connection As Integer = 0
+        'Friend _sql_connection As Integer = 0
         Private _Enable_SQL As String
         Private _Enable_SQL_ONLOAD As String
         Private _default_value
@@ -124,36 +124,37 @@ Public Module ModuleControlProperties
         <Category(ClassConstants.CAT_DATA)>
         Public Property SQLCommand() As SQLValue
             Get
-                Return New SQLValue(NotNull(_sql_command, ""), _sql_connection)
+                Return New SQLValue(NotNull(_sql_command, "")) ', _sql_connection
             End Get
             Set(ByVal value As SQLValue)
                 _sql_command = value.Value
-                SQLConnection = value.ConnectionId
+                'SQLConnection = value.ConnectionId
+
             End Set
         End Property
 
-        <DisplayName("SQL Connection")>
+        '<DisplayName("SQL Connection")>
-        <Category(ClassConstants.CAT_INFORMATION)>
+        '<Category(ClassConstants.CAT_INFORMATION)>
-        <[ReadOnly](True)>
+        '<[ReadOnly](True)>
-        Public Property SQLConnection() As Integer
+        'Public Property SQLConnection() As Integer
-            Get
+        '    Get
-                Return _sql_connection
+        '        Return _sql_connection
-            End Get
+        '    End Get
-            Set(value As Integer)
+        '    Set(value As Integer)
-                _sql_connection = value
+        '        _sql_connection = value
-            End Set
+        '    End Set
-        End Property
+        'End Property
 
         <DisplayName("Enable On Change SQL")>
         <Description("SQL Command that determines if a control should be enabled/disabled when another, referenced control changes. Should return 0 or 1. Can include a Control-Placeholder.")>
         <Category(ClassConstants.CAT_BEHAVIOUR)>
         Public Property Enable_SQL() As SQLValue
             Get
-                Return New SQLValue(NotNull(_Enable_SQL, ""), _sql_connection)
+                Return New SQLValue(NotNull(_Enable_SQL, "")) ', _sql_connection
             End Get
             Set(ByVal value As SQLValue)
                 _Enable_SQL = value.Value
-                SQLConnection = value.ConnectionId
+                'SQLConnection = value.ConnectionId
             End Set
         End Property
 
@@ -162,11 +163,11 @@ Public Module ModuleControlProperties
         <Category(ClassConstants.CAT_BEHAVIOUR)>
         Public Property Enable_SQL_OnLoad() As SQLValue
             Get
-                Return New SQLValue(NotNull(_Enable_SQL_ONLOAD, ""), _sql_connection)
+                Return New SQLValue(NotNull(_Enable_SQL_ONLOAD, "")) ', _sql_connection
             End Get
             Set(ByVal value As SQLValue)
                 _Enable_SQL_ONLOAD = value.Value
-                SQLConnection = value.ConnectionId
+                'SQLConnection = value.ConnectionId
             End Set
         End Property
 
@@ -189,11 +190,11 @@ Public Module ModuleControlProperties
         <Category(ClassConstants.CAT_BEHAVIOUR)>
         Public Property SetControlData As SQLValue
             Get
-                Return New SQLValue(_set_control_data, _sql_connection)
+                Return New SQLValue(_set_control_data) ', _sql_connection
             End Get
             Set(value As SQLValue)
                 _set_control_data = value.Value
-                SQLConnection = value.ConnectionId
+                'SQLConnection = value.ConnectionId
             End Set
         End Property
     End Class
@@ -210,6 +211,39 @@ Public Module ModuleControlProperties
         <Category(ClassConstants.CAT_VALIDATION)>
         <Editor(GetType(MultilineStringEditor), GetType(UITypeEditor))>
         Public Property RegexMessage As String
+
+        <DisplayName("Display Format")>
+        <Category(ClassConstants.CAT_DISPLAY)>
+        <TypeConverter(GetType(DisplayFormatConverter))>
+        Public Property DisplayFormat As String
+
+        Public Class DisplayFormatConverter
+            Inherits TypeConverter
+
+            Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean
+                Return True
+            End Function
+
+            Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection
+                Dim displayFormatList = New List(Of String) From {
+                    ClassControlCreator.CONTROL_TYPE_TEXT,
+                    ClassControlCreator.CONTROL_TYPE_DOUBLE,
+                    ClassControlCreator.CONTROL_TYPE_CURRENCY,
+                    ClassControlCreator.CONTROL_TYPE_DATE,
+                    ClassControlCreator.CONTROL_TYPE_DATETIME
+                }
+                Dim values As New StandardValuesCollection(displayFormatList)
+                Return values
+            End Function
+
+            Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object
+                If IsNothing(value) Then
+                    Return ""
+                Else
+                    Return value.ToString()
+                End If
+            End Function
+        End Class
     End Class
 
     Public Class LabelProperties
@@ -245,6 +279,10 @@ Public Module ModuleControlProperties
         <Category(ClassConstants.CAT_BEHAVIOUR)>
         Public Property DisplayAsLookUpControl As Boolean
 
+        <DisplayName("Add new values")>
+        <Category(ClassConstants.CAT_BEHAVIOUR)>
+        Public Property AddNewValues As Boolean
+
         Public Class ChoiceListConverter
             Inherits TypeConverter
 
@@ -308,11 +346,11 @@ Public Module ModuleControlProperties
         <Category(ClassConstants.CAT_VALIDATION)>
         Public Property Override_SQL() As SQLValue
             Get
-                Return New SQLValue(NotNull(_Override_SQL, ""), _sql_connection)
+                Return New SQLValue(NotNull(_Override_SQL, "")) ', _sql_connection
             End Get
             Set(ByVal value As SQLValue)
                 _Override_SQL = value.Value
-                SQLConnection = value.ConnectionId
+                'SQLConnection = value.ConnectionId
             End Set
         End Property
     End Class

app/TaskFlow/ModuleFinalIndexProperties.vb

@@ -11,10 +11,10 @@ Module ModuleFinalIndexProperties
         <[ReadOnly](True)>
         Public Property GUID As Integer
 
-        <DisplayName("Connection ID")>
+        '<DisplayName("Connection ID")>
-        <Category(ClassConstants.CAT_INFORMATION)>
+        '<Category(ClassConstants.CAT_INFORMATION)>
-        <[ReadOnly](True)>
+        '<[ReadOnly](True)>
-        Public Property ConnectionId As Integer
+        'Public Property ConnectionId As Integer
 
         <Category(ClassConstants.CAT_GENERAL)>
         Public Property Description As String
@@ -97,6 +97,7 @@ Module ModuleFinalIndexProperties
         Public Property VectorBehaviourType As List(Of String)
 
         Public Sub VectorIndexBooleanProvider(attrs As PropertyAttributes)
+            'Sd
             MaybeSetReadOnlyIfNotVectorIndex(attrs)
         End Sub
 
@@ -182,7 +183,12 @@ Module ModuleFinalIndexProperties
             If indexType.Contains(type) Then
                 attrs.IsBrowsable = True
             Else
-                attrs.IsBrowsable = False
+                If attrs.DisplayName = "Index Behaviour" Then
+                    attrs.IsBrowsable = True
+                Else
+                    attrs.IsBrowsable = False
+                End If
+
             End If
         End Sub
 

app/TaskFlow/ModuleMySettings.vb

@@ -23,4 +23,6 @@
     Public Property FILE_DELIMITER As String = "_"
     Public Property WMSESSION_STARTSTOP_STARTUP As Boolean = False
 
+    Public Property SYS_LOCKED_MAINTENANCE As Boolean = False
+    Public Property MAINFORM_CREATE_LOG_FILES As Boolean = False
 End Module

app/TaskFlow/ModuleRuntimeVariables.vb

@@ -39,6 +39,7 @@ Module ModuleRuntimeVariables
 
     Public Property CURRENT_DOC_GUID As Int64
     Public Property CURRENT_DOC_ID As Int64
+    Public Property CURRENT_DOC_CURRENCY As String = "€"
     Public Property CURRENT_DOC_CREATION_DATE As String
     Public Property CURRENT_DOC_CREATION_TIME As String
 
@@ -70,7 +71,8 @@ Module ModuleRuntimeVariables
     Public Property USER_RIGHT3 As Boolean = False
     Public Property USER_RIGHT4 As Boolean = False
     Public Property USER_CONFIG_DEBUG As Boolean = False
-
+    Public Property USER_CONFIG_DIRECTORY As String = ""
+    Public Property USER_USERNAME_ORG As String = ""
     Public Property USER_GHOST_MODE_ACTIVE As Boolean = False
     Public Property USER_GHOST_MODE_USRNAME As String = ""
 
@@ -79,6 +81,7 @@ Module ModuleRuntimeVariables
     Public Property SHOW_MASS_VALIDATOR As Boolean = True
     Public Property WORKING_MODE As String = ""
     Public Property MONITORING_ACTIVE As Boolean = False
+    Public Property EXCEL_OVERVIEW As Boolean = False
     Public Property GHOSTMODE_ACTIVE As Boolean = False
     Public Property RIBBON_COLOR_SCHEME As String = ""
     Public Property ADDITIONAL_TITLE As String = ""
@@ -88,6 +91,8 @@ Module ModuleRuntimeVariables
     Public Property INACTIVITYRecognized As Boolean = False
     Public Property LAST_EDITED_COLUMN As String = "NONE"
     Public Property LAST_ADDED_COLUMN As String = "NONE"
+    Public Property MON_EDITED_COLUMN As String = "NONE"
+    Public Property MON_ADDED_COLUMN As String = "NONE"
     Public Property USE_APPSERVER As Boolean = False
     Public Property SEARCH1 As String = ""
     Public Property SEARCH2 As String = ""
@@ -99,6 +104,7 @@ Module ModuleRuntimeVariables
     Public Property RibbonPageCustTitle As String = ""
     Public Property RibbonPageCustItm1 As String = ""
     Public Property ButtonExport2Folder_Caption As String = ""
+    Public Property ButtonExport2Folder_Mode As String = ""
     Public Property ButtonExport2Folder_RootFolder As String = ""
 
 
@@ -172,8 +178,11 @@ Module ModuleRuntimeVariables
 
     Public Property SQL_PROFILES_USER As String = ""
     Public Property SQL_VALIDATOR_SEARCHES As String = ""
+    Public Property SQL_WF_MESSAGES As String = ""
     Public WM_AHWF_docPath As String
 
     Public LIC_MODULES As String = "NONE"
     Public oSQLLoginAttempt As String
+
+    Public MVSource_AllIndicies As List(Of String)
 End Module

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

@@ -24,7 +24,7 @@ Namespace My
         <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
         Public Sub New()
             MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
-            Me.IsSingleInstance = true
+            Me.IsSingleInstance = false
             Me.EnableVisualStyles = true
             Me.SaveMySettingsOnExit = true
             Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
@@ -34,5 +34,11 @@ Namespace My
         Protected Overrides Sub OnCreateMainForm()
             Me.MainForm = Global.DD_ProcessManager.frmMain
         End Sub
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Protected Overrides Function OnInitialize(ByVal commandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
+            Me.MinimumSplashScreenDisplayTime = 0
+            Return MyBase.OnInitialize(commandLineArgs)
+        End Function
     End Class
 End Namespace

app/TaskFlow/My Project/Application.myapp

@@ -2,9 +2,11 @@
 <MyApplicationData xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
   <MySubMain>true</MySubMain>
   <MainForm>frmMain</MainForm>
-  <SingleInstance>true</SingleInstance>
+  <SingleInstance>false</SingleInstance>
   <ShutdownMode>0</ShutdownMode>
   <EnableVisualStyles>true</EnableVisualStyles>
   <AuthenticationMode>0</AuthenticationMode>
+  <MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
   <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
+  <HighDpiMpde>false</HighDpiMpde>
 </MyApplicationData>

app/TaskFlow/My Project/AssemblyInfo.vb

@@ -1,4 +1,5 @@
-Imports System
+Imports System.Resources
+Imports System
 Imports System.Reflection
 Imports System.Runtime.InteropServices
 
@@ -8,12 +9,12 @@ Imports System.Runtime.InteropServices
 
 ' Die Werte der Assemblyattribute überprüfen
 
-<Assembly: AssemblyTitle("TaskFlow")>
+<Assembly: AssemblyTitle("taskFLOW")>
-<Assembly: AssemblyDescription("")> 
+<Assembly: AssemblyDescription("")>
 <Assembly: AssemblyCompany("Digital Data")>
-<Assembly: AssemblyProduct("TaskFlow")>
+<Assembly: AssemblyProduct("taskFLOW")>
-<Assembly: AssemblyCopyright("Copyright © Digital Data 2023")>
+<Assembly: AssemblyCopyright("Copyright © Digital Data 2025")>
-<Assembly: AssemblyTrademark("2.4.2.0")>
+<Assembly: AssemblyTrademark("")>
 
 <Assembly: ComVisible(False)>
 
@@ -31,5 +32,6 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.4.2.1")>
+<Assembly: AssemblyVersion("2.5.4.3")>
-<Assembly: AssemblyFileVersion("1.0.0.0")> 
+<Assembly: AssemblyFileVersion("1.0.0.0")>
+<Assembly: NeutralResourcesLanguage("")>

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

@@ -190,6 +190,16 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property AttachFileHS() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("AttachFileHS", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
         '''</summary>
@@ -480,6 +490,26 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property DD_taskFLOW_BOOT() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("DD_taskFLOW_BOOT", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property DD_taskFLOW_ICON() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("DD_taskFLOW_ICON", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
         '''</summary>

app/TaskFlow/My Project/Resources.resx

@@ -118,18 +118,15 @@
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
   <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="actions_user" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\actions_user.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <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="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="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="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="taskFlow_icon" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\taskFlow_icon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -148,8 +145,11 @@
   <data name="key" 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>
   </data>
-  <data name="Image_File" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="DateOrTimePicker_675" 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>
+    <value>..\Resources\DateOrTimePicker_675.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="DeleteFilter_5563" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\DeleteFilter_5563.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="save" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\save.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -160,6 +160,9 @@
   <data name="seach_typo" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\seach_typo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="doc" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\doc.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="group_key" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\group_key.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -172,6 +175,9 @@
   <data name="Symbols_Information_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\Symbols_Information_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="zoom_out1" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\zoom_out1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="computer_edit" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\computer_edit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -193,8 +199,8 @@
   <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">
+  <data name="security_key" 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\security_key.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="bo_unknown" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\bo_unknown.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
@@ -208,9 +214,6 @@
   <data name="Label_684" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\Label_684.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="delete_12x12" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\delete_12x12.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="table_add" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\table_add.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -220,9 +223,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="properties_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\properties_16xLG.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>
@@ -235,23 +235,20 @@
   <data name="pencolor" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\pencolor.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="DD_Icons_ICO_CBWATCHER_48px" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\DD_Icons_ICO_CBWATCHER_48px.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="markcomplete" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\markcomplete.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="adateoccuring" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\adateoccuring.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="actions_user" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\actions_user.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</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="puzzle2" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="key_go" 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>
+    <value>..\Resources\key_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
-  <data name="bullet_orange1" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\bullet_orange1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="magifier_zoom_out1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\magifier_zoom_out1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -265,14 +262,11 @@
   <data name="save1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\save.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="Open_6296" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\Open_6296.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="dxf" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\dxf.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="conversation" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="pdf" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\conversation.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\pdf.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="ppt" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\ppt.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -289,20 +283,26 @@
   <data name="insertcombobox" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\insertcombobox.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="cancel1" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="page_copy" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\cancel.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+    <value>..\Resources\page_copy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="flag_pink" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\flag_pink.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="DD_Icons_ICO_CBWATCHER_48px" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="ExcelWorksheetView_11748" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\DD_Icons_ICO_CBWATCHER_48px.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\ExcelWorksheetView_11748.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">
+  <data name="DD_taskFLOW_ICON" 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>
+    <value>..\Resources\DD_taskFLOW_ICON.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">
+  <data name="Hammer_Builder_16xLG" 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>
+    <value>..\Resources\Hammer_Builder_16xLG.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">
+    <value>..\Resources\action_add_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="bullet_orange1" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\bullet_orange1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="publicfix_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\publicfix_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -322,8 +322,8 @@
   <data name="itemtypechecked" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\itemtypechecked.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="DeleteFilter_5563" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="properties_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\DeleteFilter_5563.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\properties_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <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>
@@ -331,14 +331,17 @@
   <data name="Security_Unlock" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\Security_Unlock.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="resultset_last" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="chartdesigner2" 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>
+    <value>..\Resources\chartdesigner2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="bullet_red" 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>
   </data>
   <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="color" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="book_open" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\color.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+    <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>
@@ -349,29 +352,32 @@
   <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>
+  <data name="email_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\email_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="A_1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\A_1.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <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="book_open" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="Search(Go)_5718" 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>
+    <value>..\Resources\Search(Go)_5718.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="Checkboxbmp" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="DD_taskFLOW_BOOT" 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>
+    <value>..\Resources\DD_taskFLOW_BOOT.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="DateOrTimePicker_675" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="puzzle2" 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>
+    <value>..\Resources\puzzle2.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="dtp" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\dtp.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">
+  <data name="delete_12x12" 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>
+    <value>..\Resources\delete_12x12.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <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>
@@ -379,8 +385,8 @@
   <data name="TextBox" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\TextBox.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="doc" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="resultset_last" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\doc.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\resultset_last.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="bullet_green1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\bullet_green1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -388,9 +394,6 @@
   <data name="bullet_green" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\bullet_green.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="groupby" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\groupby.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
   <data name="dwg" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\dwg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -409,8 +412,8 @@
   <data name="show_16x16" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\show_16x16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="lbl" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="cancel1" 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>
+    <value>..\Resources\cancel.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="ComboBox_16xLG" 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>
@@ -418,9 +421,6 @@
   <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="cmb" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\cmb.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">
     <value>..\Resources\ID_FILE_PAGE_SETUP.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -430,14 +430,17 @@
   <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="bullet_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="taskflow_boot" 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\taskflow_boot.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="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>
   </data>
-  <data name="email_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="Image_File" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\email_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\Image_File.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="textthatcontains" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\textthatcontains.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
@@ -451,8 +454,8 @@
   <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="ExcelWorksheetView_11748" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="groupby" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\ExcelWorksheetView_11748.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\groupby.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="Monitor_Screen_16xLG" 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>
@@ -466,17 +469,17 @@
   <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="shape_square_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\shape_square_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="task" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="Checkboxbmp" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\task.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\Checkbox.PNG;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">
+  <data name="conversation" 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>
+    <value>..\Resources\conversation.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
-  <data name="taskflow_boot" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\taskflow_boot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="Link_5762" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\Link_5762.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -487,17 +490,23 @@
   <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="Open_6296" 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\Open_6296.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>
   </data>
-  <data name="zoom_out1" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="key1" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\zoom_out1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>..\Resources\key1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="chartdesigner2" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="asterisk_yellow" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\chartdesigner2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+    <value>..\Resources\asterisk_yellow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="task" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\task.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="cmb" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\cmb.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="formatastable" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\formatastable.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
@@ -511,19 +520,19 @@
   <data name="bullet_orange" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\bullet_orange.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="bullet_red1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\bullet_red1.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">
+  <data name="color" 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>
+    <value>..\Resources\color.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <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="security_key" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="AttachFileHS" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\security_key.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+    <value>..\Resources\AttachFileHS.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
 </root>

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

@@ -15,7 +15,7 @@ Option Explicit On
 Namespace My
     
     <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.3.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.9.0.0"),  _
      Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
     Partial Friend NotInheritable Class MySettings
         Inherits Global.System.Configuration.ApplicationSettingsBase
@@ -189,7 +189,7 @@ Namespace My
         
         <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
          Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("PROD")>  _
+         Global.System.Configuration.DefaultSettingValueAttribute("TEST")>  _
         Public ReadOnly Property UserConfig_Prefix() As String
             Get
                 Return CType(Me("UserConfig_Prefix"),String)
@@ -200,7 +200,7 @@ Namespace My
          Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
          Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString),  _
          Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security "& _ 
-            "Info=True;User ID=sa;Password=dd")>  _
+            "Info=True;User ID=sa;Password=dd;Encrypt=False")>  _
         Public ReadOnly Property ConnectionString() As String
             Get
                 Return CType(Me("ConnectionString"),String)
@@ -243,6 +243,15 @@ Namespace My
                 Me("frmValidatorWindowState") = value
             End Set
         End Property
+        
+        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("11.2024")>  _
+        Public ReadOnly Property GDPICTURE_VERSION() As String
+            Get
+                Return CType(Me("GDPICTURE_VERSION"),String)
+            End Get
+        End Property
     End Class
 End Namespace
 

app/TaskFlow/My Project/Settings.settings

@@ -36,15 +36,15 @@
       <Value Profile="(Default)">False</Value>
     </Setting>
     <Setting Name="UserConfig_Prefix" Type="System.String" Scope="Application">
-      <Value Profile="(Default)">PROD</Value>
+      <Value Profile="(Default)">TEST</Value>
     </Setting>
     <Setting Name="ConnectionString" Type="(Connection string)" Scope="Application">
       <DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
 &lt;SerializableConnectionString xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"&gt;
-  &lt;ConnectionString&gt;Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd&lt;/ConnectionString&gt;
+  &lt;ConnectionString&gt;Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=False&lt;/ConnectionString&gt;
   &lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt;
 &lt;/SerializableConnectionString&gt;</DesignTimeValue>
-      <Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</Value>
+      <Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=False</Value>
     </Setting>
     <Setting Name="frmTableColumns_Position" Roaming="true" Type="System.Drawing.Point" Scope="User">
       <Value Profile="(Default)">0, 0</Value>
@@ -55,5 +55,8 @@
     <Setting Name="frmValidatorWindowState" Type="System.String" Scope="User">
       <Value Profile="(Default)">Normal</Value>
     </Setting>
+    <Setting Name="GDPICTURE_VERSION" Type="System.String" Scope="Application">
+      <Value Profile="(Default)">11.2024</Value>
+    </Setting>
   </Settings>
 </SettingsFile>

app/TaskFlow/My Project/licenses.licx

@@ -1,13 +1,15 @@
-DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.Repository.RepositoryItemProgressBar, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraDataLayout.DataLayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraVerticalGrid.PropertyGridControl, DevExpress.XtraVerticalGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.Repository.RepositoryItemProgressBar, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraCharts.ChartControl, DevExpress.XtraCharts.v21.2.UI, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraVerticalGrid.PropertyGridControl, DevExpress.XtraVerticalGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraDataLayout.DataLayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

app/TaskFlow/README.txt

@@ -0,0 +1,5 @@
+BASE MODULE
+===========
+
+This module is intended for often used constants and datastructures.
+Therefor it is important that this module does not have any dependencies on other modules!!

app/TaskFlow/TaskFlow.vbproj

@@ -1,5 +1,6 @@
 <?xml version="1.0" encoding="utf-8"?>
 <Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <Import Project="..\packages\EntityFramework.6.4.4\build\EntityFramework.props" Condition="Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.props')" />
   <PropertyGroup>
     <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
     <Platform Condition=" '$(Platform)' == '' ">x86</Platform>
@@ -10,7 +11,7 @@
     <OutputType>WinExe</OutputType>
     <StartupObject>DD_ProcessManager.My.MyApplication</StartupObject>
     <RootNamespace>DD_ProcessManager</RootNamespace>
-    <AssemblyName>TaskFlow</AssemblyName>
+    <AssemblyName>taskFLOW</AssemblyName>
     <FileAlignment>512</FileAlignment>
     <MyType>WindowsForms</MyType>
     <TargetFrameworkVersion>v4.6.2</TargetFrameworkVersion>
@@ -31,6 +32,8 @@
     <ApplicationVersion>1.0.0.%2a</ApplicationVersion>
     <UseApplicationTrust>false</UseApplicationTrust>
     <BootstrapperEnabled>true</BootstrapperEnabled>
+    <NuGetPackageImportStamp>
+    </NuGetPackageImportStamp>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
     <PlatformTarget>x86</PlatformTarget>
@@ -39,7 +42,7 @@
     <DefineDebug>true</DefineDebug>
     <DefineTrace>true</DefineTrace>
     <OutputPath>bin\Debug\</OutputPath>
-    <DocumentationFile>TaskFlow.xml</DocumentationFile>
+    <DocumentationFile>taskFLOW.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
     <Prefer32Bit>false</Prefer32Bit>
     <CodeAnalysisRuleSet>UnusedCode.ruleset</CodeAnalysisRuleSet>
@@ -52,7 +55,7 @@
     <DefineTrace>true</DefineTrace>
     <Optimize>true</Optimize>
     <OutputPath>bin\Release\</OutputPath>
-    <DocumentationFile>TaskFlow.xml</DocumentationFile>
+    <DocumentationFile>taskFLOW.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>
@@ -69,12 +72,15 @@
     <OptionInfer>On</OptionInfer>
   </PropertyGroup>
   <PropertyGroup>
-    <ApplicationIcon>task.ico</ApplicationIcon>
+    <ApplicationIcon>DD_taskFLOW_ICON.ico</ApplicationIcon>
   </PropertyGroup>
   <PropertyGroup>
     <ApplicationManifest>My Project\app.manifest</ApplicationManifest>
   </PropertyGroup>
   <ItemGroup>
+    <Reference Include="BouncyCastle.Cryptography, Version=2.0.0.0, Culture=neutral, PublicKeyToken=072edcf4a5328938, processorArchitecture=MSIL">
+      <HintPath>..\packages\BouncyCastle.Cryptography.2.5.0\lib\net461\BouncyCastle.Cryptography.dll</HintPath>
+    </Reference>
     <Reference Include="DD_LIB_Standards, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
       <HintPath>P:\Visual Studio Projekte\Bibliotheken\DD_LIB_Standards.dll</HintPath>
@@ -143,63 +149,155 @@
       <SpecificVersion>False</SpecificVersion>
     </Reference>
     <Reference Include="DevExpress.XtraVerticalGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
-    <Reference Include="DigitalData.Controls.ChatControl">
+    <Reference Include="DigitalData.Controls.DocumentViewer, Version=1.9.8.0, Culture=neutral, processorArchitecture=MSIL">
-      <HintPath>..\..\..\DDMonorepo\Controls.ChatControl\bin\Debug\DigitalData.Controls.ChatControl.dll</HintPath>
+      <HintPath>..\packages\DigitalData.Controls.DocumentViewer.1.9.8\lib\net462\DigitalData.Controls.DocumentViewer.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.Controls.ChatNewConv">
+    <Reference Include="DigitalData.Controls.LookupGrid">
-      <HintPath>..\..\..\DDMonorepo\Controls.ChatNewConv\bin\Debug\DigitalData.Controls.ChatNewConv.dll</HintPath>
+      <HintPath>..\..\..\..\2_DLL Projekte\DDMonorepo\Controls.LookupGrid\bin\Debug\DigitalData.Controls.LookupGrid.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.Controls.DocumentViewer, Version=1.0.3.0, Culture=neutral, processorArchitecture=MSIL">
+    <Reference Include="DigitalData.Controls.SnapPanel, Version=1.0.1.0, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDMonorepo\Controls.DocumentViewer\bin\Debug\DigitalData.Controls.DocumentViewer.dll</HintPath>
+      <HintPath>..\..\..\..\2_DLL Projekte\DDMonorepo\Controls.SnapPanel\bin\Debug\DigitalData.Controls.SnapPanel.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.Controls.LookupGrid, Version=0.0.1.0, Culture=neutral, processorArchitecture=MSIL">
+    <Reference Include="DigitalData.GUIs.Common, Version=2.6.2.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.GUIs.Common.2.6.2\lib\net462\DigitalData.GUIs.Common.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Base, Version=1.3.8.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.Modules.Base.1.3.8\lib\net462\DigitalData.Modules.Base.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Config, Version=1.3.0.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.Modules.Config.1.3.0\lib\net462\DigitalData.Modules.Config.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Database, Version=2.3.5.4, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.Modules.Database.2.3.5.4\lib\net462\DigitalData.Modules.Database.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.EDMI.API">
+      <HintPath>..\..\..\..\2_DLL Projekte\DDModules\EDMIAPI\bin\Debug\DigitalData.Modules.EDMI.API.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Encryption, Version=1.3.1.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.Modules.Encryption.1.3.1\lib\net462\DigitalData.Modules.Encryption.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Filesystem, Version=1.3.3.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.Modules.Filesystem.1.3.3\lib\net462\DigitalData.Modules.Filesystem.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Interfaces">
+      <HintPath>..\..\..\..\2_DLL Projekte\DDModules\Interfaces\bin\Debug\DigitalData.Modules.Interfaces.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Language, Version=1.7.1.0, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDMonorepo\Controls.LookupGrid\bin\Debug\DigitalData.Controls.LookupGrid.dll</HintPath>
+      <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Digital Data\DigitalData.Modules.Language.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.Controls.SnapPanel">
+    <Reference Include="DigitalData.Modules.License">
-      <HintPath>..\..\..\DDMonorepo\Controls.SnapPanel\bin\Debug\DigitalData.Controls.SnapPanel.dll</HintPath>
+      <HintPath>..\..\..\..\2_DLL Projekte\DDModules\License\bin\Debug\DigitalData.Modules.License.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.GUIs.Common, Version=2.3.1.0, Culture=neutral, processorArchitecture=MSIL">
+    <Reference Include="DigitalData.Modules.Logging, Version=2.6.5.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.Modules.Logging.2.6.5\lib\net462\DigitalData.Modules.Logging.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Messaging, Version=1.9.8.0, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDMonorepo\GUIs.Common\bin\Debug\DigitalData.GUIs.Common.dll</HintPath>
+      <HintPath>..\..\..\..\2_DLL Projekte\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.Modules.Base, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
+    <Reference Include="DigitalData.Modules.Patterns, Version=1.3.1.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.Modules.Patterns.1.3.1\lib\net462\DigitalData.Modules.Patterns.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Windows, Version=1.5.1.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\DigitalData.Modules.Windows.1.5.1\lib\net462\DigitalData.Modules.Windows.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Windream, Version=1.9.6.2, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
+      <HintPath>..\..\..\..\2_DLL Projekte\DDModules\Windream\bin\Debug\DigitalData.Modules.Windream.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.Modules.Config">
+    <Reference Include="DigitalData.Modules.ZooFlow">
-      <HintPath>..\..\..\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
+      <HintPath>..\..\..\..\2_DLL Projekte\DDModules\ZooFlow\bin\Debug\DigitalData.Modules.ZooFlow.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Database, Version=2.2.7.0, Culture=neutral, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.EDMI.API, Version=1.5.4.0, Culture=neutral, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDModules\EDMIAPI\bin\Debug\DigitalData.Modules.EDMI.API.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Language, Version=1.6.0.0, Culture=neutral, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDModules\Language\bin\Debug\DigitalData.Modules.Language.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Logging, Version=2.5.4.2, Culture=neutral, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Windream">
-      <HintPath>..\..\..\DDModules\Windream\bin\Debug\DigitalData.Modules.Windream.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.ZooFlow, Version=1.2.0.0, Culture=neutral, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDModules\ZooFlow\bin\Debug\DigitalData.Modules.ZooFlow.dll</HintPath>
     </Reference>
     <Reference Include="DLLLicenseManager">
       <HintPath>P:\Visual Studio Projekte\Bibliotheken\DLLLicenseManager.dll</HintPath>
     </Reference>
+    <Reference Include="DocumentFormat.OpenXml, Version=3.2.0.0, Culture=neutral, PublicKeyToken=8fb06cb64d019a17, processorArchitecture=MSIL">
+      <HintPath>..\packages\DocumentFormat.OpenXml.3.2.0\lib\net46\DocumentFormat.OpenXml.dll</HintPath>
+    </Reference>
+    <Reference Include="DocumentFormat.OpenXml.Framework, Version=3.2.0.0, Culture=neutral, PublicKeyToken=8fb06cb64d019a17, processorArchitecture=MSIL">
+      <HintPath>..\packages\DocumentFormat.OpenXml.Framework.3.2.0\lib\net46\DocumentFormat.OpenXml.Framework.dll</HintPath>
+    </Reference>
+    <Reference Include="EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089, processorArchitecture=MSIL">
+      <HintPath>..\packages\EntityFramework.6.4.4\lib\net45\EntityFramework.dll</HintPath>
+    </Reference>
+    <Reference Include="EntityFramework.Firebird, Version=6.4.0.0, Culture=neutral, PublicKeyToken=42d22d092898e5f8, processorArchitecture=MSIL">
+      <HintPath>..\packages\EntityFramework.Firebird.6.4.0\lib\net452\EntityFramework.Firebird.dll</HintPath>
+    </Reference>
+    <Reference Include="EntityFramework.SqlServer, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089, processorArchitecture=MSIL">
+      <HintPath>..\packages\EntityFramework.6.4.4\lib\net45\EntityFramework.SqlServer.dll</HintPath>
+    </Reference>
+    <Reference Include="FirebirdSql.Data.FirebirdClient, Version=7.5.0.0, Culture=neutral, PublicKeyToken=3750abcc3150b00c, processorArchitecture=MSIL">
+      <HintPath>..\packages\FirebirdSql.Data.FirebirdClient.7.5.0\lib\net452\FirebirdSql.Data.FirebirdClient.dll</HintPath>
+    </Reference>
     <Reference Include="FormsUtils">
       <HintPath>P:\Visual Studio Projekte\Bibliotheken\FormsUtils.dll</HintPath>
     </Reference>
+    <Reference Include="GdPicture.NET.14, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.barcode.1d.writer, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.barcode.1d.writer.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.barcode.2d.writer, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.barcode.2d.writer.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.CAD, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.CAD.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.CAD.DWG, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.CAD.DWG.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Common, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Common.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Document, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Document.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Email, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Email.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.HTML, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.HTML.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Imaging, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Imaging.Formats, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Formats.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Imaging.Formats.Conversion, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Formats.Conversion.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Imaging.Rendering, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Rendering.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.MSOfficeBinary, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.MSOfficeBinary.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.OpenDocument, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenDocument.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.OpenXML, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenXML.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.OpenXML.Templating, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenXML.Templating.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.PDF, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.PDF.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.RTF, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.RTF.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.SVG, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.SVG.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.wia.gateway, Version=1.0.0.0, Culture=neutral, PublicKeyToken=6973b5c22dcf45f7, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.wia.gateway.dll</HintPath>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+    </Reference>
     <Reference Include="Interop.WINDREAMLib">
       <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll</HintPath>
       <EmbedInteropTypes>False</EmbedInteropTypes>
@@ -216,32 +314,120 @@
       <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOTOOLLib.dll</HintPath>
       <EmbedInteropTypes>True</EmbedInteropTypes>
     </Reference>
+    <Reference Include="Mail">
+      <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Limilabs\Mail.dll</HintPath>
+    </Reference>
+    <Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.9.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>
+    </Reference>
+    <Reference Include="Microsoft.Bcl.Cryptography, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\Microsoft.Bcl.Cryptography.9.0.0\lib\net462\Microsoft.Bcl.Cryptography.dll</HintPath>
+    </Reference>
     <Reference Include="Microsoft.CSharp" />
+    <Reference Include="Microsoft.Identity.Client, Version=4.55.0.0, Culture=neutral, PublicKeyToken=0a613f4dd989e8ae, processorArchitecture=MSIL">
+      <HintPath>..\packages\Microsoft.Identity.Client.4.55.0\lib\net461\Microsoft.Identity.Client.dll</HintPath>
+    </Reference>
+    <Reference Include="Microsoft.IdentityModel.Abstractions, Version=6.22.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
+      <HintPath>..\packages\Microsoft.IdentityModel.Abstractions.6.22.0\lib\net461\Microsoft.IdentityModel.Abstractions.dll</HintPath>
+    </Reference>
+    <Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
+      <HintPath>..\packages\Newtonsoft.Json.13.0.3\lib\net45\Newtonsoft.Json.dll</HintPath>
+    </Reference>
+    <Reference Include="Newtonsoft.Json.Bson, Version=1.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
+      <HintPath>..\packages\Newtonsoft.Json.Bson.1.0.2\lib\net45\Newtonsoft.Json.Bson.dll</HintPath>
+    </Reference>
     <Reference Include="NLog, Version=5.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
       <HintPath>..\packages\NLog.5.0.5\lib\net46\NLog.dll</HintPath>
     </Reference>
+    <Reference Include="OpenMcdf, Version=2.4.1.0, Culture=neutral, PublicKeyToken=fdbb1629d7c00800, processorArchitecture=MSIL">
+      <HintPath>..\packages\OpenMcdf.2.4.1\lib\net40\OpenMcdf.dll</HintPath>
+    </Reference>
     <Reference Include="Oracle.ManagedDataAccess">
       <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Oracle.ManagedDataAccess.dll</HintPath>
     </Reference>
     <Reference Include="PdfSharp-gdi">
       <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\PdfSharp-gdi.dll</HintPath>
     </Reference>
+    <Reference Include="protobuf-net, Version=3.0.0.0, Culture=neutral, PublicKeyToken=257b51d87d2e4d67, processorArchitecture=MSIL">
+      <HintPath>..\packages\protobuf-net.3.2.46\lib\net462\protobuf-net.dll</HintPath>
+    </Reference>
+    <Reference Include="protobuf-net.Core, Version=3.0.0.0, Culture=neutral, PublicKeyToken=257b51d87d2e4d67, processorArchitecture=MSIL">
+      <HintPath>..\packages\protobuf-net.Core.3.2.46\lib\net462\protobuf-net.Core.dll</HintPath>
+    </Reference>
+    <Reference Include="RtfPipe, Version=2.0.7677.4303, Culture=neutral, PublicKeyToken=5f6ab4ce530296d2, processorArchitecture=MSIL">
+      <HintPath>..\packages\RtfPipe.2.0.7677.4303\lib\net45\RtfPipe.dll</HintPath>
+    </Reference>
+    <Reference Include="S22.Imap, Version=3.6.0.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\S22.Imap.3.6.0.0\lib\net40\S22.Imap.dll</HintPath>
+    </Reference>
     <Reference Include="System" />
+    <Reference Include="System.Buffers, Version=4.0.4.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Buffers.4.6.0\lib\net462\System.Buffers.dll</HintPath>
+    </Reference>
+    <Reference Include="System.CodeDom, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.CodeDom.9.0.0\lib\net462\System.CodeDom.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Collections.Immutable, Version=9.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Collections.Immutable.9.0.0\lib\net462\System.Collections.Immutable.dll</HintPath>
+    </Reference>
     <Reference Include="System.ComponentModel.DataAnnotations" />
     <Reference Include="System.Configuration" />
     <Reference Include="System.Data" />
     <Reference Include="System.Data.Linq" />
+    <Reference Include="System.Data.Odbc, Version=6.0.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Data.Odbc.6.0.1\lib\net461\System.Data.Odbc.dll</HintPath>
+    </Reference>
     <Reference Include="System.Data.OracleClient" />
     <Reference Include="System.Deployment" />
     <Reference Include="System.Design" />
     <Reference Include="System.DirectoryServices" />
     <Reference Include="System.DirectoryServices.AccountManagement" />
     <Reference Include="System.Drawing" />
+    <Reference Include="System.Formats.Asn1, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Formats.Asn1.9.0.0\lib\net462\System.Formats.Asn1.dll</HintPath>
+    </Reference>
+    <Reference Include="System.IdentityModel" />
     <Reference Include="System.IO.Compression" />
+    <Reference Include="System.IO.Packaging, Version=9.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.IO.Packaging.9.0.0\lib\net462\System.IO.Packaging.dll</HintPath>
+    </Reference>
+    <Reference Include="System.IO.Pipelines, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.IO.Pipelines.9.0.0\lib\net462\System.IO.Pipelines.dll</HintPath>
+    </Reference>
     <Reference Include="System.Management" />
+    <Reference Include="System.Memory, Version=4.0.2.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Memory.4.6.0\lib\net462\System.Memory.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Net.Http" />
+    <Reference Include="System.Net.Http.Formatting, Version=6.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
+      <HintPath>..\packages\Microsoft.AspNet.WebApi.Client.6.0.0\lib\net45\System.Net.Http.Formatting.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Numerics" />
+    <Reference Include="System.Numerics.Vectors, Version=4.1.5.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Numerics.Vectors.4.6.0\lib\net462\System.Numerics.Vectors.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Runtime.CompilerServices.Unsafe, Version=6.0.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Runtime.CompilerServices.Unsafe.6.1.0\lib\net462\System.Runtime.CompilerServices.Unsafe.dll</HintPath>
+    </Reference>
     <Reference Include="System.Runtime.Serialization" />
+    <Reference Include="System.Security" />
+    <Reference Include="System.Security.Cryptography.Pkcs, Version=9.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Security.Cryptography.Pkcs.9.0.0\lib\net462\System.Security.Cryptography.Pkcs.dll</HintPath>
+    </Reference>
     <Reference Include="System.ServiceModel" />
+    <Reference Include="System.Text.Encodings.Web, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Text.Encodings.Web.9.0.0\lib\net462\System.Text.Encodings.Web.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Text.Json, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Text.Json.9.0.0\lib\net462\System.Text.Json.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Threading.Tasks.Extensions, Version=4.2.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll</HintPath>
+    </Reference>
     <Reference Include="System.Transactions" />
+    <Reference Include="System.ValueTuple, Version=4.0.3.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.ValueTuple.4.5.0\lib\net461\System.ValueTuple.dll</HintPath>
+    </Reference>
     <Reference Include="System.Web.Services" />
     <Reference Include="System.Windows.Forms" />
     <Reference Include="System.Xml" />
@@ -271,6 +457,7 @@
     <Compile Include="ClassDragDrop.vb" />
     <Compile Include="ClassFinalIndex.vb" />
     <Compile Include="ClassFinalizeDoc.vb" />
+    <Compile Include="ClassFormat.vb" />
     <Compile Include="ClassIDBData.vb" />
     <Compile Include="ClassImageSelector.vb" />
     <Compile Include="ClassImageValue.vb" />
@@ -282,10 +469,13 @@
     <Compile Include="ClassSQLEditor.vb" />
     <Compile Include="ClassSQLTypeConverter.vb" />
     <Compile Include="ClassSQLValue.vb" />
+    <Compile Include="ClassValidator.vb" />
     <Compile Include="ClassVectorBehaviourListConverter.vb" />
     <Compile Include="ClassWorkDoc.vb" />
     <Compile Include="clsPatterns.vb" />
     <Compile Include="clsWMDocGrid.vb" />
+    <Compile Include="ControlCreator\Constants.vb" />
+    <Compile Include="ControlCreator\GridControl.vb" />
     <Compile Include="FinalIndexDataSet.Designer.vb">
       <AutoGen>True</AutoGen>
       <DesignTime>True</DesignTime>
@@ -323,18 +513,24 @@
     <Compile Include="frmAdminPasswort.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmAdmin_notResponsibleConfig.Designer.vb">
+      <DependentUpon>frmAdmin_notResponsibleConfig.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmAdmin_notResponsibleConfig.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="frmAdmin_rejectionConfig.Designer.vb">
+      <DependentUpon>frmAdmin_rejectionConfig.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmAdmin_rejectionConfig.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="frmAnnotations.Designer.vb">
       <DependentUpon>frmAnnotations.vb</DependentUpon>
     </Compile>
     <Compile Include="frmAnnotations.vb">
       <SubType>Form</SubType>
     </Compile>
-    <Compile Include="frmChat_NewConversation.Designer.vb">
-      <DependentUpon>frmChat_NewConversation.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmChat_NewConversation.vb">
-      <SubType>Form</SubType>
-    </Compile>
     <Compile Include="frmClientLogin.designer.vb">
       <DependentUpon>frmClientLogin.vb</DependentUpon>
     </Compile>
@@ -353,6 +549,12 @@
     <Compile Include="frmColumn_Detail.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmDashboard1.Designer.vb">
+      <DependentUpon>frmDashboard1.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmDashboard1.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="frmDesignerLayout.Designer.vb">
       <DependentUpon>frmDesignerLayout.vb</DependentUpon>
     </Compile>
@@ -468,6 +670,12 @@
     <Compile Include="frmRegexEditor.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmRejectionCommit.Designer.vb">
+      <DependentUpon>frmRejectionCommit.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmRejectionCommit.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="frmSplash.designer.vb">
       <DependentUpon>frmSplash.vb</DependentUpon>
     </Compile>
@@ -486,12 +694,6 @@
     <Compile Include="frmMain.vb">
       <SubType>Form</SubType>
     </Compile>
-    <Compile Include="frmUserKonfig_AddUsers.designer.vb">
-      <DependentUpon>frmUserKonfig_AddUsers.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmUserKonfig_AddUsers.vb">
-      <SubType>Form</SubType>
-    </Compile>
     <Compile Include="frmValidator.Designer.vb">
       <DependentUpon>frmValidator.vb</DependentUpon>
     </Compile>
@@ -504,12 +706,24 @@
     <Compile Include="frmValidatorSearch.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmValidator_Messages.Designer.vb">
+      <DependentUpon>frmValidator_Messages.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmValidator_Messages.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="frmWorkflow.Designer.vb">
       <DependentUpon>frmWorkflow.vb</DependentUpon>
     </Compile>
     <Compile Include="frmWorkflow.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="frmYesNo.Designer.vb">
+      <DependentUpon>frmYesNo.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmYesNo.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="ModuleControlProperties.vb" />
     <Compile Include="ModuleFinalIndexProperties.vb" />
     <Compile Include="ModuleHelper.vb" />
@@ -541,6 +755,7 @@
       <DesignTime>True</DesignTime>
       <DependentUpon>frmValidator_Strings.resx</DependentUpon>
     </Compile>
+    <Compile Include="Validator\Validator.vb" />
     <Compile Include="XtraReport1.Designer.vb">
       <DependentUpon>XtraReport1.vb</DependentUpon>
     </Compile>
@@ -551,6 +766,7 @@
   <ItemGroup>
     <EmbeddedResource Include="frmAbout.resx">
       <DependentUpon>frmAbout.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="frmAdmin2.resx">
       <DependentUpon>frmAdmin2.vb</DependentUpon>
@@ -558,19 +774,24 @@
     </EmbeddedResource>
     <EmbeddedResource Include="frmAdministration.en.resx">
       <DependentUpon>frmAdministration.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="frmAdministration.fr.resx">
       <DependentUpon>frmAdministration.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="frmAdminPasswort.resx">
       <DependentUpon>frmAdminPasswort.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmAdmin_notResponsibleConfig.resx">
+      <DependentUpon>frmAdmin_notResponsibleConfig.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmAdmin_rejectionConfig.resx">
+      <DependentUpon>frmAdmin_rejectionConfig.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmAnnotations.resx">
       <DependentUpon>frmAnnotations.vb</DependentUpon>
     </EmbeddedResource>
-    <EmbeddedResource Include="frmChat_NewConversation.resx">
-      <DependentUpon>frmChat_NewConversation.vb</DependentUpon>
-    </EmbeddedResource>
     <EmbeddedResource Include="frmClientLogin.en.resx">
       <DependentUpon>frmClientLogin.vb</DependentUpon>
     </EmbeddedResource>
@@ -584,6 +805,9 @@
     <EmbeddedResource Include="frmColumn_Detail.resx">
       <DependentUpon>frmColumn_Detail.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmDashboard1.resx">
+      <DependentUpon>frmDashboard1.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmDesignerLayout.resx">
       <DependentUpon>frmDesignerLayout.vb</DependentUpon>
     </EmbeddedResource>
@@ -593,6 +817,12 @@
     <EmbeddedResource Include="frmDesignerLayout\Editors\frmStaticListEditor.resx">
       <DependentUpon>frmStaticListEditor.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmError.en.resx">
+      <DependentUpon>frmError.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmError.fr.resx">
+      <DependentUpon>frmError.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmError.resx">
       <DependentUpon>frmError.vb</DependentUpon>
     </EmbeddedResource>
@@ -608,6 +838,7 @@
     </EmbeddedResource>
     <EmbeddedResource Include="frmGhostMode.resx">
       <DependentUpon>frmGhostMode.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="frmInvDashboard.resx">
       <DependentUpon>frmInvDashboard.vb</DependentUpon>
@@ -652,6 +883,15 @@
     <EmbeddedResource Include="frmRegexEditor.resx">
       <DependentUpon>frmRegexEditor.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmRejectionCommit.en.resx">
+      <DependentUpon>frmRejectionCommit.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmRejectionCommit.fr.resx">
+      <DependentUpon>frmRejectionCommit.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmRejectionCommit.resx">
+      <DependentUpon>frmRejectionCommit.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmSplash.resx">
       <DependentUpon>frmSplash.vb</DependentUpon>
     </EmbeddedResource>
@@ -668,14 +908,13 @@
       <DependentUpon>frmMain.vb</DependentUpon>
       <SubType>Designer</SubType>
     </EmbeddedResource>
-    <EmbeddedResource Include="frmUserKonfig_AddUsers.resx">
-      <DependentUpon>frmUserKonfig_AddUsers.vb</DependentUpon>
-    </EmbeddedResource>
     <EmbeddedResource Include="frmValidator.en.resx">
       <DependentUpon>frmValidator.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="frmValidator.fr.resx">
       <DependentUpon>frmValidator.vb</DependentUpon>
+      <SubType>Designer</SubType>
     </EmbeddedResource>
     <EmbeddedResource Include="frmValidator.resx">
       <DependentUpon>frmValidator.vb</DependentUpon>
@@ -691,9 +930,21 @@
       <DependentUpon>frmValidatorSearch.vb</DependentUpon>
       <SubType>Designer</SubType>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmValidator_Messages.resx">
+      <DependentUpon>frmValidator_Messages.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="frmWorkflow.resx">
       <DependentUpon>frmWorkflow.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="frmYesNo.en.resx">
+      <DependentUpon>frmYesNo.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmYesNo.fr.resx">
+      <DependentUpon>frmYesNo.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="frmYesNo.resx">
+      <DependentUpon>frmYesNo.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="My Project\licenses.licx" />
     <EmbeddedResource Include="My Project\Resources.resx">
       <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
@@ -701,7 +952,9 @@
       <SubType>Designer</SubType>
       <LastGenOutput>Resources.Designer.vb</LastGenOutput>
     </EmbeddedResource>
-    <EmbeddedResource Include="Translations\frmMain_Strings.en.resx" />
+    <EmbeddedResource Include="Translations\frmMain_Strings.en.resx">
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
     <EmbeddedResource Include="Translations\frmMain_Strings.fr.resx">
       <SubType>Designer</SubType>
     </EmbeddedResource>
@@ -938,7 +1191,25 @@
     <None Include="Resources\PM_mit_slogan.JPG" />
   </ItemGroup>
   <ItemGroup>
+    <None Include="Changelog.md" />
     <Content Include="DD_Icons_ICO_PMANAGER_48px.ico" />
+    <Content Include="DD_taskFLOW_ICON.ico" />
+    <Content Include="GdPicture.NET.14.barcode.1d.reader.64.dll" />
+    <Content Include="GdPicture.NET.14.barcode.1d.reader.dll" />
+    <Content Include="GdPicture.NET.14.barcode.2d.reader.64.dll" />
+    <Content Include="GdPicture.NET.14.barcode.2d.reader.dll" />
+    <Content Include="GdPicture.NET.14.filters.64.dll" />
+    <Content Include="GdPicture.NET.14.filters.dll" />
+    <Content Include="GdPicture.NET.14.image.gdimgplug.64.dll" />
+    <Content Include="GdPicture.NET.14.image.gdimgplug.dll" />
+    <Content Include="GdPicture.NET.14.Imaging.ML.64.dll" />
+    <Content Include="GdPicture.NET.14.Imaging.ML.dll" />
+    <Content Include="GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" />
+    <Content Include="GdPicture.NET.14.Imaging.Rendering.Skia.dll" />
+    <Content Include="GdPicture.NET.14.machine.vision.64.dll" />
+    <Content Include="GdPicture.NET.14.machine.vision.dll" />
+    <Content Include="GdPicture.NET.14.twain.client.64.dll" />
+    <Content Include="GdPicture.NET.14.twain.client.dll" />
     <Content Include="MailLicense.xml">
       <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
     </Content>
@@ -963,6 +1234,10 @@
     <None Include="Resources\chartdesigner2.svg" />
     <None Include="Resources\cancel.svg" />
     <None Include="Resources\publicfix_32x32.png" />
+    <None Include="Resources\DD_taskFLOW_BOOT.png" />
+    <None Include="Resources\DD_taskFLOW_ICON.png" />
+    <None Include="Resources\AttachFileHS.png" />
+    <Content Include="README.txt" />
     <Content Include="task.ico" />
     <None Include="Resources\searchFlow_icon.png" />
     <None Include="Resources\taskFlow_icon.png" />
@@ -1035,6 +1310,16 @@
     </BootstrapperPackage>
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
+  <Import Project="..\packages\GdPicture.runtimes.windows.14.3.3\build\net462\GdPicture.runtimes.windows.targets" Condition="Exists('..\packages\GdPicture.runtimes.windows.14.3.3\build\net462\GdPicture.runtimes.windows.targets')" />
+  <Target Name="EnsureNuGetPackageBuildImports" BeforeTargets="PrepareForBuild">
+    <PropertyGroup>
+      <ErrorText>Dieses Projekt verweist auf mindestens ein NuGet-Paket, das auf diesem Computer fehlt. Verwenden Sie die Wiederherstellung von NuGet-Paketen, um die fehlenden Dateien herunterzuladen. Weitere Informationen finden Sie unter "http://go.microsoft.com/fwlink/?LinkID=322105". Die fehlende Datei ist "{0}".</ErrorText>
+    </PropertyGroup>
+    <Error Condition="!Exists('..\packages\GdPicture.runtimes.windows.14.3.3\build\net462\GdPicture.runtimes.windows.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\GdPicture.runtimes.windows.14.3.3\build\net462\GdPicture.runtimes.windows.targets'))" />
+    <Error Condition="!Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.props')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\EntityFramework.6.4.4\build\EntityFramework.props'))" />
+    <Error Condition="!Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\EntityFramework.6.4.4\build\EntityFramework.targets'))" />
+  </Target>
+  <Import Project="..\packages\EntityFramework.6.4.4\build\EntityFramework.targets" Condition="Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.targets')" />
   <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 
        Other similar extension points exist, see Microsoft.Common.targets.
   <Target Name="BeforeBuild">

app/TaskFlow/Translations/frmValidator_Strings.en.resx

@@ -117,6 +117,9 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
+  <data name="Bestaetigung" xml:space="preserve">
+    <value>Confirmation</value>
+  </data>
   <data name="Bitte validieren Sie die rot markierten Felder!" xml:space="preserve">
     <value>Please validate red marked fields!</value>
   </data>

app/TaskFlow/Translations/frmValidator_Strings.fr.resx

@@ -117,6 +117,9 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
+  <data name="Bestaetigung" xml:space="preserve">
+    <value>Confirmation</value>
+  </data>
   <data name="Bitte validieren Sie die rot markierten Felder!" xml:space="preserve">
     <value>Veuillez valider les champs marqués en rouge!</value>
   </data>

app/TaskFlow/Validator/Validator.vb

@@ -0,0 +1,170 @@
+Imports System.Text.RegularExpressions
+Imports DigitalData.Modules.Base
+Imports DigitalData.Modules.Logging
+
+Public Class Validator
+    Inherits BaseClass
+
+    Public Sub New(pLogConfig As LogConfig)
+        MyBase.New(pLogConfig)
+    End Sub
+
+    Public Class ControlRow
+        Public Id As Integer
+        Public IndexName As String
+        Public IsRequired As Boolean
+        Public [ReadOnly] As Boolean
+        Public ValidationSql As String
+        Public RegexMatch As String
+        Public RegexMessage As String
+        Public OverwriteData As Boolean
+        Public SaveChangeEnabled As Boolean
+    End Class
+
+    Public Function ConvertToControlRow(pDataRow As DataRow) As ControlRow
+        Return New ControlRow With {
+            .Id = pDataRow.ItemEx("GUID", 0),
+            .IndexName = pDataRow.ItemEx("INDEX_NAME", ""),
+            .IsRequired = pDataRow.ItemEx("VALIDATION", False),
+            .[ReadOnly] = pDataRow.ItemEx("READ_ONLY", False),
+            .ValidationSql = pDataRow.ItemEx("SQL_UEBERPRUEFUNG", ""),
+            .RegexMatch = pDataRow.ItemEx("REGEX_MATCH", ""),
+            .RegexMessage = pDataRow.ItemEx("REGEX_MESSAGE_DE", ""),
+            .OverwriteData = pDataRow.ItemEx("OVERWRITE_DATA", False),
+            .SaveChangeEnabled = pDataRow.ItemEx("SAVE_CHANGE_ON_ENABLED", True)
+        }
+    End Function
+
+    'Public Function CheckTextbox(oControl As Control, pControlRow As DataRow)
+    'Try
+    '        Dim oMissing = False
+    '        Dim oErrMsgMissingInput = ""
+    '        Dim oControlRow = ConvertToControlRow(pControlRow)
+
+    '        'Dim oWrongInputMessage = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("frmValidator.WrongInputControl")
+    '        Dim oWrongInputMessage = S.Falsche_Eingabe
+
+    '        If oControlRow.RegexMatch <> String.Empty AndAlso Not Regex.IsMatch(oControl.Text, oControlRow.RegexMatch) Then
+    '            oMissing = True
+
+    '            oErrMsgMissingInput = oWrongInputMessage & " textbox '" & oControl.Name & "'"
+
+    '            Logger.Warn(oErrMsgMissingInput)
+    '            If oControlRow.RegexMessage <> String.Empty Then
+    '                oErrMsgMissingInput &= ":" & vbCrLf & oControlRow.RegexMessage
+    '            End If
+
+    '            oControl.BackColor = Color.Red
+
+    '            'TODO
+    '            'Exit For
+    '        End If
+
+    '        'as erstes überprüfen ob überhaupt etwas eingetragen worden ist
+    '        If Check_Missing_Control_Value(oControl, "txt") = True And oControlRow.IsRequired = True Then 'NICHTS EINGETRAGEN
+    '            oMissing = True
+    '            oErrMsgMissingInput = oWrongInputMessage & " textbox '" & oControl.Name & "'"
+    '            Logger.Warn(oErrMsgMissingInput)
+    '            oControl.BackColor = Color.Red
+
+    '            'TODO
+    '            'Exit For
+    '        Else
+    '            Dim oTextEdit As TextEdit = DirectCast(oControl, TextEdit)
+    '            oMyInput = ClassFormat.GetStringValue(oTextEdit.EditValue)
+
+    '            'den aktuellen Wert in windream auslesen
+    '            Dim oSourceValue = GetVariableValuefromSource(oIndexName, oIDBTyp)
+
+
+    '            If oIndexName.StartsWith("[%VKT") Then
+    '                oSourceValue = ReturnVektor_IndexValue(oIndexName)
+    '            Else
+    '                'wertWD = CURRENT_WMFILE.GetVariableValue(oIndexName)
+    '                If Not IsNothing(oSourceValue) Then
+    '                    If oSourceValue.ToString = "System.Object[]" Then
+    '                        If oSourceValue.Length = 1 Then
+    '                            oSourceValue = oSourceValue(0)
+    '                        Else '
+    '                            Logger.Info(" >> Vectorfield " & oIndexName & "' contains more then one value - First value will be used")
+    '                            oSourceValue = oSourceValue(0)
+    '                        End If
+    '                    End If
+    '                Else
+    '                    oSourceValue = ""
+    '                End If
+    '            End If
+    '            Dim oSetValue As Boolean = False
+    '            If IsDBNull(oSourceValue) Then
+    '                oSetValue = True
+    '            End If
+    '            If oSetValue = False Then
+    '                If IsNothing(oSourceValue) Then
+    '                    oSetValue = True
+    '                End If
+    '            End If
+    '            If oSetValue = False Then
+    '                Try
+    '                    If oSourceValue <> oMyInput Then
+    '                        oSetValue = True
+    '                    End If
+    '                Catch ex As Exception
+    '                    oSetValue = True
+    '                End Try
+
+    '            End If
+    '            'wenn Wert in Windream <> der Eingabe darf indexiert werden
+    '            If oSetValue = True Then
+    '                'Wenn der Wert in ein Vektorfeld geschrieben wird
+    '                If oIndexName.StartsWith("[%VKT") Then
+    '                    oMyInput = Return_PM_VEKTOR(oMyInput, oIndexName)
+    '                    'Hier muss nun separat as Vektorfeld indexiert werden
+    '                    If WMIndexVectofield(oMyInput, PROFIL_VEKTORINDEX) = True Then
+    '                        oMissing = True
+    '                        oErrMsgMissingInput = "Error while indexing textbox as VEKTOR - ERROR: " & idxerr_message
+    '                        Logger.Warn(oErrMsgMissingInput)
+    '                        Exit For
+    '                    End If
+    '                Else
+    '                    If IDB_ACTIVE = False Then
+    '                        Dim result() As String
+    '                        ReDim Preserve result(0)
+    '                        result(0) = oMyInput
+    '                        If Indexiere_File(CURRENT_WMFILE, oIndexName, result) = False Then
+    '                            oMissing = True
+    '                            oErrMsgMissingInput = "Error while indexing Textbox - ERROR: " & idxerr_message
+    '                            Logger.Warn(oErrMsgMissingInput)
+    '                            Exit For
+    '                        End If
+    '                    Else
+    '                        If IDBData.SetVariableValue(oIndexName, oMyInput) = False Then
+    '                            Exit For
+    '                        End If
+    '                    End If
+    '                    If IDB_ACTIVE = False Then
+    '                        If PROFIL_LOGINDEX <> "" Then
+    '                            Dim oMyLogString = Return_LOGString(oMyInput, oSourceValue, oIndexName)
+    '                            WMIndexVectofield(oMyLogString, PROFIL_LOGINDEX)
+    '                            'Else
+    '                            'IDBData.SetVariableValue(PROFIL_LOGINDEX, oMyLogString)
+
+
+    '                        End If
+    '                    End If
+
+    '                End If
+
+
+
+    '            End If
+    '        End If
+    '    Catch ex As Exception
+    '        oErrMsgMissingInput = "Unexpected error in Check_UpdateIndexe TextBox '" & oControl.Name & "' - Check the log"
+    '        Logger.Error(ex)
+    '        Dim st As New StackTrace(True)
+    '        st = New StackTrace(ex, True)
+    '        Logger.Warn("Unexpected error in Check_UpdateIndexe  TextBox :" & ex.Message, True)
+    '        Return False
+    '    End Try
+    'End Function
+End Class

app/TaskFlow/clsPatterns.vb

@@ -4,6 +4,8 @@ Imports DigitalData.Controls.LookupGrid
 Imports DevExpress.XtraGrid
 Imports DevExpress.XtraGrid.Views.Grid
 Imports DevExpress.XtraGrid.Columns
+Imports DevExpress.XtraEditors
+Imports DigitalData.Modules.Language
 ''' <summary>
 ''' Defines common Functions for Checking for and replacing placeholders.
 ''' This Class also includes a child class `Pattern` for passing around Patterns.
@@ -46,8 +48,10 @@ Public Class clsPatterns
     Public Const INT_VALUE_MACHINE = "MACHINE"
     Public Const INT_VALUE_DOMAIN = "DOMAIN"
     Public Const INT_VALUE_DATE = "DATE"
+    Public Const INT_VALUE_WMDocID = "WMDocID"
+    Public Const INT_VALUE_IDBID = "IDBObjID"
 
-    Public Const MAX_TRY_COUNT = 50
+    Public Const MAX_TRY_COUNT = 20
 
     ''' <summary>
     ''' This value will be valid as any datatype,
@@ -67,7 +71,7 @@ Public Class clsPatterns
         Return New Pattern(type, value).ToString
     End Function
 
-    Public Shared Function ReplaceAllValues(input As String, panel As Panel, is_SQL As Boolean) As String
+    Public Shared Function ReplaceAllValues(input As String, panel As DevExpress.XtraEditors.XtraScrollableControl, is_SQL As Boolean) As String
         Try
             Dim result = input
 
@@ -77,13 +81,16 @@ Public Class clsPatterns
 
             LOGGER.Debug($"input BEFORE replacing: [{result}]")
             result = ReplaceInternalValues(result)
-            result = ReplaceControlValues(result, panel, is_SQL)
+
             If Not IsNothing(CURRENT_WMFILE) Then
                 result = ReplaceWindreamIndicies(result, CURRENT_WMFILE, is_SQL)
             End If
             If IDB_ACTIVE = True Then
                 result = ReplaceIDBAttributes(result, is_SQL)
             End If
+            'vorher hinter result = ReplaceInternalValues(result) 
+            result = ReplaceControlValues(result, panel, is_SQL)
+
             If Not IsNothing(result) Then
                 result = ReplaceUserValues(result)
                 LOGGER.Debug($"input AFTER replacing: [{result}]")
@@ -120,6 +127,12 @@ Public Class clsPatterns
             While ContainsPatternAndValue(oResult, PATTERN_INT, INT_VALUE_DATE)
                 oResult = ReplacePattern(oResult, PATTERN_INT, Now.ToShortDateString)
             End While
+            While ContainsPatternAndValue(oResult, PATTERN_INT, INT_VALUE_WMDocID)
+                oResult = ReplacePattern(oResult, PATTERN_INT, CURRENT_DOC_ID)
+            End While
+            While ContainsPatternAndValue(oResult, PATTERN_INT, INT_VALUE_IDBID)
+                oResult = ReplacePattern(oResult, PATTERN_INT, CURRENT_DOC_ID)
+            End While
 
             Return oResult
         Catch ex As Exception
@@ -167,7 +180,7 @@ Public Class clsPatterns
                 If CURRENT_CLICKED_PROFILE_TITLE Is Nothing Then
                     CURRENT_CLICKED_PROFILE_TITLE = "NONE_TITLE"
                 End If
-                result = ReplacePattern(result, PATTERN_USER, CURRENT_CLICKED_PROFILE_TITLE)
+                result = ReplacePattern(result, PATTERN_USER, CURRENT_CLICKED_PROFILE_TITLE.Replace("GROUP_TEXT:", ""))
             End While
             Return result
         Catch ex As Exception
@@ -176,7 +189,7 @@ Public Class clsPatterns
         End Try
     End Function
 
-    Public Shared Function ReplaceControlValues(pInput As String, oPanel As Panel, oIsSQL As Boolean) As String
+    Public Shared Function ReplaceControlValues(pInput As String, oPanel As DevExpress.XtraEditors.XtraScrollableControl, oIsSQL As Boolean) As String
         Dim oResult = pInput
 
         Try
@@ -209,6 +222,20 @@ Public Class clsPatterns
                         Case GetType(TextBox)
                             oReplaceValue = oControl.Text
 
+                        Case GetType(TextEdit)
+                            Try
+                                oReplaceValue = Utils.NotNull(DirectCast(oControl, TextEdit).EditValue, String.Empty)
+                            Catch ex As Exception
+                                LOGGER.Warn($"Error in ReplaceValue MemoEdit: {ex.Message}")
+                                oReplaceValue = ""
+                            End Try
+                        Case GetType(MemoEdit)
+                            Try
+                                oReplaceValue = Utils.NotNull(DirectCast(oControl, MemoEdit).EditValue, String.Empty)
+                            Catch ex As Exception
+                                LOGGER.Warn($"Error in ReplaceValue MemoEdit: {ex.Message}")
+                                oReplaceValue = ""
+                            End Try
                         Case GetType(LookupControl3)
                             Dim oLookupControl3 As LookupControl3 = oControl
                             If oLookupControl3.Properties.SelectedValues.Count = 1 Then
@@ -217,7 +244,7 @@ Public Class clsPatterns
                                 oReplaceValue = ERROR_REPLACE_VALUE
                             End If
 
-                        Case GetType(ComboBox)
+                        Case GetType(Windows.Forms.ComboBox)
                             oReplaceValue = oControl.Text
 
                         Case GetType(CheckBox)

app/TaskFlow/frmAdmin2.Designer.vb

@@ -162,8 +162,16 @@ Partial Class frmAdmin2
         Me.LayoutConverter1 = New DevExpress.XtraLayout.Converter.LayoutConverter(Me.components)
         Me.XtraSaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
         CType(Me.spcontwKonfMain, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.spcontwKonfMain.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.spcontwKonfMain.Panel1.SuspendLayout()
+        CType(Me.spcontwKonfMain.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.spcontwKonfMain.Panel2.SuspendLayout()
         Me.spcontwKonfMain.SuspendLayout()
         CType(Me.spcontwKonfleft, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.spcontwKonfleft.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.spcontwKonfleft.Panel1.SuspendLayout()
+        CType(Me.spcontwKonfleft.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.spcontwKonfleft.Panel2.SuspendLayout()
         Me.spcontwKonfleft.SuspendLayout()
         CType(Me.GridControlWK1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridViewWK1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -171,6 +179,10 @@ Partial Class frmAdmin2
         CType(Me.GridControlWK3, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridViewWK3, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.spcontwKonfRight, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.spcontwKonfRight.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.spcontwKonfRight.Panel1.SuspendLayout()
+        CType(Me.spcontwKonfRight.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.spcontwKonfRight.Panel2.SuspendLayout()
         Me.spcontwKonfRight.SuspendLayout()
         CType(Me.GridControlWK2, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridViewWK2, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -260,8 +272,14 @@ Partial Class frmAdmin2
         '
         resources.ApplyResources(Me.spcontwKonfMain, "spcontwKonfMain")
         Me.spcontwKonfMain.Name = "spcontwKonfMain"
+        '
+        'spcontwKonfMain.Panel1
+        '
         Me.spcontwKonfMain.Panel1.Controls.Add(Me.spcontwKonfleft)
         resources.ApplyResources(Me.spcontwKonfMain.Panel1, "spcontwKonfMain.Panel1")
+        '
+        'spcontwKonfMain.Panel2
+        '
         Me.spcontwKonfMain.Panel2.Controls.Add(Me.spcontwKonfRight)
         resources.ApplyResources(Me.spcontwKonfMain.Panel2, "spcontwKonfMain.Panel2")
         Me.spcontwKonfMain.SplitterPosition = 486
@@ -272,8 +290,14 @@ Partial Class frmAdmin2
         resources.ApplyResources(Me.spcontwKonfleft, "spcontwKonfleft")
         Me.spcontwKonfleft.Horizontal = False
         Me.spcontwKonfleft.Name = "spcontwKonfleft"
+        '
+        'spcontwKonfleft.Panel1
+        '
         Me.spcontwKonfleft.Panel1.Controls.Add(Me.GridControlWK1)
         resources.ApplyResources(Me.spcontwKonfleft.Panel1, "spcontwKonfleft.Panel1")
+        '
+        'spcontwKonfleft.Panel2
+        '
         Me.spcontwKonfleft.Panel2.Controls.Add(Me.GridControlWK3)
         resources.ApplyResources(Me.spcontwKonfleft.Panel2, "spcontwKonfleft.Panel2")
         Me.spcontwKonfleft.SplitterPosition = 258
@@ -516,8 +540,14 @@ Partial Class frmAdmin2
         resources.ApplyResources(Me.spcontwKonfRight, "spcontwKonfRight")
         Me.spcontwKonfRight.Horizontal = False
         Me.spcontwKonfRight.Name = "spcontwKonfRight"
+        '
+        'spcontwKonfRight.Panel1
+        '
         Me.spcontwKonfRight.Panel1.Controls.Add(Me.GridControlWK2)
         resources.ApplyResources(Me.spcontwKonfRight.Panel1, "spcontwKonfRight.Panel1")
+        '
+        'spcontwKonfRight.Panel2
+        '
         Me.spcontwKonfRight.Panel2.Controls.Add(Me.GridControlWK4)
         resources.ApplyResources(Me.spcontwKonfRight.Panel2, "spcontwKonfRight.Panel2")
         Me.spcontwKonfRight.SplitterPosition = 257
@@ -790,7 +820,7 @@ Partial Class frmAdmin2
         Me.Root.GroupBordersVisible = False
         Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlGroup1})
         Me.Root.Name = "Root"
-        Me.Root.Size = New System.Drawing.Size(698, 491)
+        Me.Root.Size = New System.Drawing.Size(698, 478)
         Me.Root.TextVisible = False
         '
         'LayoutControlGroup1
@@ -800,7 +830,7 @@ Partial Class frmAdmin2
         Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.ItemForGUID, Me.ItemForTITLE, Me.ItemForEMAIL_SUBJECT, Me.ItemForEMAIL_BODY1, Me.ItemForEMAIL_BODY2, Me.ItemForEMAIL_BODY3, Me.ItemForADDED_WHO, Me.ItemForCHANGED_WHO, Me.ItemForADDED_WHEN, Me.ItemForCHANGED_WHEN})
         Me.LayoutControlGroup1.Location = New System.Drawing.Point(0, 0)
         Me.LayoutControlGroup1.Name = "autoGeneratedGroup0"
-        Me.LayoutControlGroup1.Size = New System.Drawing.Size(678, 471)
+        Me.LayoutControlGroup1.Size = New System.Drawing.Size(678, 458)
         '
         'ItemForGUID
         '
@@ -809,7 +839,7 @@ Partial Class frmAdmin2
         Me.ItemForGUID.Name = "ItemForGUID"
         Me.ItemForGUID.Size = New System.Drawing.Size(678, 24)
         resources.ApplyResources(Me.ItemForGUID, "ItemForGUID")
-        Me.ItemForGUID.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForGUID.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForTITLE
         '
@@ -818,7 +848,7 @@ Partial Class frmAdmin2
         Me.ItemForTITLE.Name = "ItemForTITLE"
         Me.ItemForTITLE.Size = New System.Drawing.Size(678, 24)
         resources.ApplyResources(Me.ItemForTITLE, "ItemForTITLE")
-        Me.ItemForTITLE.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForTITLE.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForEMAIL_SUBJECT
         '
@@ -827,70 +857,70 @@ Partial Class frmAdmin2
         Me.ItemForEMAIL_SUBJECT.Name = "ItemForEMAIL_SUBJECT"
         Me.ItemForEMAIL_SUBJECT.Size = New System.Drawing.Size(678, 24)
         resources.ApplyResources(Me.ItemForEMAIL_SUBJECT, "ItemForEMAIL_SUBJECT")
-        Me.ItemForEMAIL_SUBJECT.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForEMAIL_SUBJECT.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForEMAIL_BODY1
         '
         Me.ItemForEMAIL_BODY1.Control = Me.EMAIL_BODY1TextEdit
         Me.ItemForEMAIL_BODY1.Location = New System.Drawing.Point(0, 72)
         Me.ItemForEMAIL_BODY1.Name = "ItemForEMAIL_BODY1"
-        Me.ItemForEMAIL_BODY1.Size = New System.Drawing.Size(678, 142)
+        Me.ItemForEMAIL_BODY1.Size = New System.Drawing.Size(678, 137)
         resources.ApplyResources(Me.ItemForEMAIL_BODY1, "ItemForEMAIL_BODY1")
-        Me.ItemForEMAIL_BODY1.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForEMAIL_BODY1.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForEMAIL_BODY2
         '
         Me.ItemForEMAIL_BODY2.Control = Me.EMAIL_BODY2TextEdit
-        Me.ItemForEMAIL_BODY2.Location = New System.Drawing.Point(0, 214)
+        Me.ItemForEMAIL_BODY2.Location = New System.Drawing.Point(0, 209)
         Me.ItemForEMAIL_BODY2.Name = "ItemForEMAIL_BODY2"
-        Me.ItemForEMAIL_BODY2.Size = New System.Drawing.Size(678, 185)
+        Me.ItemForEMAIL_BODY2.Size = New System.Drawing.Size(678, 177)
         resources.ApplyResources(Me.ItemForEMAIL_BODY2, "ItemForEMAIL_BODY2")
-        Me.ItemForEMAIL_BODY2.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForEMAIL_BODY2.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForEMAIL_BODY3
         '
         Me.ItemForEMAIL_BODY3.Control = Me.EMAIL_BODY3TextEdit
-        Me.ItemForEMAIL_BODY3.Location = New System.Drawing.Point(0, 399)
+        Me.ItemForEMAIL_BODY3.Location = New System.Drawing.Point(0, 386)
         Me.ItemForEMAIL_BODY3.Name = "ItemForEMAIL_BODY3"
         Me.ItemForEMAIL_BODY3.Size = New System.Drawing.Size(678, 24)
         resources.ApplyResources(Me.ItemForEMAIL_BODY3, "ItemForEMAIL_BODY3")
-        Me.ItemForEMAIL_BODY3.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForEMAIL_BODY3.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForADDED_WHO
         '
         Me.ItemForADDED_WHO.Control = Me.ADDED_WHOTextEdit
-        Me.ItemForADDED_WHO.Location = New System.Drawing.Point(0, 423)
+        Me.ItemForADDED_WHO.Location = New System.Drawing.Point(0, 410)
         Me.ItemForADDED_WHO.Name = "ItemForADDED_WHO"
         Me.ItemForADDED_WHO.Size = New System.Drawing.Size(339, 24)
         resources.ApplyResources(Me.ItemForADDED_WHO, "ItemForADDED_WHO")
-        Me.ItemForADDED_WHO.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForADDED_WHO.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForCHANGED_WHO
         '
         Me.ItemForCHANGED_WHO.Control = Me.CHANGED_WHOTextEdit
-        Me.ItemForCHANGED_WHO.Location = New System.Drawing.Point(0, 447)
+        Me.ItemForCHANGED_WHO.Location = New System.Drawing.Point(0, 434)
         Me.ItemForCHANGED_WHO.Name = "ItemForCHANGED_WHO"
         Me.ItemForCHANGED_WHO.Size = New System.Drawing.Size(339, 24)
         resources.ApplyResources(Me.ItemForCHANGED_WHO, "ItemForCHANGED_WHO")
-        Me.ItemForCHANGED_WHO.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForCHANGED_WHO.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForADDED_WHEN
         '
         Me.ItemForADDED_WHEN.Control = Me.ADDED_WHENDateEdit
-        Me.ItemForADDED_WHEN.Location = New System.Drawing.Point(339, 423)
+        Me.ItemForADDED_WHEN.Location = New System.Drawing.Point(339, 410)
         Me.ItemForADDED_WHEN.Name = "ItemForADDED_WHEN"
         Me.ItemForADDED_WHEN.Size = New System.Drawing.Size(339, 24)
         resources.ApplyResources(Me.ItemForADDED_WHEN, "ItemForADDED_WHEN")
-        Me.ItemForADDED_WHEN.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForADDED_WHEN.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForCHANGED_WHEN
         '
         Me.ItemForCHANGED_WHEN.Control = Me.CHANGED_WHENDateEdit
-        Me.ItemForCHANGED_WHEN.Location = New System.Drawing.Point(339, 447)
+        Me.ItemForCHANGED_WHEN.Location = New System.Drawing.Point(339, 434)
         Me.ItemForCHANGED_WHEN.Name = "ItemForCHANGED_WHEN"
         Me.ItemForCHANGED_WHEN.Size = New System.Drawing.Size(339, 24)
         resources.ApplyResources(Me.ItemForCHANGED_WHEN, "ItemForCHANGED_WHEN")
-        Me.ItemForCHANGED_WHEN.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForCHANGED_WHEN.TextSize = New System.Drawing.Size(76, 13)
         '
         'GridControl1
         '
@@ -1151,7 +1181,7 @@ Partial Class frmAdmin2
         Me.LayoutControlItem1.Name = "ItemForGUID"
         Me.LayoutControlItem1.Size = New System.Drawing.Size(262, 24)
         resources.ApplyResources(Me.LayoutControlItem1, "LayoutControlItem1")
-        Me.LayoutControlItem1.TextSize = New System.Drawing.Size(74, 13)
+        Me.LayoutControlItem1.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForSTRING1
         '
@@ -1160,7 +1190,7 @@ Partial Class frmAdmin2
         Me.ItemForSTRING1.Name = "ItemForSTRING1"
         Me.ItemForSTRING1.Size = New System.Drawing.Size(524, 171)
         resources.ApplyResources(Me.ItemForSTRING1, "ItemForSTRING1")
-        Me.ItemForSTRING1.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForSTRING1.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForSTRING2
         '
@@ -1169,7 +1199,7 @@ Partial Class frmAdmin2
         Me.ItemForSTRING2.Name = "ItemForSTRING2"
         Me.ItemForSTRING2.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.ItemForSTRING2, "ItemForSTRING2")
-        Me.ItemForSTRING2.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForSTRING2.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForSTRING3
         '
@@ -1178,7 +1208,7 @@ Partial Class frmAdmin2
         Me.ItemForSTRING3.Name = "ItemForSTRING3"
         Me.ItemForSTRING3.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.ItemForSTRING3, "ItemForSTRING3")
-        Me.ItemForSTRING3.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForSTRING3.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForSTRING4
         '
@@ -1187,7 +1217,7 @@ Partial Class frmAdmin2
         Me.ItemForSTRING4.Name = "ItemForSTRING4"
         Me.ItemForSTRING4.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.ItemForSTRING4, "ItemForSTRING4")
-        Me.ItemForSTRING4.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForSTRING4.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForSTRING5
         '
@@ -1196,7 +1226,7 @@ Partial Class frmAdmin2
         Me.ItemForSTRING5.Name = "ItemForSTRING5"
         Me.ItemForSTRING5.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.ItemForSTRING5, "ItemForSTRING5")
-        Me.ItemForSTRING5.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForSTRING5.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForSTRING6
         '
@@ -1205,7 +1235,7 @@ Partial Class frmAdmin2
         Me.ItemForSTRING6.Name = "ItemForSTRING6"
         Me.ItemForSTRING6.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.ItemForSTRING6, "ItemForSTRING6")
-        Me.ItemForSTRING6.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForSTRING6.TextSize = New System.Drawing.Size(76, 13)
         '
         'LayoutControlItem3
         '
@@ -1214,7 +1244,7 @@ Partial Class frmAdmin2
         Me.LayoutControlItem3.Name = "ItemForADDED_WHO"
         Me.LayoutControlItem3.Size = New System.Drawing.Size(262, 24)
         resources.ApplyResources(Me.LayoutControlItem3, "LayoutControlItem3")
-        Me.LayoutControlItem3.TextSize = New System.Drawing.Size(74, 13)
+        Me.LayoutControlItem3.TextSize = New System.Drawing.Size(76, 13)
         '
         'LayoutControlItem5
         '
@@ -1223,7 +1253,7 @@ Partial Class frmAdmin2
         Me.LayoutControlItem5.Name = "ItemForCHANGED_WHO"
         Me.LayoutControlItem5.Size = New System.Drawing.Size(262, 24)
         resources.ApplyResources(Me.LayoutControlItem5, "LayoutControlItem5")
-        Me.LayoutControlItem5.TextSize = New System.Drawing.Size(74, 13)
+        Me.LayoutControlItem5.TextSize = New System.Drawing.Size(76, 13)
         '
         'LayoutControlItem4
         '
@@ -1232,7 +1262,7 @@ Partial Class frmAdmin2
         Me.LayoutControlItem4.Name = "ItemForADDED_WHEN"
         Me.LayoutControlItem4.Size = New System.Drawing.Size(262, 24)
         resources.ApplyResources(Me.LayoutControlItem4, "LayoutControlItem4")
-        Me.LayoutControlItem4.TextSize = New System.Drawing.Size(74, 13)
+        Me.LayoutControlItem4.TextSize = New System.Drawing.Size(76, 13)
         '
         'LayoutControlItem6
         '
@@ -1241,7 +1271,7 @@ Partial Class frmAdmin2
         Me.LayoutControlItem6.Name = "ItemForCHANGED_WHEN"
         Me.LayoutControlItem6.Size = New System.Drawing.Size(262, 24)
         resources.ApplyResources(Me.LayoutControlItem6, "LayoutControlItem6")
-        Me.LayoutControlItem6.TextSize = New System.Drawing.Size(74, 13)
+        Me.LayoutControlItem6.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForINTERNAL
         '
@@ -1260,7 +1290,7 @@ Partial Class frmAdmin2
         Me.ItemForCAPT_TYPE.Name = "ItemForCAPT_TYPE"
         Me.ItemForCAPT_TYPE.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.ItemForCAPT_TYPE, "ItemForCAPT_TYPE")
-        Me.ItemForCAPT_TYPE.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForCAPT_TYPE.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForLANGUAGE
         '
@@ -1269,7 +1299,7 @@ Partial Class frmAdmin2
         Me.ItemForLANGUAGE.Name = "ItemForLANGUAGE"
         Me.ItemForLANGUAGE.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.ItemForLANGUAGE, "ItemForLANGUAGE")
-        Me.ItemForLANGUAGE.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForLANGUAGE.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForMODULE
         '
@@ -1278,7 +1308,7 @@ Partial Class frmAdmin2
         Me.ItemForMODULE.Name = "ItemForMODULE"
         Me.ItemForMODULE.Size = New System.Drawing.Size(150, 24)
         resources.ApplyResources(Me.ItemForMODULE, "ItemForMODULE")
-        Me.ItemForMODULE.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForMODULE.TextSize = New System.Drawing.Size(76, 13)
         '
         'LayoutControlItem2
         '
@@ -1287,7 +1317,7 @@ Partial Class frmAdmin2
         Me.LayoutControlItem2.Name = "ItemForTITLE"
         Me.LayoutControlItem2.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.LayoutControlItem2, "LayoutControlItem2")
-        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(74, 13)
+        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(76, 13)
         '
         'ItemForOBJ_NAME
         '
@@ -1296,7 +1326,7 @@ Partial Class frmAdmin2
         Me.ItemForOBJ_NAME.Name = "ItemForOBJ_NAME"
         Me.ItemForOBJ_NAME.Size = New System.Drawing.Size(524, 24)
         resources.ApplyResources(Me.ItemForOBJ_NAME, "ItemForOBJ_NAME")
-        Me.ItemForOBJ_NAME.TextSize = New System.Drawing.Size(74, 13)
+        Me.ItemForOBJ_NAME.TextSize = New System.Drawing.Size(76, 13)
         '
         'BindingNavigator2
         '
@@ -1456,8 +1486,16 @@ Partial Class frmAdmin2
         Me.Name = "frmAdmin2"
         Me.Ribbon = Me.RibbonControl1
         Me.StatusBar = Me.RibbonStatusBar1
+        CType(Me.spcontwKonfMain.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.spcontwKonfMain.Panel1.ResumeLayout(False)
+        CType(Me.spcontwKonfMain.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.spcontwKonfMain.Panel2.ResumeLayout(False)
         CType(Me.spcontwKonfMain, System.ComponentModel.ISupportInitialize).EndInit()
         Me.spcontwKonfMain.ResumeLayout(False)
+        CType(Me.spcontwKonfleft.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.spcontwKonfleft.Panel1.ResumeLayout(False)
+        CType(Me.spcontwKonfleft.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.spcontwKonfleft.Panel2.ResumeLayout(False)
         CType(Me.spcontwKonfleft, System.ComponentModel.ISupportInitialize).EndInit()
         Me.spcontwKonfleft.ResumeLayout(False)
         CType(Me.GridControlWK1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -1465,6 +1503,10 @@ Partial Class frmAdmin2
         CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridControlWK3, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridViewWK3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.spcontwKonfRight.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.spcontwKonfRight.Panel1.ResumeLayout(False)
+        CType(Me.spcontwKonfRight.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.spcontwKonfRight.Panel2.ResumeLayout(False)
         CType(Me.spcontwKonfRight, System.ComponentModel.ISupportInitialize).EndInit()
         Me.spcontwKonfRight.ResumeLayout(False)
         CType(Me.GridControlWK2, System.ComponentModel.ISupportInitialize).EndInit()

app/TaskFlow/frmAdmin2.resx

@@ -146,7 +146,7 @@
   <assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
   <data name="BbitemplateAdd.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGICAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -167,7 +167,7 @@
   </data>
   <data name="BbitemplateSave.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAO4BAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -186,7 +186,7 @@
   </data>
   <data name="BbitemplateDelete.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAD0DAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -210,7 +210,7 @@
   </data>
   <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAC4DAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -285,7 +285,7 @@
   </data>
   <data name="BarButtonItem3.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAO4BAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -304,7 +304,7 @@
   </data>
   <data name="BarButtonItem4.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAD0DAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -328,7 +328,7 @@
   </data>
   <data name="BarButtonItem5.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAC4DAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -355,7 +355,7 @@
   </data>
   <data name="BarButtonItem6.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGICAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -591,7 +591,7 @@
   </data>
   <data name="BarButtonItem11.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
         dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAIkDAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -631,13 +631,13 @@
     <value>Start</value>
   </data>
   <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1059, 146</value>
+    <value>1059, 158</value>
   </data>
   <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 694</value>
+    <value>0, 693</value>
   </data>
   <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1059, 21</value>
+    <value>1059, 22</value>
   </data>
   <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
     <value>RibbonStatusBar1</value>
@@ -685,6 +685,18 @@
   <data name="spcontwKonfleft.Panel1.Text" xml:space="preserve">
     <value>Panel1</value>
   </data>
+  <data name="&gt;&gt;spcontwKonfleft.Panel1.Name" xml:space="preserve">
+    <value>spcontwKonfleft.Panel1</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfleft.Panel1.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.SplitGroupPanel, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfleft.Panel1.Parent" xml:space="preserve">
+    <value>spcontwKonfleft</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfleft.Panel1.ZOrder" xml:space="preserve">
+    <value>0</value>
+  </data>
   <data name="GridControlWK3.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
     <value>Fill</value>
   </data>
@@ -695,7 +707,7 @@
     <value>Grid 3</value>
   </data>
   <data name="GridControlWK3.Size" type="System.Drawing.Size, System.Drawing">
-    <value>486, 253</value>
+    <value>486, 244</value>
   </data>
   <data name="GridControlWK3.TabIndex" type="System.Int32, mscorlib">
     <value>3</value>
@@ -715,8 +727,20 @@
   <data name="spcontwKonfleft.Panel2.Text" xml:space="preserve">
     <value>Panel2</value>
   </data>
+  <data name="&gt;&gt;spcontwKonfleft.Panel2.Name" xml:space="preserve">
+    <value>spcontwKonfleft.Panel2</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfleft.Panel2.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.SplitGroupPanel, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfleft.Panel2.Parent" xml:space="preserve">
+    <value>spcontwKonfleft</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfleft.Panel2.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
   <data name="spcontwKonfleft.Size" type="System.Drawing.Size, System.Drawing">
-    <value>486, 523</value>
+    <value>486, 512</value>
   </data>
   <data name="spcontwKonfleft.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -736,6 +760,18 @@
   <data name="spcontwKonfMain.Panel1.Text" xml:space="preserve">
     <value>Panel1</value>
   </data>
+  <data name="&gt;&gt;spcontwKonfMain.Panel1.Name" xml:space="preserve">
+    <value>spcontwKonfMain.Panel1</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfMain.Panel1.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.SplitGroupPanel, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfMain.Panel1.Parent" xml:space="preserve">
+    <value>spcontwKonfMain</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfMain.Panel1.ZOrder" xml:space="preserve">
+    <value>0</value>
+  </data>
   <data name="spcontwKonfRight.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
     <value>Fill</value>
   </data>
@@ -752,7 +788,7 @@
     <value>Grid 2</value>
   </data>
   <data name="GridControlWK2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>559, 257</value>
+    <value>561, 257</value>
   </data>
   <data name="GridControlWK2.TabIndex" type="System.Int32, mscorlib">
     <value>2</value>
@@ -772,6 +808,18 @@
   <data name="spcontwKonfRight.Panel1.Text" xml:space="preserve">
     <value>Panel1</value>
   </data>
+  <data name="&gt;&gt;spcontwKonfRight.Panel1.Name" xml:space="preserve">
+    <value>spcontwKonfRight.Panel1</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfRight.Panel1.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.SplitGroupPanel, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfRight.Panel1.Parent" xml:space="preserve">
+    <value>spcontwKonfRight</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfRight.Panel1.ZOrder" xml:space="preserve">
+    <value>0</value>
+  </data>
   <data name="GridControlWK4.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
     <value>Fill</value>
   </data>
@@ -782,7 +830,7 @@
     <value>Grid 4</value>
   </data>
   <data name="GridControlWK4.Size" type="System.Drawing.Size, System.Drawing">
-    <value>559, 254</value>
+    <value>561, 245</value>
   </data>
   <data name="GridControlWK4.TabIndex" type="System.Int32, mscorlib">
     <value>3</value>
@@ -802,8 +850,20 @@
   <data name="spcontwKonfRight.Panel2.Text" xml:space="preserve">
     <value>Panel2</value>
   </data>
+  <data name="&gt;&gt;spcontwKonfRight.Panel2.Name" xml:space="preserve">
+    <value>spcontwKonfRight.Panel2</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfRight.Panel2.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.SplitGroupPanel, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfRight.Panel2.Parent" xml:space="preserve">
+    <value>spcontwKonfRight</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfRight.Panel2.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
   <data name="spcontwKonfRight.Size" type="System.Drawing.Size, System.Drawing">
-    <value>559, 523</value>
+    <value>561, 512</value>
   </data>
   <data name="spcontwKonfRight.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -823,8 +883,20 @@
   <data name="spcontwKonfMain.Panel2.Text" xml:space="preserve">
     <value>Panel2</value>
   </data>
+  <data name="&gt;&gt;spcontwKonfMain.Panel2.Name" xml:space="preserve">
+    <value>spcontwKonfMain.Panel2</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfMain.Panel2.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.SplitGroupPanel, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfMain.Panel2.Parent" xml:space="preserve">
+    <value>spcontwKonfMain</value>
+  </data>
+  <data name="&gt;&gt;spcontwKonfMain.Panel2.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
   <data name="spcontwKonfMain.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1057, 523</value>
+    <value>1057, 512</value>
   </data>
   <data name="spcontwKonfMain.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -848,7 +920,7 @@
     <value>Fill</value>
   </data>
   <data name="XtraTabControl1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 146</value>
+    <value>0, 158</value>
   </data>
   <data name="XtraTabPage1.AutoScroll" type="System.Boolean, mscorlib">
     <value>True</value>
@@ -874,7 +946,7 @@
   <data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
+        wQAADsEBuJFr7QAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
         wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
         v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
         UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
@@ -894,7 +966,7 @@
   <data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
+        wQAADsEBuJFr7QAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
         5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
         Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
         08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
@@ -936,7 +1008,7 @@
   <data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
+        wQAADsEBuJFr7QAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
         n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
         N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
         oAc0QjgAAAAASUVORK5CYII=
@@ -954,7 +1026,7 @@
   <data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
+        wQAADsEBuJFr7QAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
         h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
         twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
         kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
@@ -1002,7 +1074,7 @@
     <value>Top, Bottom, Left, Right</value>
   </data>
   <data name="GUIDTextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 12</value>
+    <value>100, 12</value>
   </data>
   <data name="GUIDTextEdit.Properties.Mask.EditMask" xml:space="preserve">
     <value>N0</value>
@@ -1015,7 +1087,7 @@
     <value>True</value>
   </data>
   <data name="GUIDTextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>597, 20</value>
+    <value>586, 20</value>
   </data>
   <data name="GUIDTextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>4</value>
@@ -1033,10 +1105,10 @@
     <value>4</value>
   </data>
   <data name="TITLETextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 36</value>
+    <value>100, 36</value>
   </data>
   <data name="TITLETextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>597, 20</value>
+    <value>586, 20</value>
   </data>
   <data name="TITLETextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>5</value>
@@ -1054,10 +1126,10 @@
     <value>5</value>
   </data>
   <data name="EMAIL_BODY3TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 411</value>
+    <value>100, 398</value>
   </data>
   <data name="EMAIL_BODY3TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>597, 20</value>
+    <value>586, 20</value>
   </data>
   <data name="EMAIL_BODY3TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>9</value>
@@ -1075,10 +1147,10 @@
     <value>6</value>
   </data>
   <data name="ADDED_WHOTextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 435</value>
+    <value>100, 422</value>
   </data>
   <data name="ADDED_WHOTextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>258, 20</value>
+    <value>247, 20</value>
   </data>
   <data name="ADDED_WHOTextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>10</value>
@@ -1096,10 +1168,10 @@
     <value>7</value>
   </data>
   <data name="CHANGED_WHOTextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 459</value>
+    <value>100, 446</value>
   </data>
   <data name="CHANGED_WHOTextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>258, 20</value>
+    <value>247, 20</value>
   </data>
   <data name="CHANGED_WHOTextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>12</value>
@@ -1117,10 +1189,10 @@
     <value>8</value>
   </data>
   <data name="EMAIL_BODY1TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 84</value>
+    <value>100, 84</value>
   </data>
   <data name="EMAIL_BODY1TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>597, 138</value>
+    <value>586, 133</value>
   </data>
   <data name="EMAIL_BODY1TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>7</value>
@@ -1138,10 +1210,10 @@
     <value>9</value>
   </data>
   <data name="EMAIL_BODY2TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 226</value>
+    <value>100, 221</value>
   </data>
   <data name="EMAIL_BODY2TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>597, 181</value>
+    <value>586, 173</value>
   </data>
   <data name="EMAIL_BODY2TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>8</value>
@@ -1159,10 +1231,10 @@
     <value>10</value>
   </data>
   <data name="EMAIL_SUBJECTTextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 60</value>
+    <value>100, 60</value>
   </data>
   <data name="EMAIL_SUBJECTTextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>597, 20</value>
+    <value>586, 20</value>
   </data>
   <data name="EMAIL_SUBJECTTextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>6</value>
@@ -1180,7 +1252,7 @@
     <value>11</value>
   </data>
   <data name="ADDED_WHENDateEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>428, 435</value>
+    <value>439, 422</value>
   </data>
   <data name="ADDED_WHENDateEdit.Properties.Mask.EditMask" xml:space="preserve">
     <value>G</value>
@@ -1189,7 +1261,7 @@
     <value>DateTime</value>
   </data>
   <data name="ADDED_WHENDateEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>258, 20</value>
+    <value>247, 20</value>
   </data>
   <data name="ADDED_WHENDateEdit.TabIndex" type="System.Int32, mscorlib">
     <value>11</value>
@@ -1207,7 +1279,7 @@
     <value>12</value>
   </data>
   <data name="CHANGED_WHENDateEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>428, 459</value>
+    <value>439, 446</value>
   </data>
   <data name="CHANGED_WHENDateEdit.Properties.Mask.EditMask" xml:space="preserve">
     <value>d</value>
@@ -1216,7 +1288,7 @@
     <value>DateTime</value>
   </data>
   <data name="CHANGED_WHENDateEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>258, 20</value>
+    <value>247, 20</value>
   </data>
   <data name="CHANGED_WHENDateEdit.TabIndex" type="System.Int32, mscorlib">
     <value>13</value>
@@ -1267,7 +1339,7 @@
     <value>Geändert Wann</value>
   </data>
   <data name="DataLayoutControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>698, 491</value>
+    <value>698, 478</value>
   </data>
   <data name="DataLayoutControl1.TabIndex" type="System.Int32, mscorlib">
     <value>22</value>
@@ -1318,7 +1390,7 @@
     <value>128</value>
   </data>
   <data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>353, 523</value>
+    <value>353, 512</value>
   </data>
   <data name="GridControl1.TabIndex" type="System.Int32, mscorlib">
     <value>20</value>
@@ -1336,7 +1408,7 @@
     <value>2</value>
   </data>
   <data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1057, 523</value>
+    <value>1057, 512</value>
   </data>
   <data name="XtraTabPage1.Text" xml:space="preserve">
     <value>Email Phrasen</value>
@@ -1354,7 +1426,7 @@
     <value>0</value>
   </data>
   <data name="XtraTabControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1059, 548</value>
+    <value>1059, 535</value>
   </data>
   <data name="XtraTabControl1.TabIndex" type="System.Int32, mscorlib">
     <value>2</value>
@@ -1366,7 +1438,7 @@
     <value>17, 56</value>
   </metadata>
   <data name="TextEdit1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 12</value>
+    <value>100, 12</value>
   </data>
   <data name="TextEdit1.Properties.Mask.EditMask" xml:space="preserve">
     <value>N0</value>
@@ -1378,7 +1450,7 @@
     <value>True</value>
   </data>
   <data name="TextEdit1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>181, 20</value>
+    <value>170, 20</value>
   </data>
   <data name="TextEdit1.TabIndex" type="System.Int32, mscorlib">
     <value>4</value>
@@ -1396,10 +1468,10 @@
     <value>4</value>
   </data>
   <data name="MODULETextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>463, 12</value>
+    <value>474, 12</value>
   </data>
   <data name="MODULETextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>69, 20</value>
+    <value>58, 20</value>
   </data>
   <data name="MODULETextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>5</value>
@@ -1417,10 +1489,10 @@
     <value>5</value>
   </data>
   <data name="TextEdit2.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 84</value>
+    <value>100, 84</value>
   </data>
   <data name="TextEdit2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="TextEdit2.TabIndex" type="System.Int32, mscorlib">
     <value>6</value>
@@ -1438,14 +1510,14 @@
     <value>6</value>
   </data>
   <data name="LANGUAGEComboBoxEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 36</value>
+    <value>100, 36</value>
   </data>
   <assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
   <data name="LANGUAGEComboBoxEdit.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
     <value>Combo</value>
   </data>
   <data name="LANGUAGEComboBoxEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="LANGUAGEComboBoxEdit.TabIndex" type="System.Int32, mscorlib">
     <value>7</value>
@@ -1463,10 +1535,10 @@
     <value>7</value>
   </data>
   <data name="CAPT_TYPETextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 108</value>
+    <value>100, 108</value>
   </data>
   <data name="CAPT_TYPETextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="CAPT_TYPETextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>8</value>
@@ -1484,10 +1556,10 @@
     <value>8</value>
   </data>
   <data name="STRING2TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 303</value>
+    <value>100, 303</value>
   </data>
   <data name="STRING2TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="STRING2TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>10</value>
@@ -1505,10 +1577,10 @@
     <value>9</value>
   </data>
   <data name="STRING3TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 327</value>
+    <value>100, 327</value>
   </data>
   <data name="STRING3TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="STRING3TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>11</value>
@@ -1526,10 +1598,10 @@
     <value>10</value>
   </data>
   <data name="STRING4TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 351</value>
+    <value>100, 351</value>
   </data>
   <data name="STRING4TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="STRING4TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>12</value>
@@ -1547,10 +1619,10 @@
     <value>11</value>
   </data>
   <data name="STRING5TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 375</value>
+    <value>100, 375</value>
   </data>
   <data name="STRING5TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="STRING5TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>13</value>
@@ -1568,10 +1640,10 @@
     <value>12</value>
   </data>
   <data name="STRING6TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 399</value>
+    <value>100, 399</value>
   </data>
   <data name="STRING6TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="STRING6TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>14</value>
@@ -1589,10 +1661,10 @@
     <value>13</value>
   </data>
   <data name="TextEdit3.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 423</value>
+    <value>100, 423</value>
   </data>
   <data name="TextEdit3.Size" type="System.Drawing.Size, System.Drawing">
-    <value>181, 20</value>
+    <value>170, 20</value>
   </data>
   <data name="TextEdit3.TabIndex" type="System.Int32, mscorlib">
     <value>15</value>
@@ -1610,7 +1682,7 @@
     <value>14</value>
   </data>
   <data name="ADDED_WHENTextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>351, 423</value>
+    <value>362, 423</value>
   </data>
   <data name="ADDED_WHENTextEdit.Properties.Mask.EditMask" xml:space="preserve">
     <value>d</value>
@@ -1619,7 +1691,7 @@
     <value>DateTime</value>
   </data>
   <data name="ADDED_WHENTextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>181, 20</value>
+    <value>170, 20</value>
   </data>
   <data name="ADDED_WHENTextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>16</value>
@@ -1637,10 +1709,10 @@
     <value>15</value>
   </data>
   <data name="TextEdit4.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 447</value>
+    <value>100, 447</value>
   </data>
   <data name="TextEdit4.Size" type="System.Drawing.Size, System.Drawing">
-    <value>181, 20</value>
+    <value>170, 20</value>
   </data>
   <data name="TextEdit4.TabIndex" type="System.Int32, mscorlib">
     <value>17</value>
@@ -1658,7 +1730,7 @@
     <value>16</value>
   </data>
   <data name="CHANGED_WHENTextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>351, 447</value>
+    <value>362, 447</value>
   </data>
   <data name="CHANGED_WHENTextEdit.Properties.Mask.EditMask" xml:space="preserve">
     <value>d</value>
@@ -1667,7 +1739,7 @@
     <value>DateTime</value>
   </data>
   <data name="CHANGED_WHENTextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>181, 20</value>
+    <value>170, 20</value>
   </data>
   <data name="CHANGED_WHENTextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>18</value>
@@ -1685,10 +1757,10 @@
     <value>17</value>
   </data>
   <data name="OBJ_NAMETextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 60</value>
+    <value>100, 60</value>
   </data>
   <data name="OBJ_NAMETextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 20</value>
+    <value>432, 20</value>
   </data>
   <data name="OBJ_NAMETextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>19</value>
@@ -1715,7 +1787,7 @@
     <value>Default</value>
   </data>
   <data name="INTERNALCheckEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>108, 19</value>
+    <value>108, 18</value>
   </data>
   <data name="INTERNALCheckEdit.TabIndex" type="System.Int32, mscorlib">
     <value>20</value>
@@ -1733,10 +1805,10 @@
     <value>19</value>
   </data>
   <data name="STRING1TextEdit.Location" type="System.Drawing.Point, System.Drawing">
-    <value>89, 132</value>
+    <value>100, 132</value>
   </data>
   <data name="STRING1TextEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>443, 167</value>
+    <value>432, 167</value>
   </data>
   <data name="STRING1TextEdit.TabIndex" type="System.Int32, mscorlib">
     <value>9</value>
@@ -1843,7 +1915,7 @@
   <data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
+        wQAADsEBuJFr7QAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
         wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
         v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
         UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
@@ -1863,7 +1935,7 @@
   <data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
+        wQAADsEBuJFr7QAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
         5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
         Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
         08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
@@ -1905,7 +1977,7 @@
   <data name="ToolStripButton3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
+        wQAADsEBuJFr7QAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
         n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
         N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
         oAc0QjgAAAAASUVORK5CYII=
@@ -1923,7 +1995,7 @@
   <data name="ToolStripButton4.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
+        wQAADsEBuJFr7QAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
         h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
         twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
         kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
@@ -2013,7 +2085,7 @@
     <value>3</value>
   </data>
   <data name="GridControl2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>509, 523</value>
+    <value>509, 512</value>
   </data>
   <data name="GridControl2.TabIndex" type="System.Int32, mscorlib">
     <value>21</value>
@@ -2031,7 +2103,7 @@
     <value>2</value>
   </data>
   <data name="XtraTabPage2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1057, 523</value>
+    <value>1057, 512</value>
   </data>
   <data name="XtraTabPage2.Text" xml:space="preserve">
     <value>GUI Phrasen</value>
@@ -2049,7 +2121,7 @@
     <value>1</value>
   </data>
   <data name="XtraTabPage3.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1057, 523</value>
+    <value>1057, 512</value>
   </data>
   <data name="XtraTabPage3.Text" xml:space="preserve">
     <value>Weitere Auswertungen</value>

app/TaskFlow/frmAdmin2.vb

@@ -23,12 +23,12 @@ Public Class frmAdmin2
         oSave = True
         Try
             Dim oFilename As String = String.Format("DevExLayoutAdmin2_Email.xml")
-            Dim oXml As String = System.IO.Path.Combine(CONFIG.UserConfigPath.Replace("UserConfig.xml", ""), oFilename)
+            Dim oXml As String = System.IO.Path.Combine(USER_CONFIG_DIRECTORY, oFilename)
             If File.Exists(oXml) Then
                 DataLayoutControl1.RestoreLayoutFromXml(oXml)
             End If
             oFilename = String.Format("DevExLayoutAdmin2_GUIPhrases.xml")
-            oXml = System.IO.Path.Combine(CONFIG.UserConfigPath.Replace("UserConfig.xml", ""), oFilename)
+            oXml = System.IO.Path.Combine(USER_CONFIG_DIRECTORY, oFilename)
             If File.Exists(oXml) Then
                 DataLayoutControl2.RestoreLayoutFromXml(oXml)
             End If
@@ -228,7 +228,7 @@ Public Class frmAdmin2
             End If
         Catch ex As Exception
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in Saving GuiPHrase:")
-            'MsgBox("Unerwarteter Fehler beim Speichern des Profils: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
+
         End Try
     End Sub
     Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem4.ItemClick
@@ -264,12 +264,12 @@ Public Class frmAdmin2
         End If
         Try
             Dim Filename As String = String.Format("DevExLayoutAdmin2_Email.xml")
-            Dim xml As String = System.IO.Path.Combine(CONFIG.UserConfigPath.Replace("UserConfig.xml", ""), Filename)
+            Dim xml As String = System.IO.Path.Combine(USER_CONFIG_DIRECTORY, Filename)
             'If File.Exists(xml) Then
             DataLayoutControl1.SaveLayoutToXml(xml)
             'End If
             Filename = String.Format("DevExLayoutAdmin2_GUIPhrases.xml")
-            xml = System.IO.Path.Combine(CONFIG.UserConfigPath.Replace("UserConfig.xml", ""), Filename)
+            xml = System.IO.Path.Combine(USER_CONFIG_DIRECTORY, Filename)
             DataLayoutControl2.SaveLayoutToXml(xml)
         Catch ex As Exception
             LOGGER.Error(ex)
@@ -284,7 +284,7 @@ Public Class frmAdmin2
     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(CONFIG.UserConfigPath.Replace("UserConfig.xml", ""), oFilename)
+            Dim oXml = System.IO.Path.Combine(USER_CONFIG_DIRECTORY, oFilename)
             File.Delete(oXml)
             MsgBox("Form will now close to reload all controls!", MsgBoxStyle.Information)
             Me.Close()
@@ -299,7 +299,7 @@ Public Class frmAdmin2
     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(CONFIG.UserConfigPath.Replace("UserConfig.xml", ""), oFilename)
+            Dim oXml = System.IO.Path.Combine(USER_CONFIG_DIRECTORY, oFilename)
             File.Delete(oXml)
             MsgBox("Form will now close to reload all controls!", MsgBoxStyle.Information)
             Me.Close()

app/TaskFlow/frmAdmin_notResponsibleConfig.Designer.vb

@@ -0,0 +1,239 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmAdmin_notResponsibleConfig
+    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(frmAdmin_notResponsibleConfig))
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.btnNotResponsibleSQL = New DevExpress.XtraBars.BarButtonItem()
+        Me.bstitmInfo = New DevExpress.XtraBars.BarStaticItem()
+        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.Label3 = New System.Windows.Forms.Label()
+        Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
+        Me.txtCaption_NotResponsible = New System.Windows.Forms.TextBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.txtPROFILE_NOT_RESPONSIBLE_QUEST = New System.Windows.Forms.TextBox()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label9 = New System.Windows.Forms.Label()
+        Me.cmbAttrComment = New System.Windows.Forms.ComboBox()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.btnNotResponsibleSQL, Me.bstitmInfo})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 4
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.Size = New System.Drawing.Size(778, 158)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "Speichern"
+        Me.BarButtonItem1.Id = 1
+        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'btnNotResponsibleSQL
+        '
+        Me.btnNotResponsibleSQL.Caption = "Override SQL"
+        Me.btnNotResponsibleSQL.Id = 2
+        Me.btnNotResponsibleSQL.ImageOptions.SvgImage = CType(resources.GetObject("btnNotResponsibleSQL.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.btnNotResponsibleSQL.Name = "btnNotResponsibleSQL"
+        '
+        'bstitmInfo
+        '
+        Me.bstitmInfo.Id = 3
+        Me.bstitmInfo.Name = "bstitmInfo"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "Start"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "Start"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.AllowTextClipping = False
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.btnNotResponsibleSQL)
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "SQL Design"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.bstitmInfo)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 318)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(778, 22)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label3.Location = New System.Drawing.Point(13, 229)
+        Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(60, 16)
+        Me.Label3.TabIndex = 101
+        Me.Label3.Text = "Vorschau"
+        '
+        'SimpleButton1
+        '
+        Me.SimpleButton1.Appearance.BackColor = System.Drawing.Color.Yellow
+        Me.SimpleButton1.Appearance.BorderColor = System.Drawing.Color.Yellow
+        Me.SimpleButton1.Appearance.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.SimpleButton1.Appearance.Options.UseBackColor = True
+        Me.SimpleButton1.Appearance.Options.UseBorderColor = True
+        Me.SimpleButton1.Appearance.Options.UseFont = True
+        Me.SimpleButton1.Enabled = False
+        Me.SimpleButton1.ImageOptions.Image = CType(resources.GetObject("SimpleButton1.ImageOptions.Image"), System.Drawing.Image)
+        Me.SimpleButton1.Location = New System.Drawing.Point(17, 255)
+        Me.SimpleButton1.Name = "SimpleButton1"
+        Me.SimpleButton1.Size = New System.Drawing.Size(197, 42)
+        Me.SimpleButton1.TabIndex = 100
+        Me.SimpleButton1.Text = "SimpleButton1"
+        '
+        'txtCaption_NotResponsible
+        '
+        Me.txtCaption_NotResponsible.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtCaption_NotResponsible.Location = New System.Drawing.Point(17, 193)
+        Me.txtCaption_NotResponsible.Margin = New System.Windows.Forms.Padding(4)
+        Me.txtCaption_NotResponsible.Name = "txtCaption_NotResponsible"
+        Me.txtCaption_NotResponsible.Size = New System.Drawing.Size(197, 23)
+        Me.txtCaption_NotResponsible.TabIndex = 99
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.Location = New System.Drawing.Point(13, 170)
+        Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(117, 16)
+        Me.Label1.TabIndex = 98
+        Me.Label1.Text = "Beschriftung Button"
+        '
+        'txtPROFILE_NOT_RESPONSIBLE_QUEST
+        '
+        Me.txtPROFILE_NOT_RESPONSIBLE_QUEST.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtPROFILE_NOT_RESPONSIBLE_QUEST.Location = New System.Drawing.Point(234, 193)
+        Me.txtPROFILE_NOT_RESPONSIBLE_QUEST.Margin = New System.Windows.Forms.Padding(4)
+        Me.txtPROFILE_NOT_RESPONSIBLE_QUEST.Name = "txtPROFILE_NOT_RESPONSIBLE_QUEST"
+        Me.txtPROFILE_NOT_RESPONSIBLE_QUEST.Size = New System.Drawing.Size(531, 23)
+        Me.txtPROFILE_NOT_RESPONSIBLE_QUEST.TabIndex = 103
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label2.Location = New System.Drawing.Point(230, 170)
+        Me.Label2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(100, 16)
+        Me.Label2.TabIndex = 102
+        Me.Label2.Text = "Sicherheitsfrage"
+        '
+        'Label9
+        '
+        Me.Label9.AutoSize = True
+        Me.Label9.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label9.ImeMode = System.Windows.Forms.ImeMode.NoControl
+        Me.Label9.Location = New System.Drawing.Point(230, 233)
+        Me.Label9.Name = "Label9"
+        Me.Label9.Size = New System.Drawing.Size(119, 16)
+        Me.Label9.TabIndex = 107
+        Me.Label9.Text = "Attribut Kommentar"
+        '
+        'cmbAttrComment
+        '
+        Me.cmbAttrComment.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cmbAttrComment.FormattingEnabled = True
+        Me.cmbAttrComment.Location = New System.Drawing.Point(234, 255)
+        Me.cmbAttrComment.Name = "cmbAttrComment"
+        Me.cmbAttrComment.Size = New System.Drawing.Size(295, 24)
+        Me.cmbAttrComment.TabIndex = 106
+        '
+        'frmAdmin_notResponsibleConfig
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(778, 340)
+        Me.Controls.Add(Me.Label9)
+        Me.Controls.Add(Me.cmbAttrComment)
+        Me.Controls.Add(Me.txtPROFILE_NOT_RESPONSIBLE_QUEST)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.SimpleButton1)
+        Me.Controls.Add(Me.txtCaption_NotResponsible)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.SvgImage = CType(resources.GetObject("frmAdmin_notResponsibleConfig.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.Name = "frmAdmin_notResponsibleConfig"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "Config - Not responsible"
+        CType(Me.RibbonControl1, 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 BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents btnNotResponsibleSQL As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents Label3 As Label
+    Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton
+    Friend WithEvents txtCaption_NotResponsible As TextBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents bstitmInfo As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents txtPROFILE_NOT_RESPONSIBLE_QUEST As TextBox
+    Friend WithEvents Label2 As Label
+    Friend WithEvents Label9 As Label
+    Friend WithEvents cmbAttrComment As ComboBox
+End Class

app/TaskFlow/frmAdmin_notResponsibleConfig.resx

@@ -0,0 +1,236 @@
+<?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.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAMICAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzczNzM3NDt9Cgku
+        WWVsbG93e2ZpbGw6I0ZDQjAxQjt9CgkuR3JlZW57ZmlsbDojMTI5QzQ5O30KCS5CbHVle2ZpbGw6IzM4
+        N0NCNzt9CgkuUmVke2ZpbGw6I0QwMjEyNzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tk
+        aXNwbGF5Om5vbmU7ZmlsbDojNzM3Mzc0O30KPC9zdHlsZT4NCiAgPHBhdGggZD0iTTI3LDRoLTN2MTBI
+        OFY0SDVDNC40LDQsNCw0LjQsNCw1djIyYzAsMC42LDAuNCwxLDEsMWgyMmMwLjYsMCwxLTAuNCwxLTFW
+        NUMyOCw0LjQsMjcuNiw0LDI3LDR6IE0yNCwyNEg4di02ICBoMTZWMjR6IE0xMCw0djhoMTBWNEgxMHog
+        TTE0LDEwaC0yVjZoMlYxMHoiIGNsYXNzPSJCbGFjayIgLz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <data name="btnNotResponsibleSQL.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOwDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
+        QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
+        MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iRWRpdERhdGFT
+        b3VyY2UiPg0KICAgIDxwYXRoIGQ9Ik00LDEwVjZjMC0yLjIsNC41LTQsMTAtNHMxMCwxLjgsMTAsNHY0
+        YzAsMi4yLTQuNSw0LTEwLDRTNCwxMi4yLDQsMTB6IE0yNCwxOEwyNCwxOEMyNCwxOCwyNCwxOCwyNCwx
+        OCAgIEMyNCwxOCwyNCwxOCwyNCwxOHogTTE0LDIwYzUuNSwwLDEwLTEuOCwxMC00di00YzAsMi4yLTQu
+        NSw0LTEwLDRTNCwxNC4yLDQsMTJ2NEM0LDE4LjIsOC41LDIwLDE0LDIweiBNMTUuMiwyNmw0LjgtNC44
+        ICAgYy0xLjcsMC41LTMuNywwLjgtNiwwLjhjLTUuNSwwLTEwLTEuOC0xMC00djRjMCwyLjIsNC41LDQs
+        MTAsNEMxNC40LDI2LDE0LjgsMjYsMTUuMiwyNnoiIGNsYXNzPSJZZWxsb3ciIC8+DQogICAgPHBhdGgg
+        ZD0iTTI5LDIzbC04LDhsLTQtNGw4LThMMjksMjN6IE0zMCwyMmwxLjctMS43YzAuNC0wLjQsMC40LTEs
+        MC0xLjNMMjksMTYuM2MtMC40LTAuNC0xLTAuNC0xLjMsMEwyNiwxOEwzMCwyMnogICAgTTE2LDI4djRo
+        NEwxNiwyOHoiIGNsYXNzPSJCbHVlIiAvPg0KICA8L2c+DQo8L3N2Zz4L
+</value>
+  </data>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="SimpleButton1.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABV0RVh0VGl0
+        bGUATmV4dDtBcnJvdztEb3duKXvBAwAACnFJREFUWEeVVgdUlUcWHnfTdlNxk3WTmD0REXDFBoIUYekP
+        sGIBUaOoFHvDREMRERQQEOmIYDdqYqICFoogKErUJJIISi8qqKEpSs9+uXceDzWb3T0753xn5p+5937f
+        vVPeE/7JViJgr7UIPGAjgg/bitAjtiLsS4WI+FohIk8qRFSqQsSk24m403Yi/py9oDbgvyHmjI3YmW4l
+        Ik9ZivBvLETIV+Zi21EzseWwqfDfbyJ8U0zE57uMxGfxhmRObVOypbj3dK+of7pPNLTvF/c7Dkg86DhI
+        OCQedh5iMxXBHwh/JLxEePk34DkGr7PdgHtPD4q7Tw+IO0/2i9q2faLm8R5R/ShFVLbuFuvjx5MJNd/d
+        FmS0Rwqob1eKaJAiDvKyiliSBh+20I1KtdkSl2FbkJBl+31itqI3KUfRG59h/UPcOevLO05YBPnvMRlH
+        tq+wPUEKudNGAh7vE9UqAS3JYn2cAS1R800yJ4XJ4u6TFKoECWmnahCoqTJ+OeSIuVNUunXZnlxHnC/x
+        ws374ShrjMaDjsMSZY0xNBeGrOK1SD4/FRGnzMsCDhjPJd9XCVJIbR95VWuyqGhJEl6xfQK8E81EXVsi
+        idhFIpJIxG6elllvjDUcGnbcovBgnjN+qg9FfftuVD7ajpImfxQ3+eDGw3X44eFa/NToTfBFeUso7jzZ
+        jSKy3X9hFrYeM7nq5q+jTbG4IrIalS27REVzolgXq0+f1DYmmNDexNEexZOQBJ5i8pe8k4xttn9l0Zx7
+        61PUtEWh6OeNuHZ/Ba4/YKyU+O4hj5fj2oNl+LZhKa7UL8Hlex643rAO5a07kXXTC1uPTmheFTHWgWJy
+        NaSIsuZ4sTZaj4bUPoszElWPo0hENH9K8g0x423Dj1t1Xa/djJuNPrhCQQvrCQ2eROSJq/eVvQqFDR5E
+        7o6Ce4tx8c5C5NctQG7NfHzfsAGFVZux7YhZ97KQUf0iSptixeooXeYTYm2Uvqh8FMFDWXbPwNHagYdM
+        G6/V+uDb+hW4dMdVouDuQiJYhMv1C58Dfd/jebIh5N+Zjwt185BTOxfnq1yQWemMvBoSV7kJfnsNm5zX
+        aI4kDrkdqyLHMqcQ7sE6oqw1hIdcnle8kwwun73B5fRETo0LLtTOQR4FzKubi4t35xE+wfwtw2C0YCCM
+        FzLehomrGlyDNJFb54Lz5JNd7YyMylk4Vz4Tp8sckVO9CKe+W451MWMLieMNAh9MTliIT/yHcydLvzp8
+        zNzwr2xwtWE1MqtmIItwvnqWRE6NE2XmRCTOMFn0DqrrHqDmzkPZV9Y8gOlCNSKeRVnPJPLpOFvuiPSy
+        KUi7PQUnSibhUu1KBH9hDVf/4QuJ6zUCJyzEvE1a3PHHq16xemXZJUtxrmI6zpRPwdmKKRRsGgmZhsxq
+        R+qnE8l0mLqrobunBz29vbLv6OqRc+cqHclnKk6Tb1rpZKTenkjk9jh+U4FviifiTNFyrIgYVUFcbxH6
+        qyCzd/LSsAvYZ0bldkXqLTukldlRBg5UwokUcBKJIlROljD3UEMnEXf19KKruxedJOCfNMd26WSfWuqA
+        U7fs8XWxgshtcexHaxy5YYWM8gXw22OGacvUpxCn6lZIAa+4fK4ZGZvmRIa25GhFyq1x8rYNThHSymwJ
+        CiKwI0EOsFxKAoi0s1uZfXtnj5xLvW2Hk7co2xIiLrbFlzetcfRHS3xRZIlD35nj4HUbxKc7YfYGzVji
+        fJ3AL6xU8docH62ClFwnxF40RkKBEQkxJyEWcN40GBaearBapgbr5X1YMRBPO7rxtJNA/RMCz1sxSIgF
+        wZx8Zvp8iMMUZ/81MyRcoriXJmBv3mwQFx9G3oZ+AX928dFq3FswHdEXDLAzTx8xeeORdNkY+wsmY+ba
+        MSivqkVpVQNuVdTjdmUD2tq7JB4/VaKkogEl5co1tp2xTg8p+ZNkjLh8I8TkjycYYt+VGZjnp91EnGoE
+        PgdSxeuzvbW6k6/YIyJXF5G54/pFJBaYIuALU2yKd0fvL/9C65MutLR1orWti8bUE/i75XEnmh51SZuA
+        hCXYfMiUyM0Qd9FQkkdd0MeOXH3sKZyIub7a3cQ5kMC/olLAG84btbrjL5oj/LwuduToSRFRVI3oPAMk
+        F1phQZA2MgqO08H7BT+3dqCZCJsfd6DxERN34OeWDnkgs66cwPxALSKylhlHkT/H4XgRObq0DRZwoWSJ
+        8y8vCJj5qWbjjiwTEjAWEdl9IhgXxilFXLbDNC913L1fjSftPXjY0k7owIPmDtm3tXej/mEd2WggpcBe
+        +nDW7M9xmJwRmT0BThs0eQv6BfAZeN1x1bDL274xRniWLsIyxyAse4zSgZx35OrJLCLSLeEWaC3vPmfe
+        0NSOhsZ2OeY5zyAFwtMs5dbtpIxVWTM43g5KLPiECRxXaVwlzv4zwAL+5LBEPXpjyngy1EVo5miEZo+W
+        TrIifdsSm2+MtYm62H1iGxH+gnoirycRPE45GYI1CWNpzycoRTPIj/3Ds8dSUqNprIfP9xjCwX1IInG+
+        cAtetXD5aMrCLaPIeBxCzo1ESMZIhGaM6q+GDERILLDAHH91XL+VT1ewR+L70gI4+w3BLlpT2THYjxMJ
+        zRwlY0VQ7EWBo2A6a7AzcfI7wNzKl5Dw9uRlQyv9jo6WAoLP6cieHTnAdspge19VYs7TQfIdjUdPWiXm
+        +ekiOtOC1p6Rsn1IBpGTvyqO37ExmLJCo5q4/krgl3CAcFgylHrlW0BVcJ/nPwLbM8Zi65kR2HZ2hBQS
+        rBLSJyYsWw+BXxrBN2EuNu36BAHHjKhyenJ9u8qOk6AqBp/VkXHCKOb8zSNg5jR4OXGpyj9A2HuqUy+r
+        wCfyHQdP9Wtrdo0gASOliK3k/EyIsiosaGfOeHju1IZnpBbtuaEkk1sn15WkzzASa5NGgGLfII5n2XNT
+        uKuLs7eW8FAexjHWgwwnrxzW7H1kBIJIQNDpf8heVuQ5QYz4PDPE55thmyR8Rsq2Kp+gMzrwPqqDqSuG
+        tuiYvWtGHPx/QJk9N4Wbukgv9hBpxW78yWfhDcOpH86Ytlqje/1+LWxJH04gEaeHK8UQAk+zsBeJGHK+
+        by6Q7NiPYziu0ejWn/S+C8V+h8CVHqDwkJX/NwGqrXjLYPIHsyYuHdq6PF6zT4QSgSTkRbAgAq/T9/O2
+        KxI0MWmpxiN9+/fnUEx+evnv2IA04lO4ybOnEuD2vACViDeHG71rYLv44x+cvDWw/qAWNlPQgHRtBKRR
+        T+BvJuJ+83NzbOvsMwy2i4YUaRoMNKZYnLkkZzAX88rGA55gsBBqKhG8HXxX3zOc9uFyxeIhtY5eQ7E4
+        TAPr9mpiwyEt+KdpY3OqNjYc1sK6fVpwozVHeooVi9XrDKcOXkm+fyO8SZBlZ6h4fiPAo68KvBUePK0S
+        wYeFTyxfm0FjrAZNNp399zgr1yFF1q4fl9IBBsPGdUiplevHRaazP4ofbTloKtm+T+Cs+b8fJ9JP/rsC
+        /hOoPS+ES8gV4cDvETi7D/rAY75e/L7zKWfR/cS/F5vx/zSVEL6qHJhLyoKYiMFjnuM1tlHZ/48mxK89
+        +oEotzUUCQAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="frmAdmin_notResponsibleConfig.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAAQDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
+        Qmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9CgkuWWVsbG93e2ZpbGw6I0ZG
+        QjExNTt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8cGF0aCBkPSJNMjQsMjQu
+        OFYyOEg0VjRoMjB2Ny4ybDItMlYzYzAtMC41LTAuNS0xLTEtMUgzQzIuNSwyLDIsMi41LDIsM3YyNmMw
+        LDAuNSwwLjUsMSwxLDFoMjJjMC41LDAsMS0wLjUsMS0xdi02LjIgIEwyNCwyNC44eiIgY2xhc3M9IkJs
+        YWNrIiAvPg0KICA8cGF0aCBkPSJNMjksMTdsLTgsOGwtNC00bDgtOEwyOSwxN3ogTTMwLDE2bDEuNy0x
+        LjdjMC40LTAuNCwwLjQtMSwwLTEuM0wyOSwxMC4zYy0wLjQtMC40LTEtMC40LTEuMywwTDI2LDEyTDMw
+        LDE2eiAgIE0xNiwyMnY0aDRMMTYsMjJ6IiBjbGFzcz0iQmx1ZSIgLz4NCjwvc3ZnPgs=
+</value>
+  </data>
+</root>

app/TaskFlow/frmAdmin_notResponsibleConfig.vb

@@ -0,0 +1,142 @@
+Imports DigitalData.GUIs.Common
+Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
+
+Public Class frmAdmin_notResponsibleConfig
+    Dim oProfilID As Integer = 0
+    Dim oCaption As String = ""
+    Dim oQuestion As String = ""
+    Dim oNotResponsible_SQL As String
+    Public Sub New(pProfilID As Integer)
+        MyBase.New()
+        oProfilID = pProfilID
+
+        InitializeComponent()
+        ' Add any initialization after the InitializeComponent() call.
+
+    End Sub
+    Private Sub txtCaption_NotResponsible_TextChanged(sender As Object, e As EventArgs) Handles txtCaption_NotResponsible.TextChanged
+        If txtCaption_NotResponsible.Text <> String.Empty Then
+            SimpleButton1.Text = txtCaption_NotResponsible.Text
+        End If
+    End Sub
+
+    Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+        Dim oUpd = $"UPDATE TBPM_PROFILE SET NOT_RESP_SQL = '{oNotResponsible_SQL.Replace("'", "''")}',NOT_RESP_COMMENT_ATTRIBUTE = '{cmbAttrComment.Text}', CHANGED_WHO = '{User.UserName}' WHERE GUID = {oProfilID}"
+        If DatabaseECM.ExecuteNonQuery(oUpd) = True Then
+            oUpd = $"EXEC PRDD_GUI_LANGUAGE_PHRASE 'PM','PROFILE_NOT_RESPONSIBLE_QUEST{oProfilID}','{USER_LANGUAGE}','PROFILE_NOT_RESPONSIBLE_QUEST','{txtPROFILE_NOT_RESPONSIBLE_QUEST.Text}','','{USER_USERNAME}','{oProfilID}',0"
+            If DatabaseECM.ExecuteNonQuery(oUpd) Then
+                oUpd = $"EXEC PRDD_GUI_LANGUAGE_PHRASE 'PM','PROFILE_REJECTION_CAPT{oProfilID}','{USER_LANGUAGE}','PROFILE_REJECTION_CAPT','{txtCaption_NotResponsible.Text}','','{USER_USERNAME}','{oProfilID}',0"
+                bstitmInfo.Caption = "Data saved successfully - " + Now.ToString
+
+
+            End If
+        Else
+            bstitmInfo.Caption = "Attention: Error storing data - Check Your log"
+        End If
+    End Sub
+
+    Private Sub frmAdmin_notResponsibleConfig_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Try
+            Dim oNR_Act_Attr As String
+            Dim oSQL = $"SELECT NOT_RESP_SQL, NOT_RESP_COMMENT_ATTRIBUTE FROM TBPM_PROFILE WHERE GUID = {oProfilID}"
+            Dim oDT = DatabaseECM.GetDatatable(oSQL)
+            oNotResponsible_SQL = oDT.Rows(0).Item("NOT_RESP_SQL")
+            oNR_Act_Attr = oDT.Rows(0).Item("NOT_RESP_COMMENT_ATTRIBUTE")
+            LOGGER.Debug($"oNR_Act_Attr: {oNR_Act_Attr}")
+
+
+            For Each oRow As DataRow In CURRENT_DT_PROFILE_LANGUAGE.Rows
+                If oRow.Item("TITLE") = $"PROFILE_NOT_RESPONSIBLE_CAPT{oProfilID}" And oRow.Item("LANGUAGE") = USER_LANGUAGE Then
+                    oCaption = oRow.Item("STRING1")
+                ElseIf oRow.Item("TITLE") = $"PROFILE_NOT_RESPONSIBLE_QUEST{oProfilID}" And oRow.Item("LANGUAGE") = USER_LANGUAGE Then
+                    oQuestion = oRow.Item("STRING1")
+                End If
+            Next
+
+
+            If IDB_ACTIVE = False Then
+                If MyIndicies IsNot Nothing Then
+                    Dim i As Integer = 0
+                    For Each index As String In MyIndicies
+                        Dim _vektorString = False
+                        Dim oIndexType = WINDREAM.GetTypeOfIndex(index)
+                        i += 1
+                        MyIndicies_Types.Add(oIndexType)
+                        Select Case oIndexType
+                            Case 4097
+                                _vektorString = True
+                            Case 36865
+                                _vektorString = True
+                            Case Else
+                                _vektorString = False
+                        End Select
+                        If _vektorString = False Then
+                            Me.cmbAttrComment.Items.Add(index)
+                        End If
+
+                    Next
+                End If
+            Else
+                For Each oRow As DataRow In IDBData.DTVWIDB_BE_ATTRIBUTE.Rows
+                    Dim oOk As Boolean = False
+                    Select Case CInt(oRow.Item("TYP_ID"))
+                        Case 1
+                            oOk = True
+                    End Select
+                    If oOk Then
+                        Me.cmbAttrComment.Items.Add(oRow.Item("ATTR_TITLE"))
+                    End If
+                Next
+            End If
+            If oNR_Act_Attr <> "" Then
+                cmbAttrComment.SelectedIndex = cmbAttrComment.FindStringExact(oNR_Act_Attr)
+            Else
+                cmbAttrComment.SelectedIndex = -1
+            End If
+
+            txtPROFILE_NOT_RESPONSIBLE_QUEST.Text = oQuestion
+            txtCaption_NotResponsible.Text = oCaption
+        Catch ex As Exception
+            MsgBox("Error in Loading Form: " & vbNewLine & vbNewLine & ex.Message)
+        End Try
+
+    End Sub
+
+    Private Sub btnNotResponsibleSQL_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnNotResponsibleSQL.ItemClick
+        Try
+            CURRENT_ProfilGUID = oProfilID
+            CURRENT_DESIGN_TYPE = "SQL_NOT_RESPONSIBLE"
+            Dim oldSQL = oNotResponsible_SQL
+            Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
+                .SQLCommand = oNotResponsible_SQL,
+                .SQLConnection = 0,
+                .PlaceholdersManualPrefix = "CTRL",
+                .PlaceholdersManualTitle = "Controls",
+                .PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.ToDictionary(Function(name) name, Function(name) name)
+            }
+            oForm.ShowDialog()
+
+            If oForm.DialogResult = DialogResult.OK Then
+                If oldSQL <> oForm.SQLCommand Then
+                    Dim oResult As MsgBoxResult = MsgBox("Do You want to save the changed NotResponsible-SQL?", MsgBoxStyle.YesNo, ADDITIONAL_TITLE)
+                    'wenn Speichern ja
+                    If oResult = DialogResult.Yes Then
+                        Dim oUpdate As String = $"Update TBPM_PROFILE SET CHANGED_WHO = '{USER_USERNAME}', NOT_RESP_SQL = '{oForm.SQLCommand.Replace("'", "''")}' WHERE GUID = {CURRENT_ProfilGUID}"
+                        If DatabaseFallback.ExecuteNonQueryECM(oUpdate) = True Then
+                            oNotResponsible_SQL = oForm.SQLCommand
+                            bstitmInfo.Caption = $"SQL saved - {Now.ToLongTimeString}"
+                            CHANGES_FORM_DESIGN = True
+                        End If
+                    End If
+                End If
+            End If
+        Catch ex As Exception
+            MsgBox("Error in Saving Profile SQL: " & vbNewLine & vbNewLine & ex.Message)
+        End Try
+    End Sub
+
+    Private Sub frmAdmin_notResponsibleConfig_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
+        Dim oSQL = $"select * from TBDD_GUI_LANGUAGE_PHRASE WHERE MODULE = 'PM' AND TITLE LIKE 'PROFILE_%'"
+        CURRENT_DT_PROFILE_LANGUAGE = DatabaseECM.GetDatatable(oSQL)
+    End Sub
+End Class

app/TaskFlow/frmAdmin_rejectionConfig.Designer.vb

@@ -0,0 +1,264 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmAdmin_rejectionConfig
+    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(frmAdmin_rejectionConfig))
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
+        Me.bstitmInfo = New DevExpress.XtraBars.BarStaticItem()
+        Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem4 = 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.Label1 = New System.Windows.Forms.Label()
+        Me.txtCaption_Rejection = New System.Windows.Forms.TextBox()
+        Me.Label9 = New System.Windows.Forms.Label()
+        Me.cmbAttrRejReas = New System.Windows.Forms.ComboBox()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.cmbAttrRejComment = New System.Windows.Forms.ComboBox()
+        Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
+        Me.Label3 = New System.Windows.Forms.Label()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.EmptyAreaImageOptions.ImagePadding = New System.Windows.Forms.Padding(45, 44, 45, 44)
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.bstitmInfo, Me.BarButtonItem3, Me.BarButtonItem4})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.Margin = New System.Windows.Forms.Padding(4)
+        Me.RibbonControl1.MaxItemId = 6
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.OptionsMenuMinWidth = 495
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.Size = New System.Drawing.Size(1231, 158)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "Abschluss Prüfung"
+        Me.BarButtonItem1.Id = 1
+        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'BarButtonItem2
+        '
+        Me.BarButtonItem2.Caption = "Speichern"
+        Me.BarButtonItem2.Id = 2
+        Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem2.Name = "BarButtonItem2"
+        '
+        'bstitmInfo
+        '
+        Me.bstitmInfo.Id = 3
+        Me.bstitmInfo.Name = "bstitmInfo"
+        '
+        'BarButtonItem3
+        '
+        Me.BarButtonItem3.Caption = "BarButtonItem3"
+        Me.BarButtonItem3.Id = 4
+        Me.BarButtonItem3.Name = "BarButtonItem3"
+        '
+        'BarButtonItem4
+        '
+        Me.BarButtonItem4.Caption = "Gründe Ablehnung"
+        Me.BarButtonItem4.Id = 5
+        Me.BarButtonItem4.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem4.Name = "BarButtonItem4"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "Start"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "Aktionen"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem4)
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "SQL Design"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.bstitmInfo)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 528)
+        Me.RibbonStatusBar1.Margin = New System.Windows.Forms.Padding(4)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1231, 22)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.Location = New System.Drawing.Point(18, 184)
+        Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(181, 16)
+        Me.Label1.TabIndex = 2
+        Me.Label1.Text = "Beschriftung Button Ablehnung"
+        '
+        'txtCaption_Rejection
+        '
+        Me.txtCaption_Rejection.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtCaption_Rejection.Location = New System.Drawing.Point(22, 207)
+        Me.txtCaption_Rejection.Margin = New System.Windows.Forms.Padding(4)
+        Me.txtCaption_Rejection.Name = "txtCaption_Rejection"
+        Me.txtCaption_Rejection.Size = New System.Drawing.Size(197, 23)
+        Me.txtCaption_Rejection.TabIndex = 3
+        '
+        'Label9
+        '
+        Me.Label9.AutoSize = True
+        Me.Label9.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label9.ImeMode = System.Windows.Forms.ImeMode.NoControl
+        Me.Label9.Location = New System.Drawing.Point(352, 184)
+        Me.Label9.Name = "Label9"
+        Me.Label9.Size = New System.Drawing.Size(159, 16)
+        Me.Label9.TabIndex = 89
+        Me.Label9.Text = "Attribut Ablehnungsgründe"
+        '
+        'cmbAttrRejReas
+        '
+        Me.cmbAttrRejReas.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cmbAttrRejReas.FormattingEnabled = True
+        Me.cmbAttrRejReas.Location = New System.Drawing.Point(356, 206)
+        Me.cmbAttrRejReas.Name = "cmbAttrRejReas"
+        Me.cmbAttrRejReas.Size = New System.Drawing.Size(295, 24)
+        Me.cmbAttrRejReas.TabIndex = 88
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label2.ImeMode = System.Windows.Forms.ImeMode.NoControl
+        Me.Label2.Location = New System.Drawing.Point(352, 243)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(152, 16)
+        Me.Label2.TabIndex = 93
+        Me.Label2.Text = "Attribut Ablehnungsgrund"
+        '
+        'cmbAttrRejComment
+        '
+        Me.cmbAttrRejComment.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cmbAttrRejComment.FormattingEnabled = True
+        Me.cmbAttrRejComment.Location = New System.Drawing.Point(356, 265)
+        Me.cmbAttrRejComment.Name = "cmbAttrRejComment"
+        Me.cmbAttrRejComment.Size = New System.Drawing.Size(295, 24)
+        Me.cmbAttrRejComment.TabIndex = 92
+        '
+        'SimpleButton1
+        '
+        Me.SimpleButton1.Appearance.BackColor = System.Drawing.Color.Red
+        Me.SimpleButton1.Appearance.BorderColor = System.Drawing.Color.Red
+        Me.SimpleButton1.Appearance.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.SimpleButton1.Appearance.Options.UseBackColor = True
+        Me.SimpleButton1.Appearance.Options.UseBorderColor = True
+        Me.SimpleButton1.Appearance.Options.UseFont = True
+        Me.SimpleButton1.ImageOptions.Image = CType(resources.GetObject("SimpleButton1.ImageOptions.Image"), System.Drawing.Image)
+        Me.SimpleButton1.Location = New System.Drawing.Point(22, 269)
+        Me.SimpleButton1.Name = "SimpleButton1"
+        Me.SimpleButton1.Size = New System.Drawing.Size(197, 42)
+        Me.SimpleButton1.TabIndex = 96
+        Me.SimpleButton1.Text = "SimpleButton1"
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label3.Location = New System.Drawing.Point(18, 243)
+        Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(60, 16)
+        Me.Label3.TabIndex = 97
+        Me.Label3.Text = "Vorschau"
+        '
+        'frmAdmin_rejectionConfig
+        '
+        Me.Appearance.Options.UseFont = True
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 19.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(1231, 550)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.SimpleButton1)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.cmbAttrRejComment)
+        Me.Controls.Add(Me.Label9)
+        Me.Controls.Add(Me.cmbAttrRejReas)
+        Me.Controls.Add(Me.txtCaption_Rejection)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.Font = New System.Drawing.Font("Tahoma", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.IconOptions.SvgImage = CType(resources.GetObject("frmAdmin_rejectionConfig.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.Margin = New System.Windows.Forms.Padding(4)
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "frmAdmin_rejectionConfig"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "Konfiguration Ablehnung"
+        CType(Me.RibbonControl1, 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 BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents Label1 As Label
+    Friend WithEvents txtCaption_Rejection As TextBox
+    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents bstitmInfo As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents Label9 As Label
+    Friend WithEvents cmbAttrRejReas As ComboBox
+    Friend WithEvents Label2 As Label
+    Friend WithEvents cmbAttrRejComment As ComboBox
+    Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton
+    Friend WithEvents Label3 As Label
+End Class

app/TaskFlow/frmAdmin_rejectionConfig.resx

@@ -0,0 +1,253 @@
+<?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.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOwDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
+        QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
+        MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iRWRpdERhdGFT
+        b3VyY2UiPg0KICAgIDxwYXRoIGQ9Ik00LDEwVjZjMC0yLjIsNC41LTQsMTAtNHMxMCwxLjgsMTAsNHY0
+        YzAsMi4yLTQuNSw0LTEwLDRTNCwxMi4yLDQsMTB6IE0yNCwxOEwyNCwxOEMyNCwxOCwyNCwxOCwyNCwx
+        OCAgIEMyNCwxOCwyNCwxOCwyNCwxOHogTTE0LDIwYzUuNSwwLDEwLTEuOCwxMC00di00YzAsMi4yLTQu
+        NSw0LTEwLDRTNCwxNC4yLDQsMTJ2NEM0LDE4LjIsOC41LDIwLDE0LDIweiBNMTUuMiwyNmw0LjgtNC44
+        ICAgYy0xLjcsMC41LTMuNywwLjgtNiwwLjhjLTUuNSwwLTEwLTEuOC0xMC00djRjMCwyLjIsNC41LDQs
+        MTAsNEMxNC40LDI2LDE0LjgsMjYsMTUuMiwyNnoiIGNsYXNzPSJZZWxsb3ciIC8+DQogICAgPHBhdGgg
+        ZD0iTTI5LDIzbC04LDhsLTQtNGw4LThMMjksMjN6IE0zMCwyMmwxLjctMS43YzAuNC0wLjQsMC40LTEs
+        MC0xLjNMMjksMTYuM2MtMC40LTAuNC0xLTAuNC0xLjMsMEwyNiwxOEwzMCwyMnogICAgTTE2LDI4djRo
+        NEwxNiwyOHoiIGNsYXNzPSJCbHVlIiAvPg0KICA8L2c+DQo8L3N2Zz4L
+</value>
+  </data>
+  <data name="BarButtonItem2.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAMICAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzczNzM3NDt9Cgku
+        WWVsbG93e2ZpbGw6I0ZDQjAxQjt9CgkuR3JlZW57ZmlsbDojMTI5QzQ5O30KCS5CbHVle2ZpbGw6IzM4
+        N0NCNzt9CgkuUmVke2ZpbGw6I0QwMjEyNzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tk
+        aXNwbGF5Om5vbmU7ZmlsbDojNzM3Mzc0O30KPC9zdHlsZT4NCiAgPHBhdGggZD0iTTI3LDRoLTN2MTBI
+        OFY0SDVDNC40LDQsNCw0LjQsNCw1djIyYzAsMC42LDAuNCwxLDEsMWgyMmMwLjYsMCwxLTAuNCwxLTFW
+        NUMyOCw0LjQsMjcuNiw0LDI3LDR6IE0yNCwyNEg4di02ICBoMTZWMjR6IE0xMCw0djhoMTBWNEgxMHog
+        TTE0LDEwaC0yVjZoMlYxMHoiIGNsYXNzPSJCbGFjayIgLz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <data name="BarButtonItem4.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOwDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
+        QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
+        MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iRWRpdERhdGFT
+        b3VyY2UiPg0KICAgIDxwYXRoIGQ9Ik00LDEwVjZjMC0yLjIsNC41LTQsMTAtNHMxMCwxLjgsMTAsNHY0
+        YzAsMi4yLTQuNSw0LTEwLDRTNCwxMi4yLDQsMTB6IE0yNCwxOEwyNCwxOEMyNCwxOCwyNCwxOCwyNCwx
+        OCAgIEMyNCwxOCwyNCwxOCwyNCwxOHogTTE0LDIwYzUuNSwwLDEwLTEuOCwxMC00di00YzAsMi4yLTQu
+        NSw0LTEwLDRTNCwxNC4yLDQsMTJ2NEM0LDE4LjIsOC41LDIwLDE0LDIweiBNMTUuMiwyNmw0LjgtNC44
+        ICAgYy0xLjcsMC41LTMuNywwLjgtNiwwLjhjLTUuNSwwLTEwLTEuOC0xMC00djRjMCwyLjIsNC41LDQs
+        MTAsNEMxNC40LDI2LDE0LjgsMjYsMTUuMiwyNnoiIGNsYXNzPSJZZWxsb3ciIC8+DQogICAgPHBhdGgg
+        ZD0iTTI5LDIzbC04LDhsLTQtNGw4LThMMjksMjN6IE0zMCwyMmwxLjctMS43YzAuNC0wLjQsMC40LTEs
+        MC0xLjNMMjksMTYuM2MtMC40LTAuNC0xLTAuNC0xLjMsMEwyNiwxOEwzMCwyMnogICAgTTE2LDI4djRo
+        NEwxNiwyOHoiIGNsYXNzPSJCbHVlIiAvPg0KICA8L2c+DQo8L3N2Zz4L
+</value>
+  </data>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="SimpleButton1.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAB10RVh0VGl0
+        bGUAQ2xvc2U7RXhpdDtCYXJzO1JpYmJvbjtGA7noAAAI60lEQVRYR8WXd1RUZxqHzWaz6ZqiJrFEowYE
+        RVRAhYGBoQ1SFGRVEvvKqsGCx8AqqBQVNLoqxY49alBEiggaiUoHUcqAdFH6DEVEmuSf377vHQbBWXfP
+        2bN79jvn8bt3Zpjn977f/e5cBwH4vyKMmuA9g2qC9vDhW/+GP/wXeKs0wJemfqP6QCBPKsEfiXeIP73G
+        u2/gvX/B+/3gc/48fz97BgyWv53js9myItA3u3K3Hyp3++IxE+gLeg0VAcQuH2I7ylXs3IbSHSq2otTf
+        GyWMnzeKGV8vFPluIbxR5LMF+Vv/9jDR3U1KLi6QnX2DT96p2Lld3nb/DnqqCtHztAA9T2ToqcxDz+Nc
+        dJc/RHdZNrqLs9D1KB1dhanoyk9GZ+49dOb8ho7sX9GRlYD29BtoT4lFW9I1tN2NQFtiONpuXcTzhPOo
+        PxuEvC0eCnJxNwZ0gU/eLaOknbmJeH7jPJ7HvaL1+jm0xp5FawwRfQat107jWeRJtESEoeXKcbSEH0PL
+        L0fQfDEUzT8Ho+ncQTSe2Y/GU/ugCNsD+bEAyI/sRO3fvZDrsZGvvA+Jt1msGhzgvRJvT7SnxZDoFIl6
+        iTqFZ9eIyDA8u0rCiBN90maWXjqMpguhaCJx41mlWKESH98tiBsO+aM+2Bc1gT8ie8NaDvARoR7gkedG
+        vEiKIAkJBKiyK8Tlo2gOJwThETRdVElD0HguiKQkPk3ik/sgP/ETVRyIhsMBJN6B+hA/1AdtR91+bzzd
+        sQGZa1ZzgI8JtQDvy9zX0ZpdIgm1UgW1telCiBJu73kSUosVZw5Qi5VSRdheZbVHWbwT9aEkDmaxD4m3
+        om7fFtTs8cSTbT8gbeVKDjCYUAvwwQPXFWiNP08CWr9zJGB4LYnqQwG44eSA8/oGuO3ijPojgSSlNpO0
+        NmQHbjrPwcnJUxAltUBlgCdqSVzD4p88Ub3bA1W7NuLxFlfcmb9QFYC3Y9/gNB+kOjpSZVTNCaomjFp5
+        kgQn9qA62B/RUitEevogISYFEavW47qDDWqoyhqqMnq2FS67rkV8dDKuuHvhF5EhKnzdUU1rXrVrE6qo
+        9U9816F4lTPiJFIOMIRQC/BhssNc1O7dhEqPpcIVW08XEJPgZI9oL3+kZleg4kkjissbELnGHbG2UsTO
+        tib5OtzLKEFxRQNKnzQhmoJGWZjhqf8GPCVx5WZXlK6eh/yFlogxMecAnxBqAT66Z+dAqTeg3M0Z5T84
+        o+LHJaja6Y7LRkZoqJajsqYFrS960Nr+EqWP5UKIy39dj7vpJSihYM0vXqK5rRvPFC04raNLf7+cxM4o
+        XuGA4mX2yJsvQZRIwgE+JdQD/Dbbga5UN5StdkTpKhVOSHS2R9q27eh++TsFeImWNhLRXPJYgcycSpRU
+        NqLpebcAf+ae52bE2VigiKRFS+zwaKktHi22RY6jGFdnid8Y4OPbUntUbluFElcHYg6Kmb84oMJjBW7a
+        2yDDz08QCDKqlOfGfnR3/44Ub29Em4tR5r5YkBYutkHh99Yo+F6KB/ZGuDJDCPAZwbfjvsEBBt+ysqUr
+        dQW1zA5Fy3tZxrM9yj2W44bUHEle3lC0dkJBQkVrVx8NzR24u9kL0abGKNu4lKRSFLhIIXOxgozWPn+B
+        Be7PnoVwPREH+JwYEIDbMTjeXIqyTZxcisIllHyRlI5nEzYooPmGpRhRq9ejsEwBRQsFaOmCnKgn6po6
+        EOe2EdFiQ+QtsISMhLI/WyDfWSKQN88UmVYGuDjtzQGGxJlZoWSdCwq+s6KWUdtcLIVjriDOzBDXaPsl
+        JhejoFyB+maSCnQI8rqmLuSXNCBipRuuGeohx8kMeU6myGUcTZAz1wRpkmn4WdeQAwwlBvwicoBPYsWW
+        KKbtIqOrNX8BMd+ckOCWpTGi1mzA7eQiyKh6pbADnV096CBqGztQ00teUR0iXd0QI9JHjgOJ7UV4yNgZ
+        IUWsi3M6MznAMEI9AG+RAtoyefPEyCXynJRzlFiEirIa5Jc2CLJaknd09iDL3xeZfr7CcbWiQ6BK3o66
+        agUu6U3HA1tDJbT22dKZSDKehNNa+hxgOKEW4NNIQwlktNYP54ioZYSDsVDBr7aWKDx6GG0dPdT6TkGY
+        vcMfCdZmiLcyFYK002vcFf5MXkgwrpsZk3QG7lvPQBatfZalPu7M0sZJjemqAPyUNSDAZ7xFchdaUOpZ
+        QuqHPFMFsqVzEE8yDtEllyPb3w83bSQoXDYXhfReAofw80GnvAF5oSF0IRohx8VWkGZaTEemOTMNifqa
+        ODFhKgf4ghgQgNvxebg+Xyxi3JcaKLE2oCoMhDCyJXORaGeJWIkJ7jhYI3+xvbIyIn+RHW7bmuMq/QbE
+        007J/c5OkGeYTkOm6VRkmOkindb/9tQJOPaNLgf4klAPcHG6CPfpZpFFqbMs9IT0fMwVZFErZYvojrbS
+        me7pUmT1ViUgmU63WSsULnek9+iGZaaHDPEUkk5BmojRQRqt/02dcTg8VocDfEWoBRh6QXcWsuhiyZBQ
+        aoaS981chVDJVKSb0mxKAhN6nUXGfKyDdEE0GWlGOkg1nPQKWvvUmVpImDwGh0ZrqwXgfzjAMN4iGVQR
+        f1kafWmamL5UOKYvNabZhGeCRKk0pxoRLBApRSkMyVIMtZBCwpSZE5EyQxPJMyYiyUATcVqjETJiIgcY
+        QfAj+oAAQ09r6wttSxVpUxWUuh8pPHMlvfQJZtK5IJpIIqUsmWRMkoEGkvS+7eO65igEfanxTzsgbMMw
+        jWnyGB1N3NIdhwSdb4ixiJ805hXaXwvECefKY+GcoeoESBI3kdAcScJeNEYQIxE+djT2DZ/Aj+V8IxoQ
+        QHgk2zpac9HR8VOajo/XBXNs3BS6anVwZOxkgcNjJgkc+loboaMnIXSUFkJHEiO0qLXEV5oIJoKIg1Tp
+        wS+I4Ro4MHwC9g//FnuHjW9eO2TkUnKpHkqFADxUXeDndf6h4H3KW4Vb9Tq8fq8z8g2M6gef8w2Inwd5
+        yfvkPPhE1Ql+k9vzOv3/P/ifoPoeVeUDAqiG6o3/Nb1j0KB/AMYUfCkDw9hpAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="frmAdmin_rejectionConfig.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAAQDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
+        Qmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9CgkuWWVsbG93e2ZpbGw6I0ZG
+        QjExNTt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8cGF0aCBkPSJNMjQsMjQu
+        OFYyOEg0VjRoMjB2Ny4ybDItMlYzYzAtMC41LTAuNS0xLTEtMUgzQzIuNSwyLDIsMi41LDIsM3YyNmMw
+        LDAuNSwwLjUsMSwxLDFoMjJjMC41LDAsMS0wLjUsMS0xdi02LjIgIEwyNCwyNC44eiIgY2xhc3M9IkJs
+        YWNrIiAvPg0KICA8cGF0aCBkPSJNMjksMTdsLTgsOGwtNC00bDgtOEwyOSwxN3ogTTMwLDE2bDEuNy0x
+        LjdjMC40LTAuNCwwLjQtMSwwLTEuM0wyOSwxMC4zYy0wLjQtMC40LTEtMC40LTEuMywwTDI2LDEyTDMw
+        LDE2eiAgIE0xNiwyMnY0aDRMMTYsMjJ6IiBjbGFzcz0iQmx1ZSIgLz4NCjwvc3ZnPgs=
+</value>
+  </data>
+</root>

app/TaskFlow/frmAdmin_rejectionConfig.vb

@@ -0,0 +1,197 @@
+Imports System.ComponentModel
+Imports DevExpress.XtraEditors
+Imports DigitalData.GUIs.Common
+
+Public Class frmAdmin_rejectionConfig
+    Dim oProfilID As Integer = 0
+    Dim oRej_SQL As String
+    Dim oCaption As String = ""
+    Dim oRej_SQL_Reasons As String
+    Dim oRej_Act_Attr As String
+    Dim oRej_Comment_Attr As String
+    Public Sub New(pProfilID As Integer)
+        MyBase.New()
+        oProfilID = pProfilID
+
+        InitializeComponent()
+        ' Add any initialization after the InitializeComponent() call.
+
+    End Sub
+
+    Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
+        Dim oUpd = $"UPDATE TBPM_PROFILE SET BTN_REJECT_CAPTION = '{txtCaption_Rejection.Text}', REJECT_SQL_REASONS = '{oRej_SQL_Reasons.Replace("'", "''")}', REJECT_ACTIONS_ATTRIBUTE = '{cmbAttrRejReas.Text}', REJECT_COMMENT_ATTRIBUTE = '{cmbAttrRejComment.Text}', CHANGED_WHO = '{User.UserName}' WHERE GUID = {oProfilID}"
+        If DatabaseECM.ExecuteNonQuery(oUpd) = True Then
+            oUpd = $"EXEC PRDD_GUI_LANGUAGE_PHRASE 'PM','PROFILE_REJECTION_CAPT{oProfilID}','{USER_LANGUAGE}','PROFILE_REJECTION_CAPT','{txtCaption_Rejection.Text}','','{USER_USERNAME}','{oProfilID}',0"
+            If DatabaseECM.ExecuteNonQuery(oUpd) Then
+                bstitmInfo.Caption = "Data saved successfully - " + Now.ToString
+            End If
+        Else
+            bstitmInfo.Caption = "Attention: Error storing data - Check Your log"
+        End If
+
+    End Sub
+
+    Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+        Try
+            CURRENT_ProfilGUID = oProfilID
+            CURRENT_DESIGN_TYPE = "SQL_BTNFINISH"
+            Dim oldSQL = oRej_SQL
+            Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
+                .SQLCommand = oldSQL,
+                .SQLConnection = 0,
+                .PlaceholdersManualPrefix = "CTRL",
+                .PlaceholdersManualTitle = "Controls",
+                .PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.ToDictionary(Function(name) name, Function(name) name)
+            }
+            oForm.ShowDialog()
+
+            If oForm.DialogResult = DialogResult.OK Then
+                If oldSQL <> oForm.SQLCommand Then
+                    Dim oResult As MsgBoxResult = MsgBox("Do You want to save the changed SQL?", MsgBoxStyle.YesNo, ADDITIONAL_TITLE)
+                    'wenn Speichern ja
+                    If oResult = DialogResult.Yes Then
+                        Dim oUpdate As String = $"Update TBPM_PROFILE SET CHANGED_WHO = '{USER_USERNAME}', SQL_BTN_REJECT = '{oForm.SQLCommand.Replace("'", "''")}' WHERE GUID = {CURRENT_ProfilGUID}"
+                        If DatabaseFallback.ExecuteNonQueryECM(oUpdate) = True Then
+                            oRej_SQL = oForm.SQLCommand
+                            bstitmInfo.Caption = $"Profile SQL Rejection saved - {Now.ToLongTimeString}"
+                            CHANGES_FORM_DESIGN = True
+                        End If
+                    End If
+                End If
+            End If
+        Catch ex As Exception
+            MsgBox("Error in Saving Profile SQLRejection: " & vbNewLine & vbNewLine & ex.Message)
+        End Try
+    End Sub
+
+    Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem4.ItemClick
+        Try
+            CURRENT_ProfilGUID = oProfilID
+            CURRENT_DESIGN_TYPE = "SQL_REJ_REASONS"
+            Dim oldSQL = oRej_SQL_Reasons
+            Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
+                .SQLCommand = oRej_SQL_Reasons,
+                .SQLConnection = 0,
+                .PlaceholdersManualPrefix = "CTRL",
+                .PlaceholdersManualTitle = "Controls",
+                .PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.ToDictionary(Function(name) name, Function(name) name)
+            }
+            oForm.ShowDialog()
+
+            If oForm.DialogResult = DialogResult.OK Then
+                If oldSQL <> oForm.SQLCommand Then
+                    Dim oResult As MsgBoxResult = MsgBox("Do You want to save the changed Reason-SQL?", MsgBoxStyle.YesNo, ADDITIONAL_TITLE)
+                    'wenn Speichern ja
+                    If oResult = DialogResult.Yes Then
+                        Dim oUpdate As String = $"Update TBPM_PROFILE SET CHANGED_WHO = '{USER_USERNAME}', REJECT_SQL_REASONS = '{oForm.SQLCommand.Replace("'", "''")}' WHERE GUID = {CURRENT_ProfilGUID}"
+                        If DatabaseFallback.ExecuteNonQueryECM(oUpdate) = True Then
+                            oRej_SQL_Reasons = oForm.SQLCommand
+                            bstitmInfo.Caption = $"SQL Reasons saved - {Now.ToLongTimeString}"
+                            CHANGES_FORM_DESIGN = True
+                        End If
+                    End If
+                End If
+            End If
+        Catch ex As Exception
+            MsgBox("Error in Saving Profile SQLRejection: " & vbNewLine & vbNewLine & ex.Message)
+        End Try
+    End Sub
+
+    Private Sub frmAdmin_rejectionConfig_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Try
+            If IDB_ACTIVE = False Then
+                If MyIndicies IsNot Nothing Then
+                    Dim i As Integer = 0
+                    For Each index As String In MyIndicies
+                        Dim _vektorString = False
+                        Dim oIndexType = WINDREAM.GetTypeOfIndex(index)
+                        i += 1
+                        MyIndicies_Types.Add(oIndexType)
+                        Select Case oIndexType
+                            Case 4097
+                                _vektorString = True
+                            Case 36865
+                                _vektorString = True
+                            Case Else
+                                _vektorString = False
+                        End Select
+                        If _vektorString = False Then
+                            Me.cmbAttrRejReas.Items.Add(index)
+                            Me.cmbAttrRejComment.Items.Add(index)
+                        End If
+
+                    Next
+                End If
+            Else
+                For Each oRow As DataRow In IDBData.DTVWIDB_BE_ATTRIBUTE.Rows
+                    Dim oOk As Boolean = False
+                    Select Case CInt(oRow.Item("TYP_ID"))
+                        Case 1
+                            oOk = True
+                        Case 8
+                            oOk = True
+                    End Select
+                    If oOk Then
+                        Me.cmbAttrRejReas.Items.Add(oRow.Item("ATTR_TITLE"))
+                        Me.cmbAttrRejComment.Items.Add(oRow.Item("ATTR_TITLE"))
+                    End If
+                Next
+            End If
+
+
+
+            Dim oSQL = $"SELECT SQL_BTN_REJECT,BTN_REJECT_CAPTION,REJECT_SQL_REASONS,REJECT_ACTIONS_ATTRIBUTE,REJECT_COMMENT_ATTRIBUTE FROM TBPM_PROFILE WHERE GUID = {oProfilID}"
+            Dim oDT = DatabaseECM.GetDatatable(oSQL)
+            oCaption = oDT.Rows(0).Item(1)
+            oRej_SQL_Reasons = oDT.Rows(0).Item(0)
+            oRej_SQL_Reasons = oDT.Rows(0).Item(2)
+            oRej_Act_Attr = oDT.Rows(0).Item(3)
+            oRej_Comment_Attr = oDT.Rows(0).Item(4)
+            For Each oRow As DataRow In CURRENT_DT_PROFILE_LANGUAGE.Rows
+                If oRow.Item("TITLE") = $"BTN_REJECTION_CAPT{oProfilID}" And oRow.Item("LANGUAGE") = USER_LANGUAGE Then
+                    oCaption = oRow.Item("STRING1")
+                End If
+            Next
+            If oRej_Act_Attr <> "" Then
+                cmbAttrRejReas.SelectedIndex = cmbAttrRejReas.FindStringExact(oRej_Act_Attr)
+            Else
+                cmbAttrRejReas.SelectedIndex = -1
+            End If
+            If oRej_Comment_Attr <> "" Then
+                cmbAttrRejComment.SelectedIndex = cmbAttrRejComment.FindStringExact(oRej_Comment_Attr)
+            Else
+                cmbAttrRejComment.SelectedIndex = -1
+            End If
+
+            txtCaption_Rejection.Text = oCaption
+        Catch ex As Exception
+            MsgBox("Error in Loading Form: " & vbNewLine & vbNewLine & ex.Message)
+        End Try
+
+
+    End Sub
+
+    Private Sub txtCaption_Rejection_TextChanged(sender As Object, e As EventArgs) Handles txtCaption_Rejection.TextChanged
+        If txtCaption_Rejection.Text <> String.Empty Then
+            SimpleButton1.Text = txtCaption_Rejection.Text
+        End If
+
+    End Sub
+
+    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
+
+    End Sub
+
+    Private Sub Label3_Click(sender As Object, e As EventArgs) Handles Label3.Click
+
+    End Sub
+
+    Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click
+
+    End Sub
+
+    Private Sub frmAdmin_rejectionConfig_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
+        Dim oSQL = $"select * from TBDD_GUI_LANGUAGE_PHRASE WHERE MODULE = 'PM' AND TITLE LIKE 'PROFILE_%'"
+        CURRENT_DT_PROFILE_LANGUAGE = DatabaseECM.GetDatatable(oSQL)
+    End Sub
+End Class

app/TaskFlow/frmAdministration.Designer.vb

@@ -119,10 +119,12 @@ Partial Class frmAdministration
         Me.BarButtonItem25 = New DevExpress.XtraBars.BarButtonItem()
         Me.BarButtonItem26 = New DevExpress.XtraBars.BarButtonItem()
         Me.BarToggleSwitchItemEdit = New DevExpress.XtraBars.BarToggleSwitchItem()
+        Me.bbtnitmReject = New DevExpress.XtraBars.BarButtonItem()
+        Me.bbtnitmNotResponsible = New DevExpress.XtraBars.BarButtonItem()
         Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPageGroupProfile = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.rbnpggroupFinaIndexe = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -158,6 +160,8 @@ Partial Class frmAdministration
         Me.SHOW_DOCUMENTCheckBox = New System.Windows.Forms.CheckBox()
         Me.tabctrl_Profilkonfig = New System.Windows.Forms.TabControl()
         Me.TabPage5 = New System.Windows.Forms.TabPage()
+        Me.Label15 = New System.Windows.Forms.Label()
+        Me.TYPEComboBox = New System.Windows.Forms.ComboBox()
         Me.lblTargetPath = New System.Windows.Forms.Label()
         Me.TARGET_PATH_BLIND_FILETextBox = New System.Windows.Forms.TextBox()
         Me.lblDescription = New System.Windows.Forms.Label()
@@ -254,8 +258,6 @@ Partial Class frmAdministration
         Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
         Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.FolderBrowserDialog2 = New System.Windows.Forms.FolderBrowserDialog()
-        Me.TYPEComboBox = New System.Windows.Forms.ComboBox()
-        Me.Label15 = New System.Windows.Forms.Label()
         GUIDLabel = New System.Windows.Forms.Label()
         NAMELabel = New System.Windows.Forms.Label()
         ADDED_WHOLabel = New System.Windows.Forms.Label()
@@ -683,6 +685,7 @@ Partial Class frmAdministration
         Me.viewFinalIndex.Name = "viewFinalIndex"
         Me.viewFinalIndex.OptionsBehavior.Editable = False
         Me.viewFinalIndex.OptionsBehavior.ReadOnly = True
+        Me.viewFinalIndex.OptionsSelection.EnableAppearanceFocusedRow = False
         Me.viewFinalIndex.OptionsView.EnableAppearanceEvenRow = True
         Me.viewFinalIndex.OptionsView.ShowGroupPanel = False
         '
@@ -753,9 +756,9 @@ Partial Class frmAdministration
         'RibbonControl1
         '
         Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItemRefreshProfileData, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.BarButtonItem10, Me.BarButtonItem11, Me.BarButtonItem12, Me.BarButtonItem13, Me.BarButtonItem14, Me.BarButtonItem15, Me.BarButtonItem16, Me.BarButtonItem17, Me.BarButtonItem18, Me.BarButtonItem19, Me.tsbStaticInfo, Me.BarButtonItem20, Me.BarButtonItem21, Me.bbtnItemFinishSQL, Me.BarButtonItem22, Me.BarButtonItem23, Me.BarButtonItem24, Me.BarButtonItem25, Me.BarButtonItem26, Me.BarToggleSwitchItemEdit})
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItemRefreshProfileData, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.BarButtonItem10, Me.BarButtonItem11, Me.BarButtonItem12, Me.BarButtonItem13, Me.BarButtonItem14, Me.BarButtonItem15, Me.BarButtonItem16, Me.BarButtonItem17, Me.BarButtonItem18, Me.BarButtonItem19, Me.tsbStaticInfo, Me.BarButtonItem20, Me.BarButtonItem21, Me.bbtnItemFinishSQL, Me.BarButtonItem22, Me.BarButtonItem23, Me.BarButtonItem24, Me.BarButtonItem25, Me.BarButtonItem26, Me.BarToggleSwitchItemEdit, Me.bbtnitmReject, Me.bbtnitmNotResponsible})
         resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
-        Me.RibbonControl1.MaxItemId = 30
+        Me.RibbonControl1.MaxItemId = 33
         Me.RibbonControl1.Name = "RibbonControl1"
         Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage3})
         Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@@ -985,9 +988,25 @@ Partial Class frmAdministration
         Me.BarToggleSwitchItemEdit.Name = "BarToggleSwitchItemEdit"
         Me.BarToggleSwitchItemEdit.Tag = "Unlock"
         '
+        'bbtnitmReject
+        '
+        resources.ApplyResources(Me.bbtnitmReject, "bbtnitmReject")
+        Me.bbtnitmReject.Id = 30
+        Me.bbtnitmReject.ImageOptions.Image = CType(resources.GetObject("bbtnitmReject.ImageOptions.Image"), System.Drawing.Image)
+        Me.bbtnitmReject.ImageOptions.LargeImage = CType(resources.GetObject("bbtnitmReject.ImageOptions.LargeImage"), System.Drawing.Image)
+        Me.bbtnitmReject.Name = "bbtnitmReject"
+        '
+        'bbtnitmNotResponsible
+        '
+        resources.ApplyResources(Me.bbtnitmNotResponsible, "bbtnitmNotResponsible")
+        Me.bbtnitmNotResponsible.Id = 31
+        Me.bbtnitmNotResponsible.ImageOptions.Image = CType(resources.GetObject("bbtnitmNotResponsible.ImageOptions.Image"), System.Drawing.Image)
+        Me.bbtnitmNotResponsible.ImageOptions.LargeImage = CType(resources.GetObject("bbtnitmNotResponsible.ImageOptions.LargeImage"), System.Drawing.Image)
+        Me.bbtnitmNotResponsible.Name = "bbtnitmNotResponsible"
+        '
         'RibbonPage1
         '
-        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroupProfile, Me.RibbonPageGroup2, Me.RibbonPageGroup4})
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroupProfile, Me.rbnpggroupFinaIndexe, Me.RibbonPageGroup4})
         Me.RibbonPage1.Name = "RibbonPage1"
         resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
         '
@@ -1009,20 +1028,22 @@ Partial Class frmAdministration
         Me.RibbonPageGroupProfile.ItemLinks.Add(Me.BarButtonItem6)
         Me.RibbonPageGroupProfile.ItemLinks.Add(Me.BarButtonItem21)
         Me.RibbonPageGroupProfile.ItemLinks.Add(Me.bbtnItemFinishSQL)
+        Me.RibbonPageGroupProfile.ItemLinks.Add(Me.bbtnitmReject)
+        Me.RibbonPageGroupProfile.ItemLinks.Add(Me.bbtnitmNotResponsible)
         Me.RibbonPageGroupProfile.MergeOrder = 1
         Me.RibbonPageGroupProfile.Name = "RibbonPageGroupProfile"
         resources.ApplyResources(Me.RibbonPageGroupProfile, "RibbonPageGroupProfile")
         '
-        'RibbonPageGroup2
+        'rbnpggroupFinaIndexe
         '
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem16)
+        Me.rbnpggroupFinaIndexe.ItemLinks.Add(Me.BarButtonItem16)
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem18)
+        Me.rbnpggroupFinaIndexe.ItemLinks.Add(Me.BarButtonItem18)
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem15)
+        Me.rbnpggroupFinaIndexe.ItemLinks.Add(Me.BarButtonItem15)
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem17)
+        Me.rbnpggroupFinaIndexe.ItemLinks.Add(Me.BarButtonItem17)
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem19)
+        Me.rbnpggroupFinaIndexe.ItemLinks.Add(Me.BarButtonItem19)
-        Me.RibbonPageGroup2.MergeOrder = 0
+        Me.rbnpggroupFinaIndexe.MergeOrder = 0
-        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.rbnpggroupFinaIndexe.Name = "rbnpggroupFinaIndexe"
-        resources.ApplyResources(Me.RibbonPageGroup2, "RibbonPageGroup2")
+        resources.ApplyResources(Me.rbnpggroupFinaIndexe, "rbnpggroupFinaIndexe")
         '
         'RibbonPageGroup4
         '
@@ -1097,6 +1118,11 @@ Partial Class frmAdministration
         resources.ApplyResources(DISPLAY_MODELabel, "DISPLAY_MODELabel")
         DISPLAY_MODELabel.Name = "DISPLAY_MODELabel"
         '
+        'TYPELabel
+        '
+        resources.ApplyResources(TYPELabel, "TYPELabel")
+        TYPELabel.Name = "TYPELabel"
+        '
         'TBDD_USERBindingSource
         '
         Me.TBDD_USERBindingSource.DataMember = "TBDD_USER"
@@ -1343,6 +1369,19 @@ Partial Class frmAdministration
         Me.TabPage5.Name = "TabPage5"
         Me.TabPage5.UseVisualStyleBackColor = True
         '
+        'Label15
+        '
+        resources.ApplyResources(Me.Label15, "Label15")
+        Me.Label15.Name = "Label15"
+        '
+        'TYPEComboBox
+        '
+        Me.TYPEComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_PROFILEBindingSource, "TYPE", True))
+        resources.ApplyResources(Me.TYPEComboBox, "TYPEComboBox")
+        Me.TYPEComboBox.FormattingEnabled = True
+        Me.TYPEComboBox.Items.AddRange(New Object() {resources.GetString("TYPEComboBox.Items"), resources.GetString("TYPEComboBox.Items1")})
+        Me.TYPEComboBox.Name = "TYPEComboBox"
+        '
         'lblTargetPath
         '
         resources.ApplyResources(Me.lblTargetPath, "lblTargetPath")
@@ -1957,24 +1996,6 @@ Partial Class frmAdministration
         Me.RibbonPage2.Name = "RibbonPage2"
         resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
         '
-        'TYPELabel
-        '
-        resources.ApplyResources(TYPELabel, "TYPELabel")
-        TYPELabel.Name = "TYPELabel"
-        '
-        'TYPEComboBox
-        '
-        Me.TYPEComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_PROFILEBindingSource, "TYPE", True))
-        resources.ApplyResources(Me.TYPEComboBox, "TYPEComboBox")
-        Me.TYPEComboBox.FormattingEnabled = True
-        Me.TYPEComboBox.Items.AddRange(New Object() {resources.GetString("TYPEComboBox.Items"), resources.GetString("TYPEComboBox.Items1")})
-        Me.TYPEComboBox.Name = "TYPEComboBox"
-        '
-        'Label15
-        '
-        resources.ApplyResources(Me.Label15, "Label15")
-        Me.Label15.Name = "Label15"
-        '
         'frmAdministration
         '
         Me.Appearance.Options.UseFont = True
@@ -2214,7 +2235,7 @@ Partial Class frmAdministration
     Friend WithEvents BarButtonItem15 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarButtonItem16 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarButtonItem17 As DevExpress.XtraBars.BarButtonItem
-    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents rbnpggroupFinaIndexe As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents BarButtonItem18 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarButtonItem19 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents tsbStaticInfo As DevExpress.XtraBars.BarStaticItem
@@ -2291,4 +2312,6 @@ Partial Class frmAdministration
     Friend WithEvents lblTargetPath As Label
     Friend WithEvents Label15 As Label
     Friend WithEvents TYPEComboBox As ComboBox
+    Friend WithEvents bbtnitmReject As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents bbtnitmNotResponsible As DevExpress.XtraBars.BarButtonItem
 End Class

app/TaskFlow/frmAdministration.resx

@@ -247,7 +247,7 @@
     <value>58</value>
   </data>
   <data name="gridAssignedUsers.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 231</value>
+    <value>1002, 231</value>
   </data>
   <data name="gridAssignedUsers.TabIndex" type="System.Int32, mscorlib">
     <value>3</value>
@@ -301,7 +301,7 @@
     <value>0, 0</value>
   </data>
   <data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 25</value>
+    <value>1002, 25</value>
   </data>
   <data name="Panel1.TabIndex" type="System.Int32, mscorlib">
     <value>4</value>
@@ -415,7 +415,7 @@
     <value>58</value>
   </data>
   <data name="gridAvailableUsers.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 208</value>
+    <value>1002, 208</value>
   </data>
   <data name="gridAvailableUsers.TabIndex" type="System.Int32, mscorlib">
     <value>5</value>
@@ -469,7 +469,7 @@
     <value>0, 0</value>
   </data>
   <data name="Panel2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 25</value>
+    <value>1002, 25</value>
   </data>
   <data name="Panel2.TabIndex" type="System.Int32, mscorlib">
     <value>6</value>
@@ -499,7 +499,7 @@
     <value>1</value>
   </data>
   <data name="SplitContainer_Profilzuordnung2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 493</value>
+    <value>1002, 493</value>
   </data>
   <data name="SplitContainer_Profilzuordnung2.SplitterDistance" type="System.Int32, mscorlib">
     <value>256</value>
@@ -565,7 +565,7 @@
     <value>58</value>
   </data>
   <data name="gridAssignedGroups.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 202</value>
+    <value>1002, 203</value>
   </data>
   <data name="gridAssignedGroups.TabIndex" type="System.Int32, mscorlib">
     <value>3</value>
@@ -622,7 +622,7 @@
     <value>0, 0</value>
   </data>
   <data name="Panel3.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 25</value>
+    <value>1002, 25</value>
   </data>
   <data name="Panel3.TabIndex" type="System.Int32, mscorlib">
     <value>4</value>
@@ -688,7 +688,7 @@
     <value>58</value>
   </data>
   <data name="gridAvailableGroups.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 237</value>
+    <value>1002, 236</value>
   </data>
   <data name="gridAvailableGroups.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -745,7 +745,7 @@
     <value>0, 0</value>
   </data>
   <data name="Panel4.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 25</value>
+    <value>1002, 25</value>
   </data>
   <data name="Panel4.TabIndex" type="System.Int32, mscorlib">
     <value>6</value>
@@ -775,10 +775,10 @@
     <value>1</value>
   </data>
   <data name="SplitContainer1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>948, 493</value>
+    <value>1002, 493</value>
   </data>
   <data name="SplitContainer1.SplitterDistance" type="System.Int32, mscorlib">
-    <value>227</value>
+    <value>228</value>
   </data>
   <data name="SplitContainer1.TabIndex" type="System.Int32, mscorlib">
     <value>1</value>
@@ -1655,6 +1655,148 @@
   <data name="BarToggleSwitchItemEdit.Caption" xml:space="preserve">
     <value>Ent-/Sperren</value>
   </data>
+  <data name="bbtnitmReject.Caption" xml:space="preserve">
+    <value>Ablehnen konfigurieren</value>
+  </data>
+  <data name="bbtnitmReject.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAB10RVh0VGl0
+        bGUAQ2xvc2U7RXhpdDtCYXJzO1JpYmJvbjtGA7noAAADCklEQVQ4T42TaUhUURiGp0xzK1HTINrc00yz
+        1EnTMtfUGItS8YclRhAJ6o/EJW1cAjOp3CEGJDEpMYkgR81RsqgYncQlTUfTMpd05mraOCP14+1816F/
+        QRceeO8553vOd++5VzBzu0jArs0MA8aW/8BQD63fxBAYfC4Uv/p6qwBfioh8TBWJNyhkFNzEJE8eJvMZ
+        4jx8FudiNDenm9WSUGBIE9oP7Rso9PC5TU8rtL2EFFp5C89oThZYrREJjJQ3sqHtacHS40oMZqdDYu+B
+        jvMX+HtCFhsLiZ0HBjLTwD0qB1dfho8Z10lgTIKtI5kZWHv3nC1IRV1EPGRSBZ5czUHrGRHaRDF8lrX0
+        oi48Hv0ZKVDX3UN/ajoJTEhg3H8tBZruZkj2umFSOQvVkhbKKQ6NqQU8oyzPqzWYGJuFZI8bVLWlkF++
+        QgJTEpi8PnOWtVrBWo1DT8l9aLS/oV7RYewrh7EvHBZ/6LC69oufk7FHm85KRntIJAnMSGAqC43C9/tZ
+        +JaZhI7oaLwvKcfCsg4LrJPvywxOh7fFZXgZGYmptAQoE0Lwwj+YBOYkMJMGhmG2KBUTF0+j9bgf2sV3
+        WMtazKnXMKvSMLRoyyuB1E+IsQtB+HQuEM+OBpBgGwnMn/sGYTrnClp9vNCcno+hcRVmFjXgVnXgVtYx
+        vaDBgHIRT9PEkHp5YDjSB43uQhJsJ8G2Jk8/vrUGexeo59WYUa1haXUdA+VVPBuSn1DNqdFg54KBYE/U
+        Ox8lgQUJtje4+mA8WQRFTCg6E5OwznHoKymFLOAYOhiUaawz8RLkEYHo83dF7b5DJLAkgcVDOy98igvB
+        cLQQvdEn0eRyAF0BvhiJOYFhUSC6/H34MXnYcfSf8oTiiAMe7HIlgRUvkOw+iKEotpPQGYPBh9mLCsbH
+        cF8ohI5QeDtiKNQbI6IAtrMb5J77IXffi2obp78Cs7u2Tm9qdjqjxtYF1bbOqLIhnDawdkSllSMqeBxQ
+        YemAckaxhd1bVssfI/2W9EGQzVrPjn9go4cyO0KBwR+nGRqWKfsCHQAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="bbtnitmReject.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAB10RVh0VGl0
+        bGUAQ2xvc2U7RXhpdDtCYXJzO1JpYmJvbjtGA7noAAAI60lEQVRYR8WXd1RUZxqHzWaz6ZqiJrFEowYE
+        RVRAhYGBoQ1SFGRVEvvKqsGCx8AqqBQVNLoqxY49alBEiggaiUoHUcqAdFH6DEVEmuSf377vHQbBWXfP
+        2bN79jvn8bt3Zpjn977f/e5cBwH4vyKMmuA9g2qC9vDhW/+GP/wXeKs0wJemfqP6QCBPKsEfiXeIP73G
+        u2/gvX/B+/3gc/48fz97BgyWv53js9myItA3u3K3Hyp3++IxE+gLeg0VAcQuH2I7ylXs3IbSHSq2otTf
+        GyWMnzeKGV8vFPluIbxR5LMF+Vv/9jDR3U1KLi6QnX2DT96p2Lld3nb/DnqqCtHztAA9T2ToqcxDz+Nc
+        dJc/RHdZNrqLs9D1KB1dhanoyk9GZ+49dOb8ho7sX9GRlYD29BtoT4lFW9I1tN2NQFtiONpuXcTzhPOo
+        PxuEvC0eCnJxNwZ0gU/eLaOknbmJeH7jPJ7HvaL1+jm0xp5FawwRfQat107jWeRJtESEoeXKcbSEH0PL
+        L0fQfDEUzT8Ho+ncQTSe2Y/GU/ugCNsD+bEAyI/sRO3fvZDrsZGvvA+Jt1msGhzgvRJvT7SnxZDoFIl6
+        iTqFZ9eIyDA8u0rCiBN90maWXjqMpguhaCJx41mlWKESH98tiBsO+aM+2Bc1gT8ie8NaDvARoR7gkedG
+        vEiKIAkJBKiyK8Tlo2gOJwThETRdVElD0HguiKQkPk3ik/sgP/ETVRyIhsMBJN6B+hA/1AdtR91+bzzd
+        sQGZa1ZzgI8JtQDvy9zX0ZpdIgm1UgW1telCiBJu73kSUosVZw5Qi5VSRdheZbVHWbwT9aEkDmaxD4m3
+        om7fFtTs8cSTbT8gbeVKDjCYUAvwwQPXFWiNP08CWr9zJGB4LYnqQwG44eSA8/oGuO3ijPojgSSlNpO0
+        NmQHbjrPwcnJUxAltUBlgCdqSVzD4p88Ub3bA1W7NuLxFlfcmb9QFYC3Y9/gNB+kOjpSZVTNCaomjFp5
+        kgQn9qA62B/RUitEevogISYFEavW47qDDWqoyhqqMnq2FS67rkV8dDKuuHvhF5EhKnzdUU1rXrVrE6qo
+        9U9816F4lTPiJFIOMIRQC/BhssNc1O7dhEqPpcIVW08XEJPgZI9oL3+kZleg4kkjissbELnGHbG2UsTO
+        tib5OtzLKEFxRQNKnzQhmoJGWZjhqf8GPCVx5WZXlK6eh/yFlogxMecAnxBqAT66Z+dAqTeg3M0Z5T84
+        o+LHJaja6Y7LRkZoqJajsqYFrS960Nr+EqWP5UKIy39dj7vpJSihYM0vXqK5rRvPFC04raNLf7+cxM4o
+        XuGA4mX2yJsvQZRIwgE+JdQD/Dbbga5UN5StdkTpKhVOSHS2R9q27eh++TsFeImWNhLRXPJYgcycSpRU
+        NqLpebcAf+ae52bE2VigiKRFS+zwaKktHi22RY6jGFdnid8Y4OPbUntUbluFElcHYg6Kmb84oMJjBW7a
+        2yDDz08QCDKqlOfGfnR3/44Ub29Em4tR5r5YkBYutkHh99Yo+F6KB/ZGuDJDCPAZwbfjvsEBBt+ysqUr
+        dQW1zA5Fy3tZxrM9yj2W44bUHEle3lC0dkJBQkVrVx8NzR24u9kL0abGKNu4lKRSFLhIIXOxgozWPn+B
+        Be7PnoVwPREH+JwYEIDbMTjeXIqyTZxcisIllHyRlI5nEzYooPmGpRhRq9ejsEwBRQsFaOmCnKgn6po6
+        EOe2EdFiQ+QtsISMhLI/WyDfWSKQN88UmVYGuDjtzQGGxJlZoWSdCwq+s6KWUdtcLIVjriDOzBDXaPsl
+        JhejoFyB+maSCnQI8rqmLuSXNCBipRuuGeohx8kMeU6myGUcTZAz1wRpkmn4WdeQAwwlBvwicoBPYsWW
+        KKbtIqOrNX8BMd+ckOCWpTGi1mzA7eQiyKh6pbADnV096CBqGztQ00teUR0iXd0QI9JHjgOJ7UV4yNgZ
+        IUWsi3M6MznAMEI9AG+RAtoyefPEyCXynJRzlFiEirIa5Jc2CLJaknd09iDL3xeZfr7CcbWiQ6BK3o66
+        agUu6U3HA1tDJbT22dKZSDKehNNa+hxgOKEW4NNIQwlktNYP54ioZYSDsVDBr7aWKDx6GG0dPdT6TkGY
+        vcMfCdZmiLcyFYK002vcFf5MXkgwrpsZk3QG7lvPQBatfZalPu7M0sZJjemqAPyUNSDAZ7xFchdaUOpZ
+        QuqHPFMFsqVzEE8yDtEllyPb3w83bSQoXDYXhfReAofw80GnvAF5oSF0IRohx8VWkGZaTEemOTMNifqa
+        ODFhKgf4ghgQgNvxebg+Xyxi3JcaKLE2oCoMhDCyJXORaGeJWIkJ7jhYI3+xvbIyIn+RHW7bmuMq/QbE
+        007J/c5OkGeYTkOm6VRkmOkindb/9tQJOPaNLgf4klAPcHG6CPfpZpFFqbMs9IT0fMwVZFErZYvojrbS
+        me7pUmT1ViUgmU63WSsULnek9+iGZaaHDPEUkk5BmojRQRqt/02dcTg8VocDfEWoBRh6QXcWsuhiyZBQ
+        aoaS981chVDJVKSb0mxKAhN6nUXGfKyDdEE0GWlGOkg1nPQKWvvUmVpImDwGh0ZrqwXgfzjAMN4iGVQR
+        f1kafWmamL5UOKYvNabZhGeCRKk0pxoRLBApRSkMyVIMtZBCwpSZE5EyQxPJMyYiyUATcVqjETJiIgcY
+        QfAj+oAAQ09r6wttSxVpUxWUuh8pPHMlvfQJZtK5IJpIIqUsmWRMkoEGkvS+7eO65igEfanxTzsgbMMw
+        jWnyGB1N3NIdhwSdb4ixiJ805hXaXwvECefKY+GcoeoESBI3kdAcScJeNEYQIxE+djT2DZ/Aj+V8IxoQ
+        QHgk2zpac9HR8VOajo/XBXNs3BS6anVwZOxkgcNjJgkc+loboaMnIXSUFkJHEiO0qLXEV5oIJoKIg1Tp
+        wS+I4Ro4MHwC9g//FnuHjW9eO2TkUnKpHkqFADxUXeDndf6h4H3KW4Vb9Tq8fq8z8g2M6gef8w2Inwd5
+        yfvkPPhE1Ql+k9vzOv3/P/ifoPoeVeUDAqiG6o3/Nb1j0KB/AMYUfCkDw9hpAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="bbtnitmNotResponsible.Caption" xml:space="preserve">
+    <value>Nicht zuständig konfigurieren</value>
+  </data>
+  <data name="bbtnitmNotResponsible.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABV0RVh0VGl0
+        bGUATmV4dDtBcnJvdztEb3duKXvBAwAAA7ZJREFUOE81kntMk2cUxj8xZDPFjT+WCErbtR3tqBZwi2xM
+        ERnIJTNeCgzGZaxl3AcOkKROi1Uz3ZCtm7W1IBLGuChUqlPiFrdBhzKLiGBaWlBuVjZELrV1UJDk2ft1
+        2Zuc9zs553l+53zJS1nmVNS4o4V65GyjyFmVXcnbUFYbUC5vFv6haN00rNBtGitvEd4+WC/8Mk/pH0A0
+        q2mdzamjhu1ainporyFmHW32KDzDlx1q2LyoM+aje/RrPJhtxqj9IowTldD3FULRsnmpuEqgFIZ6v0xD
+        xhz1FDX6rI7aFr/OM+87fqPq6l4Mz/6IIYcag/Mn0D8nw8D8QVjsJzHi0MA6U4fT7btQpBH8HBL3mhcN
+        cU+WnuQfrmzbhWH7WdycysHNaSkkFW8gLM8LYblr8ek3fNyezoFxpggPnbVQXRMj65R/NfF6UvtK2OwC
+        ZeA/fVOV+M2Wio7JdBimMrCj0Av3LTaYrDaEFzBw64nEXe+YzIDp6fco1gavxJeyQ6ikQzy59noqfrdJ
+        8MtEAn61JaHjcQoiP/fCwtILLL1Ywfsk7/g7nZhTcMOWjM7HmWg0ZCFNwaslAE7Xlf4c/DS61z2VFkeV
+        MBB1gIEF17IbElnKcNcjSD+MbNM+LsZ1y2dIVfDGqAQZx3bVmgbd0E5knBDgnE6NPtOEO5wLS3i+uIyB
+        wUfoN0/g/CUt0o/zoX8QixtjUqSUc1eofWXsJw0D0bgwuAOXh+IRXbQe43+NYM7hgv05HUuwO13uWux+
+        Jq5YE9EyFIlWcxwSv+AsU7uL2T0qwxbU338Xjebt0HZGI618K5nuwvT8Ip7aXe784yN0LwYXreFoMG2F
+        uisE4jL2JBWby1LKfhBBezcQ5+69hWZzOA7UBkFzSYFZxyJmnrmgbTuG0ppAXLBEoG5gC9EFQ94UjA8K
+        WHpqW5KPKFHGXVZ1b4T6TgDO9m5Ek2k7Eo74otfShXvD3RDL16PJHIGqPhE0d4TQGEVIPkzeyUe+MfRD
+        8ozJZqozK3hQGQU408MnIAGq/3wPyYoAfCh/k+RkZQKn6/Q3W8lDTC5TT7xraMAqlmjtK+RXOiUVHHx7
+        yx+njXyySQCOXw7EMb0I6l4hVD0CnDL445OvOIjNZ5n9Q7x9iNeDMtgkNMRjg4DhHSn1O7+75HUUVnNx
+        9BqXQIJQdTcIR9t52F/DxR7S25nFbOe9/aov8ax2e+nrfwiJl0LF60KjpH61MTnMkbh8Nj0N0bksW1Sm
+        X+s7Yp84oqHX9vjPJ6H+BRQdQqDP8fc2AAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="bbtnitmNotResponsible.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABV0RVh0VGl0
+        bGUATmV4dDtBcnJvdztEb3duKXvBAwAACnFJREFUWEeVVgdUlUcWHnfTdlNxk3WTmD0REXDFBoIUYekP
+        sGIBUaOoFHvDREMRERQQEOmIYDdqYqICFoogKErUJJIISi8qqKEpSs9+uXceDzWb3T0753xn5p+5937f
+        vVPeE/7JViJgr7UIPGAjgg/bitAjtiLsS4WI+FohIk8qRFSqQsSk24m403Yi/py9oDbgvyHmjI3YmW4l
+        Ik9ZivBvLETIV+Zi21EzseWwqfDfbyJ8U0zE57uMxGfxhmRObVOypbj3dK+of7pPNLTvF/c7Dkg86DhI
+        OCQedh5iMxXBHwh/JLxEePk34DkGr7PdgHtPD4q7Tw+IO0/2i9q2faLm8R5R/ShFVLbuFuvjx5MJNd/d
+        FmS0Rwqob1eKaJAiDvKyiliSBh+20I1KtdkSl2FbkJBl+31itqI3KUfRG59h/UPcOevLO05YBPnvMRlH
+        tq+wPUEKudNGAh7vE9UqAS3JYn2cAS1R800yJ4XJ4u6TFKoECWmnahCoqTJ+OeSIuVNUunXZnlxHnC/x
+        ws374ShrjMaDjsMSZY0xNBeGrOK1SD4/FRGnzMsCDhjPJd9XCVJIbR95VWuyqGhJEl6xfQK8E81EXVsi
+        idhFIpJIxG6elllvjDUcGnbcovBgnjN+qg9FfftuVD7ajpImfxQ3+eDGw3X44eFa/NToTfBFeUso7jzZ
+        jSKy3X9hFrYeM7nq5q+jTbG4IrIalS27REVzolgXq0+f1DYmmNDexNEexZOQBJ5i8pe8k4xttn9l0Zx7
+        61PUtEWh6OeNuHZ/Ba4/YKyU+O4hj5fj2oNl+LZhKa7UL8Hlex643rAO5a07kXXTC1uPTmheFTHWgWJy
+        NaSIsuZ4sTZaj4bUPoszElWPo0hENH9K8g0x423Dj1t1Xa/djJuNPrhCQQvrCQ2eROSJq/eVvQqFDR5E
+        7o6Ce4tx8c5C5NctQG7NfHzfsAGFVZux7YhZ97KQUf0iSptixeooXeYTYm2Uvqh8FMFDWXbPwNHagYdM
+        G6/V+uDb+hW4dMdVouDuQiJYhMv1C58Dfd/jebIh5N+Zjwt185BTOxfnq1yQWemMvBoSV7kJfnsNm5zX
+        aI4kDrkdqyLHMqcQ7sE6oqw1hIdcnle8kwwun73B5fRETo0LLtTOQR4FzKubi4t35xE+wfwtw2C0YCCM
+        FzLehomrGlyDNJFb54Lz5JNd7YyMylk4Vz4Tp8sckVO9CKe+W451MWMLieMNAh9MTliIT/yHcydLvzp8
+        zNzwr2xwtWE1MqtmIItwvnqWRE6NE2XmRCTOMFn0DqrrHqDmzkPZV9Y8gOlCNSKeRVnPJPLpOFvuiPSy
+        KUi7PQUnSibhUu1KBH9hDVf/4QuJ6zUCJyzEvE1a3PHHq16xemXZJUtxrmI6zpRPwdmKKRRsGgmZhsxq
+        R+qnE8l0mLqrobunBz29vbLv6OqRc+cqHclnKk6Tb1rpZKTenkjk9jh+U4FviifiTNFyrIgYVUFcbxH6
+        qyCzd/LSsAvYZ0bldkXqLTukldlRBg5UwokUcBKJIlROljD3UEMnEXf19KKruxedJOCfNMd26WSfWuqA
+        U7fs8XWxgshtcexHaxy5YYWM8gXw22OGacvUpxCn6lZIAa+4fK4ZGZvmRIa25GhFyq1x8rYNThHSymwJ
+        CiKwI0EOsFxKAoi0s1uZfXtnj5xLvW2Hk7co2xIiLrbFlzetcfRHS3xRZIlD35nj4HUbxKc7YfYGzVji
+        fJ3AL6xU8docH62ClFwnxF40RkKBEQkxJyEWcN40GBaearBapgbr5X1YMRBPO7rxtJNA/RMCz1sxSIgF
+        wZx8Zvp8iMMUZ/81MyRcoriXJmBv3mwQFx9G3oZ+AX928dFq3FswHdEXDLAzTx8xeeORdNkY+wsmY+ba
+        MSivqkVpVQNuVdTjdmUD2tq7JB4/VaKkogEl5co1tp2xTg8p+ZNkjLh8I8TkjycYYt+VGZjnp91EnGoE
+        PgdSxeuzvbW6k6/YIyJXF5G54/pFJBaYIuALU2yKd0fvL/9C65MutLR1orWti8bUE/i75XEnmh51SZuA
+        hCXYfMiUyM0Qd9FQkkdd0MeOXH3sKZyIub7a3cQ5kMC/olLAG84btbrjL5oj/LwuduToSRFRVI3oPAMk
+        F1phQZA2MgqO08H7BT+3dqCZCJsfd6DxERN34OeWDnkgs66cwPxALSKylhlHkT/H4XgRObq0DRZwoWSJ
+        8y8vCJj5qWbjjiwTEjAWEdl9IhgXxilFXLbDNC913L1fjSftPXjY0k7owIPmDtm3tXej/mEd2WggpcBe
+        +nDW7M9xmJwRmT0BThs0eQv6BfAZeN1x1bDL274xRniWLsIyxyAse4zSgZx35OrJLCLSLeEWaC3vPmfe
+        0NSOhsZ2OeY5zyAFwtMs5dbtpIxVWTM43g5KLPiECRxXaVwlzv4zwAL+5LBEPXpjyngy1EVo5miEZo+W
+        TrIifdsSm2+MtYm62H1iGxH+gnoirycRPE45GYI1CWNpzycoRTPIj/3Ds8dSUqNprIfP9xjCwX1IInG+
+        cAtetXD5aMrCLaPIeBxCzo1ESMZIhGaM6q+GDERILLDAHH91XL+VT1ewR+L70gI4+w3BLlpT2THYjxMJ
+        zRwlY0VQ7EWBo2A6a7AzcfI7wNzKl5Dw9uRlQyv9jo6WAoLP6cieHTnAdspge19VYs7TQfIdjUdPWiXm
+        +ekiOtOC1p6Rsn1IBpGTvyqO37ExmLJCo5q4/krgl3CAcFgylHrlW0BVcJ/nPwLbM8Zi65kR2HZ2hBQS
+        rBLSJyYsWw+BXxrBN2EuNu36BAHHjKhyenJ9u8qOk6AqBp/VkXHCKOb8zSNg5jR4OXGpyj9A2HuqUy+r
+        wCfyHQdP9Wtrdo0gASOliK3k/EyIsiosaGfOeHju1IZnpBbtuaEkk1sn15WkzzASa5NGgGLfII5n2XNT
+        uKuLs7eW8FAexjHWgwwnrxzW7H1kBIJIQNDpf8heVuQ5QYz4PDPE55thmyR8Rsq2Kp+gMzrwPqqDqSuG
+        tuiYvWtGHPx/QJk9N4Wbukgv9hBpxW78yWfhDcOpH86Ytlqje/1+LWxJH04gEaeHK8UQAk+zsBeJGHK+
+        by6Q7NiPYziu0ejWn/S+C8V+h8CVHqDwkJX/NwGqrXjLYPIHsyYuHdq6PF6zT4QSgSTkRbAgAq/T9/O2
+        KxI0MWmpxiN9+/fnUEx+evnv2IA04lO4ybOnEuD2vACViDeHG71rYLv44x+cvDWw/qAWNlPQgHRtBKRR
+        T+BvJuJ+83NzbOvsMwy2i4YUaRoMNKZYnLkkZzAX88rGA55gsBBqKhG8HXxX3zOc9uFyxeIhtY5eQ7E4
+        TAPr9mpiwyEt+KdpY3OqNjYc1sK6fVpwozVHeooVi9XrDKcOXkm+fyO8SZBlZ6h4fiPAo68KvBUePK0S
+        wYeFTyxfm0FjrAZNNp399zgr1yFF1q4fl9IBBsPGdUiplevHRaazP4ofbTloKtm+T+Cs+b8fJ9JP/rsC
+        /hOoPS+ES8gV4cDvETi7D/rAY75e/L7zKWfR/cS/F5vx/zSVEL6qHJhLyoKYiMFjnuM1tlHZ/48mxK89
+        +oEotzUUCQAAAABJRU5ErkJggg==
+</value>
+  </data>
   <data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
     <value>0, 0</value>
   </data>
@@ -1664,7 +1806,7 @@
   <data name="RibbonPageGroupProfile.Text" xml:space="preserve">
     <value>Profil-Verwaltung</value>
   </data>
-  <data name="RibbonPageGroup2.Text" xml:space="preserve">
+  <data name="rbnpggroupFinaIndexe.Text" xml:space="preserve">
     <value>Finale Indexe</value>
   </data>
   <data name="RibbonPageGroup4.Text" xml:space="preserve">
@@ -1680,13 +1822,13 @@
     <value>Grundeinstellungen</value>
   </data>
   <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1252, 158</value>
+    <value>1306, 158</value>
   </data>
   <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
     <value>0, 721</value>
   </data>
   <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1252, 22</value>
+    <value>1306, 22</value>
   </data>
   <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
     <value>RibbonStatusBar1</value>
@@ -1713,7 +1855,7 @@
     <value>2</value>
   </data>
   <data name="pgFinalIndexes.Size" type="System.Drawing.Size, System.Drawing">
-    <value>407, 377</value>
+    <value>461, 377</value>
   </data>
   <data name="pgFinalIndexes.TabIndex" type="System.Int32, mscorlib">
     <value>92</value>
@@ -1746,7 +1888,7 @@
     <value>1</value>
   </data>
   <data name="SplitContainerControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>923, 377</value>
+    <value>977, 377</value>
   </data>
   <data name="SplitContainerControl1.TabIndex" type="System.Int32, mscorlib">
     <value>94</value>
@@ -2021,6 +2163,39 @@
   <data name="&gt;&gt;DISPLAY_MODELabel.ZOrder" xml:space="preserve">
     <value>13</value>
   </data>
+  <metadata name="TYPELabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>False</value>
+  </metadata>
+  <data name="TYPELabel.AutoSize" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="TYPELabel.Font" type="System.Drawing.Font, System.Drawing">
+    <value>Tahoma, 9.75pt</value>
+  </data>
+  <data name="TYPELabel.Location" type="System.Drawing.Point, System.Drawing">
+    <value>553, 45</value>
+  </data>
+  <data name="TYPELabel.Size" type="System.Drawing.Size, System.Drawing">
+    <value>33, 16</value>
+  </data>
+  <data name="TYPELabel.TabIndex" type="System.Int32, mscorlib">
+    <value>93</value>
+  </data>
+  <data name="TYPELabel.Text" xml:space="preserve">
+    <value>Typ:</value>
+  </data>
+  <data name="&gt;&gt;TYPELabel.Name" xml:space="preserve">
+    <value>TYPELabel</value>
+  </data>
+  <data name="&gt;&gt;TYPELabel.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;TYPELabel.Parent" xml:space="preserve">
+    <value>TabPage5</value>
+  </data>
+  <data name="&gt;&gt;TYPELabel.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
   <metadata name="TBDD_USERBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>1669, 17</value>
   </metadata>
@@ -2121,7 +2296,7 @@
     <value>202, 161</value>
   </data>
   <data name="FINAL_TEXTTextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>546, 23</value>
+    <value>545, 23</value>
   </data>
   <data name="FINAL_TEXTTextBox.TabIndex" type="System.Int32, mscorlib">
     <value>8</value>
@@ -2537,39 +2712,6 @@
   <data name="&gt;&gt;Label15.ZOrder" xml:space="preserve">
     <value>0</value>
   </data>
-  <metadata name="TYPELabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>False</value>
-  </metadata>
-  <data name="TYPELabel.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="TYPELabel.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Tahoma, 9.75pt</value>
-  </data>
-  <data name="TYPELabel.Location" type="System.Drawing.Point, System.Drawing">
-    <value>553, 45</value>
-  </data>
-  <data name="TYPELabel.Size" type="System.Drawing.Size, System.Drawing">
-    <value>33, 16</value>
-  </data>
-  <data name="TYPELabel.TabIndex" type="System.Int32, mscorlib">
-    <value>93</value>
-  </data>
-  <data name="TYPELabel.Text" xml:space="preserve">
-    <value>Typ:</value>
-  </data>
-  <data name="&gt;&gt;TYPELabel.Name" xml:space="preserve">
-    <value>TYPELabel</value>
-  </data>
-  <data name="&gt;&gt;TYPELabel.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;TYPELabel.Parent" xml:space="preserve">
-    <value>TabPage5</value>
-  </data>
-  <data name="&gt;&gt;TYPELabel.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
   <data name="TYPEComboBox.Font" type="System.Drawing.Font, System.Drawing">
     <value>Tahoma, 9.75pt</value>
   </data>
@@ -2940,7 +3082,7 @@
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPage5.Size" type="System.Drawing.Size, System.Drawing">
-    <value>946, 426</value>
+    <value>1000, 426</value>
   </data>
   <data name="TabPage5.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -2970,7 +3112,7 @@
     <value>3, 23</value>
   </data>
   <data name="Panel5.Size" type="System.Drawing.Size, System.Drawing">
-    <value>923, 377</value>
+    <value>977, 377</value>
   </data>
   <data name="Panel5.TabIndex" type="System.Int32, mscorlib">
     <value>94</value>
@@ -2997,7 +3139,7 @@
     <value>3, 3</value>
   </data>
   <data name="Label6.Size" type="System.Drawing.Size, System.Drawing">
-    <value>926, 385</value>
+    <value>980, 385</value>
   </data>
   <data name="Label6.TabIndex" type="System.Int32, mscorlib">
     <value>75</value>
@@ -3027,7 +3169,7 @@
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPage11.Size" type="System.Drawing.Size, System.Drawing">
-    <value>932, 391</value>
+    <value>986, 391</value>
   </data>
   <data name="TabPage11.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -3213,7 +3355,7 @@
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPage12.Size" type="System.Drawing.Size, System.Drawing">
-    <value>932, 394</value>
+    <value>986, 394</value>
   </data>
   <data name="TabPage12.TabIndex" type="System.Int32, mscorlib">
     <value>1</value>
@@ -3243,7 +3385,7 @@
     <value>3, 3</value>
   </data>
   <data name="TabControl2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>940, 420</value>
+    <value>994, 420</value>
   </data>
   <data name="TabControl2.TabIndex" type="System.Int32, mscorlib">
     <value>92</value>
@@ -3267,7 +3409,7 @@
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPageAfterIndex.Size" type="System.Drawing.Size, System.Drawing">
-    <value>946, 426</value>
+    <value>1000, 426</value>
   </data>
   <data name="TabPageAfterIndex.TabIndex" type="System.Int32, mscorlib">
     <value>1</value>
@@ -3291,7 +3433,7 @@
     <value>3, 70</value>
   </data>
   <data name="tabctrl_Profilkonfig.Size" type="System.Drawing.Size, System.Drawing">
-    <value>954, 455</value>
+    <value>1008, 455</value>
   </data>
   <data name="tabctrl_Profilkonfig.TabIndex" type="System.Int32, mscorlib">
     <value>6</value>
@@ -3342,7 +3484,7 @@
     <value>3, 3</value>
   </data>
   <data name="pnlEdit.Size" type="System.Drawing.Size, System.Drawing">
-    <value>962, 528</value>
+    <value>1016, 528</value>
   </data>
   <data name="pnlEdit.TabIndex" type="System.Int32, mscorlib">
     <value>28</value>
@@ -3366,7 +3508,7 @@
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPage1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>968, 534</value>
+    <value>1022, 534</value>
   </data>
   <data name="TabPage1.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -3393,7 +3535,7 @@
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPage7.Size" type="System.Drawing.Size, System.Drawing">
-    <value>954, 499</value>
+    <value>1008, 499</value>
   </data>
   <data name="TabPage7.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -3420,7 +3562,7 @@
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPage8.Size" type="System.Drawing.Size, System.Drawing">
-    <value>954, 499</value>
+    <value>1008, 499</value>
   </data>
   <data name="TabPage8.TabIndex" type="System.Int32, mscorlib">
     <value>1</value>
@@ -3447,7 +3589,7 @@
     <value>3, 3</value>
   </data>
   <data name="TabControlProfilZuordnung.Size" type="System.Drawing.Size, System.Drawing">
-    <value>962, 528</value>
+    <value>1016, 528</value>
   </data>
   <data name="TabControlProfilZuordnung.TabIndex" type="System.Int32, mscorlib">
     <value>1</value>
@@ -3471,7 +3613,7 @@
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPage2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>968, 534</value>
+    <value>1022, 534</value>
   </data>
   <data name="TabPage2.TabIndex" type="System.Int32, mscorlib">
     <value>1</value>
@@ -4488,7 +4630,7 @@
     <value>6, 89</value>
   </data>
   <data name="GroupBox2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1, 0</value>
+    <value>0, 0</value>
   </data>
   <data name="GroupBox2.TabIndex" type="System.Int32, mscorlib">
     <value>1</value>
@@ -4628,7 +4770,7 @@ Top Kreditoren: </value>
     <value>3, 3, 3, 3</value>
   </data>
   <data name="TabPage3.Size" type="System.Drawing.Size, System.Drawing">
-    <value>968, 534</value>
+    <value>1022, 534</value>
   </data>
   <data name="TabPage3.TabIndex" type="System.Int32, mscorlib">
     <value>2</value>
@@ -4655,7 +4797,7 @@ Top Kreditoren: </value>
     <value>276, 0</value>
   </data>
   <data name="TabControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>976, 563</value>
+    <value>1030, 563</value>
   </data>
   <data name="TabControl1.TabIndex" type="System.Int32, mscorlib">
     <value>3</value>
@@ -4736,7 +4878,7 @@ Top Kreditoren: </value>
     <value>0, 158</value>
   </data>
   <data name="pnlMain.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1252, 563</value>
+    <value>1306, 563</value>
   </data>
   <data name="pnlMain.TabIndex" type="System.Int32, mscorlib">
     <value>4</value>
@@ -4796,13 +4938,13 @@ Top Kreditoren: </value>
     <value>True</value>
   </metadata>
   <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>180</value>
+    <value>91</value>
   </metadata>
   <data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
     <value>7, 16</value>
   </data>
   <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
-    <value>1252, 743</value>
+    <value>1306, 743</value>
   </data>
   <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
     <value>Tahoma, 9.75pt</value>
@@ -5298,6 +5440,18 @@ Top Kreditoren: </value>
   <data name="&gt;&gt;BarToggleSwitchItemEdit.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.BarToggleSwitchItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;bbtnitmReject.Name" xml:space="preserve">
+    <value>bbtnitmReject</value>
+  </data>
+  <data name="&gt;&gt;bbtnitmReject.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;bbtnitmNotResponsible.Name" xml:space="preserve">
+    <value>bbtnitmNotResponsible</value>
+  </data>
+  <data name="&gt;&gt;bbtnitmNotResponsible.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;RibbonPage1.Name" xml:space="preserve">
     <value>RibbonPage1</value>
   </data>
@@ -5316,10 +5470,10 @@ Top Kreditoren: </value>
   <data name="&gt;&gt;RibbonPageGroupProfile.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;RibbonPageGroup2.Name" xml:space="preserve">
+  <data name="&gt;&gt;rbnpggroupFinaIndexe.Name" xml:space="preserve">
-    <value>RibbonPageGroup2</value>
+    <value>rbnpggroupFinaIndexe</value>
   </data>
-  <data name="&gt;&gt;RibbonPageGroup2.Type" xml:space="preserve">
+  <data name="&gt;&gt;rbnpggroupFinaIndexe.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="&gt;&gt;RibbonPageGroup4.Name" xml:space="preserve">

app/TaskFlow/frmAdministration.vb

@@ -25,6 +25,7 @@ Public Class frmAdministration
     Private Property profile_guid As Integer = 0
     Private Property DT_CHART_CONFIG As DataTable
     Private Property PROF_ORIGIN As DataTable
+    Private focusedRowHandle As Integer = 199
 
     Private Sub frmAdministration_Load(sender As Object, e As System.EventArgs) Handles Me.Load
         _Logger.Debug("Loading Administration")
@@ -59,10 +60,14 @@ Public Class frmAdministration
             dragDropManager.AddGridView(viewAssignedGroups)
 
             tabctrl_Profilkonfig.SelectedIndex = 0
-
+            If IDB_ACTIVE Then
+                bbtnitmNotResponsible.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
+            Else
+                bbtnitmNotResponsible.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+            End If
         Catch ex As Exception
             _Logger.Error(ex)
-            MsgBox("Fehler bei Laden der Wertehilfen und Konfig-Daten: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
+            MsgBox("Error in loading BasicValues: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error:")
         End Try
         If IDB_ACTIVE = True Then
             IDBData.Init()
@@ -80,6 +85,11 @@ Public Class frmAdministration
         End If
         ObjekttypenEintragen()
         Indexe_eintragen()
+        If IDB_ACTIVE = True Then
+            bbtnitmNotResponsible.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
+        Else
+            bbtnitmNotResponsible.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+        End If
         ' RibbonPageGroupProfile.Enabled = False
 
         _Logger.Debug("Administration loaded!")
@@ -197,7 +207,7 @@ Public Class frmAdministration
             If tabctrl_Profilkonfig.SelectedIndex = 1 Then
                 CURRENT_OBJECTTYPE = cmbObjekttypen.Text
                 If TabControl2.SelectedIndex = 1 Then
-                    Refresh_Final_indexe()
+                    Refresh_Final_Indexes()
                 End If
             End If
         Catch ex As Exception
@@ -219,7 +229,7 @@ Public Class frmAdministration
                 Next
             Catch ex As Exception
                 _Logger.Error(ex)
-                MsgBox("Es konnte keine Verbindung zum windream-Server hergestellt werden.", MsgBoxStyle.Critical, "Fehler beim Zugriff auf windream-Server")
+                MsgBox("No connection to windream-server possible.", MsgBoxStyle.Critical, "Unexprected error:")
             End Try
         Else
             Dim oSQL = "SELECT GUID, TITLE FROM IDB.dbo.TBIDB_BUSINESS_ENTITY"
@@ -279,7 +289,7 @@ Public Class frmAdministration
             End If
         Catch ex As Exception
             _Logger.Error(ex)
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei öffnen der windream-Suche:")
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error loading windream-search:")
         End Try
     End Sub
 
@@ -348,7 +358,7 @@ Public Class frmAdministration
             FillProfile_Zuordnung(profileId)
         Catch ex As Exception
             _Logger.Error(ex)
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Hinzufügen eines Users:")
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error adding users:")
         End Try
     End Sub
 
@@ -362,7 +372,7 @@ Public Class frmAdministration
             FillProfile_Zuordnung(profileId)
         Catch ex As Exception
             _Logger.Error(ex)
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Entfernen eines Users:")
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error deleting users:")
         End Try
     End Sub
 
@@ -378,7 +388,7 @@ Public Class frmAdministration
             FillProfile_Zuordnung(profileId)
         Catch ex As Exception
             _Logger.Error(ex)
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Hinzufügen einer Gruppe:")
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error adding group(s):")
         End Try
     End Sub
 
@@ -394,19 +404,19 @@ Public Class frmAdministration
             FillProfile_Zuordnung(profileId)
         Catch ex As Exception
             _Logger.Error(ex)
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Entfernen einer Gruppe:")
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error removing group(s):")
         End Try
     End Sub
 
     Private Sub frmProfileDesigner_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown
         TabControl1.SelectedIndex = 0
         FORM_LOADED = True
-        RibbonPageGroup2.Enabled = False
+        rbnpggroupFinaIndexe.Enabled = False
         RibbonPageGroup4.Enabled = False
         EditMode_Profile("Unlock")
     End Sub
 
-    Private Sub Refresh_Final_indexe()
+    Private Sub Refresh_Final_Indexes()
         _Logger.Debug("Loading Final Index Data")
 
         Try
@@ -420,6 +430,7 @@ Public Class frmAdministration
                 pgFinalIndexes.SelectedObject = Nothing
             End If
 
+            tsbStaticInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
         Catch ex As Exception
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Refresh_Final_indexe:")
         Finally
@@ -430,12 +441,15 @@ Public Class frmAdministration
     Private Sub TabControl2_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles tabctrl_Profilkonfig.SelectedIndexChanged
         Select Case tabctrl_Profilkonfig.SelectedIndex
             Case 0
-                RibbonPageGroup2.Enabled = False
+                rbnpggroupFinaIndexe.Enabled = False
                 RibbonPageGroup4.Enabled = False
+                RibbonPageGroupProfile.Enabled = True
             Case 1
                 CURRENT_OBJECTTYPE = cmbObjekttypen.Text
-                Refresh_Final_indexe()
+                Refresh_Final_Indexes()
                 CancelFinalIndexInsert()
+                RibbonPageGroupProfile.Enabled = False
+                rbnpggroupFinaIndexe.Enabled = True
         End Select
 
     End Sub
@@ -449,7 +463,7 @@ Public Class frmAdministration
             Case 1
                 GridControlNavigation.Enabled = True
                 RibbonPageGroupProfile.Enabled = False
-                RibbonPageGroup2.Enabled = False
+                rbnpggroupFinaIndexe.Enabled = False
                 RibbonPageGroup4.Enabled = False
                 If PROFILGUIDTextBox.Text = String.Empty Then
                     MsgBox("Kein Profil angelegt oder ausgeählt", MsgBoxStyle.Critical)
@@ -458,7 +472,7 @@ Public Class frmAdministration
                 End If
             Case 2
                 RibbonPageGroupProfile.Enabled = False
-                RibbonPageGroup2.Enabled = False
+                rbnpggroupFinaIndexe.Enabled = False
                 RibbonPageGroup4.Enabled = True
                 GridControlNavigation.Enabled = False
                 Load_Chart_Konfig()
@@ -579,13 +593,6 @@ Public Class frmAdministration
         End If
 
     End Sub
-
-    Private Sub ToolStripButton4_Click(sender As Object, e As EventArgs)
-        Cursor = Cursors.WaitCursor
-        frmUserKonfig_AddUsers.ShowDialog()
-        Load_User()
-        Cursor = Cursors.Default
-    End Sub
     Private Sub ToolStripButton12_Click(sender As Object, e As EventArgs)
         Load_User()
     End Sub
@@ -628,7 +635,7 @@ Public Class frmAdministration
                     Save_Profile()
                 End If
                 If UNSAVED_CHANGES_FI Then
-                    Save_FI()
+                    Save_Final_Indexes()
                 End If
                 e.Cancel = True
             Else
@@ -641,9 +648,9 @@ Public Class frmAdministration
     Private Sub TabControl2_SelectedIndexChanged_1(sender As Object, e As EventArgs) Handles TabControl2.SelectedIndexChanged
         Select Case TabControl2.SelectedIndex
             Case 0
-                RibbonPageGroup2.Enabled = True
+                rbnpggroupFinaIndexe.Enabled = True
             Case Else
-                RibbonPageGroup2.Enabled = False
+                rbnpggroupFinaIndexe.Enabled = False
         End Select
         CancelFinalIndexInsert()
     End Sub
@@ -653,21 +660,23 @@ Public Class frmAdministration
             Dim view As GridView = sender
             Dim focusedRow As DataRow = view.GetFocusedDataRow()
 
+
             If IsNothing(focusedRow) Then
                 Exit Sub
+            ElseIf INSERT_ACTIVE = True Then
+                'Exit Sub
             End If
 
             Dim oShouldRefreshGrid = False
             If UNSAVED_CHANGES_FI = True Then
                 oShouldRefreshGrid = CHECK_QUESTION_CHANGES()
             End If
-
+            pgFinalIndexes.SelectedObject = Nothing
-
 
             Dim guid As Integer = focusedRow.Item("GUID")
             Dim index As String = NotNull(focusedRow.Item("INDEXNAME"), Nothing)
             Dim sqlCommand As String = NotNull(focusedRow.Item("SQL_COMMAND"), "")
-            Dim connectionId As Integer = NotNull(focusedRow.Item("CONNECTION_ID"), 0)
+            ' Dim connectionId As Integer = NotNull(focusedRow.Item("CONNECTION_ID"), 0)
             Dim value As String = NotNull(focusedRow.Item("VALUE"), "")
             Dim active As Boolean = NotNull(focusedRow.Item("ACTIVE"), True)
             Dim description As String = NotNull(focusedRow.Item("DESCRIPTION"), "")
@@ -681,8 +690,7 @@ Public Class frmAdministration
             Dim obj As New FinalIndexProperties With {
                 .GUID = guid,
                 .IndexName = index,
-                .SQLCommand = New SQLValue(sqlCommand, connectionId),
+                .SQLCommand = New SQLValue(sqlCommand),
-                .ConnectionId = connectionId,
                 .Description = description,
                 .Active = active,
                 .AllowAddNewValues = allowNewValues,
@@ -706,7 +714,8 @@ Public Class frmAdministration
             obj.IndexName = index
             obj.VectorBehaviourType = New List(Of String) From {
                 "Add",
-                "Overwrite"
+                "Overwrite",
+                "Delete"
             }
 
             If index IsNot Nothing Then
@@ -720,9 +729,9 @@ Public Class frmAdministration
             pgFinalIndexes.SelectedObject = obj
             pgFinalIndexes.Refresh()
 
-            If oShouldRefreshGrid Then
+            'If oShouldRefreshGrid Then
-                Refresh_Final_indexe()
+            '    Refresh_Final_Indexes()
-            End If
+            'End If
         Catch ex As Exception
             _Logger.Error(ex)
             MsgBox($"Error while loading Final Index properties: {ex.Message}", MsgBoxStyle.Critical)
@@ -750,12 +759,8 @@ Public Class frmAdministration
                 Dim value As SQLValue = oValue
 
                 If value.Value <> String.Empty Then
-                    'obj.ConnectionId = CURRENT_CONN_ID_FINAL_INDEX
                     obj.StringValue = "SQL-Command"
-                    obj.ConnectionId = value.ConnectionId
+                    'obj.ConnectionId = value.ConnectionId
-
-                    'obj.FloatValue = 0
-                    ' obj.IntegerValue = 0
                 End If
 
                 pgFinalIndexes.Refresh()
@@ -770,6 +775,17 @@ Public Class frmAdministration
                     obj.Sequence = oValue
                 ElseIf oName = "ContinueOnIndifferentState" Then
                     obj.ContinueOnIndifferentState = oValue
+                ElseIf oName = "VectorBehaviour" Then
+                    If Not IsNothing(oValue) Then
+                        If oValue = "Delete" Then
+                            obj.StringValue = "DeleteWMAttributeValue"
+                            obj.SQLCommand.Value = ""
+
+                        ElseIf oValue = "Add" And obj.StringValue = "" Then
+                            obj.StringValue = "Your value to set"
+                        End If
+                    End If
+
                 End If
                 pgFinalIndexes.Refresh()
             End If
@@ -794,12 +810,8 @@ Public Class frmAdministration
                 Dim value As SQLValue = e.ChangedItem.Value
 
                 If value.Value <> String.Empty Then
-                    'obj.ConnectionId = CURRENT_CONN_ID_FINAL_INDEX
                     obj.StringValue = "SQL-Command"
-                    obj.ConnectionId = value.ConnectionId
+                    'obj.ConnectionId = value.ConnectionId
-
-                    'obj.FloatValue = 0
-                    ' obj.IntegerValue = 0
                 End If
 
                 propertyGrid.Refresh()
@@ -852,7 +864,7 @@ Public Class frmAdministration
             FormDesigner.ShowDialog()
 
         Else
-            MsgBox("Eindeutiges Profil konnte nicht an den FormDesigner weitergegeben werden:", MsgBoxStyle.Exclamation)
+            MsgBox("No profile could be passed to designer:", MsgBoxStyle.Exclamation)
         End If
     End Sub
 
@@ -865,13 +877,13 @@ Public Class frmAdministration
     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:")
+        Dim result As MsgBoxResult = MsgBox("Would You like to copy this profile?" & vbNewLine & "The profile will be added and set to inactive!", MsgBoxStyle.YesNo, "Confirmation:")
         'wenn Speichern ja
         If result = MsgBoxResult.Yes Then
             Try
                 Dim oEXECSQL As String = $"EXEC PRPM_COPY_PROFILE {PROFILGUIDTextBox.Text},'{USER_USERNAME}'"
                 If DatabaseFallback.ExecuteNonQueryECM(oEXECSQL) = True Then
-                    MsgBox("Das Profil " & NAMETextBox.Text & " wurde erfolgreich kopiert!", MsgBoxStyle.Information, "Erfolgsmeldung")
+                    MsgBox("The profile [" & NAMETextBox.Text & "] has been added successfully!", MsgBoxStyle.Information, "Success")
                     Refresh_Profildaten()
                 Else
                     MsgBox("Error creating a profileCopy - Please check Your log!", MsgBoxStyle.Exclamation)
@@ -879,7 +891,7 @@ Public Class frmAdministration
 
             Catch ex As Exception
                 _Logger.Error(ex)
-                MsgBox("Fehler bei Anlage Profilkopie:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
+                MsgBox("Error creating a profileCopy:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Error:")
             End Try
 
         End If
@@ -888,20 +900,20 @@ Public Class frmAdministration
 
 
     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:")
+        Dim result As MsgBoxResult = MsgBox("Do You really want to delete the profile " & NAMETextBox.Text & " ?", MsgBoxStyle.YesNo, "Confirmation:")
         ' wenn Speichern ja
         If result = MsgBoxResult.Yes Then
             Try
                 Dim profileID = PROFILGUIDTextBox.Text
                 Dim del As String = $"EXEC PRPM_DELETE_PROFILE {profileID}"
                 If DatabaseFallback.ExecuteNonQueryECM(del) = True Then
-                    MsgBox("Das Profil " & NAMETextBox.Text & " wurde erfolgreich gelöscht!", MsgBoxStyle.Information, "Erfolgsmeldung")
+                    MsgBox("The profile [" & NAMETextBox.Text & "] has been deleted successfully!", MsgBoxStyle.Information, "Success")
                     Refresh_Profildaten()
                 End If
 
             Catch ex As Exception
                 _Logger.Error(ex)
-                MsgBox("Fehler bei Löschen des Profils:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
+                MsgBox("Error deleting a profile:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Error:")
             End Try
 
         End If
@@ -939,7 +951,7 @@ Public Class frmAdministration
                     DatabaseFallback.ExecuteNonQueryECM(oSQL)
                     If FINAL_TEXTTextBox.Text <> String.Empty Then
                         oSQL = $"EXEC PRDD_GUI_LANGUAGE_PHRASE 'PM','PROFILE_FINAL_TEXT{PROFILGUIDTextBox.Text}','{USER_LANGUAGE}',
-                'Description of Profile','{FINAL_TEXTTextBox.Text}','','{USER_USERNAME}','{PROFILGUIDTextBox.Text}',0"
+                'BTN_FINAL_CAPT','{FINAL_TEXTTextBox.Text}','','{USER_USERNAME}','{PROFILGUIDTextBox.Text}',0"
                         DatabaseFallback.ExecuteNonQueryECM(oSQL)
                     End If
 
@@ -1001,7 +1013,7 @@ Public Class frmAdministration
             Dim oSQL = BASEDATA_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW")
             Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
             .SQLCommand = oSQL,
-            .SQLConnection = 1
+            .SQLConnection = 0
          }
             oForm.ShowDialog()
 
@@ -1016,7 +1028,7 @@ Public Class frmAdministration
     End Sub
 
     Private Sub BarButtonItem15_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem15.ItemClick
-        Refresh_Final_indexe()
+        Refresh_Final_Indexes()
     End Sub
 
     Private Sub BarButtonItem16_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem16.ItemClick
@@ -1033,7 +1045,7 @@ Public Class frmAdministration
         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()
+                Refresh_Final_Indexes()
 
                 MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:")
             End If
@@ -1041,13 +1053,16 @@ Public Class frmAdministration
     End Sub
 
     Private Sub BarButtonItem18_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem18.ItemClick
-        Save_FI()
+        Save_Final_Indexes()
-
+        Refresh_Final_Indexes()
-        Refresh_Final_indexe()
+        If focusedRowHandle <> 199 Then
+            viewFinalIndex.FocusedRowHandle = focusedRowHandle
+        End If
     End Sub
-    Private Sub Save_FI()
+    Private Sub Save_Final_Indexes()
         Try
             'Dim obj As FinalIndexProperties = PropertyGrid1.SelectedObject
+            pgFinalIndexes.EndUpdate()
             Dim obj As FinalIndexProperties = pgFinalIndexes.SelectedObject
 
             If Not IsNothing(obj) Then
@@ -1063,9 +1078,10 @@ Public Class frmAdministration
 
                 Dim guid = obj.GUID
                 Dim oProfileId As Integer = PROFILGUIDTextBox.Text
-
+                focusedRowHandle = 199
+                focusedRowHandle = viewFinalIndex.FocusedRowHandle
                 'Dim connectionId As Integer = obj.ConnectionId
-                Dim connectionId As Integer = NotNull(obj.SQLCommand.ConnectionId, 1)
+                ' Dim connectionId As Integer = NotNull(obj.SQLCommand.ConnectionId, 1)
                 Dim sqlCommand As String = NotNull(obj.SQLCommand.Value, String.Empty).Replace("'", "''")
 
                 Dim indexName As String = NotNull(obj.IndexName, String.Empty)
@@ -1104,20 +1120,26 @@ Public Class frmAdministration
                     End If
 
                     Dim sql As String = $"INSERT INTO TBPM_PROFILE_FINAL_INDEXING (PROFIL_ID, CONNECTION_ID, SQL_COMMAND, INDEXNAME, VALUE, ACTIVE, PREVENT_DUPLICATES, ALLOW_NEW_VALUES, ADDED_WHO,IF_VEKTOR_BEHAVIOUR,DESCRIPTION,SEQUENCE,CONTINUE_INDETERMINED)
-                                     VALUES ({oProfileId}, {connectionId}, '{sqlCommand}', '{indexName}', '{value}', {active}, {preventDuplicates}, {AllowAddNewValues}, '{addedWho}','{IF_VEKTOR_BEHAVIOUR}','{oDescription}',{pSequence},{oContinueOIdS})"
+                                     VALUES ({oProfileId}, 0, '{sqlCommand}', '{indexName}', '{value}', {active}, {preventDuplicates}, {AllowAddNewValues}, '{addedWho}','{IF_VEKTOR_BEHAVIOUR}','{oDescription}',{pSequence},{oContinueOIdS})"
 
                     If DatabaseFallback.ExecuteNonQueryECM(sql) Then
                         tsbStaticInfo.Caption = $"Final index added - {Now.ToLongTimeString}"
                         INSERT_ACTIVE = False
+                        'Refresh_Final_Indexes()
                     End If
                 Else
                     Dim sql As String = $"UPDATE TBPM_PROFILE_FINAL_INDEXING 
-                                      SET CONNECTION_ID = {connectionId}, SQL_COMMAND = '{sqlCommand}', INDEXNAME = '{indexName}', CHANGED_WHO = '{addedWho}', DESCRIPTION = '{oDescription}',
+                                      SET CONNECTION_ID = 0, 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}', [SEQUENCE] = {oSequence}, CONTINUE_INDETERMINED = {oContinueOIdS}
+                                      VALUE = '{value}', ACTIVE = {active}, ALLOW_NEW_VALUES = {AllowAddNewValues}, PREVENT_DUPLICATES = {preventDuplicates},
+                                      IF_VEKTOR_BEHAVIOUR = '{IF_VEKTOR_BEHAVIOUR}', 
+                                      [SEQUENCE] = {oSequence}, CONTINUE_INDETERMINED = {oContinueOIdS}
                                       WHERE GUID = {guid}"
 
                     If DatabaseFallback.ExecuteNonQueryECM(sql) Then
-                        tsbStaticInfo.Caption = $"Final index saved - {Now.ToLongTimeString} - RESTART NECESSARY"
+                        tsbStaticInfo.Caption = $"Final index saved - {Now.ToLongTimeString} - RESTART/REFRESH NECESSARY"
+                        tsbStaticInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
+                    Else
+
                     End If
                 End If
 
@@ -1132,7 +1154,10 @@ Public Class frmAdministration
         Finally
             BarButtonItem19.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
             BarButtonItem16.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
-            INSERT_ACTIVE = False
+            If INSERT_ACTIVE Then
+                INSERT_ACTIVE = False
+            End If
+
             UNSAVED_CHANGES_FI = False
         End Try
     End Sub
@@ -1141,7 +1166,7 @@ Public Class frmAdministration
     End Sub
 
     Private Sub gridFinalIndex_MouseHover(sender As Object, e As EventArgs) Handles gridFinalIndex.MouseHover
-        RibbonPageGroup2.Enabled = True
+        rbnpggroupFinaIndexe.Enabled = True
     End Sub
 
     Private Sub CHANGED_WHENLabel_Click(sender As Object, e As EventArgs)
@@ -1152,7 +1177,7 @@ Public Class frmAdministration
         Try
             Dim oSQL = BASEDATA_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW")
             CURRENT_DESIGN_TYPE = "SQL_OVERVIEW"
-            Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {.SQLCommand = oSQL, .SQLConnection = 1}
+            Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {.SQLCommand = oSQL, .SQLConnection = 0}
             oForm.ShowDialog()
 
             If oForm.DialogResult = DialogResult.OK Then
@@ -1174,7 +1199,7 @@ Public Class frmAdministration
             Dim oldSQL = DatabaseFallback.GetScalarValueECM(oSQL)
             Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
                 .SQLCommand = oldSQL,
-                .SQLConnection = 1,
+                .SQLConnection = 0,
                 .PlaceholdersManualPrefix = "CTRL",
                 .PlaceholdersManualTitle = "Controls",
                 .PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.ToDictionary(Function(name) name, Function(name) name)
@@ -1248,7 +1273,8 @@ Public Class frmAdministration
                 End If
 
                 If UNSAVED_CHANGES_FI Then
-                    Save_FI()
+                    Save_Final_Indexes()
+                    'Refresh_Final_Indexes()
                 End If
 
                 Return True
@@ -1302,7 +1328,7 @@ Public Class frmAdministration
         tsbStaticInfo.Caption = ""
         Indexe_eintragen()
         If tabctrl_Profilkonfig.SelectedIndex = 1 And TBPM_PROFILEBindingSource.Position <> -1 Then
-            Refresh_Final_indexe()
+            Refresh_Final_Indexes()
         End If
     End Sub
     Private Sub GroupBox2_Enter(sender As Object, e As EventArgs) Handles GroupBox2.Enter
@@ -1341,7 +1367,6 @@ Public Class frmAdministration
     End Function
 
     Private Sub BarButtonItem22_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem22.ItemClick
-        Dim oUpdate As String
         Dim oCtrlSeriesSQL As Button
         Dim oCtrlSeriesType As ComboBox
         Dim oCtrlSeriesArgument As TextBox
@@ -1499,35 +1524,40 @@ Public Class frmAdministration
         EditMode_Profile("")
     End Sub
     Sub EditMode_Profile(pMode As String)
-        If BarButtonItem26.Tag = "Lock" Then
+        Try
-            Me.TBPM_PROFILEBindingSource.EndEdit()
+            If BarButtonItem26.Tag = "Lock" Then
-            If DD_DMSLiteDataSet.TBPM_PROFILE.GetChanges Is Nothing = False Or UNSAVED_CHANGES_FI Then
+                Me.TBPM_PROFILEBindingSource.EndEdit()
-                UNSAVED_CHANGES_PROFILE = True
+                If DD_DMSLiteDataSet.TBPM_PROFILE.GetChanges Is Nothing = False Or UNSAVED_CHANGES_FI Then
-                CHECK_QUESTION_CHANGES()
+                    UNSAVED_CHANGES_PROFILE = True
+                    CHECK_QUESTION_CHANGES()
+                End If
+                With BarButtonItem26
+                    .Tag = "Unlock"
+                    .ImageOptions.SvgImage = My.Resources.Security_Lock
+                    .ItemAppearance.Normal.BackColor = Nothing
+                End With
+
+                'GridControlNavigation.Enabled = True
+                ' RibbonPageGroupProfile.Enabled = False
+                'pnlEdit.Enabled = False
             End If
-            With BarButtonItem26
+            If pMode = "Unlock" Or BarButtonItem26.Tag = "Unlock" Then
-                .Tag = "Unlock"
+                Dim ocolor As New Color
-                .ImageOptions.SvgImage = My.Resources.Security_Lock
+                ocolor = Color.FromArgb(0, 192, 0)
-                .ItemAppearance.Normal.BackColor = Nothing
+                With BarButtonItem26
-            End With
+                    .Tag = "Lock"
+                    .ImageOptions.SvgImage = My.Resources.Security_Unlock
+                    .ItemAppearance.Normal.BackColor = ocolor
+                End With
 
-            'GridControlNavigation.Enabled = True
+                '  GridControlNavigation.Enabled = False
-            ' RibbonPageGroupProfile.Enabled = False
+                ' RibbonPageGroupProfile.Enabled = True
-            'pnlEdit.Enabled = False
+                ' pnlEdit.Enabled = True
-        End If
+            End If
-        If pMode = "Unlock" Or BarButtonItem26.Tag = "Unlock" Then
+        Catch ex As Exception
-            Dim ocolor As New Color
+            MsgBox(ex.Message, MsgBoxStyle.Critical)
-            ocolor = Color.FromArgb(0, 192, 0)
+        End Try
-            With BarButtonItem26
-                .Tag = "Lock"
-                .ImageOptions.SvgImage = My.Resources.Security_Unlock
-                .ItemAppearance.Normal.BackColor = ocolor
-            End With
 
-            '  GridControlNavigation.Enabled = False
-            ' RibbonPageGroupProfile.Enabled = True
-            ' pnlEdit.Enabled = True
-        End If
     End Sub
 
     Private Sub GridViewProfile_BeforeLeaveRow(sender As Object, e As RowAllowEventArgs) Handles GridViewProfile.BeforeLeaveRow
@@ -1570,5 +1600,17 @@ Public Class frmAdministration
         End If
     End Sub
 
+    Private Sub bbtnitmReject_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtnitmReject.ItemClick
+        Dim ofrm As New frmAdmin_rejectionConfig(PROFILGUIDTextBox.Text)
+        ofrm.ShowDialog()
+    End Sub
 
+    Private Sub BarButtonItem1_ItemClick_1(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtnitmNotResponsible.ItemClick
+        Dim ofrm As New frmAdmin_notResponsibleConfig(PROFILGUIDTextBox.Text)
+        ofrm.ShowDialog()
+    End Sub
+
+    Private Sub BarButtonItem1_ItemClick_2(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs)
+        viewFinalIndex.FocusedRowHandle() = 2
+    End Sub
 End Class

app/TaskFlow/frmChat_NewConversation.Designer.vb

@@ -1,52 +0,0 @@
-<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
-Partial Class frmChat_NewConversation
-    Inherits System.Windows.Forms.Form
-
-    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-    <System.Diagnostics.DebuggerNonUserCode()> _
-    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
-        Try
-            If disposing AndAlso components IsNot Nothing Then
-                components.Dispose()
-            End If
-        Finally
-            MyBase.Dispose(disposing)
-        End Try
-    End Sub
-
-    'Wird vom Windows Form-Designer benötigt.
-    Private components As System.ComponentModel.IContainer
-
-    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
-    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
-    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-    <System.Diagnostics.DebuggerStepThrough()> _
-    Private Sub InitializeComponent()
-        Me.ChatNewConv1 = New DigitalData.Controls.ChatNewConv.ChatNewConv()
-        Me.SuspendLayout()
-        '
-        'ChatNewConv1
-        '
-        Me.ChatNewConv1.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.ChatNewConv1.Location = New System.Drawing.Point(2, 1)
-        Me.ChatNewConv1.Name = "ChatNewConv1"
-        Me.ChatNewConv1.Size = New System.Drawing.Size(463, 472)
-        Me.ChatNewConv1.TabIndex = 0
-        '
-        'frmChat_NewConversation
-        '
-        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
-        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ClientSize = New System.Drawing.Size(474, 480)
-        Me.Controls.Add(Me.ChatNewConv1)
-        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
-        Me.MaximizeBox = False
-        Me.MinimizeBox = False
-        Me.Name = "frmChat_NewConversation"
-        Me.Text = "Neue Konversation"
-        Me.ResumeLayout(False)
-
-    End Sub
-
-    Friend WithEvents ChatNewConv1 As DigitalData.Controls.ChatNewConv.ChatNewConv
-End Class

app/TaskFlow/frmChat_NewConversation.vb

@@ -1,24 +0,0 @@
-Public Class frmChat_NewConversation
-    Public Property NewConversation() As String
-        Get
-            Return oNewConversation
-        End Get
-        Set(value As String)
-            oNewConversation = value
-        End Set
-    End Property
-    Public oNewConversation As Long
-    Public Sub New(oDTUsers As DataTable, oDTGroups As DataTable)
-
-        ' Dieser Aufruf ist für den Designer erforderlich.
-        InitializeComponent()
-
-        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
-        ChatNewConv1.Init(LOGCONFIG, CONNECTION_STRING_IDB, CURRENT_DOC_ID, USER_ID, USER_USERNAME, USER_LANGUAGE, oDTUsers, oDTGroups)
-        AddHandler ChatNewConv1.Conversation_Created, AddressOf onConversationCreated
-    End Sub
-    Sub onConversationCreated()
-        CURRENT_CONVERSATION_NEW = ChatNewConv1.NewConversation
-        Me.Close()
-    End Sub
-End Class

app/TaskFlow/frmColumn_Detail.Designer.vb

@@ -38,7 +38,6 @@ Partial Class frmColumn_Detail
         Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
         Me.LU_CAPTIONTextBox = New System.Windows.Forms.TextBox()
-        Me.TYPE_COLUMNComboBox = New System.Windows.Forms.ComboBox()
         Me.GUIDTextBox = New DevExpress.XtraEditors.TextEdit()
         Me.SPALTENNAMETextBox = New DevExpress.XtraEditors.TextEdit()
         Me.SPALTEN_HEADERTextBox = New DevExpress.XtraEditors.TextEdit()
@@ -59,6 +58,7 @@ Partial Class frmColumn_Detail
         Me.DEFAULTVALUETextBox = New DevExpress.XtraEditors.TextEdit()
         Me.SEQUENCETextBox = New DevExpress.XtraEditors.SpinEdit()
         Me.SUMMARY_FUNCTIONCombobox = New DevExpress.XtraEditors.LookUpEdit()
+        Me.TYPE_COLUMNComboBox2 = New DevExpress.XtraEditors.LookUpEdit()
         Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
         Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
         Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
@@ -81,8 +81,8 @@ Partial Class frmColumn_Detail
         Me.LayoutControlItem20 = New DevExpress.XtraLayout.LayoutControlItem()
         Me.LayoutControlItem18 = New DevExpress.XtraLayout.LayoutControlItem()
         Me.LayoutControlItem19 = New DevExpress.XtraLayout.LayoutControlItem()
-        Me.LayoutControlItem22 = New DevExpress.XtraLayout.LayoutControlItem()
         Me.LayoutControlItem23 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem21 = New DevExpress.XtraLayout.LayoutControlItem()
         CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -106,6 +106,7 @@ Partial Class frmColumn_Detail
         CType(Me.DEFAULTVALUETextBox.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.SEQUENCETextBox.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.SUMMARY_FUNCTIONCombobox.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.TYPE_COLUMNComboBox2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -128,8 +129,8 @@ Partial Class frmColumn_Detail
         CType(Me.LayoutControlItem20, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlItem18, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlItem19, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.LayoutControlItem22, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlItem23, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem21, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'TBPM_CONTROL_TABLEBindingSource
@@ -227,7 +228,6 @@ Partial Class frmColumn_Detail
         'LayoutControl1
         '
         Me.LayoutControl1.Controls.Add(Me.LU_CAPTIONTextBox)
-        Me.LayoutControl1.Controls.Add(Me.TYPE_COLUMNComboBox)
         Me.LayoutControl1.Controls.Add(Me.GUIDTextBox)
         Me.LayoutControl1.Controls.Add(Me.SPALTENNAMETextBox)
         Me.LayoutControl1.Controls.Add(Me.SPALTEN_HEADERTextBox)
@@ -248,6 +248,7 @@ Partial Class frmColumn_Detail
         Me.LayoutControl1.Controls.Add(Me.DEFAULTVALUETextBox)
         Me.LayoutControl1.Controls.Add(Me.SEQUENCETextBox)
         Me.LayoutControl1.Controls.Add(Me.SUMMARY_FUNCTIONCombobox)
+        Me.LayoutControl1.Controls.Add(Me.TYPE_COLUMNComboBox2)
         resources.ApplyResources(Me.LayoutControl1, "LayoutControl1")
         Me.LayoutControl1.Name = "LayoutControl1"
         Me.LayoutControl1.Root = Me.Root
@@ -258,14 +259,6 @@ Partial Class frmColumn_Detail
         resources.ApplyResources(Me.LU_CAPTIONTextBox, "LU_CAPTIONTextBox")
         Me.LU_CAPTIONTextBox.Name = "LU_CAPTIONTextBox"
         '
-        'TYPE_COLUMNComboBox
-        '
-        Me.TYPE_COLUMNComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "TYPE_COLUMN", True))
-        Me.TYPE_COLUMNComboBox.FormattingEnabled = True
-        Me.TYPE_COLUMNComboBox.Items.AddRange(New Object() {resources.GetString("TYPE_COLUMNComboBox.Items"), resources.GetString("TYPE_COLUMNComboBox.Items1"), resources.GetString("TYPE_COLUMNComboBox.Items2")})
-        resources.ApplyResources(Me.TYPE_COLUMNComboBox, "TYPE_COLUMNComboBox")
-        Me.TYPE_COLUMNComboBox.Name = "TYPE_COLUMNComboBox"
-        '
         'GUIDTextBox
         '
         Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBPM_CONTROL_TABLEBindingSource, "GUID", True))
@@ -436,13 +429,24 @@ Partial Class frmColumn_Detail
         Me.SUMMARY_FUNCTIONCombobox.Properties.PopupSizeable = False
         Me.SUMMARY_FUNCTIONCombobox.StyleController = Me.LayoutControl1
         '
+        'TYPE_COLUMNComboBox2
+        '
+        Me.TYPE_COLUMNComboBox2.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBPM_CONTROL_TABLEBindingSource, "TYPE_COLUMN", True))
+        resources.ApplyResources(Me.TYPE_COLUMNComboBox2, "TYPE_COLUMNComboBox2")
+        Me.TYPE_COLUMNComboBox2.MenuManager = Me.RibbonControl1
+        Me.TYPE_COLUMNComboBox2.Name = "TYPE_COLUMNComboBox2"
+        Me.TYPE_COLUMNComboBox2.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("TYPE_COLUMNComboBox2.Properties.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines))})
+        Me.TYPE_COLUMNComboBox2.Properties.NullText = resources.GetString("TYPE_COLUMNComboBox2.Properties.NullText")
+        Me.TYPE_COLUMNComboBox2.Properties.PopupSizeable = False
+        Me.TYPE_COLUMNComboBox2.StyleController = Me.LayoutControl1
+        '
         'Root
         '
         Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
         Me.Root.GroupBordersVisible = False
-        Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3, Me.LayoutControlItem4, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem8, Me.LayoutControlItem7, Me.LayoutControlItem9, Me.LayoutControlItem10, Me.LayoutControlItem12, Me.LayoutControlItem11, Me.LayoutControlItem13, Me.LayoutControlGroup1, Me.LayoutControlItem18, Me.LayoutControlItem19, Me.LayoutControlItem22, Me.LayoutControlItem23})
+        Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3, Me.LayoutControlItem4, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem8, Me.LayoutControlItem7, Me.LayoutControlItem9, Me.LayoutControlItem10, Me.LayoutControlItem12, Me.LayoutControlItem11, Me.LayoutControlItem13, Me.LayoutControlGroup1, Me.LayoutControlItem18, Me.LayoutControlItem19, Me.LayoutControlItem23, Me.LayoutControlItem21})
         Me.Root.Name = "Root"
-        Me.Root.Size = New System.Drawing.Size(573, 669)
+        Me.Root.Size = New System.Drawing.Size(573, 668)
         Me.Root.TextVisible = False
         '
         'LayoutControlItem1
@@ -488,36 +492,36 @@ Partial Class frmColumn_Detail
         'LayoutControlItem5
         '
         Me.LayoutControlItem5.Control = Me.REGEX_MATCHTextBox
-        Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 201)
+        Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 200)
         Me.LayoutControlItem5.Name = "LayoutControlItem5"
         Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem5.Size = New System.Drawing.Size(472, 46)
+        Me.LayoutControlItem5.Size = New System.Drawing.Size(471, 46)
         resources.ApplyResources(Me.LayoutControlItem5, "LayoutControlItem5")
         Me.LayoutControlItem5.TextSize = New System.Drawing.Size(112, 13)
         '
         'LayoutControlItem6
         '
         Me.LayoutControlItem6.Control = Me.SimpleButton1
-        Me.LayoutControlItem6.Location = New System.Drawing.Point(472, 201)
+        Me.LayoutControlItem6.Location = New System.Drawing.Point(471, 200)
         Me.LayoutControlItem6.Name = "LayoutControlItem6"
-        Me.LayoutControlItem6.Size = New System.Drawing.Size(81, 46)
+        Me.LayoutControlItem6.Size = New System.Drawing.Size(82, 46)
         Me.LayoutControlItem6.TextSize = New System.Drawing.Size(0, 0)
         Me.LayoutControlItem6.TextVisible = False
         '
         'LayoutControlItem8
         '
         Me.LayoutControlItem8.Control = Me.SQL_COMMANDTextBox
-        Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 327)
+        Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 326)
         Me.LayoutControlItem8.Name = "LayoutControlItem8"
         Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem8.Size = New System.Drawing.Size(472, 46)
+        Me.LayoutControlItem8.Size = New System.Drawing.Size(471, 46)
         resources.ApplyResources(Me.LayoutControlItem8, "LayoutControlItem8")
         Me.LayoutControlItem8.TextSize = New System.Drawing.Size(112, 13)
         '
         'LayoutControlItem7
         '
         Me.LayoutControlItem7.Control = Me.REGEX_MESSAGE_DETextBox
-        Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 247)
+        Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 246)
         Me.LayoutControlItem7.Name = "LayoutControlItem7"
         Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
         Me.LayoutControlItem7.Size = New System.Drawing.Size(553, 40)
@@ -527,16 +531,16 @@ Partial Class frmColumn_Detail
         'LayoutControlItem9
         '
         Me.LayoutControlItem9.Control = Me.SimpleButton2
-        Me.LayoutControlItem9.Location = New System.Drawing.Point(472, 327)
+        Me.LayoutControlItem9.Location = New System.Drawing.Point(471, 326)
         Me.LayoutControlItem9.Name = "LayoutControlItem9"
-        Me.LayoutControlItem9.Size = New System.Drawing.Size(81, 46)
+        Me.LayoutControlItem9.Size = New System.Drawing.Size(82, 46)
         Me.LayoutControlItem9.TextSize = New System.Drawing.Size(0, 0)
         Me.LayoutControlItem9.TextVisible = False
         '
         'LayoutControlItem10
         '
         Me.LayoutControlItem10.Control = Me.TextEdit7
-        Me.LayoutControlItem10.Location = New System.Drawing.Point(0, 413)
+        Me.LayoutControlItem10.Location = New System.Drawing.Point(0, 412)
         Me.LayoutControlItem10.Name = "LayoutControlItem10"
         Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
         Me.LayoutControlItem10.Size = New System.Drawing.Size(276, 40)
@@ -546,7 +550,7 @@ Partial Class frmColumn_Detail
         'LayoutControlItem12
         '
         Me.LayoutControlItem12.Control = Me.CHANGED_WHOTextBox
-        Me.LayoutControlItem12.Location = New System.Drawing.Point(0, 453)
+        Me.LayoutControlItem12.Location = New System.Drawing.Point(0, 452)
         Me.LayoutControlItem12.Name = "LayoutControlItem12"
         Me.LayoutControlItem12.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
         Me.LayoutControlItem12.Size = New System.Drawing.Size(276, 40)
@@ -556,7 +560,7 @@ Partial Class frmColumn_Detail
         'LayoutControlItem11
         '
         Me.LayoutControlItem11.Control = Me.TextEdit8
-        Me.LayoutControlItem11.Location = New System.Drawing.Point(276, 413)
+        Me.LayoutControlItem11.Location = New System.Drawing.Point(276, 412)
         Me.LayoutControlItem11.Name = "LayoutControlItem11"
         Me.LayoutControlItem11.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
         Me.LayoutControlItem11.Size = New System.Drawing.Size(277, 40)
@@ -566,7 +570,7 @@ Partial Class frmColumn_Detail
         'LayoutControlItem13
         '
         Me.LayoutControlItem13.Control = Me.TextEdit10
-        Me.LayoutControlItem13.Location = New System.Drawing.Point(276, 453)
+        Me.LayoutControlItem13.Location = New System.Drawing.Point(276, 452)
         Me.LayoutControlItem13.Name = "LayoutControlItem13"
         Me.LayoutControlItem13.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
         Me.LayoutControlItem13.Size = New System.Drawing.Size(277, 40)
@@ -576,7 +580,7 @@ Partial Class frmColumn_Detail
         'LayoutControlGroup1
         '
         Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem16, Me.LayoutControlItem14, Me.LayoutControlItem15, Me.LayoutControlItem17, Me.LayoutControlItem20})
-        Me.LayoutControlGroup1.Location = New System.Drawing.Point(0, 493)
+        Me.LayoutControlGroup1.Location = New System.Drawing.Point(0, 492)
         Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
         Me.LayoutControlGroup1.Size = New System.Drawing.Size(553, 156)
         resources.ApplyResources(Me.LayoutControlGroup1, "LayoutControlGroup1")
@@ -595,23 +599,23 @@ Partial Class frmColumn_Detail
         Me.LayoutControlItem14.Control = Me.READ_ONLYCheckBox
         Me.LayoutControlItem14.Location = New System.Drawing.Point(0, 24)
         Me.LayoutControlItem14.Name = "LayoutControlItem14"
-        Me.LayoutControlItem14.Size = New System.Drawing.Size(529, 23)
+        Me.LayoutControlItem14.Size = New System.Drawing.Size(529, 22)
         Me.LayoutControlItem14.TextSize = New System.Drawing.Size(0, 0)
         Me.LayoutControlItem14.TextVisible = False
         '
         'LayoutControlItem15
         '
         Me.LayoutControlItem15.Control = Me.LOAD_IDX_VALUECheckBox
-        Me.LayoutControlItem15.Location = New System.Drawing.Point(0, 47)
+        Me.LayoutControlItem15.Location = New System.Drawing.Point(0, 46)
         Me.LayoutControlItem15.Name = "LayoutControlItem15"
-        Me.LayoutControlItem15.Size = New System.Drawing.Size(529, 23)
+        Me.LayoutControlItem15.Size = New System.Drawing.Size(529, 22)
         Me.LayoutControlItem15.TextSize = New System.Drawing.Size(0, 0)
         Me.LayoutControlItem15.TextVisible = False
         '
         'LayoutControlItem17
         '
         Me.LayoutControlItem17.Control = Me.ADVANCED_LOOKUPCheckbox
-        Me.LayoutControlItem17.Location = New System.Drawing.Point(0, 70)
+        Me.LayoutControlItem17.Location = New System.Drawing.Point(0, 68)
         Me.LayoutControlItem17.Name = "LayoutControlItem17"
         Me.LayoutControlItem17.Size = New System.Drawing.Size(529, 43)
         Me.LayoutControlItem17.TextSize = New System.Drawing.Size(0, 0)
@@ -629,7 +633,7 @@ Partial Class frmColumn_Detail
         'LayoutControlItem18
         '
         Me.LayoutControlItem18.Control = Me.DEFAULTVALUETextBox
-        Me.LayoutControlItem18.Location = New System.Drawing.Point(0, 373)
+        Me.LayoutControlItem18.Location = New System.Drawing.Point(0, 372)
         Me.LayoutControlItem18.Name = "LayoutControlItem18"
         Me.LayoutControlItem18.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
         Me.LayoutControlItem18.Size = New System.Drawing.Size(553, 40)
@@ -646,26 +650,26 @@ Partial Class frmColumn_Detail
         resources.ApplyResources(Me.LayoutControlItem19, "LayoutControlItem19")
         Me.LayoutControlItem19.TextSize = New System.Drawing.Size(112, 13)
         '
-        'LayoutControlItem22
-        '
-        Me.LayoutControlItem22.Control = Me.TYPE_COLUMNComboBox
-        resources.ApplyResources(Me.LayoutControlItem22, "LayoutControlItem22")
-        Me.LayoutControlItem22.Location = New System.Drawing.Point(0, 160)
-        Me.LayoutControlItem22.Name = "LayoutControlItem22"
-        Me.LayoutControlItem22.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem22.Size = New System.Drawing.Size(553, 41)
-        Me.LayoutControlItem22.TextSize = New System.Drawing.Size(112, 13)
-        '
         'LayoutControlItem23
         '
         Me.LayoutControlItem23.Control = Me.LU_CAPTIONTextBox
         resources.ApplyResources(Me.LayoutControlItem23, "LayoutControlItem23")
-        Me.LayoutControlItem23.Location = New System.Drawing.Point(0, 287)
+        Me.LayoutControlItem23.Location = New System.Drawing.Point(0, 286)
         Me.LayoutControlItem23.Name = "LayoutControlItem23"
         Me.LayoutControlItem23.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
         Me.LayoutControlItem23.Size = New System.Drawing.Size(553, 40)
         Me.LayoutControlItem23.TextSize = New System.Drawing.Size(112, 13)
         '
+        'LayoutControlItem21
+        '
+        Me.LayoutControlItem21.Control = Me.TYPE_COLUMNComboBox2
+        Me.LayoutControlItem21.Location = New System.Drawing.Point(0, 160)
+        Me.LayoutControlItem21.Name = "LayoutControlItem21"
+        Me.LayoutControlItem21.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
+        Me.LayoutControlItem21.Size = New System.Drawing.Size(553, 40)
+        resources.ApplyResources(Me.LayoutControlItem21, "LayoutControlItem21")
+        Me.LayoutControlItem21.TextSize = New System.Drawing.Size(112, 13)
+        '
         'frmColumn_Detail
         '
         Me.Appearance.Options.UseFont = True
@@ -703,6 +707,7 @@ Partial Class frmColumn_Detail
         CType(Me.DEFAULTVALUETextBox.Properties, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.SEQUENCETextBox.Properties, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.SUMMARY_FUNCTIONCombobox.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.TYPE_COLUMNComboBox2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
@@ -725,8 +730,8 @@ Partial Class frmColumn_Detail
         CType(Me.LayoutControlItem20, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlItem18, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlItem19, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.LayoutControlItem22, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlItem23, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem21, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
         Me.PerformLayout
 
@@ -785,9 +790,9 @@ End Sub
     Friend WithEvents LayoutControlItem19 As DevExpress.XtraLayout.LayoutControlItem
     Friend WithEvents LayoutControlItem20 As DevExpress.XtraLayout.LayoutControlItem
     Friend WithEvents SUMMARY_FUNCTIONCombobox As DevExpress.XtraEditors.LookUpEdit
-    Friend WithEvents TYPE_COLUMNComboBox As ComboBox
-    Friend WithEvents LayoutControlItem22 As DevExpress.XtraLayout.LayoutControlItem
     Friend WithEvents LU_CAPTIONTextBox As TextBox
     Friend WithEvents LayoutControlItem16 As DevExpress.XtraLayout.LayoutControlItem
     Friend WithEvents LayoutControlItem23 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents LayoutControlItem21 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents TYPE_COLUMNComboBox2 As DevExpress.XtraEditors.LookUpEdit
 End Class

app/TaskFlow/frmColumn_Detail.resx

@@ -152,10 +152,10 @@
     <value>573, 67</value>
   </data>
   <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 736</value>
+    <value>0, 735</value>
   </data>
   <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>573, 21</value>
+    <value>573, 22</value>
   </data>
   <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
     <value>RibbonStatusBar1</value>
@@ -185,10 +185,10 @@
     <value>RibbonPage2</value>
   </data>
   <data name="LU_CAPTIONTextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 307</value>
+    <value>144, 306</value>
   </data>
   <data name="LU_CAPTIONTextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>417, 20</value>
+    <value>409, 20</value>
   </data>
   <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
   <data name="LU_CAPTIONTextBox.TabIndex" type="System.Int32, mscorlib">
@@ -206,41 +206,11 @@
   <data name="&gt;&gt;LU_CAPTIONTextBox.ZOrder" xml:space="preserve">
     <value>4</value>
   </data>
-  <data name="TYPE_COLUMNComboBox.Items" xml:space="preserve">
-    <value>STRING</value>
-  </data>
-  <data name="TYPE_COLUMNComboBox.Items1" xml:space="preserve">
-    <value>INTEGER</value>
-  </data>
-  <data name="TYPE_COLUMNComboBox.Items2" xml:space="preserve">
-    <value>BOOLEAN</value>
-  </data>
-  <data name="TYPE_COLUMNComboBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 180</value>
-  </data>
-  <data name="TYPE_COLUMNComboBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>417, 21</value>
-  </data>
-  <data name="TYPE_COLUMNComboBox.TabIndex" type="System.Int32, mscorlib">
-    <value>25</value>
-  </data>
-  <data name="&gt;&gt;TYPE_COLUMNComboBox.Name" xml:space="preserve">
-    <value>TYPE_COLUMNComboBox</value>
-  </data>
-  <data name="&gt;&gt;TYPE_COLUMNComboBox.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;TYPE_COLUMNComboBox.Parent" xml:space="preserve">
-    <value>LayoutControl1</value>
-  </data>
-  <data name="&gt;&gt;TYPE_COLUMNComboBox.ZOrder" xml:space="preserve">
-    <value>5</value>
-  </data>
   <data name="GUIDTextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 20</value>
+    <value>144, 20</value>
   </data>
   <data name="GUIDTextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>417, 20</value>
+    <value>409, 20</value>
   </data>
   <data name="GUIDTextBox.TabIndex" type="System.Int32, mscorlib">
     <value>4</value>
@@ -255,13 +225,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;GUIDTextBox.ZOrder" xml:space="preserve">
-    <value>6</value>
+    <value>5</value>
   </data>
   <data name="SPALTENNAMETextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 60</value>
+    <value>144, 60</value>
   </data>
   <data name="SPALTENNAMETextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>417, 20</value>
+    <value>409, 20</value>
   </data>
   <data name="SPALTENNAMETextBox.TabIndex" type="System.Int32, mscorlib">
     <value>5</value>
@@ -276,13 +246,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;SPALTENNAMETextBox.ZOrder" xml:space="preserve">
-    <value>7</value>
+    <value>6</value>
   </data>
   <data name="SPALTEN_HEADERTextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 100</value>
+    <value>144, 100</value>
   </data>
   <data name="SPALTEN_HEADERTextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>417, 20</value>
+    <value>409, 20</value>
   </data>
   <data name="SPALTEN_HEADERTextBox.TabIndex" type="System.Int32, mscorlib">
     <value>6</value>
@@ -297,20 +267,20 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;SPALTEN_HEADERTextBox.ZOrder" xml:space="preserve">
-    <value>8</value>
+    <value>7</value>
   </data>
   <data name="SPALTENBREITETextBox.EditValue" type="System.Decimal, mscorlib">
     <value>0</value>
   </data>
   <data name="SPALTENBREITETextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 140</value>
+    <value>144, 140</value>
   </data>
   <assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
   <data name="SPALTENBREITETextBox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
     <value>Combo</value>
   </data>
   <data name="SPALTENBREITETextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>140, 20</value>
+    <value>132, 20</value>
   </data>
   <data name="SPALTENBREITETextBox.TabIndex" type="System.Int32, mscorlib">
     <value>7</value>
@@ -325,13 +295,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;SPALTENBREITETextBox.ZOrder" xml:space="preserve">
-    <value>9</value>
+    <value>8</value>
   </data>
   <data name="REGEX_MATCHTextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 221</value>
+    <value>144, 220</value>
   </data>
   <data name="REGEX_MATCHTextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>336, 20</value>
+    <value>327, 20</value>
   </data>
   <data name="REGEX_MATCHTextBox.TabIndex" type="System.Int32, mscorlib">
     <value>8</value>
@@ -346,10 +316,10 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;REGEX_MATCHTextBox.ZOrder" xml:space="preserve">
-    <value>10</value>
+    <value>9</value>
   </data>
   <data name="SimpleButton1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>484, 213</value>
+    <value>483, 212</value>
   </data>
   <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
   <data name="SimpleButton1.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
@@ -359,7 +329,7 @@
     <value>10, 10, 10, 10</value>
   </data>
   <data name="SimpleButton1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>77, 42</value>
+    <value>78, 42</value>
   </data>
   <data name="SimpleButton1.TabIndex" type="System.Int32, mscorlib">
     <value>9</value>
@@ -377,13 +347,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;SimpleButton1.ZOrder" xml:space="preserve">
-    <value>11</value>
+    <value>10</value>
   </data>
   <data name="REGEX_MESSAGE_DETextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 267</value>
+    <value>144, 266</value>
   </data>
   <data name="REGEX_MESSAGE_DETextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>417, 20</value>
+    <value>409, 20</value>
   </data>
   <data name="REGEX_MESSAGE_DETextBox.TabIndex" type="System.Int32, mscorlib">
     <value>10</value>
@@ -398,13 +368,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;REGEX_MESSAGE_DETextBox.ZOrder" xml:space="preserve">
-    <value>12</value>
+    <value>11</value>
   </data>
   <data name="SQL_COMMANDTextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 347</value>
+    <value>144, 346</value>
   </data>
   <data name="SQL_COMMANDTextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>336, 20</value>
+    <value>327, 20</value>
   </data>
   <data name="SQL_COMMANDTextBox.TabIndex" type="System.Int32, mscorlib">
     <value>11</value>
@@ -419,16 +389,16 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;SQL_COMMANDTextBox.ZOrder" xml:space="preserve">
-    <value>13</value>
+    <value>12</value>
   </data>
   <data name="SimpleButton2.Location" type="System.Drawing.Point, System.Drawing">
-    <value>484, 339</value>
+    <value>483, 338</value>
   </data>
   <data name="SimpleButton2.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
     <value>10, 10, 10, 10</value>
   </data>
   <data name="SimpleButton2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>77, 42</value>
+    <value>78, 42</value>
   </data>
   <data name="SimpleButton2.TabIndex" type="System.Int32, mscorlib">
     <value>12</value>
@@ -446,13 +416,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;SimpleButton2.ZOrder" xml:space="preserve">
-    <value>14</value>
+    <value>13</value>
   </data>
   <data name="TextEdit7.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 433</value>
+    <value>144, 432</value>
   </data>
   <data name="TextEdit7.Size" type="System.Drawing.Size, System.Drawing">
-    <value>140, 20</value>
+    <value>132, 20</value>
   </data>
   <data name="TextEdit7.TabIndex" type="System.Int32, mscorlib">
     <value>13</value>
@@ -467,13 +437,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;TextEdit7.ZOrder" xml:space="preserve">
-    <value>15</value>
+    <value>14</value>
   </data>
   <data name="TextEdit8.Location" type="System.Drawing.Point, System.Drawing">
-    <value>412, 433</value>
+    <value>420, 432</value>
   </data>
   <data name="TextEdit8.Size" type="System.Drawing.Size, System.Drawing">
-    <value>141, 20</value>
+    <value>133, 20</value>
   </data>
   <data name="TextEdit8.TabIndex" type="System.Int32, mscorlib">
     <value>14</value>
@@ -488,13 +458,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;TextEdit8.ZOrder" xml:space="preserve">
-    <value>16</value>
+    <value>15</value>
   </data>
   <data name="CHANGED_WHOTextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 473</value>
+    <value>144, 472</value>
   </data>
   <data name="CHANGED_WHOTextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>140, 20</value>
+    <value>132, 20</value>
   </data>
   <data name="CHANGED_WHOTextBox.TabIndex" type="System.Int32, mscorlib">
     <value>15</value>
@@ -509,13 +479,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;CHANGED_WHOTextBox.ZOrder" xml:space="preserve">
-    <value>17</value>
+    <value>16</value>
   </data>
   <data name="TextEdit10.Location" type="System.Drawing.Point, System.Drawing">
-    <value>412, 473</value>
+    <value>420, 472</value>
   </data>
   <data name="TextEdit10.Size" type="System.Drawing.Size, System.Drawing">
-    <value>141, 20</value>
+    <value>133, 20</value>
   </data>
   <data name="TextEdit10.TabIndex" type="System.Int32, mscorlib">
     <value>16</value>
@@ -530,16 +500,16 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;TextEdit10.ZOrder" xml:space="preserve">
-    <value>18</value>
+    <value>17</value>
   </data>
   <data name="READ_ONLYCheckBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>24, 560</value>
+    <value>24, 561</value>
   </data>
   <data name="READ_ONLYCheckBox.Properties.Caption" xml:space="preserve">
     <value>Read Only</value>
   </data>
   <data name="READ_ONLYCheckBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>525, 19</value>
+    <value>525, 18</value>
   </data>
   <data name="READ_ONLYCheckBox.TabIndex" type="System.Int32, mscorlib">
     <value>17</value>
@@ -554,7 +524,7 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;READ_ONLYCheckBox.ZOrder" xml:space="preserve">
-    <value>19</value>
+    <value>18</value>
   </data>
   <data name="LOAD_IDX_VALUECheckBox.Location" type="System.Drawing.Point, System.Drawing">
     <value>24, 583</value>
@@ -563,7 +533,7 @@
     <value>Lade Indexdaten</value>
   </data>
   <data name="LOAD_IDX_VALUECheckBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>525, 19</value>
+    <value>525, 18</value>
   </data>
   <data name="LOAD_IDX_VALUECheckBox.TabIndex" type="System.Int32, mscorlib">
     <value>18</value>
@@ -578,16 +548,16 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;LOAD_IDX_VALUECheckBox.ZOrder" xml:space="preserve">
-    <value>20</value>
+    <value>19</value>
   </data>
   <data name="VALIDATIONCheckbox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>24, 536</value>
+    <value>24, 537</value>
   </data>
   <data name="VALIDATIONCheckbox.Properties.Caption" xml:space="preserve">
     <value>Muss ausgefüllt werden</value>
   </data>
   <data name="VALIDATIONCheckbox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>260, 19</value>
+    <value>260, 18</value>
   </data>
   <data name="VALIDATIONCheckbox.TabIndex" type="System.Int32, mscorlib">
     <value>19</value>
@@ -602,16 +572,16 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;VALIDATIONCheckbox.ZOrder" xml:space="preserve">
-    <value>21</value>
+    <value>20</value>
   </data>
   <data name="ADVANCED_LOOKUPCheckbox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>24, 606</value>
+    <value>24, 605</value>
   </data>
   <data name="ADVANCED_LOOKUPCheckbox.Properties.Caption" xml:space="preserve">
     <value>Erweitertes Auswahl Control (für lange Listen)</value>
   </data>
   <data name="ADVANCED_LOOKUPCheckbox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>525, 19</value>
+    <value>525, 18</value>
   </data>
   <data name="ADVANCED_LOOKUPCheckbox.TabIndex" type="System.Int32, mscorlib">
     <value>20</value>
@@ -626,13 +596,13 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;ADVANCED_LOOKUPCheckbox.ZOrder" xml:space="preserve">
-    <value>22</value>
+    <value>21</value>
   </data>
   <data name="DEFAULTVALUETextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>136, 393</value>
+    <value>144, 392</value>
   </data>
   <data name="DEFAULTVALUETextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>417, 20</value>
+    <value>409, 20</value>
   </data>
   <data name="DEFAULTVALUETextBox.TabIndex" type="System.Int32, mscorlib">
     <value>21</value>
@@ -647,19 +617,19 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;DEFAULTVALUETextBox.ZOrder" xml:space="preserve">
-    <value>23</value>
+    <value>22</value>
   </data>
   <data name="SEQUENCETextBox.EditValue" type="System.Decimal, mscorlib">
     <value>0</value>
   </data>
   <data name="SEQUENCETextBox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>412, 140</value>
+    <value>420, 140</value>
   </data>
   <data name="SEQUENCETextBox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
     <value>Combo</value>
   </data>
   <data name="SEQUENCETextBox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>141, 20</value>
+    <value>133, 20</value>
   </data>
   <data name="SEQUENCETextBox.TabIndex" type="System.Int32, mscorlib">
     <value>22</value>
@@ -674,10 +644,10 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;SEQUENCETextBox.ZOrder" xml:space="preserve">
-    <value>24</value>
+    <value>23</value>
   </data>
   <data name="SUMMARY_FUNCTIONCombobox.Location" type="System.Drawing.Point, System.Drawing">
-    <value>404, 536</value>
+    <value>412, 537</value>
   </data>
   <data name="SUMMARY_FUNCTIONCombobox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
     <value>Combo</value>
@@ -686,7 +656,7 @@
     <value />
   </data>
   <data name="SUMMARY_FUNCTIONCombobox.Size" type="System.Drawing.Size, System.Drawing">
-    <value>145, 20</value>
+    <value>137, 20</value>
   </data>
   <data name="SUMMARY_FUNCTIONCombobox.TabIndex" type="System.Int32, mscorlib">
     <value>23</value>
@@ -701,6 +671,33 @@
     <value>LayoutControl1</value>
   </data>
   <data name="&gt;&gt;SUMMARY_FUNCTIONCombobox.ZOrder" xml:space="preserve">
+    <value>24</value>
+  </data>
+  <data name="TYPE_COLUMNComboBox2.Location" type="System.Drawing.Point, System.Drawing">
+    <value>144, 180</value>
+  </data>
+  <data name="TYPE_COLUMNComboBox2.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
+    <value>Combo</value>
+  </data>
+  <data name="TYPE_COLUMNComboBox2.Properties.NullText" xml:space="preserve">
+    <value />
+  </data>
+  <data name="TYPE_COLUMNComboBox2.Size" type="System.Drawing.Size, System.Drawing">
+    <value>409, 20</value>
+  </data>
+  <data name="TYPE_COLUMNComboBox2.TabIndex" type="System.Int32, mscorlib">
+    <value>27</value>
+  </data>
+  <data name="&gt;&gt;TYPE_COLUMNComboBox2.Name" xml:space="preserve">
+    <value>TYPE_COLUMNComboBox2</value>
+  </data>
+  <data name="&gt;&gt;TYPE_COLUMNComboBox2.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;TYPE_COLUMNComboBox2.Parent" xml:space="preserve">
+    <value>LayoutControl1</value>
+  </data>
+  <data name="&gt;&gt;TYPE_COLUMNComboBox2.ZOrder" xml:space="preserve">
     <value>25</value>
   </data>
   <data name="LayoutControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
@@ -754,20 +751,17 @@
   <data name="LayoutControlItem19.Text" xml:space="preserve">
     <value>Reihenfolge</value>
   </data>
-  <data name="LayoutControlItem22.CustomizationFormText" xml:space="preserve">
-    <value>Typ:</value>
-  </data>
-  <data name="LayoutControlItem22.Text" xml:space="preserve">
-    <value>Typ:</value>
-  </data>
   <data name="LayoutControlItem23.CustomizationFormText" xml:space="preserve">
     <value>Caption Auswahldialog:</value>
   </data>
   <data name="LayoutControlItem23.Text" xml:space="preserve">
     <value>Caption Auswahldialog:</value>
   </data>
+  <data name="LayoutControlItem21.Text" xml:space="preserve">
+    <value>Formatierung:</value>
+  </data>
   <data name="LayoutControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>573, 669</value>
+    <value>573, 668</value>
   </data>
   <data name="LayoutControl1.TabIndex" type="System.Int32, mscorlib">
     <value>33</value>
@@ -994,18 +988,18 @@
   <data name="&gt;&gt;LayoutControlItem19.Type" xml:space="preserve">
     <value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;LayoutControlItem22.Name" xml:space="preserve">
-    <value>LayoutControlItem22</value>
-  </data>
-  <data name="&gt;&gt;LayoutControlItem22.Type" xml:space="preserve">
-    <value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
   <data name="&gt;&gt;LayoutControlItem23.Name" xml:space="preserve">
     <value>LayoutControlItem23</value>
   </data>
   <data name="&gt;&gt;LayoutControlItem23.Type" xml:space="preserve">
     <value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;LayoutControlItem21.Name" xml:space="preserve">
+    <value>LayoutControlItem21</value>
+  </data>
+  <data name="&gt;&gt;LayoutControlItem21.Type" xml:space="preserve">
+    <value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
     <value>frmColumn_Detail</value>
   </data>

app/TaskFlow/frmColumn_Detail.vb

@@ -25,11 +25,20 @@ Public Class frmColumn_Detail
                 {ClassControlCreator.AGGREGATE_NONE, "Keine Summierung"},
                 {ClassControlCreator.AGGREGATE_TOTAL_INTEGER, "Summe (Ganzzahl)"},
                 {ClassControlCreator.AGGREGATE_TOTAL_FLOAT, "Summe (Zwei Nachkommastellen)"},
+                {ClassControlCreator.AGGREGATE_TOTAL_CURRENCY, "Summe (Währung)"},
                 {ClassControlCreator.AGGREGATE_TOTAL_COUNT, "Anzahl"},
                 {ClassControlCreator.AGGREGATE_TOTAL_MIN, "Minimum"},
                 {ClassControlCreator.AGGREGATE_TOTAL_MAX, "Maximum"},
                 {ClassControlCreator.AGGREGATE_TOTAL_AVG, "Durchschnitt"}
             }
+
+            TYPE_COLUMNComboBox2.Properties.DataSource = New Dictionary(Of String, String) From {
+                {ClassControlCreator.CONTROL_TYPE_TEXT, "Text"},
+                {ClassControlCreator.CONTROL_TYPE_BOOLEAN, "Boolean"},
+                {ClassControlCreator.CONTROL_TYPE_INTEGER, "Ganzzahl"},
+                {ClassControlCreator.CONTROL_TYPE_DOUBLE, "Fließkommazahl"},
+                {ClassControlCreator.CONTROL_TYPE_CURRENCY, "Währung"}
+            }
         Catch ex As Exception
             LOGGER.Error(ex)
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Laden der Formulardaten:")
@@ -76,7 +85,7 @@ Public Class frmColumn_Detail
                     SEQUENCETextBox.Text,
                     ADVANCED_LOOKUPCheckbox.Checked,
                     SUMMARY_FUNCTIONCombobox.EditValue,
-                    TYPE_COLUMNComboBox.Text,
+                    TYPE_COLUMNComboBox2.EditValue,
                     LU_CAPTIONTextBox.Text,
                     GUIDTextBox.Text
                 )
@@ -114,7 +123,7 @@ Public Class frmColumn_Detail
         CURRENT_INDEX_ID = GUIDTextBox.Text
         Dim oForm2 As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
             .SQLCommand = SQL_COMMANDTextBox.Text,
-            .SQLConnection = 1
+            .SQLConnection = 0
          }
         oForm2.ShowDialog()
 
@@ -163,7 +172,7 @@ Public Class frmColumn_Detail
         CURRENT_INDEX_ID = GUIDTextBox.Text
         Dim oForm2 As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
             .SQLCommand = SQL_COMMANDTextBox.Text,
-            .SQLConnection = 1
+            .SQLConnection = 0
          }
         oForm2.ShowDialog()
 
@@ -180,4 +189,8 @@ Public Class frmColumn_Detail
             End If
         End If
     End Sub
+
+    Private Sub RibbonControl1_Click(sender As Object, e As EventArgs) Handles RibbonControl1.Click
+
+    End Sub
 End Class

app/TaskFlow/frmConnection.vb

@@ -148,11 +148,11 @@ Public Class frmConnection
                 Me.GEANDERTWERTextBox.Text = USER_USERNAME
                 Me.TBDD_CONNECTIONBindingSource.EndEdit()
                 Me.TBDD_CONNECTIONTableAdapter.Update(DD_DMSLiteDataSet.TBDD_CONNECTION)
-                MsgBox("Änderungen wurden erfolgreich gespeichert!", MsgBoxStyle.Information)
+                MsgBox("Changes successfully saved!", MsgBoxStyle.Information)
             End If
         Catch ex As Exception
             LOGGER.Error(ex)
-            MsgBox("Fehler beim Speichern: " & vbNewLine & ex.Message, MsgBoxStyle.Exclamation)
+            MsgBox("Error sving Connection: " & vbNewLine & ex.Message, MsgBoxStyle.Exclamation)
         End Try
 
     End Sub
@@ -163,7 +163,7 @@ Public Class frmConnection
             load_connections()
         Catch ex As Exception
             LOGGER.Error(ex)
-            MsgBox("Fehler bei Laden der Grunddaten: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+            MsgBox("Error loading basic data: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
         End Try
     End Sub
     Sub load_connections()
@@ -173,7 +173,7 @@ Public Class frmConnection
             TBDD_CONNECTIONDataGridView.AutoResizeColumns()
         Catch ex As Exception
             LOGGER.Error(ex)
-            MsgBox("Fehler bei Connections laden: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+            MsgBox("Error loading connections: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
         End Try
     End Sub
     Private Sub Chckwin_aut_CheckedChanged(sender As Object, e As EventArgs) Handles Chckwin_aut.CheckedChanged
@@ -291,7 +291,7 @@ Public Class frmConnection
             Dim csb As New SqlClient.SqlConnectionStringBuilder
 
             If SERVERTextBox.Text = String.Empty Then
-                MsgBox("Bitte geben sie einen Server an!")
+                MsgBox("Please add a server!")
                 Exit Sub
             End If
 
@@ -300,7 +300,7 @@ Public Class frmConnection
                 csb.IntegratedSecurity = True
             Else
                 If txtUserId.Text = String.Empty Or txtPassword.Text = String.Empty Then
-                    MsgBox("Bitte geben sie Benutzer und Passwort an!")
+                    MsgBox("Please add user and password!")
                     Exit Sub
                 End If
 

app/TaskFlow/frmDashboard1.Designer.vb

@@ -0,0 +1,231 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmDashboard1
+    Inherits DevExpress.XtraEditors.XtraForm
+
+    'Form 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 Windows Form Designer
+    Private components As System.ComponentModel.IContainer
+
+    'NOTE: The following procedure is required by the Windows Form Designer
+    'It can be modified using the Windows Form Designer.  
+    'Do not modify it using the code editor.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim TileItemElement1 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
+        Dim TileItemElement2 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
+        Dim TileItemElement3 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
+        Me.TileBar1 = New DevExpress.XtraBars.Navigation.TileBar()
+        Me.TileBarGroup2 = New DevExpress.XtraBars.Navigation.TileBarGroup()
+        Me.TileBarItem1 = New DevExpress.XtraBars.Navigation.TileBarItem()
+        Me.TileBarItem2 = New DevExpress.XtraBars.Navigation.TileBarItem()
+        Me.TileBarGroup3 = New DevExpress.XtraBars.Navigation.TileBarGroup()
+        Me.TileBarItem3 = New DevExpress.XtraBars.Navigation.TileBarItem()
+        Me.NavigationPane1 = New DevExpress.XtraBars.Navigation.NavigationPane()
+        Me.NavigationPage1 = New DevExpress.XtraBars.Navigation.NavigationPage()
+        Me.NavigationPage2 = New DevExpress.XtraBars.Navigation.NavigationPage()
+        Me.RadialMenu1 = New DevExpress.XtraBars.Ribbon.RadialMenu(Me.components)
+        Me.BarManager1 = New DevExpress.XtraBars.BarManager(Me.components)
+        Me.barDockControlTop = New DevExpress.XtraBars.BarDockControl()
+        Me.barDockControlBottom = New DevExpress.XtraBars.BarDockControl()
+        Me.barDockControlLeft = New DevExpress.XtraBars.BarDockControl()
+        Me.barDockControlRight = New DevExpress.XtraBars.BarDockControl()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
+        CType(Me.NavigationPane1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.NavigationPane1.SuspendLayout()
+        CType(Me.RadialMenu1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'TileBar1
+        '
+        Me.TileBar1.Dock = System.Windows.Forms.DockStyle.Top
+        Me.TileBar1.DropDownOptions.BeakColor = System.Drawing.Color.Empty
+        Me.TileBar1.Groups.Add(Me.TileBarGroup2)
+        Me.TileBar1.Groups.Add(Me.TileBarGroup3)
+        Me.TileBar1.Location = New System.Drawing.Point(0, 0)
+        Me.TileBar1.MaxId = 3
+        Me.TileBar1.Name = "TileBar1"
+        Me.TileBar1.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollButtons
+        Me.TileBar1.Size = New System.Drawing.Size(796, 133)
+        Me.TileBar1.TabIndex = 0
+        Me.TileBar1.Text = "TileBar1"
+        '
+        'TileBarGroup2
+        '
+        Me.TileBarGroup2.Items.Add(Me.TileBarItem1)
+        Me.TileBarGroup2.Items.Add(Me.TileBarItem2)
+        Me.TileBarGroup2.Name = "TileBarGroup2"
+        Me.TileBarGroup2.Text = "Gruppe 1"
+        '
+        'TileBarItem1
+        '
+        Me.TileBarItem1.DropDownOptions.BeakColor = System.Drawing.Color.Empty
+        TileItemElement1.Text = "TileBarItem1"
+        Me.TileBarItem1.Elements.Add(TileItemElement1)
+        Me.TileBarItem1.Id = 0
+        Me.TileBarItem1.ItemSize = DevExpress.XtraBars.Navigation.TileBarItemSize.Medium
+        Me.TileBarItem1.Name = "TileBarItem1"
+        '
+        'TileBarItem2
+        '
+        Me.TileBarItem2.DropDownOptions.BeakColor = System.Drawing.Color.Empty
+        TileItemElement2.Text = "TileBarItem2"
+        Me.TileBarItem2.Elements.Add(TileItemElement2)
+        Me.TileBarItem2.Id = 1
+        Me.TileBarItem2.ItemSize = DevExpress.XtraBars.Navigation.TileBarItemSize.Wide
+        Me.TileBarItem2.Name = "TileBarItem2"
+        '
+        'TileBarGroup3
+        '
+        Me.TileBarGroup3.Items.Add(Me.TileBarItem3)
+        Me.TileBarGroup3.Name = "TileBarGroup3"
+        Me.TileBarGroup3.Text = "Gruppe 2"
+        '
+        'TileBarItem3
+        '
+        Me.TileBarItem3.AppearanceItem.Normal.BackColor = System.Drawing.Color.DarkTurquoise
+        Me.TileBarItem3.AppearanceItem.Normal.Options.UseBackColor = True
+        Me.TileBarItem3.DropDownOptions.BeakColor = System.Drawing.Color.Empty
+        TileItemElement3.Text = "TileBarItem3"
+        Me.TileBarItem3.Elements.Add(TileItemElement3)
+        Me.TileBarItem3.Id = 2
+        Me.TileBarItem3.ItemSize = DevExpress.XtraBars.Navigation.TileBarItemSize.Medium
+        Me.TileBarItem3.Name = "TileBarItem3"
+        '
+        'NavigationPane1
+        '
+        Me.NavigationPane1.Controls.Add(Me.NavigationPage1)
+        Me.NavigationPane1.Controls.Add(Me.NavigationPage2)
+        Me.NavigationPane1.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.NavigationPane1.Location = New System.Drawing.Point(0, 343)
+        Me.NavigationPane1.Name = "NavigationPane1"
+        Me.NavigationPane1.Pages.AddRange(New DevExpress.XtraBars.Navigation.NavigationPageBase() {Me.NavigationPage1, Me.NavigationPage2})
+        Me.NavigationPane1.RegularSize = New System.Drawing.Size(796, 150)
+        Me.NavigationPane1.SelectedPage = Me.NavigationPage1
+        Me.NavigationPane1.Size = New System.Drawing.Size(796, 150)
+        Me.NavigationPane1.TabIndex = 1
+        Me.NavigationPane1.Text = "NavigationPane1"
+        '
+        'NavigationPage1
+        '
+        Me.NavigationPage1.Caption = "NavigationPage1"
+        Me.NavigationPage1.Name = "NavigationPage1"
+        Me.NavigationPage1.Size = New System.Drawing.Size(660, 77)
+        '
+        'NavigationPage2
+        '
+        Me.NavigationPage2.Caption = "NavigationPage2"
+        Me.NavigationPage2.Name = "NavigationPage2"
+        Me.NavigationPage2.PageText = "sdsdsd"
+        Me.NavigationPage2.Size = New System.Drawing.Size(660, 77)
+        '
+        'RadialMenu1
+        '
+        Me.RadialMenu1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.BarButtonItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.BarButtonItem2)})
+        Me.RadialMenu1.Manager = Me.BarManager1
+        Me.RadialMenu1.Name = "RadialMenu1"
+        '
+        'BarManager1
+        '
+        Me.BarManager1.DockControls.Add(Me.barDockControlTop)
+        Me.BarManager1.DockControls.Add(Me.barDockControlBottom)
+        Me.BarManager1.DockControls.Add(Me.barDockControlLeft)
+        Me.BarManager1.DockControls.Add(Me.barDockControlRight)
+        Me.BarManager1.Form = Me
+        Me.BarManager1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.BarButtonItem1, Me.BarButtonItem2})
+        Me.BarManager1.MaxItemId = 2
+        '
+        'barDockControlTop
+        '
+        Me.barDockControlTop.CausesValidation = False
+        Me.barDockControlTop.Dock = System.Windows.Forms.DockStyle.Top
+        Me.barDockControlTop.Location = New System.Drawing.Point(0, 0)
+        Me.barDockControlTop.Manager = Me.BarManager1
+        Me.barDockControlTop.Size = New System.Drawing.Size(796, 0)
+        '
+        'barDockControlBottom
+        '
+        Me.barDockControlBottom.CausesValidation = False
+        Me.barDockControlBottom.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.barDockControlBottom.Location = New System.Drawing.Point(0, 493)
+        Me.barDockControlBottom.Manager = Me.BarManager1
+        Me.barDockControlBottom.Size = New System.Drawing.Size(796, 0)
+        '
+        'barDockControlLeft
+        '
+        Me.barDockControlLeft.CausesValidation = False
+        Me.barDockControlLeft.Dock = System.Windows.Forms.DockStyle.Left
+        Me.barDockControlLeft.Location = New System.Drawing.Point(0, 0)
+        Me.barDockControlLeft.Manager = Me.BarManager1
+        Me.barDockControlLeft.Size = New System.Drawing.Size(0, 493)
+        '
+        'barDockControlRight
+        '
+        Me.barDockControlRight.CausesValidation = False
+        Me.barDockControlRight.Dock = System.Windows.Forms.DockStyle.Right
+        Me.barDockControlRight.Location = New System.Drawing.Point(796, 0)
+        Me.barDockControlRight.Manager = Me.BarManager1
+        Me.barDockControlRight.Size = New System.Drawing.Size(0, 493)
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "BarButtonItem1"
+        Me.BarButtonItem1.Id = 0
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'BarButtonItem2
+        '
+        Me.BarButtonItem2.Caption = "BarButtonItem2"
+        Me.BarButtonItem2.Id = 1
+        Me.BarButtonItem2.Name = "BarButtonItem2"
+        '
+        'frmDashboard1
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(796, 493)
+        Me.Controls.Add(Me.NavigationPane1)
+        Me.Controls.Add(Me.TileBar1)
+        Me.Controls.Add(Me.barDockControlLeft)
+        Me.Controls.Add(Me.barDockControlRight)
+        Me.Controls.Add(Me.barDockControlBottom)
+        Me.Controls.Add(Me.barDockControlTop)
+        Me.Name = "frmDashboard1"
+        Me.Text = "frmDashboard1"
+        CType(Me.NavigationPane1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.NavigationPane1.ResumeLayout(False)
+        CType(Me.RadialMenu1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents TileBar1 As DevExpress.XtraBars.Navigation.TileBar
+    Friend WithEvents TileBarGroup2 As DevExpress.XtraBars.Navigation.TileBarGroup
+    Friend WithEvents TileBarItem1 As DevExpress.XtraBars.Navigation.TileBarItem
+    Friend WithEvents TileBarItem2 As DevExpress.XtraBars.Navigation.TileBarItem
+    Friend WithEvents TileBarGroup3 As DevExpress.XtraBars.Navigation.TileBarGroup
+    Friend WithEvents TileBarItem3 As DevExpress.XtraBars.Navigation.TileBarItem
+    Friend WithEvents NavigationPane1 As DevExpress.XtraBars.Navigation.NavigationPane
+    Friend WithEvents NavigationPage1 As DevExpress.XtraBars.Navigation.NavigationPage
+    Friend WithEvents NavigationPage2 As DevExpress.XtraBars.Navigation.NavigationPage
+    Friend WithEvents RadialMenu1 As DevExpress.XtraBars.Ribbon.RadialMenu
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarManager1 As DevExpress.XtraBars.BarManager
+    Friend WithEvents barDockControlTop As DevExpress.XtraBars.BarDockControl
+    Friend WithEvents barDockControlBottom As DevExpress.XtraBars.BarDockControl
+    Friend WithEvents barDockControlLeft As DevExpress.XtraBars.BarDockControl
+    Friend WithEvents barDockControlRight As DevExpress.XtraBars.BarDockControl
+End Class

app/TaskFlow/frmDashboard1.resx

@@ -117,4 +117,10 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
+  <metadata name="RadialMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <metadata name="BarManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>140, 17</value>
+  </metadata>
 </root>

app/TaskFlow/frmDashboard1.vb

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

app/TaskFlow/frmError.Designer.vb

@@ -23,6 +23,7 @@ Partial Class frmError
     <System.Diagnostics.DebuggerStepThrough()> _
     Private Sub InitializeComponent()
         Me.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmError))
         Me.OK_Button = New System.Windows.Forms.Button()
         Me.Label1 = New System.Windows.Forms.Label()
         Me.txterror = New System.Windows.Forms.TextBox()
@@ -31,37 +32,22 @@ Partial Class frmError
         '
         'OK_Button
         '
-        Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None
+        resources.ApplyResources(Me.OK_Button, "OK_Button")
-        Me.OK_Button.Location = New System.Drawing.Point(355, 150)
-        Me.OK_Button.Margin = New System.Windows.Forms.Padding(6, 5, 6, 5)
         Me.OK_Button.Name = "OK_Button"
-        Me.OK_Button.Size = New System.Drawing.Size(134, 41)
-        Me.OK_Button.TabIndex = 0
-        Me.OK_Button.Text = "OK"
         '
         'Label1
         '
-        Me.Label1.AutoSize = True
+        resources.ApplyResources(Me.Label1, "Label1")
         Me.Label1.ForeColor = System.Drawing.Color.Red
-        Me.Label1.Location = New System.Drawing.Point(15, 9)
-        Me.Label1.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0)
         Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(358, 23)
-        Me.Label1.TabIndex = 0
-        Me.Label1.Text = "Folgender Fehler wurde festgestellt:"
         '
         'txterror
         '
         Me.txterror.AcceptsReturn = True
-        Me.txterror.Enabled = False
+        resources.ApplyResources(Me.txterror, "txterror")
-        Me.txterror.Font = New System.Drawing.Font("Verdana", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.txterror.ForeColor = System.Drawing.Color.DarkRed
-        Me.txterror.Location = New System.Drawing.Point(19, 35)
-        Me.txterror.Multiline = True
         Me.txterror.Name = "txterror"
         Me.txterror.ReadOnly = True
-        Me.txterror.Size = New System.Drawing.Size(470, 107)
-        Me.txterror.TabIndex = 1
         Me.txterror.TabStop = False
         '
         'Timer1
@@ -71,22 +57,17 @@ Partial Class frmError
         'frmError
         '
         Me.AcceptButton = Me.OK_Button
-        Me.AutoScaleDimensions = New System.Drawing.SizeF(12.0!, 23.0!)
+        resources.ApplyResources(Me, "$this")
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ClientSize = New System.Drawing.Size(495, 203)
         Me.ControlBox = False
         Me.Controls.Add(Me.txterror)
         Me.Controls.Add(Me.Label1)
         Me.Controls.Add(Me.OK_Button)
-        Me.Font = New System.Drawing.Font("Verdana", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
-        Me.Margin = New System.Windows.Forms.Padding(6, 5, 6, 5)
         Me.MaximizeBox = False
         Me.MinimizeBox = False
         Me.Name = "frmError"
         Me.ShowInTaskbar = False
-        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
-        Me.Text = "Fehlermeldung:"
         Me.TopMost = True
         Me.ResumeLayout(False)
         Me.PerformLayout()

app/TaskFlow/frmError.en.resx

@@ -0,0 +1,130 @@
+<?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="Label1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>336, 23</value>
+  </data>
+  <data name="Label1.Text" xml:space="preserve">
+    <value>The following error was detected:</value>
+  </data>
+  <data name="$this.Text" xml:space="preserve">
+    <value>Error message</value>
+  </data>
+</root>

app/TaskFlow/frmError.fr.resx

@@ -0,0 +1,130 @@
+<?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="Label1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>320, 23</value>
+  </data>
+  <data name="Label1.Text" xml:space="preserve">
+    <value>L'erreur suivante a été détectée:</value>
+  </data>
+  <data name="$this.Text" xml:space="preserve">
+    <value>Message d'erreur</value>
+  </data>
+</root>

app/TaskFlow/frmError.resx

@@ -117,7 +117,133 @@
   <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="Label1.Location" type="System.Drawing.Point, System.Drawing">
+    <value>15, 9</value>
+  </data>
+  <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
+    <value>495, 203</value>
+  </data>
+  <data name="&gt;&gt;Label1.Name" xml:space="preserve">
+    <value>Label1</value>
+  </data>
+  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="$this.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
+    <value>6, 5, 6, 5</value>
+  </data>
+  <data name="&gt;&gt;Timer1.Name" xml:space="preserve">
+    <value>Timer1</value>
+  </data>
+  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="txterror.TabIndex" type="System.Int32, mscorlib">
+    <value>1</value>
+  </data>
+  <data name="Label1.TabIndex" type="System.Int32, mscorlib">
+    <value>0</value>
+  </data>
+  <data name="txterror.Enabled" type="System.Boolean, mscorlib">
+    <value>False</value>
+  </data>
+  <data name="Label1.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
+    <value>6, 0, 6, 0</value>
+  </data>
+  <data name="&gt;&gt;txterror.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="&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;txterror.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="OK_Button.Size" type="System.Drawing.Size, System.Drawing">
+    <value>134, 41</value>
+  </data>
+  <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
+    <value>Verdana, 14.25pt</value>
+  </data>
+  <data name="&gt;&gt;Label1.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="$this.Text" xml:space="preserve">
+    <value>Fehlermeldung:</value>
+  </data>
+  <data name="OK_Button.Location" type="System.Drawing.Point, System.Drawing">
+    <value>355, 150</value>
+  </data>
+  <data name="&gt;&gt;$this.Name" xml:space="preserve">
+    <value>frmError</value>
+  </data>
+  <data name="txterror.Font" type="System.Drawing.Font, System.Drawing">
+    <value>Verdana, 9.75pt</value>
+  </data>
+  <data name="&gt;&gt;Timer1.Type" xml:space="preserve">
+    <value>System.Windows.Forms.Timer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
+  <data name="txterror.Location" type="System.Drawing.Point, System.Drawing">
+    <value>19, 35</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;OK_Button.ZOrder" xml:space="preserve">
+    <value>2</value>
+  </data>
+  <data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
+    <value>12, 23</value>
+  </data>
+  <data name="OK_Button.Text" xml:space="preserve">
+    <value>OK</value>
+  </data>
+  <data name="&gt;&gt;txterror.ZOrder" xml:space="preserve">
+    <value>0</value>
+  </data>
+  <data name="&gt;&gt;txterror.Name" xml:space="preserve">
+    <value>txterror</value>
+  </data>
+  <data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>358, 23</value>
+  </data>
+  <data name="$this.StartPosition" type="System.Windows.Forms.FormStartPosition, System.Windows.Forms">
+    <value>CenterScreen</value>
+  </data>
+  <data name="Label1.AutoSize" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="&gt;&gt;OK_Button.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;OK_Button.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="Label1.Text" xml:space="preserve">
+    <value>Folgender Fehler wurde festgestellt:</value>
+  </data>
+  <data name="OK_Button.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
+    <value>6, 5, 6, 5</value>
+  </data>
+  <data name="OK_Button.TabIndex" type="System.Int32, mscorlib">
+    <value>0</value>
+  </data>
+  <data name="OK_Button.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
+    <value>None</value>
+  </data>
+  <data name="txterror.Multiline" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="&gt;&gt;OK_Button.Name" xml:space="preserve">
+    <value>OK_Button</value>
+  </data>
+  <data name="txterror.Size" type="System.Drawing.Size, System.Drawing">
+    <value>470, 107</value>
+  </data>
   <metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>17, 17</value>
   </metadata>
+  <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
 </root>

app/TaskFlow/frmFormDesigner.Designer.vb

@@ -49,12 +49,13 @@ Partial Class frmFormDesigner
         Me.bbtniheight_plus = New DevExpress.XtraBars.BarButtonItem()
         Me.bbtniheight_min = New DevExpress.XtraBars.BarButtonItem()
         Me.tslblAenderungen = New DevExpress.XtraBars.BarStaticItem()
+        Me.bstitmProfilID = New DevExpress.XtraBars.BarStaticItem()
         Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonGroupControlFunctions = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonGroupControls = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibPGCtrlWidth = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibPGCtrlheight = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibPGCtrlHeightreal = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
         Me.TBPM_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
@@ -73,6 +74,7 @@ Partial Class frmFormDesigner
         Me.RPGControlFunction = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibPGCtrlheight = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         CType(Me.SplitContainerDesigner, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SplitContainerDesigner.Panel1.SuspendLayout()
         Me.SplitContainerDesigner.Panel2.SuspendLayout()
@@ -125,9 +127,9 @@ Partial Class frmFormDesigner
         'RibbonControl1
         '
         Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnItemFinishSQL, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarStaticItem1, Me.BarButtonItem4, Me.BarButtonItem5, Me.bbtnitLabel, Me.bbtnitTextBox, Me.bbtnitLU, Me.bbtnitTable, Me.bbtnitDatePicker, Me.bbtnitCheckBox, Me.bbtnitButton, Me.bbtnitLine, Me.bbtniwidth_plus, Me.bbtniwidth_min, Me.bbtniheight_plus, Me.bbtniheight_min, Me.tslblAenderungen})
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnItemFinishSQL, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarStaticItem1, Me.BarButtonItem4, Me.BarButtonItem5, Me.bbtnitLabel, Me.bbtnitTextBox, Me.bbtnitLU, Me.bbtnitTable, Me.bbtnitDatePicker, Me.bbtnitCheckBox, Me.bbtnitButton, Me.bbtnitLine, Me.bbtniwidth_plus, Me.bbtniwidth_min, Me.bbtniheight_plus, Me.bbtniheight_min, Me.tslblAenderungen, Me.bstitmProfilID})
         resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
-        Me.RibbonControl1.MaxItemId = 21
+        Me.RibbonControl1.MaxItemId = 22
         Me.RibbonControl1.Name = "RibbonControl1"
         Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
         Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@@ -283,9 +285,15 @@ Partial Class frmFormDesigner
         Me.tslblAenderungen.Name = "tslblAenderungen"
         Me.tslblAenderungen.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
         '
+        'bstitmProfilID
+        '
+        resources.ApplyResources(Me.bstitmProfilID, "bstitmProfilID")
+        Me.bstitmProfilID.Id = 21
+        Me.bstitmProfilID.Name = "bstitmProfilID"
+        '
         'RibbonPage1
         '
-        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonGroupControlFunctions, Me.RibbonGroupControls, Me.RibPGCtrlWidth, Me.RibPGCtrlheight})
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonGroupControlFunctions, Me.RibbonGroupControls, Me.RibPGCtrlWidth, Me.RibPGCtrlHeightreal})
         Me.RibbonPage1.Name = "RibbonPage1"
         resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
         '
@@ -318,20 +326,23 @@ Partial Class frmFormDesigner
         '
         'RibPGCtrlWidth
         '
+        Me.RibPGCtrlWidth.AllowTextClipping = False
         Me.RibPGCtrlWidth.ItemLinks.Add(Me.bbtniwidth_plus)
         Me.RibPGCtrlWidth.ItemLinks.Add(Me.bbtniwidth_min)
         Me.RibPGCtrlWidth.Name = "RibPGCtrlWidth"
         resources.ApplyResources(Me.RibPGCtrlWidth, "RibPGCtrlWidth")
         '
-        'RibPGCtrlheight
+        'RibPGCtrlHeightreal
         '
-        Me.RibPGCtrlheight.ItemLinks.Add(Me.bbtniheight_plus)
+        Me.RibPGCtrlHeightreal.AllowTextClipping = False
-        Me.RibPGCtrlheight.ItemLinks.Add(Me.bbtniheight_min)
+        Me.RibPGCtrlHeightreal.ItemLinks.Add(Me.bbtniheight_plus)
-        Me.RibPGCtrlheight.Name = "RibPGCtrlheight"
+        Me.RibPGCtrlHeightreal.ItemLinks.Add(Me.bbtniheight_min)
-        resources.ApplyResources(Me.RibPGCtrlheight, "RibPGCtrlheight")
+        Me.RibPGCtrlHeightreal.Name = "RibPGCtrlHeightreal"
+        resources.ApplyResources(Me.RibPGCtrlHeightreal, "RibPGCtrlHeightreal")
         '
         'RibbonStatusBar1
         '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.bstitmProfilID)
         Me.RibbonStatusBar1.ItemLinks.Add(Me.tslblAenderungen)
         resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
         Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
@@ -426,6 +437,14 @@ Partial Class frmFormDesigner
         Me.RibbonPageGroup4.Name = "RibbonPageGroup4"
         resources.ApplyResources(Me.RibbonPageGroup4, "RibbonPageGroup4")
         '
+        'RibPGCtrlheight
+        '
+        Me.RibPGCtrlheight.AllowTextClipping = False
+        Me.RibPGCtrlheight.ItemLinks.Add(Me.bbtniheight_plus)
+        Me.RibPGCtrlheight.ItemLinks.Add(Me.bbtniheight_min)
+        Me.RibPGCtrlheight.Name = "RibPGCtrlheight"
+        resources.ApplyResources(Me.RibPGCtrlheight, "RibPGCtrlheight")
+        '
         'frmFormDesigner
         '
         Me.Appearance.Options.UseFont = True
@@ -436,6 +455,7 @@ Partial Class frmFormDesigner
         Me.Controls.Add(Me.RibbonControl1)
         Me.IconOptions.Icon = CType(resources.GetObject("frmFormDesigner.IconOptions.Icon"), System.Drawing.Icon)
         Me.IconOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.chartdesigner1
+        Me.KeyPreview = True
         Me.MinimizeBox = False
         Me.Name = "frmFormDesigner"
         Me.Ribbon = Me.RibbonControl1
@@ -503,8 +523,10 @@ Partial Class frmFormDesigner
     Friend WithEvents bbtniheight_plus As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents bbtniheight_min As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents RibPGCtrlWidth As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents RibPGCtrlheight As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents pnldesigner As DigitalData.Controls.SnapPanel.ClassSnapPanel
     Friend WithEvents tslblAenderungen As DevExpress.XtraBars.BarStaticItem
     Friend WithEvents pgControlsNew As DevExpress.XtraVerticalGrid.PropertyGridControl
+    Friend WithEvents bstitmProfilID As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents RibPGCtrlHeightreal As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibPGCtrlheight As DevExpress.XtraBars.Ribbon.RibbonPageGroup
 End Class

app/TaskFlow/frmFormDesigner.resx

@@ -125,6 +125,10 @@
   <data name="SplitContainerDesigner.Location" type="System.Drawing.Point, System.Drawing">
     <value>0, 132</value>
   </data>
+  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="pnldesigner.AutoScroll" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
   <data name="pnldesigner.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
     <value>Fill</value>
   </data>
@@ -132,17 +136,16 @@
     <value>0, 0</value>
   </data>
   <data name="pnldesigner.Size" type="System.Drawing.Size, System.Drawing">
-    <value>820, 455</value>
+    <value>820, 453</value>
   </data>
-  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
   <data name="pnldesigner.TabIndex" type="System.Int32, mscorlib">
-    <value>1</value>
+    <value>0</value>
   </data>
   <data name="&gt;&gt;pnldesigner.Name" xml:space="preserve">
     <value>pnldesigner</value>
   </data>
   <data name="&gt;&gt;pnldesigner.Type" xml:space="preserve">
-    <value>DigitalData.Controls.SnapPanel.ClassSnapPanel, DigitalData.Controls.SnapPanel, Version=1.0.1.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DigitalData.Controls.SnapPanel.ClassSnapPanel, DigitalData.Controls.SnapPanel, Version=2.0.1.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;pnldesigner.Parent" xml:space="preserve">
     <value>SplitContainerDesigner.Panel1</value>
@@ -197,7 +200,7 @@
 </value>
   </data>
   <data name="BarButtonItem1.Caption" xml:space="preserve">
-    <value>Control löschen</value>
+    <value>Löschen (entf)</value>
   </data>
   <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
@@ -221,7 +224,7 @@
 </value>
   </data>
   <data name="BarButtonItem2.Caption" xml:space="preserve">
-    <value>Aktualisieren</value>
+    <value>Aktualisieren (F5)</value>
   </data>
   <data name="BarButtonItem2.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
@@ -418,6 +421,9 @@
   <data name="tslblAenderungen.Caption" xml:space="preserve">
     <value>Noch keine Änderungen</value>
   </data>
+  <data name="bstitmProfilID.Caption" xml:space="preserve">
+    <value>ProfilID: </value>
+  </data>
   <data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
     <value>0, 0</value>
   </data>
@@ -431,10 +437,10 @@
     <value>Controls einfügen</value>
   </data>
   <data name="RibPGCtrlWidth.Text" xml:space="preserve">
-    <value>Control - Breite</value>
+    <value>Control - Breite (+/-)</value>
   </data>
-  <data name="RibPGCtrlheight.Text" xml:space="preserve">
+  <data name="RibPGCtrlHeightreal.Text" xml:space="preserve">
-    <value>Control - Höhe</value>
+    <value>Control-Höhe (ctrl &amp; +/-)</value>
   </data>
   <data name="RibbonPage1.Text" xml:space="preserve">
     <value>Start</value>
@@ -443,10 +449,10 @@
     <value>1199, 132</value>
   </data>
   <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 587</value>
+    <value>0, 585</value>
   </data>
   <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1199, 22</value>
+    <value>1199, 24</value>
   </data>
   <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
     <value>RibbonStatusBar1</value>
@@ -473,7 +479,7 @@
     <value>3</value>
   </data>
   <data name="pgControlsNew.Size" type="System.Drawing.Size, System.Drawing">
-    <value>375, 455</value>
+    <value>375, 453</value>
   </data>
   <data name="pgControlsNew.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -500,7 +506,7 @@
     <value>3, 2, 3, 2</value>
   </data>
   <data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>375, 455</value>
+    <value>375, 453</value>
   </data>
   <data name="Panel1.TabIndex" type="System.Int32, mscorlib">
     <value>23</value>
@@ -530,13 +536,13 @@
     <value>1</value>
   </data>
   <data name="SplitContainerDesigner.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1199, 455</value>
+    <value>1199, 453</value>
   </data>
   <data name="SplitContainerDesigner.SplitterDistance" type="System.Int32, mscorlib">
     <value>820</value>
   </data>
   <data name="SplitContainerDesigner.TabIndex" type="System.Int32, mscorlib">
-    <value>25</value>
+    <value>0</value>
   </data>
   <data name="&gt;&gt;SplitContainerDesigner.Name" xml:space="preserve">
     <value>SplitContainerDesigner</value>
@@ -613,6 +619,9 @@
   <data name="RibbonPageGroup4.Text" xml:space="preserve">
     <value>RibbonPageGroup4</value>
   </data>
+  <data name="RibPGCtrlheight.Text" xml:space="preserve">
+    <value>Control - Höhe (Strg + +/-)</value>
+  </data>
   <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
@@ -1176,6 +1185,12 @@
   <data name="&gt;&gt;tslblAenderungen.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;bstitmProfilID.Name" xml:space="preserve">
+    <value>bstitmProfilID</value>
+  </data>
+  <data name="&gt;&gt;bstitmProfilID.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;RibbonPage1.Name" xml:space="preserve">
     <value>RibbonPage1</value>
   </data>
@@ -1206,10 +1221,10 @@
   <data name="&gt;&gt;RibPGCtrlWidth.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;RibPGCtrlheight.Name" xml:space="preserve">
+  <data name="&gt;&gt;RibPGCtrlHeightreal.Name" xml:space="preserve">
-    <value>RibPGCtrlheight</value>
+    <value>RibPGCtrlHeightreal</value>
   </data>
-  <data name="&gt;&gt;RibPGCtrlheight.Type" xml:space="preserve">
+  <data name="&gt;&gt;RibPGCtrlHeightreal.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="&gt;&gt;TBPM_PROFILE_CONTROLSBindingSource.Name" xml:space="preserve">
@@ -1308,16 +1323,16 @@
   <data name="&gt;&gt;RibbonPageGroup4.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;RibPGCtrlheight.Name" xml:space="preserve">
+    <value>RibPGCtrlheight</value>
+  </data>
+  <data name="&gt;&gt;RibPGCtrlheight.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
     <value>frmFormDesigner</value>
   </data>
   <data name="&gt;&gt;$this.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonForm, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="RibbonPageGroup3.Text">
-    <value>Steuerelement</value>
-  </data>
-  <data name="rpggrp_controls.Text">
-    <value>Steuerelement hinzufügen</value>
-  </data>
 </root>

app/TaskFlow/frmGhostMode.Designer.vb

@@ -37,13 +37,9 @@ Partial Class frmGhostMode
         '
         'RibbonControl1
         '
-        resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
         Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.ExpandCollapseItem.ImageOptions.ImageIndex = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.ImageIndex"), Integer)
-        Me.RibbonControl1.ExpandCollapseItem.ImageOptions.LargeImageIndex = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.LargeImageIndex"), Integer)
-        Me.RibbonControl1.ExpandCollapseItem.ImageOptions.SvgImage = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
-        Me.RibbonControl1.ExpandCollapseItem.SearchTags = resources.GetString("RibbonControl1.ExpandCollapseItem.SearchTags")
         Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1})
+        resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
         Me.RibbonControl1.MaxItemId = 2
         Me.RibbonControl1.Name = "RibbonControl1"
         Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
@@ -54,8 +50,6 @@ Partial Class frmGhostMode
         '
         resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
         Me.BarButtonItem1.Id = 1
-        Me.BarButtonItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem1.ImageOptions.ImageIndex"), Integer)
-        Me.BarButtonItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem1.ImageOptions.LargeImageIndex"), Integer)
         Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
         Me.BarButtonItem1.Name = "BarButtonItem1"
         '
@@ -80,18 +74,6 @@ Partial Class frmGhostMode
         'GridControl1
         '
         resources.ApplyResources(Me.GridControl1, "GridControl1")
-        Me.GridControl1.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridControl1.EmbeddedNavigator.AccessibleDescription")
-        Me.GridControl1.EmbeddedNavigator.AccessibleName = resources.GetString("GridControl1.EmbeddedNavigator.AccessibleName")
-        Me.GridControl1.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridControl1.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean)
-        Me.GridControl1.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridControl1.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles)
-        Me.GridControl1.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridControl1.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image)
-        Me.GridControl1.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridControl1.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout)
-        Me.GridControl1.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridControl1.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode)
-        Me.GridControl1.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridControl1.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
-        Me.GridControl1.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridControl1.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
-        Me.GridControl1.EmbeddedNavigator.ToolTip = resources.GetString("GridControl1.EmbeddedNavigator.ToolTip")
-        Me.GridControl1.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridControl1.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
-        Me.GridControl1.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridControl1.EmbeddedNavigator.ToolTipTitle")
         Me.GridControl1.MainView = Me.GridView1
         Me.GridControl1.Name = "GridControl1"
         Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
@@ -100,7 +82,6 @@ Partial Class frmGhostMode
         '
         Me.GridView1.Appearance.EvenRow.BackColor = System.Drawing.Color.LightBlue
         Me.GridView1.Appearance.EvenRow.Options.UseBackColor = True
-        resources.ApplyResources(Me.GridView1, "GridView1")
         Me.GridView1.GridControl = Me.GridControl1
         Me.GridView1.Name = "GridView1"
         Me.GridView1.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
@@ -114,6 +95,7 @@ Partial Class frmGhostMode
         Me.GridView1.OptionsView.ShowAutoFilterRow = True
         Me.GridView1.OptionsView.ShowErrorPanel = DevExpress.Utils.DefaultBoolean.[True]
         Me.GridView1.OptionsView.ShowViewCaption = True
+        resources.ApplyResources(Me.GridView1, "GridView1")
         '
         'frmGhostMode
         '

app/TaskFlow/frmGhostMode.resx

@@ -117,37 +117,8 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
-  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="BarButtonItem1.Caption" xml:space="preserve">
-  <data name="GridControl1.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
+    <value>Ghost Modus aktivieren</value>
-    <value />
-  </data>
-  <data name="GridView1.ViewCaption" xml:space="preserve">
-    <value>Bitte wählen Sie einen Ghost User</value>
-  </data>
-  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
-    <value>965, 509</value>
-  </data>
-  <data name="&gt;&gt;RibbonControl1.ZOrder" xml:space="preserve">
-    <value>2</value>
-  </data>
-  <data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 0</value>
-  </data>
-  <data name="&gt;&gt;RibbonPage1.Name" xml:space="preserve">
-    <value>RibbonPage1</value>
-  </data>
-  <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
-    <value>RibbonStatusBar1</value>
-  </data>
-  <data name="&gt;&gt;GridView1.Name" xml:space="preserve">
-    <value>GridView1</value>
-  </data>
-  <data name="&gt;&gt;RibbonStatusBar1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;RibbonControl1.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
   <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -175,145 +146,118 @@
         dmc+Cw==
 </value>
   </data>
-  <assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="GridControl1.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v21.2">
+  <data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>None</value>
+    <value>0, 0</value>
-  </data>
-  <data name="RibbonControl1.ExpandCollapseItem.SearchTags" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
-    <value>6, 13</value>
-  </data>
-  <data name="GridControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
-    <value>Fill</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;GridView1.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Calibri, 8.25pt</value>
-  </data>
-  <data name="&gt;&gt;RibbonControl1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-  <data name="RibbonControl1.ExpandCollapseItem.ImageOptions.LargeImageIndex" type="System.Int32, mscorlib">
-    <value>-1</value>
-  </data>
-  <data name="&gt;&gt;$this.Name" xml:space="preserve">
-    <value>frmGhostMode</value>
-  </data>
-  <data name="&gt;&gt;RibbonStatusBar1.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <data name="&gt;&gt;BarButtonItem1.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>965, 348</value>
-  </data>
-  <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 487</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup1.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</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;GridControl1.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v21.2">
-    <value>Default</value>
-  </data>
-  <data name="&gt;&gt;BarButtonItem1.Name" xml:space="preserve">
-    <value>BarButtonItem1</value>
-  </data>
-  <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>965, 22</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Top, Left</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup1.Name" xml:space="preserve">
-    <value>RibbonPageGroup1</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.ToolTip" xml:space="preserve">
-    <value />
-  </data>
-  <data name="&gt;&gt;GridControl1.Name" xml:space="preserve">
-    <value>GridControl1</value>
-  </data>
-  <data name="BarButtonItem1.Caption" xml:space="preserve">
-    <value>Ghost Modus aktivieren</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="RibbonPage1.Text" xml:space="preserve">
-    <value>Start</value>
   </data>
   <data name="RibbonPageGroup1.Text" xml:space="preserve">
     <value>Aktionen</value>
   </data>
-  <data name="&gt;&gt;RibbonControl1.Name" xml:space="preserve">
+  <data name="RibbonPage1.Text" xml:space="preserve">
-    <value>RibbonControl1</value>
+    <value>Start</value>
   </data>
-  <data name="GridControl1.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
+  <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>Inherit</value>
+    <value>965, 146</value>
   </data>
-  <data name="GridControl1.Location" type="System.Drawing.Point, System.Drawing">
+  <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 139</value>
+    <value>0, 487</value>
   </data>
-  <data name="BarButtonItem1.ImageOptions.LargeImageIndex" type="System.Int32, mscorlib">
+  <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>-1</value>
+    <value>965, 22</value>
   </data>
-  <data name="GridControl1.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
+  <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
-    <value />
+    <value>RibbonStatusBar1</value>
-  </data>
-  <assembly alias="DevExpress.XtraEditors.v21.2" name="DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-  <data name="GridControl1.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v21.2">
-    <value>Center</value>
   </data>
   <data name="&gt;&gt;RibbonStatusBar1.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonStatusBar, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="GridControl1.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
+  <data name="&gt;&gt;RibbonStatusBar1.Parent" xml:space="preserve">
-    <value>Tile</value>
+    <value>$this</value>
   </data>
-  <data name="GridControl1.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
+  <data name="&gt;&gt;RibbonStatusBar1.ZOrder" xml:space="preserve">
-    <value />
+    <value>1</value>
   </data>
+  <data name="&gt;&gt;RibbonControl1.Name" xml:space="preserve">
+    <value>RibbonControl1</value>
+  </data>
+  <data name="&gt;&gt;RibbonControl1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonControl1.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="&gt;&gt;RibbonControl1.ZOrder" xml:space="preserve">
+    <value>2</value>
+  </data>
+  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="GridControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
+    <value>Fill</value>
+  </data>
+  <data name="GridControl1.Location" type="System.Drawing.Point, System.Drawing">
+    <value>0, 146</value>
+  </data>
+  <data name="GridView1.ViewCaption" xml:space="preserve">
+    <value>Bitte wählen Sie einen Ghost User</value>
+  </data>
+  <data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>965, 341</value>
+  </data>
+  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
   <data name="GridControl1.TabIndex" type="System.Int32, mscorlib">
     <value>9</value>
   </data>
-  <data name="RibbonControl1.ExpandCollapseItem.ImageOptions.SvgImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
+  <data name="&gt;&gt;GridControl1.Name" xml:space="preserve">
-    <value />
+    <value>GridControl1</value>
   </data>
-  <data name="GridControl1.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
+  <data name="&gt;&gt;GridControl1.Type" xml:space="preserve">
-    <value>0, 0</value>
+    <value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="RibbonControl1.ExpandCollapseItem.ImageOptions.ImageIndex" type="System.Int32, mscorlib">
+  <data name="&gt;&gt;GridControl1.Parent" xml:space="preserve">
-    <value>-1</value>
+    <value>$this</value>
-  </data>
-  <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>965, 139</value>
-  </data>
-  <data name="&gt;&gt;RibbonPage1.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="&gt;&gt;GridControl1.ZOrder" xml:space="preserve">
     <value>0</value>
   </data>
-  <data name="BarButtonItem1.ImageOptions.ImageIndex" type="System.Int32, mscorlib">
-    <value>-1</value>
-  </data>
   <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
+  <data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
+    <value>6, 13</value>
+  </data>
+  <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
+    <value>965, 509</value>
+  </data>
+  <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
+    <value>Calibri, 8.25pt</value>
+  </data>
+  <data name="&gt;&gt;BarButtonItem1.Name" xml:space="preserve">
+    <value>BarButtonItem1</value>
+  </data>
+  <data name="&gt;&gt;BarButtonItem1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPage1.Name" xml:space="preserve">
+    <value>RibbonPage1</value>
+  </data>
+  <data name="&gt;&gt;RibbonPage1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroup1.Name" xml:space="preserve">
+    <value>RibbonPageGroup1</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroup1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;GridView1.Name" xml:space="preserve">
+    <value>GridView1</value>
+  </data>
+  <data name="&gt;&gt;GridView1.Type" xml:space="preserve">
+    <value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;$this.Name" xml:space="preserve">
+    <value>frmGhostMode</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>
 </root>

app/TaskFlow/frmGhostMode.vb

@@ -30,6 +30,15 @@
     End Sub
 
     Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+
+        Set_GhostUser()
+    End Sub
+
+    Private Sub GridView1_DoubleClick(sender As Object, e As EventArgs) Handles GridView1.DoubleClick
+        Set_GhostUser()
+    End Sub
+
+    Sub Set_GhostUser()
         Dim oFocusedUserName
         Try
             oFocusedUserName = GridView1.GetFocusedRowCellValue(GridView1.Columns("UserName"))
@@ -60,6 +69,5 @@
         Else
             MsgBox("Please choose an user for ghostmode!", MsgBoxStyle.Information)
         End If
-
     End Sub
 End Class