Version 2.6.7.1

Fix installer
Version 2.6.7.0
2023-09-11 15:25:14 +02:00 · 2023-09-11 15:24:56 +02:00 · 2023-09-11 15:17:51 +02:00 · 2023-09-11 15:17:22 +02:00 · 2023-06-05 16:48:22 +02:00 · 2023-06-05 16:48:01 +02:00
30 changed files with 462 additions and 164 deletions
--- a/.gitignore
+++ b/.gitignore
@@ -154,5 +154,5 @@ $RECYCLE.BIN/

 # Mac desktop service store files
 .DS_Store
-/.vs/Global_Indexer/v15/Server/sqlite3
-/.vs/Global_Indexer/v16/Server/sqlite3
+
+.vs
--- a/.vs/FileFlow/DesignTimeBuild/.dtbcache
+++ b/.vs/FileFlow/DesignTimeBuild/.dtbcache
--- a/.vs/FileFlow/FileContentIndex/4565bc23-8659-4309-9160-1abb2585c23c.vsidx
+++ b/.vs/FileFlow/FileContentIndex/4565bc23-8659-4309-9160-1abb2585c23c.vsidx
--- a/.vs/FileFlow/FileContentIndex/c902896a-6cdf-46ab-8ff4-fd887ce202e7.vsidx
+++ b/.vs/FileFlow/FileContentIndex/c902896a-6cdf-46ab-8ff4-fd887ce202e7.vsidx
--- a/.vs/FileFlow/FileContentIndex/ca99cb38-d1fb-46cf-b662-08bc2a5c3d3a.vsidx
+++ b/.vs/FileFlow/FileContentIndex/ca99cb38-d1fb-46cf-b662-08bc2a5c3d3a.vsidx
--- a/.vs/FileFlow/FileContentIndex/read.lock
+++ b/.vs/FileFlow/FileContentIndex/read.lock
--- a/.vs/FileFlow/v15/Server/sqlite3/db.lock
+++ b/.vs/FileFlow/v15/Server/sqlite3/db.lock
--- a/.vs/FileFlow/v15/Server/sqlite3/storage.ide
+++ b/.vs/FileFlow/v15/Server/sqlite3/storage.ide
--- a/.vs/FileFlow/v15/Server/sqlite3/storage.ide-shm
+++ b/.vs/FileFlow/v15/Server/sqlite3/storage.ide-shm
--- a/.vs/FileFlow/v15/Server/sqlite3/storage.ide-wal
+++ b/.vs/FileFlow/v15/Server/sqlite3/storage.ide-wal
--- a/.vs/FileFlow/v16/Server/sqlite3/db.lock
+++ b/.vs/FileFlow/v16/Server/sqlite3/db.lock
--- a/.vs/FileFlow/v16/Server/sqlite3/storage.ide
+++ b/.vs/FileFlow/v16/Server/sqlite3/storage.ide
--- a/.vs/ProjectSettings.json
+++ b/.vs/ProjectSettings.json
@@ -1,3 +0,0 @@
-{
-  "CurrentProjectSetting": null
-}
--- a/.vs/VSWorkspaceState.json
+++ b/.vs/VSWorkspaceState.json
@@ -1,7 +0,0 @@
-{
-  "ExpandedNodes": [
-    ""
-  ],
-  "SelectedNode": "\\Global_Indexer.sln",
-  "PreviewInSolutionExplorer": false
-}
--- a/.vs/slnx.sqlite
+++ b/.vs/slnx.sqlite
--- a/FileFlow.sln
+++ b/FileFlow.sln
@@ -1,12 +1,14 @@

 Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio Version 16
-VisualStudioVersion = 16.0.29728.190
+# Visual Studio Version 17
+VisualStudioVersion = 17.5.33516.290
 MinimumVisualStudioVersion = 10.0.40219.1
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Global_Indexer", "Global_Indexer\Global_Indexer.vbproj", "{7474B1D2-49A4-4D12-B544-C8674D3F7231}"
 EndProject
 Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "SetupVS19", "SetupVS19\SetupVS19.wixproj", "{54DBCFAE-14B1-4811-94AF-B59FFF61EA73}"
 EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Global_Indexer.Test", "Global_Indexer.Test\Global_Indexer.Test.vbproj", "{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}"
+EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
 		CD_ROM|Any CPU = CD_ROM|Any CPU
@@ -79,6 +81,36 @@ Global
 		{54DBCFAE-14B1-4811-94AF-B59FFF61EA73}.SingleImage|Mixed Platforms.Build.0 = Release|x86
 		{54DBCFAE-14B1-4811-94AF-B59FFF61EA73}.SingleImage|x86.ActiveCfg = Release|x86
 		{54DBCFAE-14B1-4811-94AF-B59FFF61EA73}.SingleImage|x86.Build.0 = Release|x86
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.CD_ROM|Any CPU.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.CD_ROM|Any CPU.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.CD_ROM|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.CD_ROM|Mixed Platforms.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.CD_ROM|x86.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.CD_ROM|x86.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Debug|x86.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.DVD-5|Any CPU.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.DVD-5|Any CPU.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.DVD-5|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.DVD-5|Mixed Platforms.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.DVD-5|x86.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.DVD-5|x86.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Release|Any CPU.Build.0 = Release|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Release|x86.ActiveCfg = Release|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.Release|x86.Build.0 = Release|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.SingleImage|Any CPU.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.SingleImage|Any CPU.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.SingleImage|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.SingleImage|Mixed Platforms.Build.0 = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.SingleImage|x86.ActiveCfg = Debug|Any CPU
+		{8BFA2C72-1A8A-4B80-9666-483CF1CD21B1}.SingleImage|x86.Build.0 = Debug|Any CPU
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE
--- a/Global_Indexer.Test/ClassPostpostprocessingTest.vb
+++ b/Global_Indexer.Test/ClassPostpostprocessingTest.vb
@@ -0,0 +1,112 @@
+Imports System.Data
+Imports Microsoft.VisualStudio.TestTools.UnitTesting
+Imports FluentAssertions
+Imports DigitalData.Modules.Logging
+
+Namespace Global_Indexer.Test
+    <TestClass>
+    Public Class ClassPostprocessingTest
+
+        Private LogConfig As LogConfig
+        Private PostProcessing As ClassPostprocessing
+
+        <TestInitialize()>
+        Sub Init()
+            LogConfig = New LogConfig(LogPath:=LogConfig.PathType.Temp)
+            PostProcessing = New ClassPostprocessing(LogConfig)
+        End Sub
+
+        <TestMethod>
+        Sub Get_Nachbearbeitung_Wert_VBSPLIT_INDEX_0()
+            Dim oTable = GetDataTable(ClassPostprocessing.VBSPLIT, ",", "0")
+            Dim oString = "1,2,3,4"
+            Dim oExpected = "1"
+
+            Dim rString = PostProcessing.Get_Nachbearbeitung_Wert(oString, oTable)
+            rString.Should.Be(oExpected)
+        End Sub
+
+        <TestMethod>
+        Sub Get_Nachbearbeitung_Wert_VBSPLIT_INDEX_3()
+            Dim oTable = GetDataTable(ClassPostprocessing.VBSPLIT, ",", "3")
+            Dim oString = "1,2,3,4"
+            Dim oExpected = "4"
+
+            Dim rString = PostProcessing.Get_Nachbearbeitung_Wert(oString, oTable)
+            rString.Should.Be(oExpected)
+        End Sub
+
+        <TestMethod>
+        Sub Get_Nachbearbeitung_Wert_VBSPLIT_INDEX_5()
+            Dim oTable = GetDataTable(ClassPostprocessing.VBSPLIT, ",", "5")
+            Dim oString = "1,2,3,4"
+            Dim oExpected = "1,2,3,4"
+
+            Dim rString = PostProcessing.Get_Nachbearbeitung_Wert(oString, oTable)
+            rString.Should.Be(oExpected)
+        End Sub
+
+        <TestMethod>
+        Sub Get_Nachbearbeitung_Wert_VBREPLACE()
+            Dim oTable = GetDataTable(ClassPostprocessing.VBREPLACE, ",", "_")
+            Dim oString = "1,2,3,4"
+            Dim oExpected = "1_2_3_4"
+
+            Dim rString = PostProcessing.Get_Nachbearbeitung_Wert(oString, oTable)
+            rString.Should.Be(oExpected)
+        End Sub
+
+        <TestMethod>
+        Sub Get_Nachbearbeitung_Wert_VBREPLACE_NOT_EXISTING()
+            Dim oTable = GetDataTable(ClassPostprocessing.VBREPLACE, ";", "_")
+            Dim oString = "1,2,3,4"
+            Dim oExpected = "1,2,3,4"
+
+            Dim rString = PostProcessing.Get_Nachbearbeitung_Wert(oString, oTable)
+            rString.Should.Be(oExpected)
+        End Sub
+
+        <TestMethod>
+        Sub Get_Nachbearbeitung_Wert_VBREPLACE_EMPTY_STRING()
+            Dim oTable = GetDataTable(ClassPostprocessing.VBREPLACE, "", "_")
+            Dim oString = "1,2,3,4"
+            Dim oExpected = "1,2,3,4"
+
+            Dim rString = PostProcessing.Get_Nachbearbeitung_Wert(oString, oTable)
+            rString.Should.Be(oExpected)
+        End Sub
+
+        <TestMethod>
+        Sub Get_Nachbearbeitung_Wert_VBREPLACE_NOTHING1()
+            Dim oTable = GetDataTable(ClassPostprocessing.VBREPLACE, ",", Nothing)
+            Dim oString = "1,2,3,4"
+            Dim oExpected = "1,2,3,4"
+
+            Dim rString = PostProcessing.Get_Nachbearbeitung_Wert(oString, oTable)
+            rString.Should.Be(oExpected)
+        End Sub
+        <TestMethod>
+        Sub Get_Nachbearbeitung_Wert_VBREPLACE_NOTHING2()
+            Dim oTable = GetDataTable(ClassPostprocessing.VBREPLACE, Nothing, "_")
+            Dim oString = "1,2,3,4"
+            Dim oExpected = "1,2,3,4"
+
+            Dim rString = PostProcessing.Get_Nachbearbeitung_Wert(oString, oTable)
+            rString.Should.Be(oExpected)
+        End Sub
+
+        Private Function GetDataTable(pType As String, pText1 As String, Optional pText2 As String = "") As DataTable
+            Dim oTable As New DataTable()
+            oTable.Columns.Add("TYPE", GetType(String))
+            oTable.Columns.Add("TEXT1", GetType(String))
+            oTable.Columns.Add("TEXT2", GetType(String))
+            oTable.Rows.Add(pType, pText1, pText2)
+            oTable.AcceptChanges()
+
+            Return oTable
+        End Function
+    End Class
+
+
+End Namespace
+
--- a/Global_Indexer.Test/Global_Indexer.Test.vbproj
+++ b/Global_Indexer.Test/Global_Indexer.Test.vbproj
@@ -0,0 +1,32 @@
+<Project Sdk="Microsoft.NET.Sdk">
+
+  <PropertyGroup>
+    <RootNamespace>Global_Indexer.Test</RootNamespace>
+    <TargetFramework>net6.0</TargetFramework>
+
+    <IsPackable>false</IsPackable>
+    <IsTestProject>true</IsTestProject>
+  </PropertyGroup>
+
+  <ItemGroup>
+    <PackageReference Include="FluentAssertions" Version="6.12.0" />
+    <PackageReference Include="Microsoft.NET.Test.Sdk" Version="17.3.2" />
+    <PackageReference Include="MSTest.TestAdapter" Version="2.2.10" />
+    <PackageReference Include="MSTest.TestFramework" Version="2.2.10" />
+    <PackageReference Include="coverlet.collector" Version="3.1.2" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <ProjectReference Include="..\Global_Indexer\Global_Indexer.vbproj" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <Reference Include="DigitalData.Modules.Base">
+      <HintPath>..\..\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Logging">
+      <HintPath>..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
+    </Reference>
+  </ItemGroup>
+
+</Project>
--- a/Global_Indexer/ClassConfig.vb
+++ b/Global_Indexer/ClassConfig.vb
@@ -19,5 +19,4 @@ Public Class ClassConfig
    ' Misc Settings
    Public Property LogDEBUG As Boolean = True
    Public Property WindreamSearchMaximized As Boolean = False
-    Public Property OverrideLanguage As String = ""
 End Class
--- a/Global_Indexer/ClassInit.vb
+++ b/Global_Indexer/ClassInit.vb
@@ -1,11 +1,10 @@
-Imports System.ComponentModel
-Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.Logging
 Imports DigitalData.Modules.Config
 Imports DigitalData.Modules.Windream
-Imports DigitalData.Modules.Filesystem
 Imports DigitalData.Modules.Messaging
 Imports DigitalData.Modules.Database
-Imports DLLLicenseManager
+Imports DigitalData.Modules.Base
+
 Public Class ClassInit
    Private Form As Form

@@ -24,7 +23,7 @@ Public Class ClassInit

    Public Sub InitConfig()
        CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, Application.UserAppDataPath, Application.CommonAppDataPath, Application.StartupPath)
-        LOGCONFIG.Debug = Not CONFIG.Config.LogDEBUG
+        LOGCONFIG.Debug = CONFIG.Config.LogDEBUG
        LOGGER.Info("Debug log set to: [{0}]", LOGCONFIG.Debug)

        MyConnectionString = DecryptConnectionString(CONFIG.Config.ConnectionString)
@@ -81,8 +80,8 @@ Public Class ClassInit
        Dim configResult As Boolean
        configResult = Load_BasicConfig()

-        FILESYSTEM = New File(LOGCONFIG)
        EMAIL = New Email2(LOGCONFIG)
+        FILESYSTEM = New FilesystemEx(LOGCONFIG)

        If configResult = False Then
            If USER_LANGUAGE = "de-DE" Then
@@ -237,7 +236,7 @@ Public Class ClassInit
        Try
            Dim oSql As String

-            oSql = String.Format($"SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{Environment.UserName}','GLOBIX',{1},'{CONFIG.Config.OverrideLanguage}')")
+            oSql = String.Format($"SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{Environment.UserName}','GLOBIX',{1})")
            Dim DT_CHECKUSER_MODULE As DataTable = DATABASE_ECM.GetDatatable(oSql)
            If DT_CHECKUSER_MODULE.Rows.Count = 0 Then
                LOGGER.Info("DT_CHECKUSER_MODULE.Rows.Count = 0")
--- a/Global_Indexer/ClassPostprocessing.vb
+++ b/Global_Indexer/ClassPostprocessing.vb
@@ -1,12 +1,19 @@
 Imports System.Text.RegularExpressions
+Imports DigitalData.Modules.Base
+Imports DigitalData.Modules.Logging

 Public Class ClassPostprocessing
+    Inherits BaseClass

-    Private Const VBSPLIT = "VBSPLIT"
-    Private Const VBREPLACE = "VBREPLACE"
-    Private Const REGEXPRESSION = "REG. EXPRESSION"
+    Public Const VBSPLIT = "VBSPLIT"
+    Public Const VBREPLACE = "VBREPLACE"
+    Public Const REGEXPRESSION = "REG. EXPRESSION"

-    Public Shared Function Get_Nachbearbeitung_Wert(idxvalue As String, Datatable As DataTable) As String
+    Public Sub New(pLogConfig As LogConfig)
+        MyBase.New(pLogConfig)
+    End Sub
+
+    Public Function Get_Nachbearbeitung_Wert(idxvalue As String, Datatable As DataTable) As String
        Dim oIndexValues As List(Of String) = idxvalue.Split(ClassConstants.VECTORSEPARATOR).ToList()

        Try
@@ -14,9 +21,10 @@ Public Class ClassPostprocessing
                Dim oResult As New List(Of String)
                Dim oType As String = oDataRow.Item("TYPE").ToString.ToUpper

+                Logger.Info(" ...Nachbearbeitung mit [{0}]", oType)
+
                Select Case oType
                    Case VBSPLIT
-                        LOGGER.Info(" ...Nachbearbeitung mit VBSPLIT")

                        Dim oSeparator As String = oDataRow.Item("TEXT1")
                        Dim oSplitIndex As Integer = 0
@@ -31,34 +39,31 @@ Public Class ClassPostprocessing
                        Dim oFindString = oDataRow.Item("TEXT1")
                        Dim oReplaceString = oDataRow.Item("TEXT2")

-                        LOGGER.Info(" ...Nachbearbeitung mit VBREPLACE")
-                        LOGGER.Info(" ...Ersetze '" & oFindString & "' mit '" & oReplaceString & "'")
+                        Logger.Info(" ...Ersetze '" & oFindString & "' mit '" & oReplaceString & "'")

                        For Each oIndexValue In oIndexValues
                            Dim oReplaceResult = oIndexValue.Replace(oFindString, oReplaceString)
                            oResult.Add(oReplaceResult)
                        Next
-                    Case REGEXPRESSION
-                        LOGGER.Info(" ...Nachbearbeitung mit RegEx")

+                    Case REGEXPRESSION
                        Dim oRegexList As New List(Of Regex)
                        Dim oRegex As New Regex(oDataRow.Item("TEXT1"), RegexOptions.IgnoreCase)

                        oRegexList.Add(oRegex)

                        For Each oIndexValue In oIndexValues
-                            Dim oProcessedString = extractFromStringviaRE(oIndexValue, oRegexList)
+                            Dim oProcessedString = ExtractFromStringWithRegex(oIndexValue, oRegexList)
                            oResult.Add(oProcessedString)

-                            LOGGER.Info(" ...Ergebnis des RegEx: " & oProcessedString)
+                            Logger.Info(" ...Ergebnis des RegEx: " & oProcessedString)
                        Next
                End Select

                oIndexValues = oResult
            Next
        Catch ex As Exception
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Get_Nachbearbeitung_Wert:")
-            LOGGER.Info(" - Unvorhergesehener Unexpected error in Get_Nachbearbeitung_Wert - result: " & idxvalue & " - Fehler: " & vbNewLine & ex.Message)
+            Logger.Error(ex)
        End Try

        Return String.Join(ClassConstants.VECTORSEPARATOR, oIndexValues.ToArray)
@@ -71,7 +76,7 @@ Public Class ClassPostprocessing
    ''' <param name="RegexList">Eine Liste von Regular Expressions</param>
    ''' <param name="RegexGroup">Die Ergebnisgruppe, die die Adresse enthält</param>
    ''' <returns>Eine Emailadresse oder Nothing, wenn keine der Regular Expressions ein Ergebnis lieferte.</returns>
-    Public Shared Function extractFromStringviaRE(SearchString As String, RegexList As List(Of Regex), Optional RegexGroup As Integer = 1)
+    Private Function ExtractFromStringWithRegex(SearchString As String, RegexList As List(Of Regex), Optional RegexGroup As Integer = 1)
        If IsNothing(SearchString) Then
            Return Nothing
        End If
--- a/Global_Indexer/ModuleCURRENT.vb
+++ b/Global_Indexer/ModuleCURRENT.vb
@@ -1,6 +1,6 @@
 Imports DigitalData.Modules.Config
 Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Filesystem
+Imports DigitalData.Modules.Base
 Imports DigitalData.Modules.Messaging

 Module ModuleCURRENT
@@ -16,8 +16,8 @@ Module ModuleCURRENT
    Public Property CONFIG As ConfigManager(Of ClassConfig)
    Public Property LOGCONFIG As LogConfig
    Public Property LOGGER As Logger
-    Public Property FILESYSTEM As File
    Public Property EMAIL As Email2
+    Public Property FILESYSTEM As FilesystemEx

    Public Property FILE_HANDLER As ClassFileHandler
    Public Property FOLDER_WATCHER As ClassFolderWatcher
--- a/Project/AssemblyInfo.vb
+++ b/Project/AssemblyInfo.vb
@@ -14,8 +14,8 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyDescription("")>
 <Assembly: AssemblyCompany("Digital Data")>
 <Assembly: AssemblyProduct("File Flow")>
-<Assembly: AssemblyCopyright("Copyright © 2022")>
-<Assembly: AssemblyTrademark("2.6.2.0")>
+<Assembly: AssemblyCopyright("Copyright © 2023")>
+<Assembly: AssemblyTrademark("2.6.7.1")>

 <Assembly: ComVisible(False)> 

@@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 

-<Assembly: AssemblyVersion("2.6.5.0")>
+<Assembly: AssemblyVersion("2.6.7.1")>
 <Assembly: AssemblyFileVersion("1.0.0.0")>

 <Assembly: NeutralResourcesLanguageAttribute("")> 
--- a/Global_Indexer/frmAdministration.Designer.vb
+++ b/Global_Indexer/frmAdministration.Designer.vb
@@ -357,12 +357,20 @@ Partial Class frmAdministration
        GEANDERTWERLabel = New System.Windows.Forms.Label()
        GEAENDERTWANNLabel = New System.Windows.Forms.Label()
        CType(Me.SplitContainerControl2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl2.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl2.Panel1.SuspendLayout()
+        CType(Me.SplitContainerControl2.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl2.Panel2.SuspendLayout()
        Me.SplitContainerControl2.SuspendLayout()
        CType(Me.gridAssignedGroups, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.viewAssignedGroups, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.gridAvailableGroups, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.viewAvailableGroups, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.SplitContainerControl5, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl5.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl5.Panel1.SuspendLayout()
+        CType(Me.SplitContainerControl5.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl5.Panel2.SuspendLayout()
        Me.SplitContainerControl5.SuspendLayout()
        CType(Me.gridAssignedUsers, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.viewAssignedUsers, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -370,6 +378,10 @@ Partial Class frmAdministration
        CType(Me.gridAvailableUsers, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.viewAvailableUsers, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.SplitContainerControl4, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl4.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl4.Panel1.SuspendLayout()
+        CType(Me.SplitContainerControl4.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl4.Panel2.SuspendLayout()
        Me.SplitContainerControl4.SuspendLayout()
        CType(Me.GridControlProfile, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TBDD_DOKUMENTARTBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -421,9 +433,15 @@ Partial Class frmAdministration
        resources.ApplyResources(Me.SplitContainerControl2, "SplitContainerControl2")
        Me.SplitContainerControl2.Horizontal = False
        Me.SplitContainerControl2.Name = "SplitContainerControl2"
+        '
+        'SplitContainerControl2.Panel1
+        '
        Me.SplitContainerControl2.Panel1.Controls.Add(Me.gridAssignedGroups)
        Me.SplitContainerControl2.Panel1.Controls.Add(Me.Label13)
        resources.ApplyResources(Me.SplitContainerControl2.Panel1, "SplitContainerControl2.Panel1")
+        '
+        'SplitContainerControl2.Panel2
+        '
        Me.SplitContainerControl2.Panel2.Controls.Add(Me.gridAvailableGroups)
        Me.SplitContainerControl2.Panel2.Controls.Add(Me.Label14)
        resources.ApplyResources(Me.SplitContainerControl2.Panel2, "SplitContainerControl2.Panel2")
@@ -536,9 +554,15 @@ Partial Class frmAdministration
        resources.ApplyResources(Me.SplitContainerControl5, "SplitContainerControl5")
        Me.SplitContainerControl5.Horizontal = False
        Me.SplitContainerControl5.Name = "SplitContainerControl5"
+        '
+        'SplitContainerControl5.Panel1
+        '
        Me.SplitContainerControl5.Panel1.Controls.Add(Me.gridAssignedUsers)
        Me.SplitContainerControl5.Panel1.Controls.Add(Me.Label2)
        resources.ApplyResources(Me.SplitContainerControl5.Panel1, "SplitContainerControl5.Panel1")
+        '
+        'SplitContainerControl5.Panel2
+        '
        Me.SplitContainerControl5.Panel2.Controls.Add(Me.gridAvailableUsers)
        Me.SplitContainerControl5.Panel2.Controls.Add(Me.Label35)
        resources.ApplyResources(Me.SplitContainerControl5.Panel2, "SplitContainerControl5.Panel2")
@@ -974,9 +998,15 @@ Partial Class frmAdministration
        '
        resources.ApplyResources(Me.SplitContainerControl4, "SplitContainerControl4")
        Me.SplitContainerControl4.Name = "SplitContainerControl4"
+        '
+        'SplitContainerControl4.Panel1
+        '
        Me.SplitContainerControl4.Panel1.Controls.Add(Me.GridControlProfile)
        Me.SplitContainerControl4.Panel1.Controls.Add(Me.Label3)
        resources.ApplyResources(Me.SplitContainerControl4.Panel1, "SplitContainerControl4.Panel1")
+        '
+        'SplitContainerControl4.Panel2
+        '
        Me.SplitContainerControl4.Panel2.Controls.Add(Me.XtraTabControl1)
        resources.ApplyResources(Me.SplitContainerControl4.Panel2, "SplitContainerControl4.Panel2")
        Me.SplitContainerControl4.SplitterPosition = 224
@@ -2477,12 +2507,20 @@ Partial Class frmAdministration
        Me.Name = "frmAdministration"
        Me.Ribbon = Me.RibbonControl1
        Me.StatusBar = Me.RibbonStatusBar1
+        CType(Me.SplitContainerControl2.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl2.Panel1.ResumeLayout(False)
+        CType(Me.SplitContainerControl2.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl2.Panel2.ResumeLayout(False)
        CType(Me.SplitContainerControl2, System.ComponentModel.ISupportInitialize).EndInit()
        Me.SplitContainerControl2.ResumeLayout(False)
        CType(Me.gridAssignedGroups, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.viewAssignedGroups, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.gridAvailableGroups, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.viewAvailableGroups, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControl5.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl5.Panel1.ResumeLayout(False)
+        CType(Me.SplitContainerControl5.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl5.Panel2.ResumeLayout(False)
        CType(Me.SplitContainerControl5, System.ComponentModel.ISupportInitialize).EndInit()
        Me.SplitContainerControl5.ResumeLayout(False)
        CType(Me.gridAssignedUsers, System.ComponentModel.ISupportInitialize).EndInit()
@@ -2490,6 +2528,10 @@ Partial Class frmAdministration
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.gridAvailableUsers, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.viewAvailableUsers, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControl4.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl4.Panel1.ResumeLayout(False)
+        CType(Me.SplitContainerControl4.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl4.Panel2.ResumeLayout(False)
        CType(Me.SplitContainerControl4, System.ComponentModel.ISupportInitialize).EndInit()
        Me.SplitContainerControl4.ResumeLayout(False)
        CType(Me.GridControlProfile, System.ComponentModel.ISupportInitialize).EndInit()
--- a/Global_Indexer/frmAdministration.resx
+++ b/Global_Indexer/frmAdministration.resx
@@ -258,6 +258,18 @@
  <data name="SplitContainerControl2.Panel1.Text" xml:space="preserve">
    <value>Panel1</value>
  </data>
+  <data name="&gt;&gt;SplitContainerControl2.Panel1.Name" xml:space="preserve">
+    <value>SplitContainerControl2.Panel1</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl2.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;SplitContainerControl2.Panel1.Parent" xml:space="preserve">
+    <value>SplitContainerControl2</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl2.Panel1.ZOrder" xml:space="preserve">
+    <value>0</value>
+  </data>
  <data name="gridAvailableGroups.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
    <value>Fill</value>
  </data>
@@ -307,7 +319,7 @@
    <value>170</value>
  </data>
  <data name="gridAvailableGroups.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1072, 246</value>
+    <value>1072, 245</value>
  </data>
  <data name="gridAvailableGroups.TabIndex" type="System.Int32, mscorlib">
    <value>88</value>
@@ -357,8 +369,20 @@
  <data name="SplitContainerControl2.Panel2.Text" xml:space="preserve">
    <value>Panel2</value>
  </data>
+  <data name="&gt;&gt;SplitContainerControl2.Panel2.Name" xml:space="preserve">
+    <value>SplitContainerControl2.Panel2</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl2.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;SplitContainerControl2.Panel2.Parent" xml:space="preserve">
+    <value>SplitContainerControl2</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl2.Panel2.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
  <data name="SplitContainerControl2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1072, 561</value>
+    <value>1072, 560</value>
  </data>
  <data name="SplitContainerControl2.TabIndex" type="System.Int32, mscorlib">
    <value>88</value>
@@ -437,7 +461,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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOwDAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -464,7 +488,7 @@
  </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/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAEcDAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -488,7 +512,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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAC4DAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -512,7 +536,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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGICAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -533,7 +557,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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALMCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -555,7 +579,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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAO4BAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -574,7 +598,7 @@
  </data>
  <data name="BarButtonItem7.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
@@ -598,7 +622,7 @@
  </data>
  <data name="BarButtonItem8.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAMcCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -620,7 +644,7 @@
  </data>
  <data name="txtStatus.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABsDAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -644,7 +668,7 @@
  </data>
  <data name="BarButtonItem15.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOgCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -667,7 +691,7 @@
  </data>
  <data name="BarButtonItem13.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
@@ -686,7 +710,7 @@
  </data>
  <data name="BarButtonItem14.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALMCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -708,7 +732,7 @@
  </data>
  <data name="BarButtonItem16.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
@@ -729,7 +753,7 @@
  </data>
  <data name="BarButtonItem17.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
@@ -748,7 +772,7 @@
  </data>
  <data name="BarButtonItem18.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
@@ -772,7 +796,7 @@
  </data>
  <data name="BarButtonItem19.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALMCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -794,7 +818,7 @@
  </data>
  <data name="BarButtonItem20.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
@@ -815,7 +839,7 @@
  </data>
  <data name="BarButtonItem21.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
@@ -834,7 +858,7 @@
  </data>
  <data name="BarButtonItem22.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
@@ -858,7 +882,7 @@
  </data>
  <data name="BarButtonItem23.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALMCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -880,7 +904,7 @@
  </data>
  <data name="BarButtonItem24.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
@@ -901,7 +925,7 @@
  </data>
  <data name="BarButtonItem25.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
@@ -920,7 +944,7 @@
  </data>
  <data name="BarButtonItem26.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
@@ -944,7 +968,7 @@
  </data>
  <data name="BarButtonItem27.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALMCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -966,7 +990,7 @@
  </data>
  <data name="BarButtonItem28.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
@@ -987,7 +1011,7 @@
  </data>
  <data name="BarButtonItem29.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAADkDAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -1049,7 +1073,7 @@
    <value>Grundeinstellungen</value>
  </data>
  <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1310, 157</value>
+    <value>1310, 158</value>
  </data>
  <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
    <value>0, 774</value>
@@ -1132,6 +1156,18 @@
  <data name="SplitContainerControl5.Panel1.Text" xml:space="preserve">
    <value>Panel1</value>
  </data>
+  <data name="&gt;&gt;SplitContainerControl5.Panel1.Name" xml:space="preserve">
+    <value>SplitContainerControl5.Panel1</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl5.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;SplitContainerControl5.Panel1.Parent" xml:space="preserve">
+    <value>SplitContainerControl5</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl5.Panel1.ZOrder" xml:space="preserve">
+    <value>0</value>
+  </data>
  <data name="gridAvailableUsers.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
    <value>Fill</value>
  </data>
@@ -1184,7 +1220,7 @@
    <value>150</value>
  </data>
  <data name="gridAvailableUsers.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1072, 277</value>
+    <value>1072, 276</value>
  </data>
  <data name="gridAvailableUsers.TabIndex" type="System.Int32, mscorlib">
    <value>1</value>
@@ -1237,8 +1273,20 @@
  <data name="SplitContainerControl5.Panel2.Text" xml:space="preserve">
    <value>Panel2</value>
  </data>
+  <data name="&gt;&gt;SplitContainerControl5.Panel2.Name" xml:space="preserve">
+    <value>SplitContainerControl5.Panel2</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl5.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;SplitContainerControl5.Panel2.Parent" xml:space="preserve">
+    <value>SplitContainerControl5</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl5.Panel2.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
  <data name="SplitContainerControl5.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1072, 561</value>
+    <value>1072, 560</value>
  </data>
  <data name="SplitContainerControl5.TabIndex" type="System.Int32, mscorlib">
    <value>0</value>
@@ -1259,7 +1307,7 @@
    <value>Fill</value>
  </data>
  <data name="SplitContainerControl4.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 157</value>
+    <value>0, 158</value>
  </data>
  <metadata name="TBDD_DOKUMENTARTBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>127, 17</value>
@@ -1270,22 +1318,22 @@
  <data name="GridControlProfile.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
    <value>Fill</value>
  </data>
-  <data name="GridControl1.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v21.2">
+  <data name="GridControlProfile.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v21.2">
    <value>True</value>
  </data>
-  <data name="GridControl1.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
+  <data name="GridControlProfile.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
    <value>None</value>
  </data>
-  <data name="GridControl1.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
+  <data name="GridControlProfile.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
    <value>None</value>
  </data>
-  <data name="GridControl1.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
+  <data name="GridControlProfile.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
    <value>NoControl</value>
  </data>
-  <data name="GridControl1.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v21.2">
+  <data name="GridControlProfile.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v21.2">
    <value>None</value>
  </data>
-  <data name="GridControl1.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v21.2">
+  <data name="GridControlProfile.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v21.2">
    <value>Application</value>
  </data>
  <data name="GridControlProfile.Location" type="System.Drawing.Point, System.Drawing">
@@ -1313,7 +1361,7 @@
    <value>277</value>
  </data>
  <data name="GridControlProfile.Size" type="System.Drawing.Size, System.Drawing">
-    <value>224, 587</value>
+    <value>224, 586</value>
  </data>
  <data name="GridControlProfile.TabIndex" type="System.Int32, mscorlib">
    <value>93</value>
@@ -1369,6 +1417,18 @@
  <data name="SplitContainerControl4.Panel1.Text" xml:space="preserve">
    <value>Panel1</value>
  </data>
+  <data name="&gt;&gt;SplitContainerControl4.Panel1.Name" xml:space="preserve">
+    <value>SplitContainerControl4.Panel1</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl4.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;SplitContainerControl4.Panel1.Parent" xml:space="preserve">
+    <value>SplitContainerControl4</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl4.Panel1.ZOrder" xml:space="preserve">
+    <value>0</value>
+  </data>
  <data name="XtraTabControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
    <value>Fill</value>
  </data>
@@ -2246,7 +2306,7 @@
    <value>Bottom</value>
  </data>
  <data name="XtraTabControl2.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 281</value>
+    <value>0, 280</value>
  </data>
  <data name="XtraTabPageManualIndex.AutoScroll" type="System.Boolean, mscorlib">
    <value>True</value>
@@ -3262,7 +3322,7 @@ der Datei</value>
  </data>
  <data name="XtraTabPageManualIndex.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFcCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -4173,7 +4233,7 @@ der Datei</value>
  </data>
  <data name="XtraTabPageManualIndexFunctions.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAHQHAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -5053,7 +5113,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
  </data>
  <data name="XtraTabPageAutoIndex.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAADQDAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -5485,7 +5545,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
  </data>
  <data name="XtraTabPageFolderPath.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGcEAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -5940,7 +6000,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
  </data>
  <data name="XtraTabPageProfileRegex.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFQEAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -6371,7 +6431,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
  </data>
  <data name="XtraTabPageProfiles.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOYDAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -6397,7 +6457,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
    <value>3, 4, 3, 4</value>
  </data>
  <data name="XtraTabPageProfiles.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1074, 587</value>
+    <value>1074, 586</value>
  </data>
  <data name="XtraTabPageProfiles.Text" xml:space="preserve">
    <value>Profil-Verwaltung</value>
@@ -6415,7 +6475,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
    <value>0</value>
  </data>
  <data name="XtraTabControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1076, 617</value>
+    <value>1076, 616</value>
  </data>
  <data name="XtraTabControl1.TabIndex" type="System.Int32, mscorlib">
    <value>1</value>
@@ -6431,7 +6491,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
  </data>
  <data name="tabPageUsers.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOsDAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -6454,7 +6514,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
 </value>
  </data>
  <data name="tabPageUsers.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1072, 561</value>
+    <value>1072, 560</value>
  </data>
  <data name="tabPageUsers.Text" xml:space="preserve">
    <value>Gruppen-Zuordnung</value>
@@ -6472,14 +6532,14 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
    <value>1</value>
  </data>
  <data name="XtraTabControl3.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1074, 587</value>
+    <value>1074, 586</value>
  </data>
  <data name="XtraTabControl3.TabIndex" type="System.Int32, mscorlib">
    <value>89</value>
  </data>
  <data name="tabPageGroups.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOoDAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -6502,7 +6562,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
 </value>
  </data>
  <data name="tabPageGroups.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1072, 561</value>
+    <value>1072, 560</value>
  </data>
  <data name="tabPageGroups.Text" xml:space="preserve">
    <value>Benutzer-Zuordnung</value>
@@ -6533,7 +6593,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
  </data>
  <data name="XtraTabPageUsersGroups.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
        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAJkCAAAC77u/
        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
@@ -6554,7 +6614,7 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
    <value>3, 4, 3, 4</value>
  </data>
  <data name="XtraTabPageUsersGroups.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1074, 587</value>
+    <value>1074, 586</value>
  </data>
  <data name="XtraTabPageUsersGroups.Text" xml:space="preserve">
    <value>Profil-Zuordnung</value>
@@ -6586,8 +6646,20 @@ Die erhaltenen Werte können in Indizes geschrieben oder zur Benennung der Datei
  <data name="SplitContainerControl4.Panel2.Text" xml:space="preserve">
    <value>Panel2</value>
  </data>
+  <data name="&gt;&gt;SplitContainerControl4.Panel2.Name" xml:space="preserve">
+    <value>SplitContainerControl4.Panel2</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl4.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;SplitContainerControl4.Panel2.Parent" xml:space="preserve">
+    <value>SplitContainerControl4</value>
+  </data>
+  <data name="&gt;&gt;SplitContainerControl4.Panel2.ZOrder" xml:space="preserve">
+    <value>1</value>
+  </data>
  <data name="SplitContainerControl4.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1310, 617</value>
+    <value>1310, 616</value>
  </data>
  <data name="SplitContainerControl4.TabIndex" type="System.Int32, mscorlib">
    <value>4</value>
--- a/Global_Indexer/frmAdministration.vb
+++ b/Global_Indexer/frmAdministration.vb
@@ -527,12 +527,13 @@ Public Class frmAdministration

            Dim oDatatable = DATABASE_ECM.GetDatatable($"SELECT * FROM TBDD_INDEX_MAN WHERE DOK_ID = {oDocTypeGuid} AND ACTIVE = 1")
            Dim oPlaceholders = oDatatable.AsEnumerable().
-                ToDictionary(Of String, String)(Function(row) row.Item("NAME"), Function(row) row.Item("WD_INDEX"))
+                ToDictionary(Of String, String)(Function(row) row.Item("NAME"), Function(row) row.Item("NAME"))

            Dim oForm2 As New DigitalData.GUIs.Common.frmSQLEditor(LOGCONFIG, DATABASE_ECM) With {
                .SQLCommand = oSQLCommand,
                .SQLConnection = oConnection,
-                .PlaceholdersManual = oPlaceholders
+                .PlaceholdersManual = oPlaceholders,
+                .PlaceholdersManualPrefix = "CTRL"
            }

            Dim oResult = oForm2.ShowDialog()
--- a/Global_Indexer/frmIndex.resx
+++ b/Global_Indexer/frmIndex.resx
@@ -610,7 +610,7 @@
    <value>DocumentViewer1</value>
  </data>
  <data name="&gt;&gt;DocumentViewer1.Type" xml:space="preserve">
-    <value>DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.8.0.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.9.1.0, Culture=neutral, PublicKeyToken=null</value>
  </data>
  <data name="&gt;&gt;DocumentViewer1.Parent" xml:space="preserve">
    <value>SplitContainer1.Panel2</value>
--- a/Global_Indexer/frmIndex.vb
+++ b/Global_Indexer/frmIndex.vb
@@ -3,16 +3,14 @@ Imports System.Text.RegularExpressions
 Imports System.Text
 Imports System.Security.AccessControl
 Imports System.Security.Principal
-Imports System.DirectoryServices
 Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Language
 Imports DigitalData.Controls.LookupGrid
 Imports DigitalData.GUIs.GlobalIndexer
 Imports DevExpress.XtraEditors.Controls
 Imports Limilabs.Mail
-Imports Limilabs.Mail.Headers
 Imports DevExpress.XtraEditors
 Imports DigitalData.GUIs.Common
+Imports DigitalData.Modules.Base

 Public Class frmIndex
 #Region "+++++ Variablen ++++++"
@@ -49,6 +47,7 @@ Public Class frmIndex

    Private ReadOnly _Logger As Logger
    Private ReadOnly _FormHelper As FormHelper
+    Private ReadOnly _PostProcessing As ClassPostprocessing

 #End Region

@@ -83,6 +82,7 @@ Public Class frmIndex
        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
        _Logger = LOGCONFIG.GetLogger()
        _FormHelper = New FormHelper(LOGCONFIG, Me)
+        _PostProcessing = New ClassPostprocessing(LOGCONFIG)

        Localizer.Active = New LookupGridLocalizer()
    End Sub
@@ -524,7 +524,7 @@ Public Class frmIndex
                        Dim DTNB As DataTable = DATABASE_ECM.GetDatatable("SELECT * FROM TBDD_INDEX_MAN_POSTPROCESSING WHERE IDXMAN_ID = " & idxid & " AND VARIANT = 'ONLY FILE/FOLDER' ORDER BY SEQUENCE")
                        If DTNB Is Nothing = False Then
                            If DTNB.Rows.Count > 0 Then
-                                value_post = ClassPostprocessing.Get_Nachbearbeitung_Wert(wert_in, DTNB)
+                                value_post = _PostProcessing.Get_Nachbearbeitung_Wert(wert_in, DTNB)
                                DR.Item("Indexwert") = wert_in
                                DR.Item("Indexwert_File") = value_post
                            End If
@@ -534,7 +534,7 @@ Public Class frmIndex
                        DTNB = DATABASE_ECM.GetDatatable("SELECT * FROM TBDD_INDEX_MAN_POSTPROCESSING WHERE IDXMAN_ID = " & idxid & " AND VARIANT = 'FILE AND INDEX' ORDER BY SEQUENCE")
                        If DTNB Is Nothing = False Then
                            If DTNB.Rows.Count > 0 Then
-                                value_post = ClassPostprocessing.Get_Nachbearbeitung_Wert(wert_in, DTNB)
+                                value_post = _PostProcessing.Get_Nachbearbeitung_Wert(wert_in, DTNB)
                                DR.Item("Indexwert") = value_post
                            End If
                        End If
@@ -551,7 +551,6 @@ Public Class frmIndex
        Try
            _Logger.Debug("#### Name_Generieren ####")
            Dim sql As String = "select VERSION_DELIMITER, FILE_DELIMITER FROM TBDD_MODULES WHERE GUID = 1"
-            Dim oFilesystem As New DigitalData.Modules.Filesystem.File(LOGCONFIG)
            Dim DT1 As DataTable = DATABASE_ECM.GetDatatable(sql)
            For Each row As DataRow In DT1.Rows
                FILE_DELIMITER = row.Item("FILE_DELIMITER")
@@ -571,7 +570,7 @@ Public Class frmIndex
            CURR_WORKFILE_EXTENSION = extension

            oRAWZielordner = WINDREAM.GetNormalizedPath(DT.Rows(0).Item("ZIEL_PFAD"), True)
-            oRAWZielordner = Path.Combine(WINDREAM_BASEPATH, oRAWZielordner)
+            oRAWZielordner = WINDREAM_BASEPATH & oRAWZielordner

            '####
            ' Regulären Ausdruck zum Auslesen der Indexe definieren
@@ -725,7 +724,7 @@ Public Class frmIndex
                End Select
            Next

-            CURRENT_NEWFILENAME = oFilesystem.GetCleanFilename(NewFileString)
+            CURRENT_NEWFILENAME = FILESYSTEM.GetCleanFilename(NewFileString)
            'CURRENT_NEWFILENAME = ClassFilehandle.CleanFilename(NewFileString, "")
            CURRENT_NEWFILENAME = Path.Combine(oRAWZielordner, CURRENT_NEWFILENAME)

@@ -931,7 +930,14 @@ Public Class frmIndex
            If pIndexAttachment = False Then
                LOGGER.Debug("Indexing Email File: [{0}]", CURRENT_NEWFILENAME)

-                Dim oMsgFilePath As String = Path.Combine(WINDREAM_BASEPATH, CURRENT_NEWFILENAME)
+                ' This cannot use Path.Combine, otherwise the WINDREAM_BASEPATH will be swallowed... lol
+                'Dim oMsgFilePath As String = Path.Combine(WINDREAM_BASEPATH, CURRENT_NEWFILENAME)
+
+                Dim oMsgFilePath As String = CURRENT_NEWFILENAME
+                If CURRENT_NEWFILENAME.StartsWith(WINDREAM_BASEPATH) = False Then
+                    oMsgFilePath = WINDREAM_BASEPATH & oMsgFilePath
+                End If
+
                Dim oMail As IMail = EMAIL.Load_Email(oMsgFilePath)

                Dim oMessageId As String = oMail.MessageID
@@ -1387,7 +1393,7 @@ Public Class frmIndex
            End If

            Dim oStreamSuccessful = WINDREAM.NewFileStream(CURRENT_WORKFILE, CURRENT_NEWFILENAME, CURR_DOKART_OBJECTTYPE)
-            Dim oTempPath As String = Path.Combine(WINDREAM_BASEPATH, CURRENT_NEWFILENAME)
+            Dim oTempPath As String = WINDREAM_BASEPATH & CURRENT_NEWFILENAME

            _Logger.Debug("Checks for file [{0}]", oTempPath)
            _Logger.Debug("File streamed to Windream: {0}", oStreamSuccessful)
@@ -1896,7 +1902,7 @@ Public Class frmIndex
                Dim AddNewItems As Boolean = oRow.Item("VKT_ADD_ITEM")
                Dim PreventDuplicates As Boolean = oRow.Item("VKT_PREVENT_MULTIPLE_VALUES")
                Dim oControlName As String = oRow.Item("NAME")
-                Dim oConnectionId = Utils.NotNull(oRow.Item("CONNECTION_ID"), 0)
+                Dim oConnectionId = oRow.ItemEx("CONNECTION_ID", 0)
                Dim oSQLSuggestion = oRow.Item("SUGGESTION")
                Dim oSQLResult = oRow.Item("SQL_RESULT")

@@ -2023,9 +2029,9 @@ Public Class frmIndex
                LOGGER.Debug("Found [{0}] depending controls for [{1}]", oDatatable.Rows.Count, Control.Name)

                For Each oRow As DataRow In oDatatable.Rows
-                    Dim oControlName As String = Utils.NotNull(oRow.Item("NAME"), "")
-                    Dim oConnectionId As Integer = Utils.NotNull(oRow.Item("CONNECTION_ID"), -1)
-                    Dim oControlSql As String = Utils.NotNull(oRow.Item("SQL_RESULT"), "")
+                    Dim oControlName As String = oRow.ItemEx("NAME", "")
+                    Dim oConnectionId As Integer = oRow.ItemEx("CONNECTION_ID", -1)
+                    Dim oControlSql As String = oRow.ItemEx("SQL_RESULT", "")

                    If oConnectionId = -1 Or oControlSql = String.Empty Then
                        LOGGER.Warn("Missing SQL Query or ConnectionId for Control [{0}]! Continuing.", oControlName)
@@ -2052,8 +2058,7 @@ Public Class frmIndex
            End If

            Dim oConnectionString = DATABASE_ECM.Get_ConnectionStringforID(SqlConnectionId)
-            'Dim oDatatable As DataTable = ClassDatabase.Return_Datatable_CS(SqlCommand, oConnectionString)
-            Dim oDatatable As DataTable = DATABASE_ECM.GetDatatable(SqlCommand)
+            Dim oDatatable As DataTable = DATABASE_ECM.GetDatatableWithConnection(SqlCommand, oConnectionString)
            Dim oFoundControl As Control = Nothing

            For Each oControl As Control In pnlIndex.Controls
@@ -2081,7 +2086,7 @@ Public Class frmIndex
            End If

            Select Case oFoundControl.GetType.Name
-                Case GetType(DevExpress.XtraEditors.TextEdit).Name
+                Case GetType(TextEdit).Name
                    If oDatatable.Rows.Count > 0 Then
                        Dim oFirstRow As DataRow = oDatatable.Rows.Item(0)

@@ -2089,7 +2094,7 @@ Public Class frmIndex
                            Dim oValue = oFirstRow.Item(0).ToString()

                            LOGGER.Debug("Setting Value for TextEdit [{0}]: [{1}]", oFoundControl.Name, oValue)
-                            DirectCast(oFoundControl, DevExpress.XtraEditors.TextEdit).Text = oValue
+                            DirectCast(oFoundControl, TextEdit).Text = oValue
                        End If
                    End If
                Case GetType(LookupControl3).Name
@@ -2170,19 +2175,19 @@ Public Class frmIndex
            End If

            ' 1. Schritt: Einfach-Indexe und Platzhalter ersetzen
-            For Each oAutoIndexRow As DataRow In oDatatable
-                _Logger.Info("Working on AutomaticIndex: " & oAutoIndexRow.Item("INDEXNAME") & "...")
-                Dim oSqlResult As String = Utils.NotNull(oAutoIndexRow.Item("SQL_RESULT"), "")
-                Dim oSqlActive As Boolean = Utils.NotNull(oAutoIndexRow.Item("SQL_ACTIVE"), False)
-                Dim oSqlConnectionId As Integer = Utils.NotNull(oAutoIndexRow.Item("CONNECTION_ID"), -1)
-                Dim oSqlProvider As String = Utils.NotNull(oAutoIndexRow.Item("SQL_PROVIDER"), "")
+            For Each oRow As DataRow In oDatatable
+                _Logger.Info("Working on AutomaticIndex: " & oRow.Item("INDEXNAME") & "...")
+                Dim oSqlResult As String = oRow.ItemEx("SQL_RESULT", "")
+                Dim oSqlActive As Boolean = oRow.ItemEx("SQL_ACTIVE", False)
+                Dim oSqlConnectionId As Integer = oRow.ItemEx("CONNECTION_ID", -1)
+                Dim oSqlProvider As String = oRow.ItemEx("SQL_PROVIDER", "")
                Dim oEndResult As New List(Of String)

                ' Wenn kein SQL Befehl vorhanden oder aktiv ist, 
                ' versuchen wir, die Spalte VALUE zu ersetzen
                If oSqlResult = String.Empty Or oSqlActive = 0 Then
                    Dim oPlaceholderResult As String
-                    Dim oValue As String = Utils.NotNull(oAutoIndexRow.Item("VALUE"), "")
+                    Dim oValue As String = oRow.ItemEx("VALUE", "")

                    oPlaceholderResult = GetPlaceholderValue(oValue, CURRENT_WORKFILE, USER_SHORTNAME)

@@ -2190,8 +2195,8 @@ Public Class frmIndex
                        oValue = oPlaceholderResult
                    End If

-                    oAutoIndexRow.Item("Indexiert") = True
-                    oAutoIndexRow.Item("Indexwert") = oValue
+                    oRow.Item("Indexiert") = True
+                    oRow.Item("Indexwert") = oValue

                    Continue For
                End If
@@ -2264,14 +2269,14 @@ Public Class frmIndex
                        If oIsFirstMatch Then
                            Exit For
                        End If
-                        oAutoIndexRow.Item("Indexiert") = True
-                        oAutoIndexRow.Item("Indexwert") = String.Join(ClassConstants.VECTORSEPARATOR, oEndResult.ToArray)
+                        oRow.Item("Indexiert") = True
+                        oRow.Item("Indexwert") = String.Join(ClassConstants.VECTORSEPARATOR, oEndResult.ToArray)
                    Next
                Else
                    Dim oResult = GetAutomaticIndexSQLValue(oSqlResult, oSqlConnectionId, oSqlProvider)
                    _Logger.Info("Got a simple SQLResult: " & oResult.ToString)
-                    oAutoIndexRow.Item("Indexiert") = True
-                    oAutoIndexRow.Item("Indexwert") = oResult
+                    oRow.Item("Indexiert") = True
+                    oRow.Item("Indexwert") = oResult

                End If
            Next
@@ -2541,8 +2546,7 @@ Public Class frmIndex
    Private Function CreateFolderForIndex(DynamicFolderConfig As String)
        Try
            Dim oRootFolder As String = Path.GetDirectoryName(CURRENT_NEWFILENAME)
-            Dim oFilesystem As New DigitalData.Modules.Filesystem.File(LOGCONFIG)
-
+            'Dim oFilesystem As New Filesystem(LOGCONFIG)

            If DynamicFolderConfig <> String.Empty Then
                '######
@@ -2570,7 +2574,7 @@ Public Class frmIndex
                                    oManIndexValue = CDate(oManIndexValue).ToString("yyyyMMdd")
                                End If

-                                oManIndexValue = oFilesystem.GetCleanPath(oManIndexValue)
+                                oManIndexValue = FILESYSTEM.GetCleanPath(oManIndexValue)
                                'oManIndexValue = ClassFilehandle.CleanFilename(oManIndexValue, "")
                                DynamicFolderConfig = DynamicFolderConfig.Replace(oMatch.ToString, oManIndexValue)

@@ -2592,7 +2596,7 @@ Public Class frmIndex
                            _Logger.Info("Ergebnis/Wert für neuen Ordner: '" & oAutoIndexName & "'")
                            If Not oAutoIndexValue = String.Empty Then

-                                oAutoIndexValue = oFilesystem.GetCleanPath(oAutoIndexValue)
+                                oAutoIndexValue = FILESYSTEM.GetCleanPath(oAutoIndexValue)
                                'oAutoIndexValue = ClassFilehandle.CleanFilename(oAutoIndexValue, "")
                                If oAutoIndexValue = "EMPTY_OI" Then
                                    DynamicFolderConfig = DynamicFolderConfig.Replace(oMatch.ToString, "")
@@ -2797,11 +2801,11 @@ Public Class frmIndex
                    Dim DTFiles2Work As DataTable = DATABASE_ECM.GetDatatable("SELECT * FROM TBGI_FILES_USER WHERE WORKED = 0 AND GUID <> " & CURRENT_WORKFILE_GUID & " AND UPPER(USER@WORK) = UPPER('" & Environment.UserName & "')")
                    If DTFiles2Work IsNot Nothing Then
                        Dim err = False
-                        For Each filerow As DataRow In DTFiles2Work.Rows
-                            CURRENT_WORKFILE_GUID = filerow.Item("GUID")
-                            CURRENT_WORKFILE = filerow.Item("FILENAME2WORK")
-                            CURRENT_WORKFILE_HASH = Utils.NotNull(filerow.Item("FILE_HASH"), "")
-                            DropType = filerow.Item("HANDLE_TYPE")
+                        For Each oRow As DataRow In DTFiles2Work.Rows
+                            CURRENT_WORKFILE_GUID = oRow.Item("GUID")
+                            CURRENT_WORKFILE = oRow.Item("FILENAME2WORK")
+                            CURRENT_WORKFILE_HASH = oRow.ItemEx("FILE_HASH", "")
+                            DropType = oRow.Item("HANDLE_TYPE")

                            If WORK_FILE() = False Then
                                err = True
--- a/Global_Indexer/frmSQLSuggestion.vb
+++ b/Global_Indexer/frmSQLSuggestion.vb
@@ -1,5 +1,30 @@
-Imports Oracle.ManagedDataAccess.Client
+Imports DigitalData.Modules.Logging
+Imports Oracle.ManagedDataAccess.Client
 Public Class frmSQLSuggestion
+    Private _Logger As Logger
+    Private _PostProcessing As ClassPostprocessing
+
+    Private Sub frmSQLSuggestion_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Try
+            _Logger = LOGCONFIG.GetLogger()
+            _PostProcessing = New ClassPostprocessing(LOGCONFIG)
+
+            'TODO: Diese Codezeile lädt Daten in die Tabelle "MyDataset.TBDD_CONNECTION". Sie können sie bei Bedarf verschieben oder entfernen.
+            Me.TBDD_CONNECTIONTableAdapter.Connection.ConnectionString = MyConnectionString
+            Me.TBDD_CONNECTIONTableAdapter.Fill(Me.MyDataset.TBDD_CONNECTION)
+            Dim DT As DataTable = DATABASE_ECM.GetDatatable("SELECT * FROM TBDD_INDEX_MAN WHERE GUID = " & CURRENT_INDEXMAN)
+            If DT.Rows.Count = 1 Then
+                Me.cmbConnection.SelectedValue = DT.Rows(0).Item("CONNECTION_ID")
+                SQL_ERGEBNISTextBox.Text = DT.Rows(0).Item("SQL_RESULT")
+                SQL_UEBERPRUEFUNGTextBox.Text = DT.Rows(0).Item("SQL_CHECK")
+            End If
+            lblSave.Visible = False
+        Catch ex As Exception
+            _Logger.Error(ex)
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Open Form:")
+        End Try
+    End Sub
+
    Private Sub btnVorschlag_Click(sender As Object, e As EventArgs) Handles btnVorschlag.Click
        TestSQL(cmbConnection.SelectedValue, SQL_ERGEBNISTextBox.Text)
    End Sub
@@ -88,28 +113,13 @@ Public Class frmSQLSuggestion
            End If

        Catch ex As Exception
-            LOGGER.Info(" - Unexpected error in TestSQL - Fehler: " & vbNewLine & ex.Message)
-            LOGGER.Error(ex)
+            _Logger.Info(" - Unexpected error in TestSQL - Fehler: " & vbNewLine & ex.Message)
+            _Logger.Error(ex)
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in TestSQL:")
        End Try
    End Sub

-    Private Sub frmSQLSuggestion_Load(sender As Object, e As EventArgs) Handles Me.Load
-        Try
-            'TODO: Diese Codezeile lädt Daten in die Tabelle "MyDataset.TBDD_CONNECTION". Sie können sie bei Bedarf verschieben oder entfernen.
-            Me.TBDD_CONNECTIONTableAdapter.Connection.ConnectionString = MyConnectionString
-            Me.TBDD_CONNECTIONTableAdapter.Fill(Me.MyDataset.TBDD_CONNECTION)
-            Dim DT As DataTable = DATABASE_ECM.GetDatatable("SELECT * FROM TBDD_INDEX_MAN WHERE GUID = " & CURRENT_INDEXMAN)
-            If DT.Rows.Count = 1 Then
-                Me.cmbConnection.SelectedValue = DT.Rows(0).Item("CONNECTION_ID")
-                SQL_ERGEBNISTextBox.Text = DT.Rows(0).Item("SQL_RESULT")
-                SQL_UEBERPRUEFUNGTextBox.Text = DT.Rows(0).Item("SQL_CHECK")
-            End If
-            lblSave.Visible = False
-        Catch ex As Exception
-            MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Open Form:")
-        End Try
-    End Sub
+

    Private Sub TBDD_CONNECTIONBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)
        Me.Validate()
@@ -131,10 +141,10 @@ Public Class frmSQLSuggestion
            Dim origConnection = DATABASE_ECM.GetScalarValue("SELECT CONNECTION_ID FROM TBDD_INDEX_MAN WHERE GUID = " & CURRENT_INDEXMAN)
            Dim insresultstring = SQL_ERGEBNISTextBox.Text.Replace("'", "''")
            Dim inscheckstring = SQL_UEBERPRUEFUNGTextBox.Text.Replace("'", "''")
-            If insresultstring <> origresultstring Or _
+            If insresultstring <> origresultstring Or
                inscheckstring <> origcheckstring Then
                Dim cmd As String
-                cmd = "UPDATE TBDD_INDEX_MAN SET CONNECTION_ID = " & cmbConnection.SelectedValue & ",SQL_RESULT = '" & insresultstring & "',SQL_CHECK = '" & inscheckstring & "',CHANGED_WHO = '" & _
+                cmd = "UPDATE TBDD_INDEX_MAN SET CONNECTION_ID = " & cmbConnection.SelectedValue & ",SQL_RESULT = '" & insresultstring & "',SQL_CHECK = '" & inscheckstring & "',CHANGED_WHO = '" &
                    Environment.UserName & "' WHERE GUID = " & CURRENT_INDEXMAN
                If DATABASE_ECM.ExecuteNonQuery(cmd) = True Then
                    If USER_LANGUAGE = "de-DE" Then
@@ -157,6 +167,7 @@ Public Class frmSQLSuggestion
                End If
            End If
        Catch ex As Exception
+            _Logger.Error(ex)
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in Save SQl IndexMan:")
        End Try
    End Sub
@@ -166,7 +177,7 @@ Public Class frmSQLSuggestion
        Dim DTNB As DataTable = DATABASE_ECM.GetDatatable("SELECT * FROM TBDD_INDEX_MAN_POSTPROCESSING WHERE IDXMAN_ID = " & CURRENT_INDEXMAN & " ORDER BY SEQUENCE")
        If DTNB Is Nothing = False Then
            If DTNB.Rows.Count > 0 Then
-                Dim value As String = ClassPostprocessing.Get_Nachbearbeitung_Wert(txtTest_idxMan.Text, DTNB)
+                Dim value As String = _PostProcessing.Get_Nachbearbeitung_Wert(txtTest_idxMan.Text, DTNB)
                MsgBox("Der Rückgabewert - nach Durchlaufen von (" & DTNB.Rows.Count.ToString & ") Nachbearbeitungsfunktionen lautet: '" & value & "'", MsgBoxStyle.Exclamation)

                If USER_LANGUAGE = "de-DE" Then
--- a/SetupVS19/Product.wxs
+++ b/SetupVS19/Product.wxs
@@ -112,12 +112,10 @@
 				<File Id="Base" Name="DigitalData.Modules.Base.dll" Source="DigitalData.Modules.Base.dll" KeyPath="no" />
 				<File Id="Config" Name="DigitalData.Modules.Config.dll" Source="DigitalData.Modules.Config.dll" KeyPath="no" />
 				<File Id="Database" Name="DigitalData.Modules.Database.dll" Source="DigitalData.Modules.Database.dll" KeyPath="no" />
-				<File Id="Filesystem" Name="DigitalData.Modules.Filesystem.dll" Source="DigitalData.Modules.Filesystem.dll" KeyPath="no" />
 				<File Id="Language" Name="DigitalData.Modules.Language.dll" Source="DigitalData.Modules.Language.dll" KeyPath="no" />
 				<File Id="License" Name="DigitalData.Modules.License.dll" Source="DigitalData.Modules.License.dll" KeyPath="no" />
 				<File Id="Logging" Name="DigitalData.Modules.Logging.dll" Source="DigitalData.Modules.Logging.dll" KeyPath="yes" />
 				<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="Windows" Name="DigitalData.Modules.Windows.dll" Source="DigitalData.Modules.Windows.dll" KeyPath="no" />
 				<File Id="Windream" Name="DigitalData.Modules.Windream.dll" Source="DigitalData.Modules.Windream.dll" KeyPath="no" />
 				<File Id="DocumentViewer" Name="DigitalData.Controls.DocumentViewer.dll" Source="DigitalData.Controls.DocumentViewer.dll" KeyPath="no" />
@@ -140,6 +138,7 @@
 			<Component Id="MiscLibs" Guid="56bb39d9-101a-411d-8b11-5d4e3a602275">
 				<File Id="NLog" Name="NLog.dll" Source="NLog.dll" KeyPath="no" />
 				<File Id="Limilabs.Mail" Name="Mail.dll" Source="Mail.dll" KeyPath="no" />
+				<File Id="Limilabs.License" Name="MailLicense.xml" Source="MailLicense.xml" KeyPath="no" />
 			</Component>

 			<!--WINDREAM Bibliotheken-->
Author	SHA1	Message	Date
Jonathan Jenne	6edb3879de	Version 2.6.7.1	2023-09-11 15:25:14 +02:00
Jonathan Jenne	6cd56af377	Fix installer	2023-09-11 15:24:56 +02:00
Jonathan Jenne	81e5fe7820	Version 2.6.7.0	2023-09-11 15:17:51 +02:00
Jonathan Jenne	123eaceb12	Fix Sql Connection missing in Depending Controls, clean up Filesystem module use	2023-09-11 15:17:22 +02:00
Jonathan Jenne	f727c0da9f	Version 2.6.6.6	2023-06-05 16:48:22 +02:00
Jonathan Jenne	54813eb7a5	fix double windream objects	2023-06-05 16:48:01 +02:00
Jonathan Jenne	db364d1fd6	merge	2023-06-05 16:36:54 +02:00
Jonathan Jenne	ba7f11491b	Version 2.6.6.5	2023-06-05 16:36:22 +02:00
Jonathan Jenne	10d7680aa3	Fix windream basepath being swallowed when combining paths	2023-06-05 16:36:13 +02:00
SchreiberM	d2fbe0a894	MS Release module.windream currency	2023-04-26 15:23:28 +02:00
Jonathan Jenne	3913928a21	fix path in SINGLEFILE_2_WINDREAM	2023-04-14 13:01:11 +02:00
Jonathan Jenne	b70613ffcc	Version 2.6.6.2	2023-04-14 12:11:40 +02:00
SchreiberM	7da463c6b3	MS 2.6.5.1	2023-04-12 10:54:16 +02:00
Jonathan Jenne	62e4bb84c3	Fix debug flag for logger	2023-03-28 14:47:21 +02:00
Jonathan Jenne	e1692f68de	Version 2.6.5.1	2023-03-28 13:59:21 +02:00
Jonathan Jenne	2fefe100ee	merge	2023-03-28 13:57:54 +02:00
SchreiberM	8097017f9f	MS merge DEsign	2023-03-28 13:56:07 +02:00
Jonathan Jenne	890cd6a45e	Version 2.6.3.3	2023-03-28 13:47:48 +02:00
Jonathan Jenne	8edac6bb6a	Version 2.6.3.1	2023-03-13 15:43:41 +01:00
Jonathan Jenne	8ac13823ca	Fix placeholder configuration for dynamic sqls	2023-03-13 15:43:31 +01:00
Jonathan Jenne	1906bac96d	Merge branch 'master' of http://dd-vmp07-com04:3000/SchreiberM/GlobalIndexer	2023-03-13 14:12:24 +01:00
Jonathan Jenne	e66d404158	ignore .vs folder	2023-02-20 09:32:32 +01:00