Merge branch 'master' of https://vcs.digitaldata.works/AppStd/EmailProfiler

Refactored GridView5 column formatting to only show relevant columns and improve maintainability. Added .Locked metadata to many controls in frmMain.resx to enforce read-only state in the designer. Restored SVG images for XtraTabPages and updated TrayLocation metadata for components.

.vs/ProjectSettings.json

@@ -1,3 +0,0 @@
-{
-  "CurrentProjectSetting": null
-}

.vs/VSWorkspaceState.json

@@ -1,8 +0,0 @@
-{
-  "ExpandedNodes": [
-    "",
-    "\\App"
-  ],
-  "SelectedNode": "\\App\\SERV_EMAIL.sln",
-  "PreviewInSolutionExplorer": false
-}

App/CONFIG_APP/App.config

@@ -1,56 +0,0 @@
-<?xml version="1.0" encoding="utf-8" ?>
-<configuration>
-    <configSections>
-        <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
-            <section name="CONFIG_APP.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
-        </sectionGroup>
-        <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
-            <section name="CONFIG_APP.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
-        </sectionGroup>
-    </configSections>
-    <connectionStrings>
-        <add name="CONFIG_APP.My.MySettings.MyDatasetConnString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
-            providerName="System.Data.SqlClient" />
-    </connectionStrings>
-    <startup>
-        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
-    </startup>
-    <userSettings>
-        <CONFIG_APP.My.MySettings>
-            <setting name="MyConnectionString" serializeAs="String">
-                <value>Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd</value>
-            </setting>
-            <setting name="MyServer" serializeAs="String">
-                <value />
-            </setting>
-            <setting name="EmailTest_Receipiant" serializeAs="String">
-                <value />
-            </setting>
-            <setting name="MyTestHTML" serializeAs="String">
-                <value />
-            </setting>
-            <setting name="DEBUG" serializeAs="String">
-                <value>False</value>
-            </setting>
-        </CONFIG_APP.My.MySettings>
-    </userSettings>
-    <applicationSettings>
-        <CONFIG_APP.My.MySettings>
-            <setting name="FB_DATABASE" serializeAs="String">
-                <value />
-            </setting>
-            <setting name="FB_DATASOURCE" serializeAs="String">
-                <value />
-            </setting>
-            <setting name="FB_USER" serializeAs="String">
-                <value>sysdba</value>
-            </setting>
-            <setting name="FB_PW" serializeAs="String">
-                <value>dd</value>
-            </setting>
-            <setting name="USE_WM" serializeAs="String">
-                <value>False</value>
-            </setting>
-        </CONFIG_APP.My.MySettings>
-    </applicationSettings>
-</configuration>

App/CONFIG_APP/ModuleSettings.vb

@@ -1,4 +0,0 @@
-Module ModuleSettings
-    Public LOGERRRORS_ONLY As Boolean = True
-    Public MyConnectionString As String
-End Module

App/CONFIG_APP/My Project/licenses.licx

@@ -1 +0,0 @@
-DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

App/CONFIG_APP/MyDataset.xsc

@@ -1,9 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<!--<autogenerated>
-     This code was generated by a tool.
-     Changes to this file may cause incorrect behavior and will be lost if
-     the code is regenerated.
-</autogenerated>-->
-<DataSetUISetting Version="1.00" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
-  <TableUISettings />
-</DataSetUISetting>

App/CONFIG_APP/packages.config

@@ -1,4 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<packages>
-  <package id="NLog" version="4.7.10" targetFramework="net461" />
-</packages>

App/DigitalData.EMLProfiler/ClassCurrent.vb

@@ -1,67 +0,0 @@
-Imports Independentsoft.Email.Mime
-Imports WINDREAMLib
-
-Public Class ClassCurrent
-    Public Shared WM_CON_STRING As String
-    Public Shared WM_DRIVE As String
-    Public Shared TIMER_INTERVALL As Integer = 5
-
-    Public Shared LOG_INITIALIZED As Boolean = False
-    Public Shared CURRENT_FILEIN_WD As String
-    Public Shared CURRENT_IMPORT_ID As Integer
-
-    Public Shared CURRENT_EMAIL_GUID As Integer
-    Public Shared CURRENT_PROFILE_GUID As Integer
-    Public Shared DTCONFIG As DataTable
-    Public Shared DT_ECM_BASE_CONFIG As DataTable
-    Public Shared PATH_TEMP As String
-    Public Shared PATH_ERROR As String
-
-    Public Shared MAIL_BODY_FONT As String = ""
-    Public Shared MAIL_FROM As String = ""
-    Public Shared MAIL_SERVER As String = ""
-    Public Shared MAIL_USER As String = ""
-    Public Shared MAIL_USER_PW As String = ""
-    Public Shared MAIL_PORT As Integer = 995
-    Public Shared MAIL_INBOX_NAME As String = "Inbox"
-    Public Shared MAIL_ARCHIVE_FOLDER As String = ""
-    Public Shared DT_POLL_PROCESS As DataTable
-    Public Shared DT_STEPS As DataTable
-    Public Shared DT_INDEXING_STEPS As DataTable
-
-    Public Shared CURRENT_WORKMAIL_LIST As New ArrayList()
-
-    Public Shared CURRENT_MAIL_MESSAGE As Message
-    Public Shared CURRENT_TEMP_MAIL_PATH As String
-    Public Shared CURRENT_MAIL_BODY_ALL As String
-    Public Shared CURRENT_MAIL_BODY_ANSWER1 As String = ""
-    Public Shared CURRENT_MAIL_BODY_Substr2 As String = ""
-    Public Shared CURRENT_MAIL_SUBJECT As String = ""
-    Public Shared CURRENT_MAIL_FROM As String = ""
-    Public Shared CURRENT_MAIL_PROCESS_NAME As String
-
-    Public Shared CURRENT_POLL_TYPE As String
-
-    Public Shared POLL_STEP_GUID As Integer
-    Public Shared POLL_STEP_PROCESS_ID As Integer
-    Public Shared POLL_KEYWORDS As String
-    Public Shared KEYWORDS_SPLIT As String()
-
-    Public Shared WM_REFERENCE_INDEX As String
-    Public Shared WM_VECTOR_LOG As String
-    Public Shared WM_OBJEKTTYPE As String
-    Public Shared WM_IDX_BODY_TEXT As String
-    Public Shared WM_IDX_BODY_SUBSTR_LENGTH As String
-
-    Public Shared CURRENT_WM_DOC As WMObject
-    Public Shared CURRENT_DOC_ID As Integer
-    Public Shared CURRENT_DOC_PATH As String
-    Public Shared MessageError As Boolean = False
-
-    Public Shared TEMP_FILES As List(Of String) = New List(Of String)
-    Public Shared TEMP_HTML_RESULTS As List(Of String) = New List(Of String)
-
-    Public Shared CURRENT_DEBUG_LOCAL_EMAIL As String
-
-
-End Class

App/DigitalData.EMLProfiler/ModuleCurrent.vb

@@ -1,5 +0,0 @@
-Module ModuleCurrent
-    Public CURRENToWMSession As Object
-    Public CURRENToWMSession_Created As Date = Now
-    Public CURRENToWMConnect As Object
-End Module

App/DigitalData.EMLProfiler/My Project/Resources.Designer.vb

@@ -1,62 +0,0 @@
-'------------------------------------------------------------------------------
-' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.42000
-'
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
-' </auto-generated>
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My.Resources
-    
-    'This class was auto-generated by the StronglyTypedResourceBuilder
-    'class via a tool like ResGen or Visual Studio.
-    'To add or remove a member, edit your .ResX file then rerun ResGen
-    'with the /str option, or rebuild your VS project.
-    '''<summary>
-    '''  A strongly-typed resource class, for looking up localized strings, etc.
-    '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
-     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
-     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
-     Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
-    Friend Module Resources
-
-        Private resourceMan As Global.System.Resources.ResourceManager
-
-        Private resourceCulture As Global.System.Globalization.CultureInfo
-
-        '''<summary>
-        '''  Returns the cached ResourceManager instance used by this class.
-        '''</summary>
-        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
-            Get
-                If Object.ReferenceEquals(resourceMan, Nothing) Then
-                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.EMLProfiler.Resources", GetType(Resources).Assembly)
-                    resourceMan = temp
-                End If
-                Return resourceMan
-            End Get
-        End Property
-
-        '''<summary>
-        '''  Overrides the current thread's CurrentUICulture property for all
-        '''  resource lookups using this strongly typed resource class.
-        '''</summary>
-        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-        Friend Property Culture() As Global.System.Globalization.CultureInfo
-            Get
-                Return resourceCulture
-            End Get
-            Set(ByVal value As Global.System.Globalization.CultureInfo)
-                resourceCulture = value
-            End Set
-        End Property
-    End Module
-End Namespace

App/DigitalData.EMLProfiler/app.config

@@ -1,27 +0,0 @@
-<?xml version="1.0" encoding="utf-8" ?>
-<configuration>
-    <configSections>
-    </configSections>
-    <system.diagnostics>
-        <sources>
-            <!-- Dieser Abschnitt definiert die Protokollierungskonfiguration für My.Application.Log -->
-            <source name="DefaultSource" switchName="DefaultSwitch">
-                <listeners>
-                    <add name="FileLog"/>
-                    <!-- Auskommentierung des nachfolgenden Abschnitts aufheben, um in das Anwendungsereignisprotokoll zu schreiben -->
-                    <!--<add name="EventLog"/>-->
-                </listeners>
-            </source>
-        </sources>
-        <switches>
-            <add name="DefaultSwitch" value="Information" />
-        </switches>
-        <sharedListeners>
-            <add name="FileLog"
-                 type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL"
-                 initializeData="FileLogWriter"/>
-            <!-- Auskommentierung des nachfolgenden Abschnitts aufheben und APPLICATION_NAME durch den Namen der Anwendung ersetzen, um in das Anwendungsereignisprotokoll zu schreiben -->
-            <!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
-        </sharedListeners>
-    </system.diagnostics>
-</configuration>

App/DigitalData.EMLProfiler/clsDatabase.vb

@@ -1,156 +0,0 @@
-Imports DigitalData.EMLProfiler.ClassCurrent
-Imports DigitalData.Modules.Logging
-Public Class clsDatabase
-    Public connectionString As String
-    Private Logger As Logger
-    Private MyLogger As LogConfig
-
-    Sub New(LogConf As LogConfig, ConStr As String)
-        Logger = LogConf.GetLogger
-        MyLogger = LogConf
-        Init(ConStr)
-    End Sub
-    Public Function Init(ConString As String)
-        Try
-
-            Dim SQLconnect As New SqlClient.SqlConnection
-            SQLconnect.ConnectionString = ConString
-            SQLconnect.Open()
-            SQLconnect.Close()
-            connectionString = ConString
-            DTCONFIG = Return_Datatable("select * from TBEMLP_CONFIG")
-            If Not IsNothing(DTCONFIG) Then
-                If DTCONFIG.Rows.Count = 1 Then
-                    PATH_TEMP = DTCONFIG.Rows(0).Item("PATH_EMAIL_TEMP")
-                    PATH_ERROR = DTCONFIG.Rows(0).Item("PATH_EMAIL_ERRORS")
-                    MAIL_BODY_FONT = DTCONFIG.Rows(0).Item("FONT_BODY")
-                    WM_CON_STRING = DTCONFIG.Rows(0).Item("WM_CON_STRING")
-                    TIMER_INTERVALL = DTCONFIG.Rows(0).Item("CHECK_INTERVALL_MINUTES")
-                End If
-            End If
-            DT_ECM_BASE_CONFIG = Return_Datatable("select * from TBDD_BASECONFIG")
-            Try
-                WM_DRIVE = DT_ECM_BASE_CONFIG.Rows(0).Item("WM_DRIVE")
-            Catch ex As Exception
-                Logger.Error("WM_DRIVE not part of DT_ECM_BASE_CONFIG: " & ex.Message)
-                WM_DRIVE = "W"
-            End Try
-            Logger.Debug("Database initialized")
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-            Logger.Warn("Unexpected Error  in DatabaseInit: " & ex.Message)
-            Return False
-        End Try
-    End Function
-
-    Public Function Return_Datatable(Select_anweisung As String)
-        Try
-            Dim SQLconnect As New SqlClient.SqlConnection
-            Dim SQLcommand As SqlClient.SqlCommand
-            SQLconnect.ConnectionString = connectionString
-            SQLconnect.Open()
-            SQLcommand = SQLconnect.CreateCommand
-            SQLcommand.CommandText = Select_anweisung
-            SQLcommand.CommandTimeout = 240
-
-            Dim adapter1 As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter(SQLcommand)
-
-            Dim dt As DataTable = New DataTable()
-            Logger.Debug("ReturnDatatable Command: " & Select_anweisung)
-            adapter1.Fill(dt)
-            SQLconnect.Close()
-            Return dt
-        Catch ex As Exception
-            Logger.Error(ex)
-            Logger.Warn("Unexpected Error  in Return_Datatable: " & ex.Message)
-            Logger.Warn("SQL: " & Select_anweisung)
-            Return Nothing
-        End Try
-    End Function
-    Public Function Return_DatatableCS(Select_anweisung As String, CS As String)
-        Try
-            Dim SQLconnect As New SqlClient.SqlConnection
-            Dim SQLcommand As SqlClient.SqlCommand
-            SQLconnect.ConnectionString = CS
-            SQLconnect.Open()
-            SQLcommand = SQLconnect.CreateCommand
-            SQLcommand.CommandText = Select_anweisung
-            SQLcommand.CommandTimeout = 240
-
-            Dim adapter1 As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter(SQLcommand)
-
-            Dim dt As DataTable = New DataTable()
-            adapter1.Fill(dt)
-            SQLconnect.Close()
-            Return dt
-        Catch ex As Exception
-            Logger.Error(ex)
-            Logger.Warn("Unexpected Error  in Return_DatatableCS: " & ex.Message)
-            Logger.Warn("SQL: " & Select_anweisung)
-            Return Nothing
-        End Try
-    End Function
-    Public Function Execute_non_Query(ExecuteCMD As String, Optional Userinput As Boolean = False)
-        Try
-            Dim SQLconnect As New SqlClient.SqlConnection
-            Dim SQLcommand As SqlClient.SqlCommand
-            SQLconnect.ConnectionString = connectionString
-            SQLconnect.Open()
-            SQLcommand = SQLconnect.CreateCommand
-            'Update Last Created Record in Foo
-            SQLcommand.CommandText = ExecuteCMD
-            SQLcommand.ExecuteNonQuery()
-            SQLcommand.Dispose()
-            SQLconnect.Close()
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-            Logger.Warn("Unexpected Error  in Execute_non_Query: " & ex.Message)
-            Logger.Warn("SQL: " & ExecuteCMD)
-            Return False
-        End Try
-    End Function
-    Public Function Execute_Scalar(cmdscalar As String)
-        Dim result
-        Try
-            Dim SQLconnect As New SqlClient.SqlConnection
-            Dim SQLcommand As SqlClient.SqlCommand
-            SQLconnect.ConnectionString = connectionString
-            SQLconnect.Open()
-            SQLcommand = SQLconnect.CreateCommand
-            'Update Last Created Record in Foo
-            SQLcommand.CommandText = cmdscalar
-            result = SQLcommand.ExecuteScalar()
-            SQLcommand.Dispose()
-            SQLconnect.Close()
-            Return result
-        Catch ex As Exception
-            Logger.Error(ex)
-            Logger.Warn("Unexpected Error  in Execute_Scalar: " & ex.Message)
-            Logger.Warn("SQL: " & cmdscalar)
-            Return Nothing
-        End Try
-    End Function
-    Public Function Execute_Scalar_CS(cmdscalar As String, constring As String)
-        Dim result
-        Try
-            Dim SQLconnect As New SqlClient.SqlConnection
-            Dim SQLcommand As SqlClient.SqlCommand
-            SQLconnect.ConnectionString = constring
-            SQLconnect.Open()
-            SQLcommand = SQLconnect.CreateCommand
-            'Update Last Created Record in Foo
-            SQLcommand.CommandText = cmdscalar
-            result = SQLcommand.ExecuteScalar()
-            SQLcommand.Dispose()
-            SQLconnect.Close()
-            Return result
-        Catch ex As Exception
-            Logger.Error(ex)
-            Logger.Warn("Unexpected Error  in Execute_Scalar_CS: " & ex.Message)
-            Logger.Warn("SQL: " & cmdscalar)
-            Return Nothing
-        End Try
-    End Function
-End Class

App/DigitalData.EMLProfiler/clsEmail.IMAP.vb

@@ -1,391 +0,0 @@
-Imports Independentsoft.Email
-Imports Independentsoft.Email.Imap
-Imports Independentsoft.Email.Mime
-Imports DigitalData.EMLProfiler.ClassCurrent
-Imports DigitalData.Modules.Logging
-Imports AE
-Imports System.Net
-Imports System.Reflection
-Imports System.IO
-Imports DigitalData.Modules.Database
-
-Public Class clsEmailIMAP
-    Private Shared Logger As DigitalData.Modules.Logging.Logger
-    Private Shared LogConfig As DigitalData.Modules.Logging.LogConfig
-    Private _DB_MSSQL As clsDatabase
-    Sub New(LogConf As LogConfig, ECMConnectionString As String)
-        LogConfig = LogConf
-        Logger = LogConf.GetLogger
-        _DB_MSSQL = New clsDatabase(LogConf, ECMConnectionString)
-    End Sub
-    'Private Shared Sub OnWriteLog(ByVal sender As Object, ByVal e As WriteLogEventArgs)
-    '    Logger.Info(e.Log)
-    'End Sub
-
-    Public Function FetchIMAPMessagesS22(Server As String, Port As Integer, Username As String, Password As String, pInbox As String, Optional IsTest As Boolean = False, Optional DeleteinTest As Boolean = False, Optional MoveMailTo As String = "") As Boolean
-        Logger.Debug("FetchIMAPMessagesS22 - Connecting to Server {0}:{1} with user {2}", Server, Port, Username)
-        Try
-            Logger.Debug("FetchIMAPMessagesS22 - Connecting...")
-            Using oClient As New S22.Imap.ImapClient(Server, Port, Username, Password, S22.Imap.AuthMethod.Login, True)
-                If Not oClient.Authed Then
-                    Logger.Warn("FetchIMAPMessagesS22 - Connected to server but authentication failed.")
-                    Return False
-                End If
-
-                Logger.Info($"FetchIMAPMessagesS22 - Fetching unseen MessageIds from Inbox: {pInbox}")
-                Dim oMessageIds As IEnumerable(Of UInteger) = oClient.Search(S22.Imap.SearchCondition.Unseen, pInbox)
-
-                Logger.Info("FetchIMAPMessagesS22 - Found [{0}] messages", oMessageIds.Count)
-                Logger.Debug("FetchIMAPMessagesS22 - Fetching messages...")
-                Dim oMessageCountRegular As Integer = 0
-                Dim oMessageCountWorked As Integer = 0
-                Dim oLastLog As String
-                For Each oMessageId As UInteger In oMessageIds
-                    Logger.Debug($"Checking message...")
-                    Dim oMessage = oClient.GetMessage(oMessageId, False, pInbox)
-                    oLastLog = $"Checking message with Subject [{oMessage.Subject}] From [{oMessage.From}]"
-                    Logger.Debug(oLastLog)
-                    Dim oTempPath = Path.GetTempFileName()
-                    Try
-                        Dim oResult = WriteMessageToFile(oMessage, oTempPath)
-                        oLastLog &= $" # Message written to TempPath [{oTempPath}]"
-                        Dim oMessageREFGUID
-                        Dim oMsg As Message
-                        Try
-                            oLastLog &= " # Creating the New Message(oTempPath)"
-                            oMsg = New Message(oTempPath)
-                            oLastLog &= " # Extracting the MessageID"
-                            oMessageREFGUID = oMsg.MessageID
-                        Catch ex As Exception
-                            Logger.Error(ex)
-                            Logger.Warn($"FetchIMAPMessagesS22 - Could not get a MessageID or create a MailObject - Error: {ex.Message} - Last Debug Log: [{oLastLog}]")
-                            Continue For
-                        End Try
-
-                        oLastLog &= " # Got the MessageID"
-                        oMessageREFGUID = oMessageREFGUID.Replace(">", "").Replace("<", "")
-                        Dim oCHECKSQL = $"SELECT * FROM TBEMLP_HISTORY WHERE EMAIL_MSGID = '{oMessageREFGUID}'"
-                        Dim oCHECKDT As DataTable = _DB_MSSQL.Return_Datatable(oCHECKSQL)
-                        If Not IsNothing(oCHECKDT) Then
-                            If oCHECKDT.Rows.Count = 0 Then
-                                oMessageCountRegular += 1
-                                CURRENT_WORKMAIL_LIST.Add(oMsg)
-                                oLastLog &= " # Added to CURRENT_WORKMAIL_LIST"
-                            Else
-                                Logger.Info("FetchIMAPMessagesS22 - Message has already been worked! Skipping!")
-                                Logger.Debug($"Message shall be deleted...")
-                                oLastLog &= " # Message shall be deleted..."
-                                oClient.DeleteMessage(oMessageId)
-                                Logger.Debug($"FetchIMAPMessagesS22 - Message has been deleted!")
-                                oLastLog &= " # FetchIMAPMessagesS22 - Message has been deleted!"
-                                Dim oUpd = $"UPDATE TBEMLP_HISTORY SET DATE_DELETED_INBOX = GETDATE() WHERE EMAIL_MSGID = '{oMessageId}'"
-                                _DB_MSSQL.Execute_non_Query(oUpd)
-                                oMessageCountWorked += 1
-                            End If
-                            If IsTest = True Then
-                                Logger.Debug($"FetchIMAPMessagesS22 - IMAP-Test Message#: {oMessageCountRegular} - Msgsubject is: {oMsg.Subject} - MsgMessageID is: {oMessageREFGUID}")
-                                Logger.Debug($"FetchIMAPMessagesS22 - message correctly fetched. Mail has been downloaded to {oTempPath}")
-                            End If
-                            Try
-                                If DeleteinTest = True Then
-                                    Logger.Debug($"Message shall be deleted...")
-                                    oClient.DeleteMessage(oMessageId,)
-                                    Logger.Debug($"FetchIMAPMessagesS22 - Message has been deleted!")
-                                End If
-                            Catch ex As Exception
-                                Logger.Error(ex)
-                                Logger.Warn("Message could not be deleted: " & ex.Message)
-                            End Try
-                            If MoveMailTo <> String.Empty Then
-                                Try
-                                    Logger.Debug($"Moving to [{MoveMailTo}] is active...")
-                                    oClient.MoveMessage(oMessageId, MoveMailTo)
-                                    Logger.Debug($"FetchIMAPMessagesS22 - successfully moved!")
-                                Catch ex As Exception
-                                    Logger.Error(ex)
-                                    Logger.Warn($"FetchIMAPMessagesS22 - Could not move message to folder [{MoveMailTo}] - Error: {ex.Message}")
-                                End Try
-                            End If
-
-
-                        End If
-
-                        Try
-                            If IsTest = False Then
-                                File.Delete(oTempPath)
-                            End If
-
-                        Catch ex As Exception
-
-                        End Try
-                    Catch ex As Exception
-                        Logger.Error(ex)
-                        Logger.Warn($"FetchIMAPMessages - Unexpected Error while working on email: [{ex.Message}] - Last Debug Log: [{oLastLog}]")
-                    End Try
-
-                Next
-                oClient.Expunge()
-                Logger.Debug("FetchIMAPMessagesS22 - Finished Message-Fetch")
-                If oMessageCountRegular > 0 Or oMessageCountWorked > 0 Then
-                    Logger.Info($"###############################################")
-                    If oMessageCountRegular > 0 Then
-                        Logger.Info($"Found [{oMessageCountRegular.ToString}] regular messages to work on!")
-                    End If
-                    If oMessageCountWorked > 0 Then
-                        Logger.Info($"Found [{oMessageCountWorked.ToString}] worked messages to work on!")
-                    End If
-                    If IsTest = True Then
-                        Dim omsgtext As String
-                        If oMessageCountRegular > 0 Then
-                            omsgtext = $"Found [{oMessageCountRegular.ToString}] regular Messages to work on!"
-                        End If
-                        If oMessageCountWorked > 0 Then
-                            If omsgtext = String.Empty Then
-                                Logger.Info($"Found [{oMessageCountWorked.ToString}] worked messages to work on!")
-                            Else
-                                omsgtext += vbNewLine & $"Found [{oMessageCountWorked.ToString}] worked messages to work on!"
-                            End If
-                        End If
-                        MsgBox(omsgtext)
-                    End If
-                    Logger.Info($"###############################################")
-                End If
-            End Using
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-            Return False
-        End Try
-    End Function
-    Private Shared Sub OnWriteLog(ByVal sender As Object, ByVal e As WriteLogEventArgs)
-        Logger.Debug(e.Log)
-    End Sub
-    Public Function FetchIMAPMessagesIsoft(Server As String, Port As Integer, Username As String, Password As String, Inbox As String, Optional MoveMailTo As String = "", Optional IsoftLog As String = "", Optional IsTest As Boolean = False, Optional DeleteinTest As Boolean = False)
-        Try
-            Logger.Debug(String.Format("Working on IMAP_COLLECT Independentsoft..."))
-            Dim oClient As New Independentsoft.Email.Imap.ImapClient(Server, Port)
-            If IsoftLog <> "" And LogConfig.Debug = True Then
-                Dim iLogger As New Independentsoft.Email.Logger(IsoftLog)
-                AddHandler iLogger.WriteLog, AddressOf OnWriteLog
-                oClient.Logger = iLogger
-            End If
-
-            oClient.EnableSsl = True
-            oClient.ValidateRemoteCertificate = False
-            Try
-                oClient.Connect()
-            Catch ex As Exception
-                Logger.Error(ex)
-                Logger.Warn("Error while oClient.Connec(): " & ex.Message)
-                Return False
-            End Try
-
-            Try
-                oClient.Login(Username, Password, AuthenticationType.Login)
-            Catch ex As Exception
-                Logger.Warn("Error while loginImap.now trying Ntlm-Auth: " & ex.Message)
-                Try
-                    oClient.Login(Username, Password, AuthenticationType.Ntlm)
-                Catch ex1 As Exception
-                    Logger.Error(ex)
-                    Return False
-                End Try
-
-            End Try
-            Logger.Debug("Logged in...")
-            oClient.SelectFolder(Inbox)
-
-            Dim coSearchCriteria As New SearchCriteria()
-            coSearchCriteria.All = True
-            Dim oMessageCountRegular As Integer = 0
-            Dim oMessageCountWorked As Integer = 0
-            Dim oUniqueID As Integer() = oClient.Search(coSearchCriteria)
-
-            If IsTest = True Then
-                MsgBox($"{oUniqueID.Count} messages in Postbox! (oUniqueID.Length: {oUniqueID.Length.ToString})")
-            End If
-
-            Dim oFoundMessages As Message() = New Message(oUniqueID.Length - 1) {}
-            Dim oEnvelopes As Independentsoft.Email.Imap.Envelope() = oClient.ListMessages()
-
-            For oCounterEnvelope As Integer = 0 To oEnvelopes.Length - 1
-                Logger.Debug($"oEnvelopes.Length: {oEnvelopes.Length}")
-                For oCounterEmailInPostbox As Integer = 0 To oUniqueID.Length - 1
-
-                    If oEnvelopes(oCounterEnvelope).UniqueID = oUniqueID(oCounterEmailInPostbox) Then
-                        Dim oMimeMessage As Mime.Message = oClient.GetMessage(oEnvelopes(oCounterEnvelope).UniqueID)
-                        If Not IsNothing(oMimeMessage) Then
-                            Dim oMessageID = oMimeMessage.MessageID
-                            oMessageID = oMessageID.Replace(">", "").Replace("<", "")
-                            'oEnvelopes(oCounterEnvelope).UniqueI
-                            Logger.Info($"Isoft: Working on email: MessageID [{oMessageID}] - Subject[{oEnvelopes(oCounterEnvelope).Subject}] - Date [{oEnvelopes(oCounterEnvelope).Date.ToString}]")
-                            Dim oCHECKSQL = $"SELECT * FROM TBEMLP_HISTORY WHERE lower(EMAIL_MSGID) = lower('{oMessageID}')"
-                            Dim oCHECKDT As DataTable = _DB_MSSQL.Return_Datatable(oCHECKSQL)
-                            If Not IsNothing(oCHECKDT) Then
-                                If oCHECKDT.Rows.Count = 0 Then
-                                    Logger.Info($"Isoft: Adding email: MessageID [{oMessageID}] - Subject[{oEnvelopes(oCounterEnvelope).Subject}] - Date [{oEnvelopes(oCounterEnvelope).Date.ToString}]")
-                                    oMessageCountRegular += 1
-                                    CURRENT_WORKMAIL_LIST.Add(oMimeMessage)
-
-                                Else
-                                    Logger.Info($"Isoft: Already existing email with MessageID [{oMessageID}] - Subject[{oEnvelopes(oCounterEnvelope).Subject}] - Date [{oEnvelopes(oCounterEnvelope).Date.ToString}] ")
-                                    oMessageCountWorked += 1
-                                    Try
-                                        oClient.Delete(oEnvelopes(oCounterEnvelope).UniqueID)
-                                        Dim oUpd = $"UPDATE TBEMLP_HISTORY SET DATE_DELETED_INBOX = GETDATE(), COMMENT = 'DELETED MESSAGE FROM INBOX (2ndRun ALREADY WORKED)' WHERE lower(EMAIL_MSGID) = lower('{oMessageID}')"
-                                        _DB_MSSQL.Execute_non_Query(oUpd)
-                                    Catch ex As Exception
-                                        Logger.Error(ex)
-                                        Logger.Warn($"Error deleting/Commenting message due to to already worked: {ex.Message}")
-                                    End Try
-
-                                End If
-                                oClient.Store(oEnvelopes(oCounterEnvelope).UniqueID, "+FLAGS", "SEEN")
-
-                                If MoveMailTo <> String.Empty Then
-                                    Try
-                                        oClient.AddMessage(MoveMailTo, oMimeMessage)
-                                    Catch ex As Exception
-                                        Logger.Error(ex)
-                                        Logger.Warn($"Isoft: Could not move message to folder [{MoveMailTo}] - Error: {ex.Message}")
-                                    End Try
-                                End If
-                                If oMessageCountRegular = 250 Then
-                                    Logger.Warn($"Worked 100 Mails exiting oCounterEmailInPostbox!")
-                                    Exit For
-                                End If
-                            End If
-
-                        End If
-                    End If
-                Next
-            Next
-            oClient.Expunge()
-            oClient.Disconnect()
-            If oMessageCountRegular > 0 Or oMessageCountWorked > 0 Then
-                Logger.Info($"###############################################")
-                If oMessageCountRegular > 0 Then
-                    Logger.Info($"Isoft: Found [{oMessageCountRegular.ToString}] regular messages to work on!")
-                End If
-                If oMessageCountWorked > 0 Then
-                    Logger.Info($"Isoft: Found [{oMessageCountWorked.ToString}] worked messages to work on!")
-                End If
-                If IsTest = True Then
-                    Dim omsgtext As String
-                    If oMessageCountRegular > 0 Then
-                        omsgtext = $"Isoft: Found [{oMessageCountRegular.ToString}] regular Messages to work on!"
-                    End If
-                    If oMessageCountWorked > 0 Then
-                        If omsgtext = String.Empty Then
-                            Logger.Info($"Isoft: Found [{oMessageCountWorked.ToString}] worked messages to work on!")
-                        Else
-                            omsgtext += vbNewLine & $"Isoft: Found [{oMessageCountWorked.ToString}] worked messages to work on!"
-                        End If
-                    End If
-                    MsgBox(omsgtext)
-                End If
-                Logger.Info($"###############################################")
-            End If
-            '        Logger.Debug($"{oCount.ToString} messages will be worked..")
-            Logger.Debug("Isoft: IMAP COLLECT Independentsoft finished!")
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-            Logger.Error(ex, "Unexpected Error in IMAP COLLECT Independentsoft:")
-            Return False
-        End Try
-    End Function
-    Public Function IMAP_Set2Seen(Server As String, Port As Integer, Username As String, Password As String, IsoftLog As String)
-        Try
-            Logger.Debug(String.Format("Working on IMAP_Set2Seen Independentsoft..."))
-            Dim oClient As New Independentsoft.Email.Imap.ImapClient(Server, Port)
-            If IsoftLog <> "" And LogConfig.Debug = True Then
-                Dim iLogger As New Independentsoft.Email.Logger(IsoftLog)
-                AddHandler iLogger.WriteLog, AddressOf OnWriteLog
-                oClient.Logger = iLogger
-            End If
-
-            oClient.EnableSsl = True
-            oClient.ValidateRemoteCertificate = False
-            oClient.Connect()
-            Try
-                oClient.Login(Username, Password, AuthenticationType.Login)
-            Catch ex As Exception
-                Logger.Error(ex)
-                Logger.Warn("Error while loginImap.now trying Ntlm-Auth: " & ex.Message)
-                Try
-                    oClient.Login(Username, Password, AuthenticationType.Ntlm)
-                Catch ex1 As Exception
-                    Logger.Error(ex)
-                    Return False
-                End Try
-
-            End Try
-            Logger.Debug("Logged in...")
-            oClient.SelectFolder("Inbox")
-
-            Dim coSearchCriteria As New SearchCriteria()
-            coSearchCriteria.Unseen = True
-
-            Dim oUniqueID As Integer() = oClient.Search(coSearchCriteria)
-
-            Dim oFoundMessages As Message() = New Message(oUniqueID.Length - 1) {}
-
-            For i As Integer = 0 To oUniqueID.Length - 1
-                oFoundMessages(i) = oClient.GetMessage(oUniqueID(i))
-                If oFoundMessages(i).Subject.ToLower.Contains("seen") Then
-                    Logger.Debug($"Working on unseen email: [{oUniqueID(i)}] Subject:{oFoundMessages(i).Subject} - Date {oFoundMessages(i).Date}")
-                    Dim oEnvelopes1 As Independentsoft.Email.Imap.Envelope() = oClient.ListMessages()
-                    For i1 As Integer = 0 To oEnvelopes1.Length - 1
-                        If oEnvelopes1(i1).UniqueID = oUniqueID(i) Then
-                            Logger.Debug($"Setting email to Unseen!")
-                            oClient.Store(oEnvelopes1(i1).UniqueID, "+FLAGS", "SEEN")
-                            MsgBox("Set to SEEN")
-                        End If
-
-                    Next
-                End If
-
-            Next
-            oClient.Expunge()
-            MsgBox("Expunge done")
-            oClient.Disconnect()
-
-
-            Logger.Debug("IMAP_Set2Seen finished!")
-            Return True
-        Catch ex As Exception
-            Logger.Warn("Unexpected Error in IMAP_Set2Seen Independentsoft")
-            Logger.Error(ex)
-            Return False
-        End Try
-    End Function
-
-    ''' <summary>
-    ''' Uses a private API from MailWriter to write a MailMessage to disk.
-    ''' May break in future versions of .NET
-    ''' </summary>
-    Public Function WriteMessageToFile(Message As Mail.MailMessage, Filename As String) As Boolean
-        Dim oAssembly As Assembly = GetType(Mail.SmtpClient).Assembly
-        Dim oMailWriterType As Type = oAssembly.[GetType]("System.Net.Mail.MailWriter")
-
-        Try
-            Using oStream As New FileStream(Filename, FileMode.Create)
-                Dim oMailWriterConstructor As ConstructorInfo = oMailWriterType.GetConstructor(
-                    BindingFlags.Instance Or BindingFlags.NonPublic, Nothing, New Type() {GetType(Stream)}, Nothing
-                )
-                Dim oMailWriter As Object = oMailWriterConstructor.Invoke(New Object() {oStream})
-                Dim sendMethod As MethodInfo = GetType(Mail.MailMessage).GetMethod("Send", BindingFlags.Instance Or BindingFlags.NonPublic)
-                sendMethod.Invoke(Message, BindingFlags.Instance Or BindingFlags.NonPublic, Nothing, {oMailWriter, True, True}, Nothing)
-            End Using
-
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-            Return Nothing
-        End Try
-    End Function
-
-
-
-End Class

App/DigitalData.EMLProfiler/clsEmail.vb

@@ -1,339 +0,0 @@
-Imports Independentsoft.Email
-Imports Independentsoft.Email.Pop3
-Imports Independentsoft.Email.Smtp
-Imports Independentsoft.Email.Mime
-Imports Independentsoft.Email.Imap
-Imports DigitalData.EMLProfiler.ClassCurrent
-Imports DigitalData.Modules.Logging
-Imports System.Net
-
-Public Class clsEmail
-    Private Shared Logger As DigitalData.Modules.Logging.Logger
-    Public Shared EMAIL_INBOX_LIST As New ArrayList()
-    Sub New(LogConf As LogConfig)
-        Logger = LogConf.GetLogger
-    End Sub
-    Private Shared Sub OnWriteLog(ByVal sender As Object, ByVal e As WriteLogEventArgs)
-        Logger.Info(e.Log)
-    End Sub
-    Public Function POP3_COLLECT() As Boolean
-        Try
-            Logger.Debug(String.Format("Working on POP3_COLLECT....."))
-            Dim oClient As New Pop3Client(MAIL_SERVER, MAIL_PORT)
-
-            oClient.ValidateRemoteCertificate = False
-            oClient.Connect()
-            Logger.Debug(String.Format("..connected!"))
-            oClient.Login(MAIL_USER, MAIL_USER_PW)
-
-            Dim oMessageInfo As MessageInfo() = oClient.List()
-            Dim oCOUNT As Integer = 0
-            For i As Integer = 0 To oMessageInfo.Length - 1
-
-                Dim oMessage As Message = oClient.GetMessage(oMessageInfo(i).Index)
-                Dim oMsgId_AlreadyExists As Boolean = False
-                For Each pulled_msg As Message In CURRENT_WORKMAIL_LIST
-                    If pulled_msg.MessageID = oMessage.MessageID Then
-                        oMsgId_AlreadyExists = True
-                    End If
-                Next
-                If oMsgId_AlreadyExists = False Then
-                    oCOUNT += 1
-                    CURRENT_WORKMAIL_LIST.Add(oMessage)
-                    Logger.Debug(String.Format("Message [{0}] added to working Mail_List", oMessage.Subject))
-                End If
-
-
-                'client.Delete(messageInfo(i).Index)
-            Next
-            Logger.Debug($"{oCOUNT.ToString} messages will be worked..")
-            oClient.Disconnect()
-            Logger.Debug(String.Format("POP3_COLLECT finished!"))
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-            ' clsLogger.Add("Unexpected Error in POP3_COLLECT: " & ex.Message)
-            EventLog.WriteEntry("DD EmailProfiler", "Unexpected Error in POP3_COLLECT: " & ex.Message(), EventLogEntryType.Error)
-            Return False
-        End Try
-    End Function
-    Public Function TEST_POP3_COLLECT(MYMAIL_SERVER As String, MYMAIL_PORT As Integer, MYMAIL_USER As String, MYMAIL_USER_PW As String) As Boolean
-        Try
-            Logger.Debug(String.Format("Working on TEST_POP3_COLLECT..."))
-            Dim oPop3Client As New Pop3Client(MYMAIL_SERVER, MYMAIL_PORT)
-            Dim oLogPath = System.IO.Path.Combine(My.Application.Info.DirectoryPath, "Log\logindependentSoft.txt")
-            Logger.Debug($"IsoftLog: {oLogPath}...")
-            Dim oindependentLogger As New Independentsoft.Email.Logger(oLogPath)
-            ' oPop3Client.ValidateRemoteCertificate = False
-            oPop3Client.Logger = oindependentLogger
-            oPop3Client.Connect()
-            Logger.Debug(String.Format("..connected!"))
-            oPop3Client.Login(MYMAIL_USER, MYMAIL_USER_PW)
-
-            Dim messageInfo As MessageInfo() = oPop3Client.List()
-
-            For i As Integer = 0 To messageInfo.Length - 1
-                Dim message As Message = oPop3Client.GetMessage(messageInfo(i).Index)
-                MsgBox($"Message-subject: {message.Subject}, Message unique ID = {messageInfo(i).UniqueID} added", )
-            Next
-
-            oPop3Client.Disconnect()
-            MsgBox(String.Format("TEST_POP3_COLLECT finished!"))
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-
-            Return False
-        End Try
-    End Function
-    Public Function DELETE_EMAIL(msgid As String, Optional CheckDeletedRun As Boolean = False)
-        Try
-            If CURRENT_POLL_TYPE = "POP" Then
-                Dim client As New Pop3Client(MAIL_SERVER, MAIL_PORT)
-                client.ValidateRemoteCertificate = False
-                client.Connect()
-                client.Login(MAIL_USER, MAIL_USER_PW)
-
-                Dim messageInfo As MessageInfo() = client.List()
-
-                For i As Integer = 0 To messageInfo.Length - 1
-                    Dim message As Message = client.GetMessage(messageInfo(i).Index)
-                    If message.MessageID = msgid Then
-                        client.Delete(messageInfo(i).Index)
-                        Logger.Info(String.Format("Message [{0}] was deleted!", message.Subject))
-                        Exit For
-                    End If
-                Next
-                client.Disconnect()
-                Return True
-            ElseIf CURRENT_POLL_TYPE = "IMAP" Then
-                If CheckDeletedRun = True Then
-                    Try
-                        Logger.Debug(String.Format("Working on S22 Delete..."))
-                        Using oClient As New S22.Imap.ImapClient(MAIL_SERVER, MAIL_PORT, MAIL_USER, MAIL_USER_PW, S22.Imap.AuthMethod.Login, True)
-                            Dim oMessageIds As IEnumerable(Of UInteger) = oClient.Search(S22.Imap.SearchCondition.Unseen, MAIL_INBOX_NAME)
-                            For Each oMessageId As UInteger In oMessageIds
-                                If oMessageId = msgid Then
-                                    Logger.Debug($"Message shall be deleted...")
-                                    oClient.DeleteMessage(oMessageId)
-                                    Logger.Debug($"Message has been deleted!")
-                                End If
-                            Next
-                            oClient.Expunge() 'delete messages marked as deleted
-
-                        End Using
-                    Catch ex As Exception
-                        Logger.Error(ex)
-                        Logger.Warn("Error while deleting s22Mail: " & ex.Message)
-                        Return False
-                    End Try
-                Else
-                    Try
-                        Logger.Debug(String.Format("Working on IMAP Delete..."))
-                        Dim oIMAPClient As New ImapClient(MAIL_SERVER, MAIL_PORT)
-                        oIMAPClient.EnableSsl = True
-                        oIMAPClient.ValidateRemoteCertificate = False
-                        oIMAPClient.Connect()
-                        Try
-                            oIMAPClient.Login(MAIL_USER, MAIL_USER_PW, AuthenticationType.Login)
-                        Catch ex As Exception
-                            Logger.Error(ex)
-                            Logger.Warn("Error while loginImap.now trying Ntlm-Auth: " & ex.Message)
-                            Try
-                                oIMAPClient.Login(MAIL_USER, MAIL_USER_PW, AuthenticationType.Ntlm)
-                            Catch ex1 As Exception
-                                Logger.Error(ex)
-                                Return False
-                            End Try
-                        End Try
-                        Logger.Debug("Logged in for delete...")
-                        oIMAPClient.SelectFolder(MAIL_INBOX_NAME)
-                        Dim oEnvelopes As Envelope() = oIMAPClient.ListMessages()
-
-                        For i As Integer = 0 To oEnvelopes.Length - 1
-                            If oEnvelopes(i).MessageID = msgid Then
-                                oIMAPClient.Delete(oEnvelopes(i).UniqueID) 'mark as deleted
-                            End If
-                        Next
-                        oIMAPClient.Expunge() 'delete messages marked as deleted
-                        Dim oDeleted As Boolean = True
-                        For i As Integer = 0 To oEnvelopes.Length - 1
-                            If oEnvelopes(i).MessageID = msgid Then
-                                Logger.Debug("Message is still existing. Deleting did not work!")
-                                oDeleted = False
-                            End If
-                        Next
-                        oIMAPClient.Disconnect()
-                        If oDeleted = False Then
-                            DELETE_EMAIL(msgid, True)
-                        Else
-                            Return True
-                        End If
-
-
-                    Catch ex As Exception
-                        Logger.Error(ex)
-                        Logger.Warn("Error in IMAP Delete: " & ex.Message)
-                        Return False
-                    End Try
-                End If
-
-
-
-
-            Else
-                Return False
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-            'clsLogger.Add("Unexpected Error in DELETE_EMAIL: " & ex.Message)
-            Return False
-        End Try
-    End Function
-    Public Function Email_Send_Independentsoft(ByVal mailSubject As String, ByVal mailBody As String, mailto As String,
-                                                     mailfrom As String, mailsmtp As String, mailport As Integer, mailUser As String, mailPW As String,
-                                                     AUTH_TYPE As String, Optional attment As String = "")
-        Try
-            ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12
-            Logger.Debug($"in Email_Send_Independentsoft..")
-            Dim empfaenger As String()
-            If mailto.Contains(";") Then
-                empfaenger = mailto.Split(";")
-            Else
-                ReDim Preserve empfaenger(0)
-                empfaenger(0) = mailto
-            End If
-            Dim _error As Boolean = False
-            'Für jeden Empfänger eine Neue Mail erzeugen
-            For Each _mailempfaenger As String In empfaenger
-                Logger.Debug($"Working on email for {_mailempfaenger}..")
-                Try
-                    Dim message As New Message()
-                    message.From = New Mailbox(mailfrom, mailfrom)
-                    message.[To].Add(New Mailbox(_mailempfaenger))
-                    message.Subject = mailSubject
-                    Logger.Debug($"Message created..")
-                    Dim textBodyPart As New BodyPart()
-                    textBodyPart.ContentType = New ContentType("text", "html", "utf-8")
-                    textBodyPart.ContentTransferEncoding = ContentTransferEncoding.QuotedPrintable
-                    textBodyPart.Body = mailBody
-                    message.BodyParts.Add(textBodyPart)
-                    If attment <> String.Empty Then
-                        If System.IO.File.Exists(attment) Then
-                            Dim attachment1 As New Attachment(attment)
-                            If attment.ToLower.EndsWith("pdf") Then
-                                attachment1.ContentType = New ContentType("application", "pdf")
-                            ElseIf attment.ToLower.EndsWith("jpg") Then
-                                attachment1.ContentType = New ContentType("application", "jpg")
-                            ElseIf attment.ToLower.EndsWith("docx") Then
-                                attachment1.ContentType = New ContentType("application", "MS-word")
-                            End If
-                            message.BodyParts.Add(attachment1)
-                        Else
-                            Logger.Warn($"Attachment {attment.ToString} is not existing!")
-                        End If
-                    End If
-                    Dim client As SmtpClient
-                    Try
-                        client = New SmtpClient(mailsmtp, mailport)
-                    Catch ex As Exception
-                        Logger.Error(ex)
-                        Logger.Warn("clsEmail.Create Client: " & ex.Message)
-                        _error = True
-                        Continue For
-                    End Try
-                    Try
-                        client.Connect()
-                    Catch ex As Exception
-                        Logger.Error(ex)
-                        Logger.Warn("clsEmail.Client.Connect1: " & ex.Message)
-                        Logger.Debug("Error in ClientConnect - but still trying to send")
-                        _error = True
-                        ' Continue For
-                    End Try
-                    Logger.Debug("Connected to Client!")
-                    If AUTH_TYPE = "SSL" Then
-                        client.EnableSsl = True
-                        'client.ValidateRemoteCertificate = True
-                        Logger.Debug("Authentification via SSL.")
-                    ElseIf AUTH_TYPE = "TLS" Then
-                        ' client.ValidateRemoteCertificate = False
-                        client.StartTls()
-                        client.EnableSsl = False
-                        Logger.Debug("Authentification via TLS. SSL disabled")
-                    Else
-                        client.EnableSsl = False
-                        Logger.Debug("Authentification NONE. SSL disabled")
-                    End If
-                    Try
-
-                        client.Connect()
-                    Catch ex As Exception
-                        Logger.Error(ex)
-                        Logger.Warn("clsEmail.Client.Connect: " & ex.Message)
-                        _error = True
-                        ' Continue For
-                    End Try
-                    Try
-                        If mailsmtp.Contains("office365.com") Then
-                            client.Login(mailUser, mailPW, AuthenticationType.None)
-                        Else
-                            client.Login(mailUser, mailPW)
-                        End If
-
-                        Logger.Debug("Logged in!")
-                    Catch ex As Exception
-                        Logger.Error(ex)
-
-                        Try
-                            If mailsmtp.Contains("office365.com") Then
-                                client.Login(mailUser, mailPW, AuthenticationType.Login)
-                            Else
-                                client.Login(mailUser, mailPW, AuthenticationType.Anonymous)
-                            End If
-
-                        Catch ex1 As Exception
-                            Logger.Error(ex)
-
-                            Try
-                                client.Login(mailUser, mailPW, AuthenticationType.Login)
-                            Catch ex2 As Exception
-                                Logger.Error(ex)
-                                Logger.Warn("clsEmail.Client.Login: " & ex.Message)
-                                _error = True
-                                client.Disconnect()
-                                Continue For
-                            End Try
-                        End Try
-                    End Try
-                    Try
-                        client.Send(message)
-                        Logger.Info("Message to " & _mailempfaenger & " has been send.")
-                        _error = False
-                    Catch ex As Exception
-                        Logger.Error(ex)
-                        Logger.Warn("clsEmail.Client.Send: " & ex.Message)
-                        _error = True
-                        client.Disconnect()
-                        Continue For
-                    End Try
-                    client.Disconnect()
-
-                Catch ex As Exception
-                    Logger.Error(ex)
-                    _error = True
-                End Try
-            Next
-
-            If _error = True Then
-                Return False
-            Else
-                Return True
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-            Return False
-        End Try
-    End Function
-
-End Class

App/DigitalData.EMLProfiler/clsWorkEmail.vb

@@ -1,917 +0,0 @@
-Imports Independentsoft.Email.Mime
-Imports System.Text.RegularExpressions
-Imports WINDREAMLib
-Imports DigitalData.EMLProfiler.ClassCurrent
-Imports System.IO
-Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Database
-Imports System.Threading
-
-Public Class clsWorkEmail
-    Private Shared Logger As Logger
-    Private MyLogger As LogConfig
-    Private _email As clsEmail
-    Private _DB_MSSQL As clsDatabase
-    Private _USE_WM As Boolean
-    Private _windream As clsWindream_allgemein
-    Private _windream_index As clsWindream_Index
-    Private _filesystem As DigitalData.Modules.Filesystem.File
-    Private _firebird As Firebird
-    Private _worked_email As Boolean = False
-    Sub New(LogConf As LogConfig, ConStr As String, FB_DATASOURCE As String, FB_DATABASE As String, FB_USER As String, FB_PW As String, USE_WM As Boolean)
-        Try
-            Logger = LogConf.GetLogger
-            MyLogger = LogConf
-            _email = New clsEmail(LogConf)
-            _filesystem = New Modules.Filesystem.File(LogConf)
-            Logger.Debug("clsWorkmail _email initialized")
-            _DB_MSSQL = New clsDatabase(LogConf, ConStr)
-            Logger.Debug("clsWorkmail _email initialized")
-            _USE_WM = USE_WM
-            If USE_WM Then
-                _windream = New clsWindream_allgemein(LogConf)
-                _windream_index = New clsWindream_Index(LogConf)
-            End If
-
-            If FB_DATASOURCE <> String.Empty Then
-                _firebird = New Firebird(LogConf, FB_DATASOURCE, FB_DATABASE, FB_USER, FB_PW)
-            End If
-
-        Catch ex As Exception
-            Logger.Error(ex)
-        End Try
-
-    End Sub
-    Public Function WorkEmailMessage(MyEmailMessage As Message) As Boolean
-        Try
-            Logger.Debug($"Working on email from: {MyEmailMessage.From.EmailAddress}...Subject: {MyEmailMessage.Subject}")
-            CURRENT_MAIL_BODY_ALL = ""
-            CURRENT_MAIL_BODY_ANSWER1 = ""
-            CURRENT_MAIL_BODY_Substr2 = ""
-            CURRENT_MAIL_MESSAGE = MyEmailMessage
-            CURRENT_MAIL_SUBJECT = MyEmailMessage.Subject.ToUpper
-
-            If IsNothing(CURRENT_MAIL_SUBJECT) Then
-                CURRENT_MAIL_SUBJECT = ""
-            Else
-                Logger.Debug($"Subject: {CURRENT_MAIL_SUBJECT}...")
-            End If
-
-            CURRENT_MAIL_FROM = MyEmailMessage.From.EmailAddress
-            Logger.Debug($"Working on email from : {CURRENT_MAIL_FROM}...")
-            Dim oTempMailExists As Boolean = SAVE2TEMP()
-            'Checking wether Mail can be opened
-            Dim oTempMailAccessible As Boolean = False
-            If oTempMailExists = True Then
-                Try
-                    Dim oFS As FileStream = File.OpenRead(CURRENT_TEMP_MAIL_PATH)
-                    oTempMailAccessible = True
-                Catch ex As Exception
-                    Logger.Error(ex)
-                    Logger.Warn($"Could not read the Temp-Mail. Insufficient rights? Message: {ex.Message}")
-                End Try
-                If oTempMailAccessible = True Then
-                    MessageError = False
-                    If CURRENT_MAIL_SUBJECT.Contains("[PROCESSMANAGER]") Then
-                        PROCESS_MANAGER_IN()
-                    ElseIf MyEmailMessage.Subject.Contains("[ADDI]") Then
-
-                    Else
-                        Logger.Info("CommonEmail-Process-Sniffer")
-                        If COMMON_EMAIL_IN() = True Then
-                            INSERT_HISTORY_MSSQL()
-                            Return True
-                        Else
-                            Return False
-                        End If
-                    End If
-
-                End If
-            End If
-
-
-
-
-        Catch ex As Exception
-            Logger.Error(ex)
-            'clsLogger.Add("Unexpected Error in WORK_MAIL: " & ex.Message & "MESSAGE_ID: " & msg.MessageID)
-            Return False
-        End Try
-    End Function
-    Private Function PROCESS_MANAGER_IN() As Boolean
-        Try
-            Dim oDel_email As Boolean = False
-            Logger.Info(String.Format("PM-related message found....[{0}]", CURRENT_MAIL_MESSAGE.Subject))
-            Logger.Debug(String.Format("PM-related message found....[{0}]", CURRENT_MAIL_MESSAGE.Subject))
-            Dim oExpression = "PROCESS_NAME = 'ProcessManager'"
-            'Filter the rows using Select() method of DataTable
-            Dim TEMP_PROCESS_PROFILE_DT As DataTable = DT_POLL_PROCESS
-            Dim PM_ROW As DataRow() = TEMP_PROCESS_PROFILE_DT.Select(oExpression)
-            For Each row As DataRow In PM_ROW
-
-                Try
-                    WM_REFERENCE_INDEX = row("WM_REFERENCE_INDEX")
-                Catch ex As Exception
-                    Logger.Error(ex)
-                    Logger.Debug($"PM_IN Attention WM_REFERENCE_INDEX seems to be Empty/null: {ex.Message}")
-                    WM_REFERENCE_INDEX = Nothing
-                End Try
-
-                WM_VECTOR_LOG = row("WM_VECTOR_LOG")
-                WM_OBJEKTTYPE = row("WM_OBJEKTTYPE")
-                WM_IDX_BODY_TEXT = row("WM_IDX_BODY_TEXT")
-                WM_IDX_BODY_SUBSTR_LENGTH = row("WM_IDX_BODY_SUBSTR_LENGTH")
-                oDel_email = row("DELETE_MAIL")
-
-                If COPY2HDD(row("COPY_2_HDD"), row("PATH_ORIGINAL"), row("PATH_EMAIL_ERRORS"), False) = True Then
-                    EXTRACT_BODY()
-                End If
-
-
-            Next
-
-            If CURRENT_MAIL_SUBJECT.Contains("[PROCESSMANAGER][EA]") Then
-                Logger.Info(String.Format("Message referencing to EASY-APPROVAL...."))
-                Logger.Debug(String.Format("Message referencing to EASY-APPROVAL...."))
-                CURRENT_MAIL_PROCESS_NAME = "DD EasyApproval via Mail"
-
-                If CURRENT_MAIL_BODY_ANSWER1 <> "" Then
-                    If CURRENT_MAIL_BODY_ANSWER1.EndsWith(":") Then
-                        Logger.Info(String.Format("Keyword contained a : at end...removing it..."))
-                        CURRENT_MAIL_BODY_ANSWER1 = CURRENT_MAIL_BODY_ANSWER1.Replace(":", "")
-                    End If
-                    If GET_WMDOC_INFO() = True Then
-                        If DT_STEPS.Rows.Count > 0 Then
-                            WORK_POLL_STEPS()
-                        Else
-                            Logger.Info("No steps configured for this Profile ....")
-                        End If
-                    End If
-
-                End If
-                If ClassCurrent.CURRENT_DEBUG_LOCAL_EMAIL = "" Then
-                    EMAIL_DELETE(oDel_email)
-                End If
-
-            End If
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-            'Logger.Debug("Unexpected Error in PROCESS_MANAGER_IN: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID)
-            Return False
-        End Try
-    End Function
-    Function COMMON_EMAIL_IN() As Boolean
-        Try
-            Dim oDel_email As Boolean = False
-            Logger.Info(String.Format("COMMON_EMAIL_IN...Subject [{0}]", CURRENT_MAIL_MESSAGE.Subject))
-            Logger.Debug(String.Format("COMMON_EMAIL_IN...Subject [{0}]", CURRENT_MAIL_MESSAGE.Subject))
-            Dim oExpression = "PROCESS_NAME = 'Attachment Sniffer' or PROCESS_NAME = 'ZugFeRD-Parser'"
-
-            'Filter the rows using Select() method of DataTable
-            Dim TEMP_PROCESS_PROFILE_DT As DataTable = DT_POLL_PROCESS
-            Dim PM_ROW As DataRow() = TEMP_PROCESS_PROFILE_DT.Select(oExpression)
-
-            For Each oDataRow As DataRow In PM_ROW
-                oDel_email = oDataRow("DELETE_MAIL")
-                CURRENT_MAIL_PROCESS_NAME = oDataRow.Item("PROCESS_NAME")
-                Try
-                    WM_REFERENCE_INDEX = oDataRow("WM_REFERENCE_INDEX")
-                Catch ex As Exception
-                    Logger.Error(ex)
-                    Logger.Debug($"Attention WM_REFERENCE_INDEX seems to be Empty/null: {ex.Message}")
-                    WM_REFERENCE_INDEX = Nothing
-                End Try
-                Try
-                    WM_VECTOR_LOG = oDataRow("WM_VECTOR_LOG")
-                Catch ex As Exception
-                    Logger.Error(ex)
-                    WM_VECTOR_LOG = Nothing
-                End Try
-
-                WM_OBJEKTTYPE = oDataRow("WM_OBJEKTTYPE")
-                WM_IDX_BODY_TEXT = oDataRow("WM_IDX_BODY_TEXT")
-                WM_IDX_BODY_SUBSTR_LENGTH = oDataRow("WM_IDX_BODY_SUBSTR_LENGTH")
-
-                If COPY2HDD(oDataRow("COPY_2_HDD"), oDataRow("PATH_ORIGINAL"), oDataRow("PATH_EMAIL_ERRORS"), True) = True Then
-                    If EXTRACT_ATTACHMENTS(oDataRow("PATH_EMAIL_TEMP"), oDataRow("PATH_EMAIL_ERRORS")) = True Then
-                        Return True
-                    Else
-                        Return False
-                    End If
-                Else
-                    Return False
-                End If
-
-
-            Next
-            If ClassCurrent.CURRENT_DEBUG_LOCAL_EMAIL = "" Then
-                EMAIL_DELETE(oDel_email)
-            End If
-
-            Return True
-        Catch ex As Exception
-            Logger.Error(ex)
-            'Logger.Debug("Unexpected Error in PROCESS_MANAGER_IN: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID)
-            Return False
-        End Try
-    End Function
-    Private Function SAVE2TEMP()
-        Try
-            Dim oTempPath As String = Path.Combine(Path.GetTempPath, "DD_EmailProfiler")
-            Logger.Debug($"oTempPath is: {oTempPath} ...")
-            If Directory.Exists(oTempPath) = False Then
-                Directory.CreateDirectory(oTempPath)
-            Else
-                Logger.Debug($"SAVE2TEMP - oTempPath [{oTempPath}] is already existing!!")
-            End If
-            Dim oFileEntries As String() = Directory.GetFiles(oTempPath)
-            ' Process the list of files found in the directory.
-            Dim oFileName As String
-            For Each oFileName In oFileEntries
-                Try
-                    File.Delete(oFileName)
-                Catch ex As Exception
-                    Logger.Error(ex)
-                End Try
-            Next oFileName
-
-            Dim oResult As Boolean = False
-            Dim oTempFilename As String = Path.Combine(oTempPath, CURRENT_MAIL_MESSAGE.GetFileName)
-            Dim oCounter As Integer = 1
-
-            If File.Exists(oTempFilename) = True Then
-                Do While File.Exists(oTempFilename)
-                    oCounter += 1
-                    oTempFilename = Path.Combine(oTempPath, oCounter & "_" & CURRENT_MAIL_MESSAGE.GetFileName)
-                Loop
-            End If
-            CURRENT_MAIL_MESSAGE.Save(oTempFilename, True)
-            CURRENT_TEMP_MAIL_PATH = oTempFilename
-            Logger.Debug($"Email saved to Temppath {CURRENT_TEMP_MAIL_PATH}")
-            oCounter = 0
-            Dim oCancel As Boolean
-            Do While File.Exists(CURRENT_TEMP_MAIL_PATH) = False
-                Thread.Sleep(1000)
-                oCounter += 1
-                If oCounter > 10 Then
-                    Logger.Warn("It took to long to save the mail to Temppath!")
-                    oCancel = True
-                    Exit Do
-                End If
-            Loop
-            If oCancel = True Then
-                oResult = False
-            Else
-                If File.Exists(CURRENT_TEMP_MAIL_PATH) Then
-                    oResult = True
-                End If
-            End If
-            'Datei in Array zum Templöschen speichern
-            TEMP_FILES.Add(oTempFilename)
-            Return oResult
-        Catch ex As Exception
-            Logger.Error(ex)
-            CURRENT_TEMP_MAIL_PATH = Nothing
-            'clsLogger.Add("Unexpected Error in COPY2HDD: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID, True)
-            Return False
-        End Try
-    End Function
-    Private Function COPY2HDD(copy_2_hdd As Boolean, pathOriginal As String, pathemail_errors As String, messageid As Boolean) As Boolean
-        Try
-            If copy_2_hdd = True Then
-                Logger.Debug("COPY_2_HDD is ACTIVE!")
-                PATH_ERROR = pathemail_errors
-
-                If Directory.Exists(pathOriginal) Then
-                    Dim oTempFilename = pathOriginal
-                    If messageid = True Then
-                        oTempFilename &= "\" & CURRENT_MAIL_MESSAGE.MessageID & ".eml"
-                    Else
-                        oTempFilename &= "\" & CURRENT_MAIL_MESSAGE.GetFileName
-                    End If
-
-                    Logger.Debug("Temp FileName: [{0}]", oTempFilename)
-
-                    Dim oCleanPath As String = String.Join("", oTempFilename.Split(Path.GetInvalidPathChars()))
-                    Dim oVersionedPath As String = _filesystem.GetVersionedFilename(oCleanPath)
-
-                    Logger.Debug("Cleaned FileName: [{0}]", oVersionedPath)
-
-                    If System.IO.File.Exists(oVersionedPath) = False Then
-                        Try
-                            File.Delete(oVersionedPath)
-                        Catch ex As Exception
-                            Logger.Error(ex)
-                            Return False
-                        End Try
-
-                        CURRENT_MAIL_MESSAGE.Save(oVersionedPath, True)
-                        Dim oFileInfo As New FileInfo(oVersionedPath)
-                        Dim oFileLenth As Long = oFileInfo.Length
-                        If oFileLenth > 0 Then
-                            Logger.Info($"[COPY2HDD] Email saved to ({oVersionedPath})")
-                            Return True
-                        Else
-                            Logger.Warn($"##!! oFileLenth  is 0 !!##")
-                            Try
-                                File.Delete(oVersionedPath)
-                            Catch ex As Exception
-                                Logger.Error(ex)
-                            End Try
-                            Return False
-                        End If
-
-                    Else
-                        Logger.Warn("COPY2HDD - EMail (" & CURRENT_MAIL_MESSAGE.Subject & ") already existing!", False, "RUN_THREAD.COPY_2_HDD")
-
-                        Return False
-                    End If
-                End If
-
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-            'clsLogger.Add("Unexpected Error in COPY2HDD: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID, True)
-            Return False
-        End Try
-    End Function
-    Private Function EXTRACT_BODY()
-        TEMP_HTML_RESULTS.Clear()
-        Dim oDTFunctionRegex As DataTable = _DB_MSSQL.Return_Datatable("SELECT * FROM TBDD_FUNCTION_REGEX WHERE UPPER(FUNCTION_NAME) IN (UPPER('EMAIL_PROFILER - RemoveHTMLText'),UPPER('EMAIL_PROFILER - RemoveHTMLText1'))")
-
-
-        Dim oMsg_email As New Independentsoft.Email.Mime.Message(CURRENT_TEMP_MAIL_PATH)
-        Dim oBodyText As String = ""
-        If IsNothing(oMsg_email.Body) Then
-            Dim oAllBodyParts As New BodyPartCollection()
-            oAllBodyParts.Add(oMsg_email.BodyParts)
-            oAllBodyParts.Add(GetChildren(oMsg_email.BodyParts))
-            For Each bodyPart As BodyPart In oAllBodyParts
-                If bodyPart.ContentType IsNot Nothing AndAlso bodyPart.ContentType.Type = "text" AndAlso bodyPart.ContentType.SubType = "plain" Then
-                    If oBodyText = String.Empty Then
-                        Logger.Debug(String.Format("BODY1-Text is....#{0}", bodyPart.Body))
-                        oBodyText = bodyPart.Body
-                    Else
-                        Continue For
-                    End If
-                ElseIf bodyPart.ContentType IsNot Nothing AndAlso bodyPart.ContentType.Type = "text" AndAlso bodyPart.ContentType.SubType = "html" Then
-                    If oBodyText = String.Empty Then
-                        oBodyText = bodyPart.Body
-                        Logger.Debug(String.Format("bodyhtml....#{0}", bodyPart.Body))
-                    Else
-                        Continue For
-                    End If
-                    Logger.Debug(String.Format("bodyhtml....#{0}", bodyPart.Body))
-                End If
-            Next
-            If oBodyText = "" Then
-
-            Else
-                CURRENT_MAIL_BODY_ALL = oBodyText
-
-            End If
-        Else
-            CURRENT_MAIL_BODY_ALL = oMsg_email.Body
-        End If
-
-
-
-
-
-
-        If Not IsNothing(CURRENT_MAIL_BODY_ALL) Then
-            ' CURRENT_MAIL_BODY_ALL = oMsg_email.Body
-            Dim oPattern1 As String
-            Dim oPattern2 As String
-            Try
-                oPattern1 = oDTFunctionRegex.Rows(0).Item("REGEX")
-            Catch ex As Exception
-                oPattern1 = ""
-            End Try
-            Try
-                oPattern2 = oDTFunctionRegex.Rows(1).Item("REGEX")
-            Catch ex As Exception
-                Logger.Error(ex)
-                oPattern2 = ""
-            End Try
-
-
-
-
-            Dim oReg As Regex = New Regex(oPattern1, RegexOptions.IgnoreCase)
-            Dim oMatch As Match = oReg.Match(CURRENT_MAIL_BODY_ALL)
-            Dim oClearedBodyText = CURRENT_MAIL_BODY_ALL
-            Do While oMatch.Success
-                oClearedBodyText = oClearedBodyText.Replace(oMatch.Value, "")
-                oMatch = oMatch.NextMatch()
-            Loop
-            Logger.Debug($"Cleared bodytext after Regex1 is: {oClearedBodyText}")
-            Dim oReg2 As Regex = New Regex(oPattern2, RegexOptions.IgnoreCase)
-            Dim oMatch2 As Match = oReg2.Match(oClearedBodyText)
-
-            Do While oMatch2.Success
-                oClearedBodyText = oClearedBodyText.Replace(oMatch2.Value, "")
-                'Dim g As Group = m.Groups(1)
-                'If g.ToString.StartsWith("&") = False Then
-                '    TEMP_HTML_RESULTS.Add(g.ToString())
-                'End If
-
-                oMatch2 = oMatch2.NextMatch()
-            Loop
-            Logger.Debug($"Cleared bodytext after Regex2 is: {oClearedBodyText}")
-            CURRENT_MAIL_BODY_ALL = oClearedBodyText
-        Else
-            Logger.Info($"Mailbody still is nothing after bodyExtraction!!")
-        End If
-        'Try
-        '    Dim pattern1 As String = ""
-        '    For Each oRow As DataRow In oDTFunctionRegex.Rows
-        '        If oRow.Item("FUNCTION_NAME").ToString.ToUpper = "EMAIL_PROFILER - RemoveHTMLText".ToUpper Then
-        '            pattern1 = oRow.Item("REGEX")
-
-        '        End If
-        '    Next
-        '    If pattern1 = String.Empty Then
-        '        Exit Try
-        '    End If
-        '    ' Instantiate the regular expression object.
-        '    Dim r As Regex = New Regex(pattern1, RegexOptions.Multiline)
-        '    ' Match the regular expression pattern against a text string.
-        '    Dim m As Match = r.Match(CURRENT_MAIL_BODY_ALL)
-        '    Dim oClearedBodyText = CURRENT_MAIL_BODY_ALL
-        '    Do While m.Success
-        '        oClearedBodyText = oClearedBodyText.Replace(m.Value, "")
-        '        'Dim g As Group = m.Groups(1)
-        '        'If g.ToString.StartsWith("&") = False Then
-        '        '    TEMP_HTML_RESULTS.Add(g.ToString())
-        '        'End If
-
-        '        m = m.NextMatch()
-        '    Loop
-        '    Logger.Info($"Cleared bodytext is: {oClearedBodyText}")
-        '    CURRENT_MAIL_BODY_ALL = Trim(oClearedBodyText)
-        'Catch ex As Exception
-
-        'End Try
-
-        Try
-            If CURRENT_MAIL_BODY_ALL = String.Empty Then
-                Logger.Warn("Mailbody is empty. Email can not be processed! - Please check the html-structure")
-                Logger.Info("EXCEPTION - Mailbody is empty.Email can not be processed! - Please check the html-structure")
-                MessageError = True
-                Return False
-            Else
-                Logger.Debug($"Length of Body is [{CURRENT_MAIL_BODY_ALL.Length}] - Body Text is [{CURRENT_MAIL_BODY_ALL}]")
-            End If
-            CURRENT_MAIL_BODY_ALL = CURRENT_MAIL_BODY_ALL.Replace(vbLf, "")
-            Dim oSplit = CURRENT_MAIL_BODY_ALL.Split(Environment.NewLine)
-            Dim oCount As Integer = 0
-            Dim oReadLength As Integer = 0
-            Dim oAnswer2 As String
-            For Each ostr As String In oSplit
-                ostr = ostr.Replace(vbCrLf, "")
-                If ostr = String.Empty Then
-                    Continue For
-                End If
-                oCount += 1
-                If oCount = 1 Then
-                    CURRENT_MAIL_BODY_ANSWER1 = ostr
-                Else
-                    If ostr.StartsWith("##") Then
-                        Exit For
-                    ElseIf oCount = 2 Then
-                        CURRENT_MAIL_BODY_Substr2 = ostr
-                    Else
-                        If ((oReadLength + ostr.Length) >= WM_IDX_BODY_SUBSTR_LENGTH) Or ostr.StartsWith("##") Then
-                            Exit For
-                        End If
-                        CURRENT_MAIL_BODY_Substr2 = CURRENT_MAIL_BODY_Substr2 & vbNewLine & ostr
-                    End If
-                    oReadLength += ostr.Length
-                End If
-            Next
-
-
-            Logger.Debug(String.Format("MailBody-ANSWER1:...[{0}]", CURRENT_MAIL_BODY_ANSWER1))
-            Logger.Debug(String.Format("MailBody-ANSWER2:...[{0}]", CURRENT_MAIL_BODY_Substr2))
-
-            If CURRENT_MAIL_BODY_ANSWER1 = String.Empty Then
-                Logger.Warn("CURRENT_MAIL_BODY_ANSWER1 is String.Empty: So the answer will interpreted as empty!")
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-            'clsLogger.Add("Unexpected Error in COPY2HDD: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID, True)
-            MessageError = True
-            Return False
-        End Try
-    End Function
-    Private Function EXTRACT_ATTACHMENTS(pathemailtemp As String, pathemail_errors As String)
-        Logger.Debug("In EXTRACT_ATTACHMENTS...")
-        PATH_TEMP = pathemailtemp
-        PATH_ERROR = pathemail_errors
-        Logger.Debug(String.Format("PATH_TEMP[{0}]", PATH_TEMP))
-        Try
-            If CURRENT_TEMP_MAIL_PATH <> Nothing Then
-                If File.Exists(CURRENT_TEMP_MAIL_PATH) Then
-                    Dim oCurrentMail As New Independentsoft.Email.Mime.Message(CURRENT_TEMP_MAIL_PATH)
-                    Dim oMSGID = oCurrentMail.MessageID
-                    If IsNothing(oMSGID) Then
-                        oMSGID = System.Guid.NewGuid.ToString()
-                    End If
-                    oMSGID = oMSGID.Replace(">", "").Replace("<", "")
-                    For Each oAttachment As Attachment In oCurrentMail.GetAttachments
-                        Dim oATTFilename = oAttachment.GetFileName.ToString.ToLower
-                        Dim oValidExt As Boolean = False
-                        If oATTFilename.EndsWith("pdf") Then
-                            oValidExt = True
-                        ElseIf oATTFilename.EndsWith("xls") Then
-                            oValidExt = True
-                        ElseIf oATTFilename.EndsWith("xlsx") Then
-                            oValidExt = True
-                        ElseIf oATTFilename.EndsWith("doc") Then
-                            oValidExt = True
-                        ElseIf oATTFilename.EndsWith("docx") Then
-                            oValidExt = True
-                        ElseIf oATTFilename.EndsWith("ppt") Then
-                            oValidExt = True
-                        ElseIf oATTFilename.EndsWith("pptx") Then
-                            oValidExt = True
-                        End If
-                        If oValidExt = False Then
-                            Logger.Debug(String.Format("Invalid FileExtension [{0}]", oATTFilename))
-                            Continue For
-                        End If
-                        Dim oAttachmentFileString
-                        Logger.Info(String.Format(" Working on Attachment [{0}]", oAttachment.GetFileName))
-                        Try
-                            Dim oFilename = oAttachment.GetFileName
-                            oFilename = CleanInput(oFilename)
-                            Logger.Debug($"oFilename [{oFilename}]")
-                            If oFilename = String.Empty Then
-                                oFilename = oAttachment.GetFileName
-                            End If
-                            oAttachmentFileString = Path.Combine(PATH_TEMP, $"{oMSGID}~{oFilename}")
-                            Logger.Debug($"oAttachmentFileString [{oAttachmentFileString}]")
-
-                            If System.IO.File.Exists(oAttachmentFileString) = False Then
-                                Logger.Debug(String.Format("Trying to save attachment [{0}]", oAttachmentFileString))
-                                Try
-                                    oAttachment.Save(oAttachmentFileString)
-                                    Dim oFileInfo As New FileInfo(oAttachmentFileString)
-                                    Dim oFileLenth As Long = oFileInfo.Length
-                                    If oFileLenth > 0 Then
-                                        Logger.Info(String.Format("Attachment saved to [{0}]", oAttachmentFileString))
-                                        INSERT_HISTORY_FB(oMSGID, oAttachment.GetFileName)
-                                        INSERT_HISTORY_ATTMT_MSSQL(oMSGID, oAttachment.GetFileName)
-
-                                    Else
-                                        Logger.Warn($"##!! oFileLenth for AttachmentObjects is 0 !!##")
-                                        Try
-                                            File.Delete(oAttachmentFileString)
-                                        Catch ex As Exception
-                                            Logger.Error(ex)
-                                        End Try
-                                        MessageError = True
-                                        Return False
-                                    End If
-
-                                Catch ex As Exception
-                                    Logger.Error(ex)
-                                    Logger.Warn($"Error while saving attachment-name: {ex.Message} - AttachmentName: {oAttachmentFileString}")
-                                    MessageError = True
-                                End Try
-                            Else
-                                Logger.Info("EXATTMNT - Attachment (" & oAttachmentFileString & ") already existing!", False, "EXTRACT_ATTACHMENTS")
-                            End If
-
-                        Catch ex As Exception
-                            Logger.Error(ex)
-                            Logger.Warn($"Error while creating and saving attachment-name: {ex.Message} - AttachmentName: {oAttachmentFileString}")
-                            MessageError = True
-                            Return False
-                        End Try
-                    Next
-                Else
-                    Logger.Warn($"If cause 2 EXTRACT_ATTACHMENTS: {CURRENT_TEMP_MAIL_PATH} not existing")
-                End If
-            Else
-                Logger.Warn($"EXTRACT_ATTACHMENTSIf cause 1: CURRENT_TEMP_MAIL_PATH is NOTHING")
-            End If
-
-        Catch ex As Exception
-            Logger.Error(ex)
-            'clsLogger.Add("Unexpected Error in COPY2HDD: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID, True)
-            MessageError = True
-            Return False
-        End Try
-    End Function
-    Private Function CleanInput(strIn As String) As String
-        ' Replace invalid characters with empty strings.
-        Try
-            Return Regex.Replace(strIn, "[^\w\.@-]", "")
-            ' If we timeout when replacing invalid characters, 
-            ' we should return String.Empty.
-        Catch ex As Exception
-            Logger.Error(ex)
-            Return String.Empty
-        End Try
-    End Function
-
-    Private Function RemoveCharacter(ByVal stringToCleanUp)
-        Dim characterToRemove As String = ""
-        characterToRemove = Chr(34) + "#$%&'()*+,-./\~"
-        Dim firstThree As Char() = characterToRemove.Take(16).ToArray()
-        For index = 1 To firstThree.Length - 1
-            stringToCleanUp = stringToCleanUp.ToString.Replace(firstThree(index), "")
-        Next
-        Return stringToCleanUp
-    End Function
-
-
-    Private Function INSERT_HISTORY_MSSQL() As Boolean
-        If MessageError = False Then
-            Dim ins = $"INSERT INTO TBEMLP_HISTORY (WORK_PROCESS,EMAIL_MSGID,EMAIL_SUBJECT,EMAIL_DATE,EMAIL_BODY,EMAIL_SUBSTRING1,EMAIL_SUBSTRING2,EMAIL_FROM,PROFILE_ID) VALUES " &
-      $"('{CURRENT_MAIL_PROCESS_NAME}'," &
-      $"'{CURRENT_MAIL_MESSAGE.MessageID.Replace("<", "").Replace(">", "")}'," &
-      $"'{CURRENT_MAIL_MESSAGE.Subject}'," &
-      $"'{CURRENT_MAIL_MESSAGE.Date}'," &
-      $"'{CURRENT_MAIL_BODY_ALL}'," &
-      $"'{CURRENT_MAIL_BODY_ANSWER1}'," &
-      $"'{CURRENT_MAIL_BODY_Substr2}'," &
-      $"'{CURRENT_MAIL_FROM}'," &
-      $"{CURRENT_PROFILE_GUID})"
-            Return _DB_MSSQL.Execute_non_Query(ins)
-        Else
-            Logger.Info("! No INSERT_HISTORY as  MessageError = True")
-            Return False
-        End If
-    End Function
-    Private Function INSERT_HISTORY_FB(oGUID As String, ATTMT1 As String) As Boolean
-        If IsNothing(_firebird) Then
-            Logger.Info("INSERT_HISTORY_FB: _firebird is nothing ")
-            Return False
-        End If
-        Try
-            If MessageError = False Then
-                Dim ins = $"INSERT INTO TBEDM_EMAIL_PROFILER_HISTORY (WORK_PROCESS,EMAIL_MSGID,EMAIL_FROM,EMAIL_SUBJECT,EMAIL_DATETIME,EMAIL_BODY,EMAIL_SUBSTRING1,EMAIL_SUBSTRING2,EMAIL_ATTMT1) VALUES " &
-          $"('{CURRENT_MAIL_PROCESS_NAME}'," &
-          $"'{oGUID}'," &
-          $"'{CURRENT_MAIL_MESSAGE.From.EmailAddress}'," &
-          $"'{CURRENT_MAIL_MESSAGE.Subject}'," &
-          $"'{CURRENT_MAIL_MESSAGE.Date}'," &
-          $"'{CURRENT_MAIL_BODY_ALL}'," &
-          $"'{CURRENT_MAIL_BODY_ANSWER1}'," &
-          $"'{CURRENT_MAIL_BODY_Substr2}'," &
-          $"'{ATTMT1}')"
-                Return _firebird.ExecuteNonQuery(ins)
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-            Return False
-        End Try
-
-    End Function
-    Private Function INSERT_HISTORY_ATTMT_MSSQL(oMSGID As String, ATTMT1 As String)
-        If IsNothing(_DB_MSSQL) Then
-            Logger.Info("INSERT_HISTORY_FB: _DB_MSSQL is nothing ")
-            Return False
-        End If
-        Try
-            If MessageError = False Then
-                Dim ins = $"INSERT INTO TBEMLP_HISTORY_ATTACHMENT (WORK_PROCESS,EMAIL_MSGID,EMAIL_FROM,EMAIL_SUBJECT,EMAIL_DATETIME,EMAIL_BODY,EMAIL_ATTMT) VALUES " &
-          $"('{CURRENT_MAIL_PROCESS_NAME}'," &
-          $"'{oMSGID}'," &
-          $"'{CURRENT_MAIL_MESSAGE.From.EmailAddress}'," &
-          $"'{CURRENT_MAIL_MESSAGE.Subject}'," &
-          $"'{CURRENT_MAIL_MESSAGE.Date}'," &
-          $"'{CURRENT_MAIL_BODY_ALL}'," &
-          $"'{ATTMT1}')"
-                _DB_MSSQL.Execute_non_Query(ins)
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-        End Try
-
-    End Function
-    Private Function GetChildren(ByVal bodyParts As BodyPartCollection) As BodyPartCollection
-
-        Dim children As New BodyPartCollection()
-
-        For i As Integer = 0 To bodyParts.Count - 1
-            children.Add(GetChildren(bodyParts(i).BodyParts))
-            children.Add(bodyParts(i))
-        Next
-
-        Return children
-    End Function
-    Private Function EMAIL_DELETE(del As Boolean)
-        If del = True And MessageError = False Then
-            _email.DELETE_EMAIL(CURRENT_MAIL_MESSAGE.MessageID)
-        Else
-            If MessageError = True Then
-                Logger.Warn($"Did not delete Message [{CURRENT_MAIL_MESSAGE.MessageID}] as there was an MessageError!")
-            End If
-        End If
-    End Function
-    Private Function WORK_POLL_STEPS() As Boolean
-        Try
-            Dim oFoundSomething As Boolean = False
-            _worked_email = False
-            For Each row As DataRow In DT_STEPS.Rows
-                POLL_STEP_GUID = row.Item("GUID")
-                POLL_STEP_PROCESS_ID = row.Item("PROCESS_ID")
-                POLL_KEYWORDS = row.Item("KEYWORDS_BODY")
-                KEYWORDS_SPLIT = POLL_KEYWORDS.Split(";")
-
-                For Each oKeyWord As String In KEYWORDS_SPLIT
-                    If CURRENT_MAIL_BODY_ANSWER1.ToUpper = oKeyWord.ToUpper Then
-                        _worked_email = True
-
-                        Logger.Info(String.Format("Found Keyword '{0}' in MessageBody", oKeyWord))
-                        oFoundSomething = True
-                        Dim sql As String = String.Format("SELECT * FROM TBEMLP_POLL_INDEXING_STEPS WHERE STEP_ID = {0} AND ACTIVE = 1", POLL_STEP_GUID)
-                        DT_INDEXING_STEPS = _DB_MSSQL.Return_Datatable(sql)
-                        If DT_INDEXING_STEPS.Rows.Count > 0 Then
-                            WORK_INDEXING_STEPS()
-                        Else
-                            Logger.Info("No Indexing Steps found?! - SQL: " & sql)
-                        End If
-
-                    End If
-                Next
-
-            Next
-            If oFoundSomething = False Then
-                Logger.Info($"None of the keywords was found...Keyword after Regex is '{0}'")
-            End If
-            If _worked_email = False And oFoundSomething = False Then
-                Dim sql As String = String.Format("SELECT * FROM TBEMLP_POLL_INDEXING_STEPS WHERE STEP_ID = {0} AND ACTIVE = 1 AND USE_FOR_DIRECT_ANSWER = 1", POLL_STEP_GUID)
-                DT_INDEXING_STEPS = _DB_MSSQL.Return_Datatable(sql)
-                If DT_INDEXING_STEPS.Rows.Count >= 1 Then
-                    Logger.Info($"An index for direct answer was configured. Therefore it will be used...")
-                End If
-                WORK_INDEXING_STEPS()
-                _worked_email = True
-            End If
-
-            'Now indexing the LogIndex
-            If Not IsNothing(WM_VECTOR_LOG) And (Not IsDBNull(WM_VECTOR_LOG)) And (WM_VECTOR_LOG <> "") Then
-                Dim msg = Now.ToString & " - " & CURRENT_MAIL_PROCESS_NAME
-                IndexFile(WM_VECTOR_LOG, msg, False)
-            End If
-            'Now indexing the Body-Message Index
-
-            If CURRENT_MAIL_BODY_Substr2 <> String.Empty And WM_IDX_BODY_TEXT <> String.Empty Then
-                IndexFile(WM_IDX_BODY_TEXT, CURRENT_MAIL_BODY_Substr2, True)
-            End If
-
-            Return True
-        Catch ex As Exception
-            MessageError = True
-            Logger.Error(ex)
-            'clsLogger.Add("Unexpected Error in WORK_POLL_STEPS: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID, True)
-            Return False
-        End Try
-    End Function
-    Private Function WORK_INDEXING_STEPS()
-        Try
-
-            For Each row As DataRow In DT_INDEXING_STEPS.Rows
-                Dim INDEXNAME As String = row.Item("INDEXNAME")
-                Dim INDEXVALUE As String = row.Item("INDEXVALUE")
-                If _USE_WM Then
-                    IndexFile(INDEXNAME, INDEXVALUE, False)
-                End If
-
-            Next
-
-
-
-        Catch ex As Exception
-            MessageError = True
-            Logger.Error(ex)
-            'clsLogger.Add("Unexpected Error in WORK_INDEXING_STEPS: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID, True)
-            Return False
-        End Try
-    End Function
-    Private Function IndexFile(oidxname As String, oidxvalue As String, oConcat_act_Value As Boolean)
-
-        Dim OArrIndex() As String
-        ReDim Preserve OArrIndex(0)
-        OArrIndex(0) = oidxname
-
-        If oConcat_act_Value = True Then
-            Dim oActValue = _windream_index.GetValueforIndex_WMFile(CURRENT_WM_DOC, oidxname)
-            If Not IsNothing(oActValue) Then
-                If oActValue.ToString.Length > 0 Then
-                    If oActValue <> oidxvalue Then
-                        oidxvalue = oActValue & vbNewLine & oidxvalue
-                    End If
-
-                End If
-            End If
-        End If
-
-        Dim oArrValue() As String
-        Dim oMyArray()
-        ReDim oMyArray(0)
-        oMyArray(0) = oidxvalue
-
-        Dim oVektorArray()
-        oVektorArray = _windream_index.GetVektorArray(CURRENT_WM_DOC, oidxname, oMyArray, True)
-
-        If oVektorArray Is Nothing = False Then
-            'Zielindex ist ein Vektorindex
-            ReDim oArrValue(oVektorArray.Length - 1)
-            Array.Copy(oVektorArray, oArrValue, oVektorArray.Length)
-            If oArrValue Is Nothing Then
-                Logger.Warn($"arrValue from vektor for index {oidxname} is nothing! Value: {oidxvalue} - no indexing!")
-                Logger.Info($"arrValue from vektor for index {oidxname} is nothing! Value: {oidxvalue} - no indexing!")
-                Return False
-            End If
-        Else
-            'Es handelt sich um einen Einfachindex
-            ReDim oArrValue(0)
-            oArrValue(0) = oidxvalue
-        End If
-
-        If oArrValue Is Nothing = False Then
-            Return _windream_index.RunIndexing(CURRENT_WM_DOC, OArrIndex, oArrValue, WM_OBJEKTTYPE)
-        Else
-            Logger.Warn($"arrValue for index {oidxname} is nothing! Value: {oidxvalue} - no indexing!")
-            Logger.Info($"arrValue for index {oidxname} is nothing! Value: {oidxvalue} - no indexing!")
-            Return False
-        End If
-    End Function
-
-    Private Function GET_WMDOC_INFO()
-        Try
-            Dim oDOC_ID = REGEX_CHECK_DOC_ID(CURRENT_MAIL_SUBJECT.Replace("10636", "133092").Replace("10644", "133092"))
-            If Not IsNothing(oDOC_ID) Then
-                Dim oDT_BASE_ATTR As DataTable = _DB_MSSQL.Return_DatatableCS("SELECT * FROM BaseAttributes WHERE dwDocID = " & oDOC_ID, WM_CON_STRING)
-                If Not IsNothing(oDT_BASE_ATTR) Then
-                    If oDT_BASE_ATTR.Rows.Count = 1 Then
-                        CURRENT_DOC_ID = oDOC_ID
-                        Dim oSql = String.Format("Select[dbo].[FNDD_GET_WINDREAM_FILE_PATH]({0},'{1}')", CURRENT_DOC_ID, WM_DRIVE)
-                        CURRENT_DOC_PATH = _DB_MSSQL.Execute_Scalar(oSql)
-                        Logger.Debug("CURRENT_DOC_PATH is: " & CURRENT_DOC_PATH)
-                        CURRENT_WM_DOC = Nothing
-                        Dim oWMDOC As WMObject
-                        Dim oWMNormpath = CURRENT_DOC_PATH.ToLower.Replace(WM_DRIVE.ToLower & ":", "")
-                        oWMNormpath = CURRENT_DOC_PATH.ToLower.Replace("\\windream\objects", "")
-                        oWMNormpath = CURRENT_DOC_PATH.ToLower.Replace("w:", "")
-                        Logger.Debug("oWMNormpath is: " & oWMNormpath)
-                        Try
-                            oWMDOC = _windream.oWMSession.GetWMObjectByPath(WMEntity.WMEntityDocument, oWMNormpath)
-                            CURRENT_WM_DOC = oWMDOC
-                            Return True
-                        Catch ex As Exception
-                            Logger.Error(ex)
-                            Logger.Warn("error while creating WMObject in (GET_DOC_INFO): " & ex.Message)
-                            Logger.Warn("oWMNormpath: " & oWMNormpath)
-                            Return False
-                        End Try
-
-                    Else
-                        Logger.Warn("No record found for dwDocID " & oDOC_ID)
-                        Return False
-
-                    End If
-                Else
-                    Logger.Warn("DT_BASE_ATTR is nothing")
-                    Return False
-                End If
-            Else
-                Logger.Warn("Could not get a DOC-ID via regex!")
-                Return False
-            End If
-
-        Catch ex As Exception
-            Logger.Error(ex)
-            'clsLogger.Add("Unexpected Error in GET_DOC_INFO: " & ex.Message & "MESSAGE_ID: " & CURRENT_MAIL_MESSAGE.MessageID)
-            MessageError = True
-            Return False
-        End Try
-    End Function
-    Public Function REGEX_CHECK_DOC_ID(SearchString As String)
-        Try
-            Dim regex As Regex = New Regex("\[DID#{1}([0-9]+)]{1}")
-            Logger.Debug("REGEX_String before replacing: '" & SearchString & "'")
-            ' Regulären Ausdruck zum Auslesen der windream-Indexe definieren
-            Dim elements As MatchCollection = regex.Matches(SearchString)
-            Dim result = ""
-            For Each element As Match In elements
-                result = element.Groups(1).Value
-                Logger.Debug(String.Format("Found Regex(0) {0} in SearchString", element.Groups(0).Value))
-                Logger.Debug(String.Format("Found Regex(1) {0} in SearchString", element.Groups(1).Value))
-            Next
-            Return result
-        Catch ex As Exception
-            MessageError = True
-            Logger.Error(ex)
-            'clsLogger.AddError("Unexpected error: " & ex.Message, "REGEX_CHECK_DOC_ID")
-            Return Nothing
-        End Try
-    End Function
-End Class

App/DigitalData.EMLProfiler/clsWorker.vb

@@ -1,225 +0,0 @@
-Imports DigitalData.EMLProfiler.ClassCurrent
-Imports Independentsoft.Email.Mime
-Imports DigitalData.Modules.Logging
-Public Class clsWorker
-    Private Shared Logger As Logger
-    Private MyLogger As LogConfig
-    Private _email As clsEmail
-    Private _emailIMAP As clsEmailIMAP
-    Private _Database As clsDatabase
-    Private _USE_WM As Boolean = False
-    Private _windream As clsWindream_allgemein
-    Private _windream_index As clsWindream_Index
-    Private _workmail As clsWorkEmail
-    Private _wrapper As clsEncryption
-    Private _POLL_PROFILEID As Integer = 0
-    Dim cs As String
-    Sub New(LogConf As LogConfig, ConStr As String, POLL_PROFILEID As Integer, FB_DATASOURCE As String, FB_DATABASE As String, FB_USER As String, FB_PW As String, USE_WM As Boolean, Optional plocaleml As String = "")
-        Logger = LogConf.GetLogger
-        _email = New clsEmail(LogConf)
-        _emailIMAP = New clsEmailIMAP(LogConf, ConStr)
-        _Database = New clsDatabase(LogConf, ConStr)
-        cs = ConStr
-        _USE_WM = USE_WM
-        If _USE_WM Then
-            _windream = New clsWindream_allgemein(LogConf)
-            _windream_index = New clsWindream_Index(LogConf)
-        End If
-
-        _workmail = New clsWorkEmail(LogConf, ConStr, FB_DATASOURCE, FB_DATABASE, FB_USER, FB_PW, USE_WM)
-        _wrapper = New clsEncryption("!35452didalog=", LogConf)
-        _POLL_PROFILEID = POLL_PROFILEID
-        ClassCurrent.CURRENT_DEBUG_LOCAL_EMAIL = plocaleml
-    End Sub
-
-    Public Sub Debug_Local_Email()
-        Try
-
-        Catch ex As Exception
-
-        End Try
-    End Sub
-
-    Public Sub Start_WorkingProfiles(Optional LocalEmail As Boolean = False)
-        Try
-            TEMP_FILES.Clear()
-
-            If _Database.Init(cs) = True Then
-                Logger.Debug("now windream_init... ")
-                If _USE_WM Then
-                    If _windream.Init = False Then
-                        Logger.Info("windream could not be initialized!!")
-                        Exit Sub
-                    Else
-                        Logger.Debug("windream_initialized!")
-                    End If
-                End If
-                Dim osql As String = "SELECT * FROM TBEMLP_POLL_PROFILES"
-                If _POLL_PROFILEID = 0 Then
-                    osql &= " WHERE ACTIVE = 1 order by SEQUENCE"
-                Else
-                    osql &= " WHERE GUID = " & _POLL_PROFILEID
-                    End If
-                Dim DT_TBDD_EMAIL As DataTable = _Database.Return_Datatable("SELECT * FROM TBDD_EMAIL_ACCOUNT WHERE ACTIVE = 1")
-                Dim DT_PROFILES = _Database.Return_Datatable(osql)
-                    If Not IsNothing(DT_PROFILES) Then
-                    If DT_PROFILES.Rows.Count > 0 Then
-                        Logger.Debug("count of active profiles: " & DT_PROFILES.Rows.Count.ToString)
-                        For Each oDR_Profile As DataRow In DT_PROFILES.Rows
-                            CURRENT_PROFILE_GUID = oDR_Profile.Item("GUID")
-                            DT_POLL_PROCESS = Nothing
-                            Dim sql = String.Format("SELECT * FROM TBEMLP_POLL_PROCESS WHERE PROFILE_ID = {0} AND ACTIVE = 1", CURRENT_PROFILE_GUID)
-                            DT_POLL_PROCESS = _Database.Return_Datatable(sql)
-                            If Not IsNothing(DT_POLL_PROCESS) Then
-                                If DT_POLL_PROCESS.Rows.Count = 0 Then
-                                    Logger.Info("No processes configured for this Email-Profile - " & sql)
-                                    Continue For
-                                Else
-                                    DT_STEPS = Nothing
-                                    DT_STEPS = _Database.Return_Datatable(String.Format("SELECT T.* FROM TBEMLP_POLL_STEPS T,TBEMLP_POLL_PROCESS T1  WHERE T.PROCESS_ID = T1.GUID AND T1.PROFILE_ID = {0} AND T1.ACTIVE = 1", CURRENT_PROFILE_GUID))
-
-                                End If
-                            Else
-                                Logger.Warn("DT_POLL_PROCESS is nothing")
-                                Continue For
-                            End If
-
-                            CURRENT_EMAIL_GUID = 0
-                            MAIL_FROM = ""
-                            MAIL_SERVER = ""
-                            MAIL_USER = ""
-                            MAIL_USER_PW = ""
-
-                            CURRENT_POLL_TYPE = oDR_Profile.Item("POLL_TYPE")
-                            Logger.Debug(String.Format("Working on profile: ({0}-{1}-{2}) ", oDR_Profile.Item("GUID"), oDR_Profile.Item("PROFILE_NAME"), CURRENT_POLL_TYPE))
-                            CURRENT_EMAIL_GUID = oDR_Profile.Item("EMAIL_CONF_ID")
-
-                            Dim EMAIL_PROF_TABLE As DataTable = DT_TBDD_EMAIL
-                            'Presuming the DataTable has a column named Date.
-                            Dim expression As String
-                            expression = "GUID = " & CURRENT_EMAIL_GUID
-                            Logger.Debug("Expression Filter email: " & expression)
-                            Logger.Debug("DT_TBDD_EMAIL.rowCount: " & DT_TBDD_EMAIL.Rows.Count)
-                            'Filter the rows using Select() method of DataTable
-                            Dim FilteredRows As DataRow() = EMAIL_PROF_TABLE.Select(expression)
-                            If FilteredRows.Length = 1 Then
-                                For Each row As DataRow In FilteredRows
-                                    MAIL_FROM = row("EMAIL_FROM")
-                                    MAIL_SERVER = row("EMAIL_SMTP")
-                                    MAIL_USER = row("EMAIL_USER")
-                                    MAIL_USER_PW = row("EMAIL_PW")
-                                    MAIL_PORT = row("PORT_IN")
-                                    MAIL_INBOX_NAME = "Inbox"
-                                    MAIL_ARCHIVE_FOLDER = row("ARCHIVE_FOLDER")
-                                    Logger.Debug(String.Format("{0}-{1}", MAIL_FROM, MAIL_SERVER))
-
-                                    Dim PWPlain = _wrapper.DecryptData(MAIL_USER_PW)
-                                    If Not IsNothing(PWPlain) Then
-                                        If PWPlain <> "" Then
-                                            MAIL_USER_PW = PWPlain
-                                        Else
-                                            Logger.Warn("PWPlain is string.empty - Could not decrypt passwort")
-                                        End If
-                                    Else
-                                        Logger.Warn("PWPlain is nothing - Could not decrypt passwort")
-                                    End If
-
-                                Next
-                                CURRENT_WORKMAIL_LIST.Clear()
-
-                                If MAIL_SERVER <> "" Then
-                                    Dim pollresult As Boolean = False
-                                    If LocalEmail = True Then
-                                        pollresult = True
-                                        Dim oMessage As New Message(CURRENT_DEBUG_LOCAL_EMAIL)
-                                        CURRENT_WORKMAIL_LIST.Add(oMessage)
-                                    Else
-                                        Select Case CURRENT_POLL_TYPE
-                                            Case "POP"
-                                                pollresult = _email.POP3_COLLECT()
-                                            Case "IMAP"
-                                                'pollresult = _emailIMAP.IMAP_COLLECT()
-                                                'pollresult = _emailIMAP.FetchIMAPMessagesIsoft(MAIL_SERVER, MAIL_PORT, MAIL_USER, MAIL_USER_PW, MAIL_INBOX_NAME, MAIL_ARCHIVE_FOLDER)
-                                                pollresult = _emailIMAP.FetchIMAPMessagesS22(MAIL_SERVER, MAIL_PORT, MAIL_USER, MAIL_USER_PW, MAIL_INBOX_NAME)
-                                        End Select
-                                    End If
-
-                                    'If pollresult = False Then
-                                    '    Logger.Info(String.Format("Error while polling emails...Trying S22...."))
-                                    '    pollresult = _emailIMAP.FetchIMAPMessages(MAIL_SERVER, MAIL_PORT, MAIL_USER, MAIL_USER_PW, MAIL_INBOX_NAME)
-                                    '    If pollresult = False Then
-                                    '        Logger.Warn(String.Format("FetchIMAPMessagesS22 - also returned error!"))
-                                    '    End If
-                                    'End If
-                                    If CURRENT_WORKMAIL_LIST.Count() > 0 Then
-                                        Logger.Info(String.Format("Worked/Pulled: [{0}] E-Mails", CURRENT_WORKMAIL_LIST.Count()))
-                                        Try
-                                            For Each pulled_msg As Message In CURRENT_WORKMAIL_LIST
-                                                _workmail.WorkEmailMessage(pulled_msg)
-                                                CURRENT_MAIL_MESSAGE = Nothing
-                                            Next
-                                        Catch ex As Exception
-                                            Logger.Error(ex)
-                                            Logger.Warn($"Error converting CURRENT_WORKMAIL_LIST to IsoftMesage: {ex.Message} ")
-                                        End Try
-
-                                    Else
-                                        Logger.Debug(String.Format("No emails for profile!"))
-                                    End If
-                                Else
-                                    Logger.Warn("For the Email-Profile ID " & CURRENT_EMAIL_GUID & " no record could be found!")
-                                End If
-
-                                _Database.Execute_non_Query("UPDATE TBEMLP_POLL_PROFILES SET LAST_TICK = GETDATE() WHERE GUID = " & oDR_Profile.Item("GUID").ToString)
-                            Else
-                                Logger.Warn("For the Email-Profile ID " & CURRENT_EMAIL_GUID & " no record could be found! Check wether Email-Profile is active!")
-                            End If
-                        Next
-                        Try
-                            'Delete all Tempfiles
-                            For Each _file In TEMP_FILES
-                                Logger.Debug("Trying to delete temp file: [{0}]", _file)
-
-                                If System.IO.File.Exists(_file) Then
-                                    Try
-                                        System.IO.File.Delete(_file)
-                                    Catch ex As Exception
-                                        Logger.Error(ex)
-                                        Logger.Warn($"TempFileDelete - Could not delete the tempfile from TEMP_FILES: {ex.Message}")
-                                    End Try
-                                End If
-                            Next
-                            'Try
-                            '    Dim oDiTempPath As New IO.DirectoryInfo(System.IO.Path.GetTempPath)
-                            '    Dim oaryFi As IO.FileInfo() = oDiTempPath.GetFiles()
-                            '    Dim ofi As IO.FileInfo
-
-                            '    For Each fi In oaryFi
-                            '        Try
-                            '            fi.Delete()
-                            '        Catch ex As Exception
-                            '            Logger.Warn($"TempFileDelete2 - Could not delete the tempfile: {ex.Message}")
-                            '        End Try
-
-                            '    Next
-                            'Catch ex As Exception
-                            '    Logger.Warn($"TempFileDelete3 - Could not delete the tempfile: {ex.Message}")
-                            'End Try
-
-
-                        Catch ex As Exception
-                            Logger.Warn($"TempFileDelete(X) - Could not delete the tempfile from TEMP_FILES: {ex.Message}")
-                        End Try
-
-                    Else
-                        Logger.Info("No active profiles")
-                        End If
-                    End If
-
-                    _Database.Execute_non_Query("UPDATE TBEMLP_CONFIG SET LAST_TICK = GETDATE() WHERE GUID = 1")
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-        End Try
-    End Sub
-End Class

App/DigitalData.EMLProfiler/packages.config

@@ -1,6 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<packages>
-  <package id="AE.Net.Mail" version="1.7.10.0" targetFramework="net461" />
-  <package id="NLog" version="4.7.10" targetFramework="net461" />
-  <package id="S22.Imap" version="3.6.0.0" targetFramework="net461" />
-</packages>

App/EmailProfiler.Common/ClassCurrent.vb

@@ -0,0 +1,52 @@
+Imports Limilabs.Client.IMAP
+Imports WINDREAMLib
+
+Public Class ClassCurrent
+    Public Shared Property WM_DRIVE As String
+
+    Public Shared Property CURRENT_EMAIL_GUID As Integer
+    Public Shared Property CURRENT_PROFILE_GUID As Integer
+
+    Public Shared Property DT_POLL_PROCESS As DataTable
+    Public Shared Property DT_STEPS As DataTable
+    Public Shared Property DT_INDEXING_STEPS As DataTable
+
+    Public Shared Property CURRENToWMSession As Object
+    Public Shared Property CURRENToWMSession_Created As Date = Now
+    Public Shared Property CURRENToWMConnect As Object
+    Public Shared Property CURRENT_ATTMT_COUNT As Integer
+    Public Shared Property SUBJECT_PRAFIX As String = "EmailProfiler"
+    Public Shared Property CURRENT_DRIVE_CHECK As String = ""
+    Public Shared Property CURRENT_DRIVE_ISFULL As Boolean = False
+
+    Public Shared Property CURRENT_WORKMAIL_UID_LIST As New List(Of Long)
+
+    Public Shared Property CURRENT_ImapObject As Imap
+    Public Shared Property CURRENT_MAIL_UID As Long
+
+    Public Shared Property DeleteMail As Boolean = False
+    Public Shared Property CURRENT_POLL_TYPE As String
+
+    Public Shared Property POLL_STEP_GUID As Integer
+    Public Shared Property POLL_KEYWORDS As String
+    Public Shared Property KEYWORDS_SPLIT As String()
+
+    Public Shared Property WM_REFERENCE_INDEX As String
+    Public Shared Property WM_VECTOR_LOG As String
+    Public Shared Property WM_OBJEKTTYPE As String
+    Public Shared Property WM_IDX_BODY_TEXT As String
+    Public Shared Property WM_IDX_BODY_SUBSTR_LENGTH As String
+
+    Public Shared Property CURRENT_WM_DOC As WMObject
+    Public Shared Property CURRENT_DOC_ID As Integer
+    Public Shared Property CURRENT_DOC_PATH As String
+    Public Shared Property MESSAGE_ERROR As Boolean = False
+    Public Shared Property IS_LOCAL_TEST As Boolean = False
+
+    Public Shared Property TEMP_FILES As List(Of String) = New List(Of String)
+
+    Public Shared Property TEMP_WORK_FILES As List(Of String) = New List(Of String)
+    Public Shared Property GDPictureLicense As String = ""
+
+    Public Shared Property EmailAttachments As List(Of EmailAttachment) = New List(Of EmailAttachment)
+End Class

App/EmailProfiler.Common/ClassDBConfig.vb

@@ -0,0 +1,89 @@
+Imports DigitalData.Modules.Database
+Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.Base
+
+Public Class ClassDBConfig
+    Public Class Config
+        Public Property PathError As String
+        Public Property PathAttachments As String
+        Public Property BodyFont As String
+        Public Property WindreamConnectionString As String
+        Public Property TimerInterval As Integer
+        Public Property WindreamDrive As String = "W"
+    End Class
+
+    Private ReadOnly Logger As Logger
+    Private ReadOnly Database As MSSQLServer
+
+    Public Sub New(pLogConfig As LogConfig, pDatabase As MSSQLServer)
+        Logger = pLogConfig.GetLogger()
+        Database = pDatabase
+    End Sub
+
+    Private Function GetConfigTable() As DataTable
+        Try
+            Logger.Debug("Getting Config Table..")
+            Dim oSQL As String = "SELECT * FROM TBEMLP_CONFIG"
+            Dim oTable As DataTable = Database.GetDatatable(oSQL)
+            Return oTable
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return Nothing
+        End Try
+    End Function
+
+    Private Function GetBaseConfigTable() As DataTable
+        Try
+            Logger.Debug("Getting Base Config Table..")
+            Dim oSQL As String = "SELECT * FROM TBDD_BASECONFIG"
+            Dim oTable As DataTable = Database.GetDatatable(oSQL)
+            Return oTable
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return Nothing
+        End Try
+    End Function
+
+    Public Function GetConfig() As Config
+        Try
+            Dim oConfigTable = GetConfigTable()
+            Dim oBaseTable = GetBaseConfigTable()
+
+            If oBaseTable Is Nothing Then
+                Logger.Warn("Config from TBDD_BASECONFIG could not be loaded!")
+                Return Nothing
+            End If
+
+            If oBaseTable.Rows.Count = 0 Then
+                Logger.Warn("Config from TBDD_BASECONFIG could not be loaded!")
+                Return Nothing
+            End If
+
+            If oConfigTable Is Nothing Then
+                Logger.Warn("Config from TBEMLP_CONFIG could not be loaded!")
+                Return Nothing
+            End If
+
+            If oConfigTable.Rows.Count = 0 Then
+                Logger.Warn("Config from TBEMLP_CONFIG is empty!")
+                Return Nothing
+            End If
+
+            Dim oRow As DataRow = oConfigTable.Rows.Item(0)
+
+            Dim oConfig As New Config With {
+                .PathAttachments = oRow.ItemEx("PATH_EMAIL_TEMP", ""),
+                .PathError = oRow.ItemEx("PATH_EMAIL_ERRORS", ""),
+                .BodyFont = oRow.ItemEx("FONT_BODY", "Arial"),
+                .TimerInterval = oRow.ItemEx("CHECK_INTERVALL_MINUTES", 5),
+                .WindreamConnectionString = oRow.ItemEx("WM_CON_STRING", ""),
+                .WindreamDrive = oRow.ItemEx("WM_DRIVE", "W")
+            }
+
+            Return oConfig
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return Nothing
+        End Try
+    End Function
+End Class

App/EmailProfiler.Common/Data/Config.vb

@@ -0,0 +1,44 @@
+Imports DigitalData.Modules.Config.ConfigAttributes
+
+Public Class Config
+    <ConnectionString>
+    Public Property ConnectionString As String = ""
+
+    Public Property Debug As Boolean = False
+
+    Public Property EmailAccountId As Integer = 0
+
+    Public Property EmailTitlePrefix As String = "EmailProfiler"
+
+    Public Property EmailSenderLimitation As String = ""
+
+    Public Property UseWindream As Boolean = False
+
+    ''' <summary>
+    ''' GUID des EMail Templates das bei Ablehnungsmails verwendet wird.
+    ''' Siehe Tabelle DD_ECM.dbo.TBDD_EMAIL_TEMPLATE
+    ''' </summary>
+    Public Property RejectionTemplateId As Integer = 0
+
+    ''' <summary>
+    ''' GUID des EMail Templates das bei Info-Mails verwendet wird.
+    ''' Siehe Tabelle DD_ECM.dbo.TBDD_EMAIL_TEMPLATE
+    ''' </summary>
+    Public Property InfoTemplateId As Integer = 0
+
+    Public Property EmailTestReceiver As String = ""
+
+    Public Property EmailTestHTML As String = ""
+
+    ''' <summary>
+    ''' Enthält die Version des GDPicture Modules,
+    ''' für das der Lizenzschlüssel aus TBDD_3RD_PARTY_MODULES
+    ''' gelesen werden soll.
+    ''' </summary>
+    Public Property GDPictureVersion As String = ""
+    ''' <summary>
+    ''' Enthält die Lizenznummer des GDPicture Modules.
+    ''' Nur wenn nicht über die Datenbank zu holen!!.
+    ''' </summary>
+    Public Property GDPictureLicenseAsString As String = ""
+End Class

App/EmailProfiler.Common/Data/EmailAttachment.vb

@@ -0,0 +1,29 @@
+Imports System.IO
+Imports GdPicture14
+
+Public Class EmailAttachment
+    Public OrgFileName As String = ""
+    Public DestFileName As String = ""
+    Public DestFilePath As String = ""
+
+    Public FileStatus As GdPictureStatus = GdPictureStatus.OK
+
+    Public IsAttachmentValid As Boolean = True
+    Public ErrorCodeValue As ErrorCode = ErrorCode.Unknown
+    Public ErrorCodeComment As String = ""
+
+    Public AttachmentPosition As Integer = 0
+
+    Public EmbeddedFiles As List(Of EmailAttachment) = New List(Of EmailAttachment)
+
+    Public ReadOnly Property Extension As String
+        Get
+            If String.IsNullOrEmpty(OrgFileName) = False Then
+                Return Path.GetExtension(OrgFileName)
+            Else
+                Return String.Empty
+            End If
+        End Get
+    End Property
+
+End Class

App/EmailProfiler.Common/Data/MailContainer.vb

@@ -0,0 +1,62 @@
+Imports Limilabs.Mail
+Imports DigitalData.Modules.Base
+
+Public Class MailContainer
+    Private Const SUBJECT_MAX_LENGTH = 25
+
+    ''' <summary>
+    ''' The Mail object created by Limilabs
+    ''' </summary>
+    Public ReadOnly Property Mail As IMail
+
+    ''' <summary>
+    ''' The IMAP Id coming from the IMAP folder. Used to reference the mail.
+    ''' </summary>
+    Public ReadOnly Property ImapId As Integer
+
+    ''' <summary>
+    ''' The original MessageID from the eml file
+    ''' </summary>
+    Public ReadOnly Property MessageIdOriginal As String
+
+    ''' <summary>
+    ''' The new MessageID, which is generated by hashing the original MessageID
+    ''' </summary>
+    Public ReadOnly Property MessageId As String
+
+    ''' <summary>
+    ''' The subject, truncated to SUBJECT_MAX_LENGTH characters
+    ''' </summary>
+    Public ReadOnly Property Subject As String
+
+    Public ReadOnly Property SubjectOriginal As String
+
+    Public ReadOnly Property SenderDomain As String
+
+    Public ReadOnly Property SenderAddress As String
+
+    Public Sub New(pMail As IMail, pImapId As Integer)
+        Mail = pMail
+        ImapId = pImapId
+
+        MessageIdOriginal = pMail.MessageID
+        MessageId = StringEx.GetShortHash(pMail.MessageID)
+
+        Subject = ObjectEx.NotNull(pMail.Subject.Truncate(SUBJECT_MAX_LENGTH), String.Empty)
+        SubjectOriginal = ObjectEx.NotNull(pMail.Subject, String.Empty)
+
+        SenderAddress = GetSenderAddress(pMail)
+        SenderDomain = GetSenderDomain(pMail)
+    End Sub
+
+    Private Function GetSenderAddress(pMail As IMail)
+        Dim oMailBox = pMail.From.FirstOrDefault()
+        Return oMailBox?.Address
+    End Function
+
+    Private Function GetSenderDomain(pMail As IMail)
+        Dim oMailBox = pMail.From.FirstOrDefault()
+        Return oMailBox.DomainPart
+    End Function
+
+End Class

App/EmailProfiler.Common/EmailProfiler.Common.vbproj

@@ -0,0 +1,322 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
+  <PropertyGroup>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <ProjectGuid>{9F748DCD-952E-40A0-9DAD-65BF8A39B231}</ProjectGuid>
+    <OutputType>Library</OutputType>
+    <RootNamespace>EmailProfiler.Common</RootNamespace>
+    <AssemblyName>EmailProfiler.Common</AssemblyName>
+    <FileAlignment>512</FileAlignment>
+    <MyType>Windows</MyType>
+    <TargetFrameworkVersion>v4.6.2</TargetFrameworkVersion>
+    <TargetFrameworkProfile />
+    <NuGetPackageImportStamp>
+    </NuGetPackageImportStamp>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <DebugSymbols>true</DebugSymbols>
+    <DebugType>full</DebugType>
+    <DefineDebug>true</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <OutputPath>bin\Debug\</OutputPath>
+    <DocumentationFile>EmailProfiler.Common.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <DebugType>pdbonly</DebugType>
+    <DefineDebug>false</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <Optimize>true</Optimize>
+    <OutputPath>bin\Release\</OutputPath>
+    <DocumentationFile>EmailProfiler.Common.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionExplicit>On</OptionExplicit>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionCompare>Binary</OptionCompare>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionStrict>Off</OptionStrict>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionInfer>On</OptionInfer>
+  </PropertyGroup>
+  <ItemGroup>
+    <Reference Include="AE.Net.Mail, Version=1.7.10.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\AE.Net.Mail.1.7.10.0\lib\net45\AE.Net.Mail.dll</HintPath>
+    </Reference>
+    <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="DigitalData.Modules.Base">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Config">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Database">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Logging">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Messaging">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Patterns">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Patterns\bin\Debug\DigitalData.Modules.Patterns.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="GdPicture.NET.14, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.barcode.1d.writer, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.barcode.1d.writer.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.barcode.2d.writer, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.barcode.2d.writer.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.CAD, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.CAD.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.CAD.DWG, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.CAD.DWG.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Common, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.Common.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Document, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.Document.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Email, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.Email.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.HTML, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.HTML.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Imaging, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.Imaging.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Imaging.Formats, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.Imaging.Formats.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Imaging.Formats.Conversion, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.Imaging.Formats.Conversion.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Imaging.Rendering, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.Imaging.Rendering.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.Markdown, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.Markdown.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.MSOfficeBinary, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.MSOfficeBinary.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.OpenDocument, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.OpenDocument.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.OpenXML, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.OpenXML.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.OpenXML.Templating, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.OpenXML.Templating.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.PDF, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.PDF.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.RTF, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\GdPicture.NET.14.RTF.dll</HintPath>
+    </Reference>
+    <Reference Include="GdPicture.NET.14.SVG, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\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.21\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>
+    </Reference>
+    <Reference Include="Interop.WMOBRWSLib">
+      <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOBRWSLib.dll</HintPath>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+    </Reference>
+    <Reference Include="Interop.WMOSRCHLib">
+      <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOSRCHLib.dll</HintPath>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+    </Reference>
+    <Reference Include="Mail">
+      <HintPath>P:\Visual Studio Projekte\Bibliotheken\Limilabs\Mail.dll\Mail.dll</HintPath>
+    </Reference>
+    <Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=8.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.8.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>
+    </Reference>
+    <Reference Include="Microsoft.CSharp" />
+    <Reference Include="NativeSDK.Exceptions, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\NativeSDK.Exceptions.dll</HintPath>
+    </Reference>
+    <Reference Include="NativeSDK.Settings, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\NativeSDK.Settings.dll</HintPath>
+    </Reference>
+    <Reference Include="NativeSDK.Settings.Edition, Version=14.3.21.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
+      <HintPath>..\packages\GdPicture.14.3.21\lib\net462\NativeSDK.Settings.Edition.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="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="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=8.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.CodeDom.8.0.0\lib\net462\System.CodeDom.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Collections.Immutable, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Collections.Immutable.8.0.0\lib\net462\System.Collections.Immutable.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Configuration" />
+    <Reference Include="System.Data" />
+    <Reference Include="System.IO.Compression" />
+    <Reference Include="System.IO.Packaging, Version=8.0.0.1, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.IO.Packaging.8.0.1\lib\net462\System.IO.Packaging.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.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=8.0.0.1, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Security.Cryptography.Pkcs.8.0.1\lib\net462\System.Security.Cryptography.Pkcs.dll</HintPath>
+    </Reference>
+    <Reference Include="System.ServiceModel" />
+    <Reference Include="System.Text.Encodings.Web, Version=8.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Text.Encodings.Web.8.0.0\lib\net462\System.Text.Encodings.Web.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Text.Json, Version=8.0.0.6, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Text.Json.8.0.6\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.Xml" />
+    <Reference Include="System.Core" />
+    <Reference Include="System.Xml.Linq" />
+    <Reference Include="System.Data.DataSetExtensions" />
+    <Reference Include="System.Net.Http" />
+    <Reference Include="WindowsBase" />
+  </ItemGroup>
+  <ItemGroup>
+    <Import Include="Microsoft.VisualBasic" />
+    <Import Include="System" />
+    <Import Include="System.Collections" />
+    <Import Include="System.Collections.Generic" />
+    <Import Include="System.Data" />
+    <Import Include="System.Diagnostics" />
+    <Import Include="System.Linq" />
+    <Import Include="System.Xml.Linq" />
+    <Import Include="System.Threading.Tasks" />
+  </ItemGroup>
+  <ItemGroup>
+    <Compile Include="ClassDBConfig.vb" />
+    <Compile Include="ClassCurrent.vb" />
+    <Compile Include="clsEmail.IMAP.vb" />
+    <Compile Include="Data\Config.vb" />
+    <Compile Include="Data\EmailAttachment.vb" />
+    <Compile Include="Enum\EmailStrings.vb" />
+    <Compile Include="clsEncryption.vb" />
+    <Compile Include="clsWindream_allgemein.vb" />
+    <Compile Include="clsWindream_Index.vb" />
+    <Compile Include="clsWorkEmail.vb" />
+    <Compile Include="clsWorker.vb" />
+    <Compile Include="Enum\ErrorCode.vb" />
+    <Compile Include="Data\MailContainer.vb" />
+    <Compile Include="My Project\AssemblyInfo.vb" />
+    <Compile Include="My Project\Application.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DependentUpon>Application.myapp</DependentUpon>
+      <DesignTime>True</DesignTime>
+    </Compile>
+    <Compile Include="My Project\Resources.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DesignTime>True</DesignTime>
+      <DependentUpon>Resources.resx</DependentUpon>
+    </Compile>
+    <Compile Include="My Project\Settings.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DependentUpon>Settings.settings</DependentUpon>
+      <DesignTimeSharedInput>True</DesignTimeSharedInput>
+    </Compile>
+  </ItemGroup>
+  <ItemGroup>
+    <EmbeddedResource Include="My Project\Resources.resx">
+      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
+      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
+      <CustomToolNamespace>My.Resources</CustomToolNamespace>
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="app.config" />
+    <None Include="My Project\Application.myapp">
+      <Generator>MyApplicationCodeGenerator</Generator>
+      <LastGenOutput>Application.Designer.vb</LastGenOutput>
+    </None>
+    <None Include="My Project\Settings.settings">
+      <Generator>SettingsSingleFileGenerator</Generator>
+      <CustomToolNamespace>My</CustomToolNamespace>
+      <LastGenOutput>Settings.Designer.vb</LastGenOutput>
+    </None>
+    <None Include="packages.config" />
+  </ItemGroup>
+  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
+  <Import Project="..\packages\GdPicture.runtimes.windows.14.3.21\build\net462\GdPicture.runtimes.windows.targets" Condition="Exists('..\packages\GdPicture.runtimes.windows.14.3.21\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.21\build\net462\GdPicture.runtimes.windows.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\GdPicture.runtimes.windows.14.3.21\build\net462\GdPicture.runtimes.windows.targets'))" />
+  </Target>
+</Project>

App/EmailProfiler.Common/Enum/EmailStrings.vb

@@ -0,0 +1,16 @@
+Public Class EmailStrings
+    Public Const EMAIL_WRAPPING_TEXT = "<html><body style=''font-family:""Arial"";font-size:10.0pt''>Sehr geehrte Damen und Herren,<br/><br/> 
+        das Portal konnte die von Ihnen gesandte Email leider nicht verarbeiten! <br><br> Grund: {0}<p>Bitte prüfen Sie die Email und nehmen Sie bei Bedarf mit uns Kontakt auf.<p>    
+        Vielen Dank für Ihr Verständnis.<br>Mit freundlichen Grüßen<br>Ihre WISAG</body></html>"
+    Public Const EMAIL_SUBJECT_TEXT = "<p>Der Betreff der Original-Email war: <em>{0}</em></p>"
+
+    Public Const EMAIL_SUBJECT_REJECTED = "Beleg abgelehnt"
+
+    Public Const EMAIL_NO_FERDS = "<p>Ihre Email enthielt keine Dokumente.</p>"
+
+    ''' <summary>
+    ''' Präfix für den verwendeten ErrorCode
+    ''' Beispiel: EMLP_Rejection_10001 
+    ''' </summary>
+    Public Const ErrorCodePraefix = "EMLP_Rejection_"
+End Class

App/EmailProfiler.Common/Enum/ErrorCode.vb

@@ -0,0 +1,7 @@
+Public Enum ErrorCode
+    Unknown = 0
+    NoAttachments = 10001
+    SenderValidationFailed = 10002
+    EmbeddedFileAttachmentCorrupt = 10003
+    NormalFileAttachmentCorrupt = 10004     ' Info Mail
+End Enum

App/EmailProfiler.Common/My Project/Application.Designer.vb

@@ -1,10 +1,10 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.42000
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
 '
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
 ' </auto-generated>
 '------------------------------------------------------------------------------
 

App/EmailProfiler.Common/My Project/AssemblyInfo.vb

@@ -12,8 +12,8 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyDescription("")>
 <Assembly: AssemblyCompany("")>
 <Assembly: AssemblyProduct("DigitalData.EMLProfiler")>
-<Assembly: AssemblyCopyright("Copyright ©  2018")>
-<Assembly: AssemblyTrademark("")>
+<Assembly: AssemblyCopyright("Copyright © 2025")>
+<Assembly: AssemblyTrademark("3.0.10.0")>
 
 <Assembly: ComVisible(False)>
 
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("3.2.0.0")>
-<Assembly: AssemblyFileVersion("3.0.0.0")>
+<Assembly: AssemblyVersion("3.5.0.0")>
+<Assembly: AssemblyFileVersion("3.5.0.0")>

App/EmailProfiler.Common/My Project/Resources.Designer.vb

@@ -0,0 +1,63 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+Imports System
+
+Namespace My.Resources
+    
+    'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
+    '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
+    'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
+    'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
+    '''<summary>
+    '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
+    '''</summary>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
+    Friend Module Resources
+        
+        Private resourceMan As Global.System.Resources.ResourceManager
+        
+        Private resourceCulture As Global.System.Globalization.CultureInfo
+        
+        '''<summary>
+        '''  Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+            Get
+                If Object.ReferenceEquals(resourceMan, Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("EmailProfiler.Common.Resources", GetType(Resources).Assembly)
+                    resourceMan = temp
+                End If
+                Return resourceMan
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
+        '''  Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend Property Culture() As Global.System.Globalization.CultureInfo
+            Get
+                Return resourceCulture
+            End Get
+            Set
+                resourceCulture = value
+            End Set
+        End Property
+    End Module
+End Namespace

App/EmailProfiler.Common/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", "15.7.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.5.0.0"),  _
      Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
     Partial Friend NotInheritable Class MySettings
         Inherits Global.System.Configuration.ApplicationSettingsBase
@@ -64,9 +64,9 @@ Namespace My
     Friend Module MySettingsProperty
         
         <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
-        Friend ReadOnly Property Settings() As Global.DigitalData.EMLProfiler.My.MySettings
+        Friend ReadOnly Property Settings() As Global.EmailProfiler.Common.My.MySettings
             Get
-                Return Global.DigitalData.EMLProfiler.My.MySettings.Default
+                Return Global.EmailProfiler.Common.My.MySettings.Default
             End Get
         End Property
     End Module

App/EmailProfiler.Common/UserConfig.xml

@@ -0,0 +1,9 @@
+<?xml version="1.0"?>
+<Config xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+  <Debug>true</Debug>
+  <EmailAccountId>2</EmailAccountId>
+  <EmailTitlePrefix>EmailProfiler</EmailTitlePrefix>
+  <EmailSenderLimitation />
+  <UseWindream>false</UseWindream>
+  <RejectionTemplateId>1</RejectionTemplateId>
+</Config>

App/EmailProfiler.Common/app.config

@@ -0,0 +1,69 @@
+<?xml version="1.0" encoding="utf-8"?>
+<configuration>
+    <configSections>
+    </configSections>
+    <system.diagnostics>
+        <sources>
+            <!-- Dieser Abschnitt definiert die Protokollierungskonfiguration für My.Application.Log -->
+            <source name="DefaultSource" switchName="DefaultSwitch">
+                <listeners>
+                    <add name="FileLog" />
+                    <!-- Auskommentierung des nachfolgenden Abschnitts aufheben, um in das Anwendungsereignisprotokoll zu schreiben -->
+                    <!--<add name="EventLog"/>-->
+                </listeners>
+            </source>
+        </sources>
+        <switches>
+            <add name="DefaultSwitch" value="Information" />
+        </switches>
+        <sharedListeners>
+            <add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter" />
+            <!-- Auskommentierung des nachfolgenden Abschnitts aufheben und APPLICATION_NAME durch den Namen der Anwendung ersetzen, um in das Anwendungsereignisprotokoll zu schreiben -->
+            <!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
+        </sharedListeners>
+    </system.diagnostics>
+  <runtime>
+    <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
+      <dependentAssembly>
+        <assemblyIdentity name="NLog" publicKeyToken="5120e14c03d0593c" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-5.0.0.0" newVersion="5.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="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-8.0.0.0" newVersion="8.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="System.Security.Cryptography.Pkcs" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-8.0.0.1" newVersion="8.0.0.1" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.Text.Json" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-8.0.0.6" newVersion="8.0.0.6" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="System.IO.Packaging" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-8.0.0.1" newVersion="8.0.0.1" />
+      </dependentAssembly>
+    </assemblyBinding>
+  </runtime>
+<startup><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2" /></startup></configuration>

App/EmailProfiler.Common/clsEmail.IMAP.vb

@@ -0,0 +1,108 @@
+Imports System.Net
+Imports System.Reflection
+Imports System.IO
+Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.Messaging
+Imports DigitalData.Modules.Messaging.Mail
+Imports Limilabs.Client.IMAP
+Imports EmailProfiler.Common.ClassCurrent
+
+Public Class clsEmailIMAP
+    Private ReadOnly Logger As Logger
+    Private ReadOnly _limilab As Limilab
+    Private Fetcher As MailFetcher
+
+    Public ReadOnly Property Client As Imap
+        Get
+            Return Fetcher.Client
+        End Get
+    End Property
+
+    Sub New(pLogConfig As LogConfig)
+        Logger = pLogConfig.GetLogger
+        _limilab = New Limilab(pLogConfig)
+        Fetcher = New MailFetcher(pLogConfig)
+    End Sub
+    Public Function FetchIMAPMessagesLimilab(Server As String, Port As Integer, Username As String, Password As String, AuthType As String) As Boolean
+        Try
+            Dim oSession = Fetcher.Connect(Server, Port, Username, Password, AuthType)
+
+            If oSession.Connected = False AndAlso oSession.Error IsNot Nothing Then
+                Logger.Warn("Connection to Mail Server failed!")
+                Logger.Error(oSession.Error)
+                Return False
+
+            ElseIf oSession.Connected = False Then
+                Logger.Warn("Connection to Mail Server failed!")
+                Return False
+            End If
+
+            Dim oMailIds As List(Of Long) = Fetcher.ListAllMails()
+
+            If oMailIds Is Nothing Then
+                Logger.Warn("List of UIDs was Nothing. Exiting.")
+                Return False
+            End If
+
+            If oMailIds.Count = 0 Then
+                Logger.Debug("No Emails found.")
+                Return True
+            End If
+
+            CURRENT_WORKMAIL_UID_LIST = oMailIds
+
+            Return True
+
+            'Logger.Debug("FetchIMAPMessagesLimilab - Fetching messages...")
+            '_limilab.InitIMAP(True, Server, Port, Username, Password, AuthType)
+
+
+            'Dim oListuids As New List(Of Long)
+            'oListuids = _limilab.IMAPGetMessageIDs_AllMails()
+
+            'If IsNothing(oListuids) Then
+            '    Logger.Warn("List of UIDs was Nothing. Returning False.")
+            '    Return False
+            'Else
+            '    If oListuids.Count > 0 Then
+            '        CURRENT_WORKMAIL_UID_LIST = oListuids
+            '        Logger.Info("FetchIMAPMessagesLimilab - Found [{0}] messages", oListuids.Count)
+            '        CURRENT_ImapObject = _limilab.CurrentImapObject
+            '    Else
+            '        Logger.Debug("FetchIMAPMessagesLimilab - No Emails found!")
+            '    End If
+
+            '    Return True
+            'End If
+
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return False
+        End Try
+    End Function
+
+    ''' <summary>
+    ''' Uses a private API from MailWriter to write a MailMessage to disk.
+    ''' May break in future versions of .NET
+    ''' </summary>
+    Public Function WriteMessageToFile(Message As Mail.MailMessage, Filename As String) As Boolean
+        Dim oAssembly As Assembly = GetType(Mail.SmtpClient).Assembly
+        Dim oMailWriterType As Type = oAssembly.[GetType]("System.Net.Mail.MailWriter")
+
+        Try
+            Using oStream As New FileStream(Filename, FileMode.Create)
+                Dim oMailWriterConstructor As ConstructorInfo = oMailWriterType.GetConstructor(
+                    BindingFlags.Instance Or BindingFlags.NonPublic, Nothing, New Type() {GetType(Stream)}, Nothing
+                )
+                Dim oMailWriter As Object = oMailWriterConstructor.Invoke(New Object() {oStream})
+                Dim sendMethod As MethodInfo = GetType(Mail.MailMessage).GetMethod("Send", BindingFlags.Instance Or BindingFlags.NonPublic)
+                sendMethod.Invoke(Message, BindingFlags.Instance Or BindingFlags.NonPublic, Nothing, {oMailWriter, True, True}, Nothing)
+            End Using
+
+            Return True
+        Catch ex As Exception
+            Return Nothing
+        End Try
+    End Function
+
+End Class

App/EmailProfiler.Common/clsEncryption.vb

@@ -1,9 +1,9 @@
 Imports System.Security.Cryptography
-Imports NLog
 Imports DigitalData.Modules.Logging
+
 Public Class clsEncryption
     Private TripleDes As New TripleDESCryptoServiceProvider
-    Private Logger As DigitalData.Modules.Logging.Logger
+    Private Logger As Logger
     Sub New(ByVal key As String, LogConf As LogConfig)
         Logger = LogConf.GetLogger
         ' Initialize the crypto provider.

App/EmailProfiler.Common/clsWindream_Index.vb

@@ -115,6 +115,8 @@ Public Class clsWindream_Index
         Catch ex As Exception
 
         End Try
+
+        Return "String"
     End Function
     Public Function RunIndexing_Vektor(ByVal oDocument As WMObject, ByVal Indizes As String(), ByVal aValues As String())
         Try
@@ -244,9 +246,9 @@ Public Class clsWindream_Index
             'clsLogger.AddError("## Fehler in RunIndexing_Vektor - Fehler: " & ex.Message, "RunIndexingVektor")
             oDocument.Save()
             oDocument.unlock()
-            Return False
-        End Try
 
+        End Try
+        Return False
 
     End Function
     Public Function RunIndexing(ByVal oDocument As WMObject, ByVal Indizes() As String, ByVal aValues() As Object, Objekttyp As String)
@@ -630,8 +632,9 @@ Public Class clsWindream_Index
             'clsLogger.AddError(ex.Message, "ClassSearchResult.RunIndexing")
             oDocument.Save()
             oDocument.unlock()
-            Return False
         End Try
+
+        Return False
     End Function
 #End Region
     Public Function GetVektorArray(ByVal oDocument As WMObject, oIndexName As String, NIIndexe As Object, CheckDuplikat As Boolean)
@@ -737,7 +740,7 @@ Public Class clsWindream_Index
             Return ValueArray
         Catch ex As Exception
             Logger.Error(ex)
-            ClassCurrent.MessageError = True
+            ClassCurrent.MESSAGE_ERROR = True
             'clsLogger.AddError(ex.Message, "Return_VektorArray")
             Return Nothing
         End Try
@@ -834,7 +837,7 @@ Public Class clsWindream_Index
     ''' _indexname = Name des zu überprüfenden Indexfeldes
     Public Function GetValueforIndex_WMFile(ByVal _dok As WMObject, _indexname As String)
         Try
-            Const WMEntityDocument = 1
+            'Const WMEntityDocument = 1
             Dim IndexwertAusWindream As Object = Nothing
             IndexwertAusWindream = _dok.GetVariableValue(_indexname)
             Return IndexwertAusWindream.ToString

App/EmailProfiler.Common/clsWindream_allgemein.vb

@@ -1,14 +1,9 @@
-
-Imports WINDREAMLib
+Imports WINDREAMLib
 Imports WINDREAMLib.WMCOMEvent
 Imports WINDREAMLib.WMEntity
-Imports WINDREAMLib.WMObjectEditMode
-Imports WINDREAMLib.WMSearchOperator
-Imports WINDREAMLib.WMSearchRelation
-Imports WMOBRWSLib
 Imports WMOSRCHLib
-Imports System.IO
 Imports DigitalData.Modules.Logging
+Imports EmailProfiler.Common.ClassCurrent
 
 Public Class clsWindream_allgemein
 
@@ -284,8 +279,9 @@ Public Class clsWindream_allgemein
 
         Catch ex As Exception
             Logger.Error(ex)
-            Return False
         End Try
+
+        Return False
     End Function
 
 #End Region

App/EmailProfiler.Common/clsWorker.vb

@@ -0,0 +1,354 @@
+Imports System.IO
+Imports DigitalData.Modules.Base
+Imports DigitalData.Modules.Database
+Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.Messaging.Mail
+Imports EmailProfiler.Common.ClassCurrent
+Imports Limilabs.Mail
+Imports Limilabs.Mail.Headers
+
+Public Class clsWorker
+    Private ReadOnly _Logger As Logger
+    Private ReadOnly _Fetcher As MailFetcher
+    Private ReadOnly _Database As MSSQLServer
+    Private ReadOnly _UseWindream As Boolean = False
+    Private ReadOnly ClassWindreamAllgemein As clsWindream_allgemein
+    Private ReadOnly ClassWindreamIndex As clsWindream_Index
+    Private ReadOnly _ClassWorkMail As clsWorkEmail
+    Private ReadOnly Encryption As clsEncryption
+    Private ReadOnly _ProfileId As Integer = 0D
+    Private ReadOnly EmailLimitationSender As String = ""
+    Private ReadOnly EmailLimitationEnabled As Boolean = False
+
+    Private Const SUCCESS_IMAP_FOLDER = "Verarbeitet"
+
+    Private ReadOnly LocalEmlFile As String = ""
+
+    Sub New(pLogConfig As LogConfig, pConnectionString As String, pWindreamConnectionString As String, pPollProfileId As Integer, pConfigData As Config, Optional pLocalEML As String = "")
+        _Logger = pLogConfig.GetLogger
+        'ClassEmailImap = New clsEmailIMAP(pLogConfig)
+        _Fetcher = New MailFetcher(pLogConfig)
+        _Database = New MSSQLServer(pLogConfig, pConnectionString)
+
+        _UseWindream = pConfigData.UseWindream
+        EmailLimitationSender = pConfigData.EmailSenderLimitation
+        If EmailLimitationSender.Contains("@") Then
+            _Logger.Info("Email Sender Limitation active for address: [{0}]", EmailLimitationSender)
+            EmailLimitationEnabled = True
+        End If
+
+        If _UseWindream Then
+            ClassWindreamAllgemein = New clsWindream_allgemein(pLogConfig)
+            ClassWindreamIndex = New clsWindream_Index(pLogConfig)
+        End If
+
+        _ClassWorkMail = New clsWorkEmail(pLogConfig, pConnectionString, pWindreamConnectionString, pConfigData)
+
+        Encryption = New clsEncryption("!35452didalog=", pLogConfig)
+        _ProfileId = pPollProfileId
+        LocalEmlFile = pLocalEML
+    End Sub
+
+    Private Sub DeleteTempFiles()
+        For Each _file In TEMP_FILES
+            _Logger.Debug("Trying to delete temp file: [{0}]", _file)
+
+            If File.Exists(_file) Then
+                Try
+                    File.Delete(_file)
+                Catch ex As Exception
+                    _Logger.Error(ex)
+                    _Logger.Warn("Could not delete the tempfile from TEMP_FILES: [{0}]", _file)
+                End Try
+            End If
+        Next
+        TEMP_FILES.Clear()
+    End Sub
+
+    Private Function LoadEmailAccounts() As DataTable
+        Return _Database.GetDatatable("SELECT * FROM TBDD_EMAIL_ACCOUNT WHERE ACTIVE = 1")
+    End Function
+
+    Private Function LoadPollingProfiles(pProfileId As Integer) As DataTable
+        Dim oSQL = "SELECT * FROM TBEMLP_POLL_PROFILES WHERE ACTIVE = 1"
+
+        If _ProfileId = 0 Then
+            oSQL &= " ORDER BY SEQUENCE"
+        Else
+            oSQL &= $" AND GUID = {pProfileId}"
+        End If
+
+        Return _Database.GetDatatable(oSQL)
+    End Function
+
+    Public Sub Start_WorkingProfiles(Optional LocalEmail As Boolean = False)
+        Try
+            DeleteTempFiles()
+            IS_LOCAL_TEST = LocalEmail
+            If _Database.DBInitialized = False Then
+                _Logger.Warn("Database is not initialized. Exiting.")
+                Exit Sub
+            End If
+
+            _Logger.Debug("now windream_init... ")
+            If _UseWindream Then
+                If ClassWindreamAllgemein.Init = False Then
+                    _Logger.Info("windream could not be initialized!!")
+                    Exit Sub
+                Else
+                    _Logger.Debug("windream_initialized!")
+                End If
+            End If
+
+            Dim EmailAccountTable As DataTable = LoadEmailAccounts()
+            Dim PollingProfileTable = LoadPollingProfiles(_ProfileId)
+
+            If IsNothing(PollingProfileTable) Then
+                _Logger.Warn("Error while fetching Polling Profiles. Exiting.")
+                Exit Sub
+            End If
+
+            If PollingProfileTable.Rows.Count = 0 Then
+                _Logger.Warn("No active Polling Profiles found. Exiting.")
+                Exit Sub
+            End If
+
+            _Logger.Debug("Count of active profiles: " & PollingProfileTable.Rows.Count.ToString)
+
+            For Each oProfile As DataRow In PollingProfileTable.Rows
+
+                Dim oValidationSql = oProfile.ItemEx("VALIDATION_SQL", "")
+
+                CURRENT_PROFILE_GUID = oProfile.Item("GUID")
+                DT_POLL_PROCESS = Nothing
+                Dim sql = String.Format("SELECT * FROM TBEMLP_POLL_PROCESS WHERE PROFILE_ID = {0} AND ACTIVE = 1", CURRENT_PROFILE_GUID)
+                DT_POLL_PROCESS = _Database.GetDatatable(sql)
+                If Not IsNothing(DT_POLL_PROCESS) Then
+                    If DT_POLL_PROCESS.Rows.Count = 0 Then
+                        _Logger.Info("No processes configured for this Email-Profile - " & sql)
+                        Continue For
+                    Else
+                        DT_STEPS = Nothing
+                        DT_STEPS = _Database.GetDatatable($"SELECT T.* FROM TBEMLP_POLL_STEPS T,TBEMLP_POLL_PROCESS T1  WHERE T.PROCESS_ID = T1.GUID AND T1.PROFILE_ID = {CURRENT_PROFILE_GUID} AND T1.ACTIVE = 1")
+
+                    End If
+                Else
+                    _Logger.Warn("DT_POLL_PROCESS is nothing")
+                    Continue For
+                End If
+
+                CURRENT_EMAIL_GUID = 0
+
+                CURRENT_POLL_TYPE = oProfile.Item("POLL_TYPE")
+                _Logger.Debug(String.Format("Working on profile: ({0}-{1}-{2}) ", oProfile.Item("GUID"), oProfile.Item("PROFILE_NAME"), CURRENT_POLL_TYPE))
+                CURRENT_EMAIL_GUID = oProfile.Item("EMAIL_CONF_ID")
+
+                Dim FilteredRows As List(Of DataRow) = EmailAccountTable.
+                    Select($"GUID = {CURRENT_EMAIL_GUID}").
+                    ToList()
+                _Logger.Debug("FilteredRows: " & FilteredRows.Count)
+
+                If FilteredRows.Count = 1 Then
+                    Dim oRow = FilteredRows(0)
+                    Dim oMailFrom = oRow("EMAIL_FROM")
+                    Dim oMailServer = oRow("EMAIL_SMTP")
+                    Dim oMailUser = oRow("EMAIL_USER")
+                    Dim oMailPassword = oRow("EMAIL_PW")
+                    Dim oMailPortIn = oRow("PORT_IN")
+                    Dim oMailboxName = "Inbox"
+                    Dim oMailArchiveFolder = oRow("ARCHIVE_FOLDER")
+                    Dim oMailAuthType = oRow("AUTH_TYPE")
+
+                    _Logger.Debug("Mail Server: {0}", oMailServer)
+                    _Logger.Debug("Mail From: {0}", oMailFrom)
+
+                    Dim PWPlain = Encryption.DecryptData(oMailPassword)
+                    If Not IsNothing(PWPlain) Then
+                        If PWPlain <> "" Then
+                            oMailPassword = PWPlain
+                        Else
+                            _Logger.Warn("PWPlain is string.empty - Could not decrypt passwort")
+                        End If
+                    Else
+                        _Logger.Warn("PWPlain is nothing - Could not decrypt passwort")
+                    End If
+
+                    CURRENT_WORKMAIL_UID_LIST.Clear()
+
+                    If oMailServer <> "" Then
+                        Dim oPollResult As Boolean = False
+                        If LocalEmail = True Then
+                            oPollResult = True
+                        Else
+                            Select Case CURRENT_POLL_TYPE
+                                Case "IMAP"
+                                    ' We are using 'Archive Folder' as an additional field to save the Tenant-ID for O365-OAuth2
+                                    oPollResult = FetchMessages(oMailServer, oMailPortIn, oMailUser, oMailPassword, oMailAuthType, oMailArchiveFolder)
+
+                                Case Else
+                                    _Logger.Error("Poll Type [{0}] is not supported!", CURRENT_POLL_TYPE)
+                                    oPollResult = False
+                            End Select
+                        End If
+
+                        If CURRENT_WORKMAIL_UID_LIST.Count() > 0 Or LocalEmail = True Then
+                            If LocalEmail Then
+                                _Logger.Info("Working with local Mail")
+                                Dim oEmail As IMail = New MailBuilder().CreateFromEmlFile(LocalEmlFile)
+
+                                Dim oUID = String.Concat(Now.Month.ToString, Now.Day, Now.Hour, Now.Minute, Now.Second)
+                                _ClassWorkMail.WorkEmailMessage(oEmail, oUID, oValidationSql)
+                            Else
+                                Try
+                                    _Logger.Info(String.Format("Pulled: [{0}] E-Mails", CURRENT_WORKMAIL_UID_LIST.Count()))
+
+                                    For Each oMailId In CURRENT_WORKMAIL_UID_LIST
+                                        Dim oEmail As IMail = _Fetcher.FetchMail(oMailId)
+
+                                        If Not IsNothing(oEmail) Then
+                                            If EmailLimitationEnabled Then
+                                                Dim oEmailFrom As String = ""
+                                                For Each m As MailBox In oEmail.From
+                                                    oEmailFrom = m.Address
+                                                Next
+                                                If oEmailFrom <> EmailLimitationSender Then
+                                                    _Logger.Debug($"Skipping email {oEmailFrom} ...Subject [{oEmail.Subject}]")
+                                                    Continue For
+                                                End If
+                                            End If
+                                            ' Hier wird die einzelne EMail jetzt verarbeitet
+                                            If _ClassWorkMail.WorkEmailMessage(oEmail, oMailId, oValidationSql) = True Then
+                                                If LocalEmlFile = "" Then
+                                                    DeleteOrMoveEmailFile(oMailId)
+                                                End If
+                                            End If
+
+                                        Else
+                                            _Logger.Info("### oEmail was nothing ###")
+                                        End If
+                                    Next
+
+                                    If CURRENT_POLL_TYPE = "IMAP" And CURRENT_WORKMAIL_UID_LIST.Count > 0 Then
+                                        _Fetcher.Disconnect()
+                                    End If
+
+                                Catch ex As Exception
+                                    _Logger.Error(ex)
+                                    _Logger.Warn($"Unexpected Error working CURRENT_WORKMAIL_UID_LIST: {ex.Message} ")
+                                End Try
+
+                            End If
+                        Else
+                            _Logger.Debug(String.Format("No emails for profile!"))
+                        End If
+
+                    Else
+                        _Logger.Warn("For the Email-Profile ID " & CURRENT_EMAIL_GUID & " no record could be found!")
+                    End If
+
+                    _Database.ExecuteNonQuery("UPDATE TBEMLP_POLL_PROFILES SET LAST_TICK = GETDATE() WHERE GUID = " & oProfile.Item("GUID").ToString)
+                Else
+                    _Logger.Warn("For the Email-Profile ID " & CURRENT_EMAIL_GUID & " no record could be found! Check wether Email-Profile is active!")
+                End If
+            Next
+
+            DeleteTempFiles()
+
+            _Database.ExecuteNonQuery("UPDATE TBEMLP_CONFIG SET LAST_TICK = GETDATE() WHERE GUID = 1")
+        Catch ex As Exception
+            _Logger.Error(ex)
+        End Try
+    End Sub
+
+    Public Function FetchMessages(pServer As String, pPort As Integer, pUsername As String, pPassword As String, pAuthType As String, pArchiveFolder As String) As Boolean
+        Try
+            Dim oSession As MailSession.SessionInfo
+
+            If pAuthType = MailSession.AUTH_OAUTH2 Then
+                Dim oClientId As String = pServer
+                Dim oClientSecret As String = pPassword
+                Dim oTenantId As String = pArchiveFolder
+                oSession = _Fetcher.ConnectToO365(pUsername, oClientId, oTenantId, oClientSecret)
+            Else
+                oSession = _Fetcher.Connect(pServer, pPort, pUsername, pPassword, pAuthType, New MailSession.MailSessionOptions() With {
+                    .EnableTls1_1 = True,
+                    .EnableTls1_2 = True
+                })
+            End If
+
+
+            If oSession.Connected = False AndAlso oSession.Error IsNot Nothing Then
+                _Logger.Warn("Connection to Mail Server failed!")
+                _Logger.Error(oSession.Error)
+                Return False
+
+            ElseIf oSession.Connected = False Then
+                _Logger.Warn("Connection to Mail Server failed!")
+                Return False
+            End If
+
+            CURRENT_ImapObject = _Fetcher.Client
+            Dim oMailIds As List(Of Long) = _Fetcher.ListAllMails()
+
+            If oMailIds Is Nothing Then
+                _Logger.Warn("List of UIDs was Nothing. Exiting.")
+                Return False
+            End If
+
+            If oMailIds.Count = 0 Then
+                _Logger.Debug("No Emails found.")
+                Return True
+            End If
+
+            CURRENT_WORKMAIL_UID_LIST = oMailIds
+
+            Return True
+
+        Catch ex As Exception
+            _Logger.Error(ex)
+            Return False
+
+        End Try
+    End Function
+    Private Sub DeleteOrMoveEmailFile(pMailId As Integer)
+        Try
+            If MESSAGE_ERROR = True Then
+                _Logger.Warn("Did not delete or move Message with UID [{0}] as there was an MessageError!", pMailId)
+                Return
+            End If
+
+            If IsNothing(_Fetcher.Client) Then
+                _Logger.Warn("Did not delete or move Message with UID [{0}] as ImapClient is null", pMailId)
+                Return
+            End If
+
+            If DeleteMail = True Then
+                _Fetcher.Client.DeleteMessageByUID(pMailId)
+                _Logger.Info("Email with Id [{0}] was deleted.", pMailId)
+            Else
+                If TestImapFolderExists(SUCCESS_IMAP_FOLDER) Then
+                    If _Fetcher.Client.MoveByUID(pMailId, SUCCESS_IMAP_FOLDER) IsNot Nothing Then
+                        _Logger.Info("Email with UID [{0}] was moved", pMailId)
+                    End If
+                Else
+                    _Logger.Warn("IMAP Folder [{0}] does not exist. Emails could not be moved!", SUCCESS_IMAP_FOLDER)
+                End If
+            End If
+        Catch ex As Exception
+            _Logger.Error(ex)
+        End Try
+    End Sub
+
+    Private Function TestImapFolderExists(pFolderName As String) As Boolean
+        Try
+            Return _Fetcher.Client.
+                GetFolders().
+                Where(Function(f) f.Name = pFolderName).
+                Any()
+        Catch ex As Exception
+            _Logger.Warn("Could not get IMAP folders. Returning False.")
+            _Logger.Error(ex)
+            Return False
+        End Try
+    End Function
+End Class

App/EmailProfiler.Common/packages.config

@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="utf-8"?>
+<packages>
+  <package id="AE.Net.Mail" version="1.7.10.0" targetFramework="net461" />
+  <package id="BouncyCastle.Cryptography" version="2.5.0" targetFramework="net462" />
+  <package id="DocumentFormat.OpenXml" version="3.2.0" targetFramework="net462" />
+  <package id="DocumentFormat.OpenXml.Framework" version="3.2.0" targetFramework="net462" />
+  <package id="GdPicture" version="14.3.21" targetFramework="net462" />
+  <package id="GdPicture.runtimes.windows" version="14.3.21" targetFramework="net462" />
+  <package id="Microsoft.AspNet.WebApi.Client" version="6.0.0" targetFramework="net462" />
+  <package id="Microsoft.Bcl.AsyncInterfaces" version="8.0.0" targetFramework="net462" />
+  <package id="Microsoft.CSharp" version="4.7.0" targetFramework="net462" />
+  <package id="Microsoft.VisualBasic" version="10.3.0" targetFramework="net462" />
+  <package id="Newtonsoft.Json" version="13.0.3" targetFramework="net462" />
+  <package id="Newtonsoft.Json.Bson" version="1.0.2" targetFramework="net462" />
+  <package id="NLog" version="5.0.5" targetFramework="net461" />
+  <package id="OpenMcdf" version="2.4.1" targetFramework="net462" />
+  <package id="protobuf-net" version="3.2.46" targetFramework="net462" />
+  <package id="protobuf-net.Core" version="3.2.46" targetFramework="net462" />
+  <package id="RtfPipe" version="2.0.7677.4303" targetFramework="net462" />
+  <package id="System.Buffers" version="4.6.0" targetFramework="net462" />
+  <package id="System.CodeDom" version="8.0.0" targetFramework="net462" />
+  <package id="System.Collections.Immutable" version="8.0.0" targetFramework="net462" />
+  <package id="System.IO.Packaging" version="8.0.1" targetFramework="net462" />
+  <package id="System.Management" version="8.0.0" targetFramework="net462" />
+  <package id="System.Memory" version="4.6.0" targetFramework="net462" />
+  <package id="System.Numerics.Vectors" version="4.6.0" targetFramework="net462" />
+  <package id="System.Runtime.CompilerServices.Unsafe" version="6.1.0" targetFramework="net462" />
+  <package id="System.Security.Cryptography.Pkcs" version="8.0.1" targetFramework="net462" />
+  <package id="System.Text.Encodings.Web" version="8.0.0" targetFramework="net462" />
+  <package id="System.Text.Json" version="8.0.6" targetFramework="net462" />
+  <package id="System.Threading.Tasks.Extensions" version="4.5.4" targetFramework="net462" />
+  <package id="System.ValueTuple" version="4.5.0" targetFramework="net462" />
+</packages>

App/EmailProfiler.Form/App.config

@@ -0,0 +1,65 @@
+<?xml version="1.0" encoding="utf-8"?>
+<configuration>
+    <configSections>
+        <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
+            <section name="EmailProfiler.Form.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
+        </sectionGroup>
+        <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
+            <section name="EmailProfiler.Form.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
+        </sectionGroup>
+    </configSections>
+    <connectionStrings>
+        <add name="EmailProfiler.Form.My.MySettings.MyDatasetConnString"
+            connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True"
+            providerName="System.Data.SqlClient" />
+    </connectionStrings>
+    <startup>
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2"/>
+    </startup>
+  <runtime>
+    <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
+      <dependentAssembly>
+        <assemblyIdentity name="NLog" publicKeyToken="5120e14c03d0593c" culture="neutral"/>
+        <bindingRedirect oldVersion="0.0.0.0-5.0.0.0" newVersion="5.0.0.0"/>
+      </dependentAssembly>
+    </assemblyBinding>
+  </runtime>
+  <userSettings>
+    <EmailProfiler.Form.My.MySettings>
+      <setting name="EmailTest_Receipiant" serializeAs="String">
+        <value />
+      </setting>
+      <setting name="MyTestHTML" serializeAs="String">
+        <value />
+      </setting>
+      <setting name="DEBUG" serializeAs="String">
+        <value>False</value>
+      </setting>
+    </EmailProfiler.Form.My.MySettings>
+  </userSettings>
+  <applicationSettings>
+    <EmailProfiler.Form.My.MySettings>
+      <setting name="MyConnectionString" serializeAs="String">
+        <value>Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</value>
+      </setting>
+      <setting name="FB_DATABASE" serializeAs="String">
+        <value />
+      </setting>
+      <setting name="FB_DATASOURCE" serializeAs="String">
+        <value />
+      </setting>
+      <setting name="FB_USER" serializeAs="String">
+        <value>sysdba</value>
+      </setting>
+      <setting name="FB_PW" serializeAs="String">
+        <value>dd</value>
+      </setting>
+      <setting name="USE_WM" serializeAs="String">
+        <value>False</value>
+      </setting>
+      <setting name="EML_LIMITATION_SENDER" serializeAs="String">
+        <value>NONE</value>
+      </setting>
+    </EmailProfiler.Form.My.MySettings>
+  </applicationSettings>
+</configuration>

App/EmailProfiler.Form/CONFIG_APP.vbproj.bak

@@ -50,30 +50,24 @@
     <ApplicationIcon>email_download_handdrawn.ico</ApplicationIcon>
   </PropertyGroup>
   <ItemGroup>
-    <Reference Include="DevExpress.Data.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-    <Reference Include="DevExpress.Printing.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-    <Reference Include="DevExpress.Utils.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-    <Reference Include="DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-    <Reference Include="DevExpress.XtraGrid.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
-    <Reference Include="DevExpress.XtraLayout.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-    <Reference Include="DevExpress.XtraPrinting.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.Printing.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.Utils.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
+    <Reference Include="DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.XtraPrinting.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
     <Reference Include="DigitalData.Modules.Logging">
       <HintPath>..\..\..\DDMonorepo\Modules.Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.Modules.Messaging">
-      <HintPath>..\..\..\DDMonorepo\Modules.Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
-    </Reference>
-    <Reference Include="Independentsoft.Email, Version=2.1.5953.24395, Culture=neutral, PublicKeyToken=76be97fe952f1ec7, processorArchitecture=MSIL">
+    <Reference Include="DigitalData.Modules.Messaging, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Email .NET\Bin\Independentsoft.Email.dll</HintPath>
+      <HintPath>..\..\..\DDMonorepo\Modules.Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
     </Reference>
     <Reference Include="Microsoft.CSharp" />
     <Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
       <HintPath>..\packages\NLog.4.7.10\lib\net45\NLog.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.Configuration" />
     <Reference Include="System.Data" />
@@ -105,6 +99,7 @@
     <Import Include="System.Threading.Tasks" />
   </ItemGroup>
   <ItemGroup>
+    <Compile Include="Class1.vb" />
     <Compile Include="frmMain.vb">
       <SubType>Form</SubType>
     </Compile>

App/EmailProfiler.Form/EmailProfiler.Form.vbproj

@@ -0,0 +1,220 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
+  <PropertyGroup>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <ProjectGuid>{CADEB4EE-C7EF-446D-8F18-69A89E65EBBD}</ProjectGuid>
+    <OutputType>WinExe</OutputType>
+    <StartupObject>EmailProfiler.Form.My.MyApplication</StartupObject>
+    <RootNamespace>EmailProfiler.Form</RootNamespace>
+    <AssemblyName>EmailProfiler.Form</AssemblyName>
+    <FileAlignment>512</FileAlignment>
+    <MyType>WindowsForms</MyType>
+    <TargetFrameworkVersion>v4.6.2</TargetFrameworkVersion>
+    <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
+    <TargetFrameworkProfile />
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DebugSymbols>true</DebugSymbols>
+    <DebugType>full</DebugType>
+    <DefineDebug>true</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <OutputPath>bin\Debug\</OutputPath>
+    <DocumentationFile>EmailProfiler.Form.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DebugType>pdbonly</DebugType>
+    <DefineDebug>false</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <Optimize>true</Optimize>
+    <OutputPath>bin\Release\</OutputPath>
+    <DocumentationFile>EmailProfiler.Form.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionExplicit>On</OptionExplicit>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionCompare>Binary</OptionCompare>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionStrict>Off</OptionStrict>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionInfer>On</OptionInfer>
+  </PropertyGroup>
+  <PropertyGroup>
+    <ApplicationIcon>envelope.ico</ApplicationIcon>
+  </PropertyGroup>
+  <ItemGroup>
+    <Reference Include="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.Printing.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.Data.Desktop.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
+    <Reference Include="DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
+    <Reference Include="DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DevExpress.XtraPrinting.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+    <Reference Include="DigitalData.GUIs.Common">
+      <HintPath>..\..\..\2_DLL Projekte\DDMonorepo\GUIs.Common\bin\Debug\DigitalData.GUIs.Common.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Base">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Config">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Database">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Logging">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
+    </Reference>
+    <Reference Include="DigitalData.Modules.Messaging">
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
+    </Reference>
+    <Reference Include="EmailProfiler.Common, Version=3.0.4.0, Culture=neutral, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\EmailProfiler.Common\bin\Debug\EmailProfiler.Common.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="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="System" />
+    <Reference Include="System.Configuration" />
+    <Reference Include="System.Data" />
+    <Reference Include="System.Deployment" />
+    <Reference Include="System.Drawing" />
+    <Reference Include="System.IdentityModel" />
+    <Reference Include="System.IO.Compression" />
+    <Reference Include="System.Runtime.Serialization" />
+    <Reference Include="System.ServiceModel" />
+    <Reference Include="System.Transactions" />
+    <Reference Include="System.Web.Services" />
+    <Reference Include="System.Windows.Forms" />
+    <Reference Include="System.Xml" />
+    <Reference Include="System.Core" />
+    <Reference Include="System.Xml.Linq" />
+    <Reference Include="System.Data.DataSetExtensions" />
+    <Reference Include="System.Net.Http" />
+  </ItemGroup>
+  <ItemGroup>
+    <Import Include="Microsoft.VisualBasic" />
+    <Import Include="System" />
+    <Import Include="System.Collections" />
+    <Import Include="System.Collections.Generic" />
+    <Import Include="System.Data" />
+    <Import Include="System.Drawing" />
+    <Import Include="System.Diagnostics" />
+    <Import Include="System.Windows.Forms" />
+    <Import Include="System.Linq" />
+    <Import Include="System.Xml.Linq" />
+    <Import Include="System.Threading.Tasks" />
+  </ItemGroup>
+  <ItemGroup>
+    <Compile Include="frmMain.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="frmMain.Designer.vb">
+      <DependentUpon>frmMain.vb</DependentUpon>
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="My Project\AssemblyInfo.vb" />
+    <Compile Include="My Project\Application.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DependentUpon>Application.myapp</DependentUpon>
+      <DesignTime>True</DesignTime>
+    </Compile>
+    <Compile Include="My Project\Resources.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DesignTime>True</DesignTime>
+      <DependentUpon>Resources.resx</DependentUpon>
+    </Compile>
+    <Compile Include="My Project\Settings.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DependentUpon>Settings.settings</DependentUpon>
+      <DesignTimeSharedInput>True</DesignTimeSharedInput>
+    </Compile>
+    <Compile Include="MyDataset.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DesignTime>True</DesignTime>
+      <DependentUpon>MyDataset.xsd</DependentUpon>
+    </Compile>
+    <Compile Include="MyDataset.vb">
+      <DependentUpon>MyDataset.xsd</DependentUpon>
+    </Compile>
+    <Compile Include="Settings.vb" />
+  </ItemGroup>
+  <ItemGroup>
+    <EmbeddedResource Include="frmMain.resx">
+      <DependentUpon>frmMain.vb</DependentUpon>
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
+    <EmbeddedResource Include="My Project\licenses.licx" />
+    <EmbeddedResource Include="My Project\Resources.resx">
+      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
+      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
+      <CustomToolNamespace>My.Resources</CustomToolNamespace>
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="My Project\Application.myapp">
+      <Generator>MyApplicationCodeGenerator</Generator>
+      <LastGenOutput>Application.Designer.vb</LastGenOutput>
+    </None>
+    <None Include="My Project\Settings.settings">
+      <Generator>SettingsSingleFileGenerator</Generator>
+      <CustomToolNamespace>My</CustomToolNamespace>
+      <LastGenOutput>Settings.Designer.vb</LastGenOutput>
+    </None>
+    <None Include="App.config" />
+    <None Include="MyDataset.xsc">
+      <DependentUpon>MyDataset.xsd</DependentUpon>
+    </None>
+    <None Include="MyDataset.xsd">
+      <SubType>Designer</SubType>
+      <Generator>MSDataSetGenerator</Generator>
+      <LastGenOutput>MyDataset.Designer.vb</LastGenOutput>
+    </None>
+    <None Include="MyDataset.xss">
+      <DependentUpon>MyDataset.xsd</DependentUpon>
+    </None>
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="packages.config" />
+    <None Include="Resources\save_16xMD.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\refresh_16xLG.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\arrow_right.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\handdrawn_arrow_down.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\arrow_Down_16xMD.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Content Include="envelope.ico" />
+    <None Include="Resources\email_go.png" />
+    <None Include="Resources\key_16xLG.png" />
+    <None Include="Resources\Encrypt.png" />
+    <None Include="Resources\folder_Closed_16xLG.png" />
+  </ItemGroup>
+  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
+</Project>

App/EmailProfiler.Form/My Project/Application.Designer.vb

@@ -0,0 +1,38 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden.  Wenn Sie Änderungen vornehmen möchten
+    ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
+    ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
+    ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
+    '
+    Partial Friend Class MyApplication
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Public Sub New()
+            MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
+            Me.IsSingleInstance = false
+            Me.EnableVisualStyles = true
+            Me.SaveMySettingsOnExit = true
+            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
+        End Sub
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Protected Overrides Sub OnCreateMainForm()
+            Me.MainForm = Global.EmailProfiler.Form.frmMain
+        End Sub
+    End Class
+End Namespace

App/EmailProfiler.Form/My Project/AssemblyInfo.vb

@@ -10,10 +10,10 @@ Imports System.Runtime.InteropServices
 
 <Assembly: AssemblyTitle("Email-Profiler - Config")>
 <Assembly: AssemblyDescription("")>
-<Assembly: AssemblyCompany("")>
-<Assembly: AssemblyProduct("Email-Profiler - Config")>
-<Assembly: AssemblyCopyright("Copyright ©  2018")>
-<Assembly: AssemblyTrademark("")>
+<Assembly: AssemblyCompany("Digital Data")>
+<Assembly: AssemblyProduct("EmailProfiler Config")>
+<Assembly: AssemblyCopyright("Copyright © 2025")>
+<Assembly: AssemblyTrademark("3.1.0")>
 
 <Assembly: ComVisible(False)>
 
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("2.3.0.0")>
+<Assembly: AssemblyVersion("3.1.0.0")>
 <Assembly: AssemblyFileVersion("1.0.0.0")>

App/EmailProfiler.Form/My Project/Resources.Designer.vb

@@ -22,7 +22,7 @@ Namespace My.Resources
     '''<summary>
     '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
     '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"),  _
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"),  _
      Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
      Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
      Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
@@ -39,7 +39,7 @@ Namespace My.Resources
         Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
             Get
                 If Object.ReferenceEquals(resourceMan, Nothing) Then
-                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("CONFIG_APP.Resources", GetType(Resources).Assembly)
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("EmailProfiler.Form.Resources", GetType(Resources).Assembly)
                     resourceMan = temp
                 End If
                 Return resourceMan

App/EmailProfiler.Form/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", "16.4.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.14.0.0"),  _
      Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
     Partial Friend NotInheritable Class MySettings
         Inherits Global.System.Configuration.ApplicationSettingsBase
@@ -54,39 +54,13 @@ Namespace My
             End Get
         End Property
         
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Secu"& _ 
-            "rity Info=True;User ID=sa;Password=dd")>  _
-        Public Property MyConnectionString() As String
-            Get
-                Return CType(Me("MyConnectionString"),String)
-            End Get
-            Set
-                Me("MyConnectionString") = value
-            End Set
-        End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("")>  _
-        Public Property MyServer() As String
-            Get
-                Return CType(Me("MyServer"),String)
-            End Get
-            Set
-                Me("MyServer") = value
-            End Set
-        End Property
-        
         <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
          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_TEST;Persist Secu"& _ 
-            "rity Info=True;User ID=sa;Password=dd")>  _
-        Public ReadOnly Property MyDatasetConnString() As String
+         Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security "& _ 
+            "Info=True;User ID=sa;Password=dd")>  _
+        Public ReadOnly Property MyConnectionString() As String
             Get
-                Return CType(Me("MyDatasetConnString"),String)
+                Return CType(Me("MyConnectionString"),String)
             End Get
         End Property
         
@@ -170,6 +144,26 @@ Namespace My
                 Me("DEBUG") = value
             End Set
         End Property
+        
+        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("NONE")>  _
+        Public ReadOnly Property EML_LIMITATION_SENDER() As String
+            Get
+                Return CType(Me("EML_LIMITATION_SENDER"),String)
+            End Get
+        End Property
+        
+        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
+         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;User ID=sa;Passwo"& _ 
+            "rd=dd;Encrypt=True;TrustServerCertificate=True")>  _
+        Public ReadOnly Property MyDatasetConnString() As String
+            Get
+                Return CType(Me("MyDatasetConnString"),String)
+            End Get
+        End Property
     End Class
 End Namespace
 
@@ -181,9 +175,9 @@ Namespace My
     Friend Module MySettingsProperty
         
         <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
-        Friend ReadOnly Property Settings() As Global.CONFIG_APP.My.MySettings
+        Friend ReadOnly Property Settings() As Global.EmailProfiler.Form.My.MySettings
             Get
-                Return Global.CONFIG_APP.My.MySettings.Default
+                Return Global.EmailProfiler.Form.My.MySettings.Default
             End Get
         End Property
     End Module

App/EmailProfiler.Form/My Project/Settings.settings

@@ -2,19 +2,8 @@
 <SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
   <Profiles />
   <Settings>
-    <Setting Name="MyConnectionString" Type="System.String" Scope="User">
-      <Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd</Value>
-    </Setting>
-    <Setting Name="MyServer" Type="System.String" Scope="User">
-      <Value Profile="(Default)" />
-    </Setting>
-    <Setting Name="MyDatasetConnString" Type="(Connection string)" Scope="Application">
-      <DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
-&lt;SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"&gt;
-  &lt;ConnectionString&gt;Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd&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_TEST;Persist Security Info=True;User ID=sa;Password=dd</Value>
+    <Setting Name="MyConnectionString" Type="System.String" Scope="Application">
+      <Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</Value>
     </Setting>
     <Setting Name="EmailTest_Receipiant" Type="System.String" Scope="User">
       <Value Profile="(Default)" />
@@ -40,5 +29,16 @@
     <Setting Name="DEBUG" Type="System.Boolean" Scope="User">
       <Value Profile="(Default)">False</Value>
     </Setting>
+    <Setting Name="EML_LIMITATION_SENDER" Type="System.String" Scope="Application">
+      <Value Profile="(Default)">NONE</Value>
+    </Setting>
+    <Setting Name="MyDatasetConnString" 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;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True&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;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True</Value>
+    </Setting>
   </Settings>
 </SettingsFile>

App/EmailProfiler.Form/My Project/licenses.licx

@@ -0,0 +1,4 @@
+DevExpress.XtraEditors.TextEdit, 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.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.GridLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

App/EmailProfiler.Form/My Project/licenses.licx.bak

@@ -0,0 +1 @@
+DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

App/EmailProfiler.Form/MyDataset.vb

@@ -0,0 +1,4 @@
+Partial Class MyDataset
+    Partial Public Class TBEMLP_POLL_PROFILESDataTable
+    End Class
+End Class

App/EmailProfiler.Form/MyDataset.xsc

@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!--<autogenerated>
+     This code was generated by a tool.
+     Changes to this file may cause incorrect behavior and will be lost if
+     the code is regenerated.
+</autogenerated>-->
+<DataSetUISetting Version="1.00" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
+  <TableUISettings>
+    <TableUISetting Name="TBDD_EMAIL_ACCOUNT">
+      <ColumnUISettings>
+        <ColumnUISetting Name="AUTH_TYPE">
+          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
+              <BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+            </ControlSetting></ControlSettings>
+        </ColumnUISetting>
+      </ColumnUISettings>
+    </TableUISetting>
+  </TableUISettings>
+</DataSetUISetting>

App/EmailProfiler.Form/MyDataset.xsd

@@ -4,7 +4,7 @@
     <xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource">
       <DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
         <Connections>
-          <Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="MyDatasetConnString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="MyDatasetConnString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.CONFIG_APP.My.MySettings.GlobalReference.Default.MyDatasetConnString" Provider="System.Data.SqlClient" />
+          <Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="MyDatasetConnString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="MyDatasetConnString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.EmailProfiler.Form.My.MySettings.GlobalReference.Default.MyDatasetConnString" Provider="System.Data.SqlClient" />
         </Connections>
         <Tables>
           <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBEMLP_POLL_PROFILESTableAdapter" GeneratorDataComponentClassName="TBEMLP_POLL_PROFILESTableAdapter" Name="TBEMLP_POLL_PROFILES" UserDataComponentName="TBEMLP_POLL_PROFILESTableAdapter">
@@ -39,8 +39,8 @@
                 <InsertCommand>
                   <DbCommand CommandType="Text" ModifiedByUser="true">
                     <CommandText>INSERT INTO TBEMLP_POLL_PROFILES
-                         (PROFILE_NAME, POLL_TYPE, EMAIL_CONF_ID, COMMENT, LAST_TICK, ACTIVE, SEQUENCE, ADDED_WHO)
-VALUES        (@PROFILE_NAME,@POLL_TYPE,@EMAIL_CONF_ID,@COMMENT,@LAST_TICK,@ACTIVE,@SEQUENCE,@ADDED_WHO); 
+                         (PROFILE_NAME, POLL_TYPE, EMAIL_CONF_ID, COMMENT, LAST_TICK, ACTIVE, SEQUENCE, ADDED_WHO, VALIDATION_SQL)
+VALUES        (@PROFILE_NAME,@POLL_TYPE,@EMAIL_CONF_ID,@COMMENT,@LAST_TICK,@ACTIVE,@SEQUENCE,@ADDED_WHO,@VALIDATION_SQL);  
 SELECT GUID, PROFILE_NAME, POLL_TYPE, EMAIL_CONF_ID, COMMENT, LAST_TICK, ACTIVE, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBEMLP_POLL_PROFILES WHERE (GUID = SCOPE_IDENTITY())</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="PROFILE_NAME" ColumnName="PROFILE_NAME" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@PROFILE_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="PROFILE_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -51,6 +51,7 @@ SELECT GUID, PROFILE_NAME, POLL_TYPE, EMAIL_CONF_ID, COMMENT, LAST_TICK, ACTIVE,
                       <Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="VALIDATION_SQL" ColumnName="VALIDATION_SQL" DataSourceName="" DataTypeServer="unknown" DbType="AnsiString" Direction="Input" ParameterName="@VALIDATION_SQL" Precision="0" ProviderType="VarChar" Scale="0" Size="1024" SourceColumn="VALIDATION_SQL" SourceColumnNullMapping="false" SourceVersion="Current" />
                     </Parameters>
                   </DbCommand>
                 </InsertCommand>
@@ -65,8 +66,8 @@ FROM            TBEMLP_POLL_PROFILES</CommandText>
                   <DbCommand CommandType="Text" ModifiedByUser="true">
                     <CommandText>UPDATE       TBEMLP_POLL_PROFILES
 SET                PROFILE_NAME = @PROFILE_NAME, POLL_TYPE = @POLL_TYPE, EMAIL_CONF_ID = @EMAIL_CONF_ID, COMMENT = @COMMENT, LAST_TICK = @LAST_TICK, ACTIVE = @ACTIVE, SEQUENCE = @SEQUENCE, 
-                         CHANGED_WHO = @CHANGED_WHO
-WHERE        (GUID = @Original_GUID); 
+                         CHANGED_WHO = @CHANGED_WHO, VALIDATION_SQL = @VALIDATION_SQL
+WHERE        (GUID = @Original_GUID);   
 SELECT GUID, PROFILE_NAME, POLL_TYPE, EMAIL_CONF_ID, COMMENT, LAST_TICK, ACTIVE, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBEMLP_POLL_PROFILES WHERE (GUID = @GUID)</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="PROFILE_NAME" ColumnName="PROFILE_NAME" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@PROFILE_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="PROFILE_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -77,6 +78,7 @@ SELECT GUID, PROFILE_NAME, POLL_TYPE, EMAIL_CONF_ID, COMMENT, LAST_TICK, ACTIVE,
                       <Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="VALIDATION_SQL" ColumnName="VALIDATION_SQL" DataSourceName="" DataTypeServer="unknown" DbType="String" Direction="Input" ParameterName="@VALIDATION_SQL" Precision="0" ProviderType="NVarChar" Scale="0" Size="1024" SourceColumn="VALIDATION_SQL" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROFILES" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                     </Parameters>
@@ -97,92 +99,166 @@ SELECT GUID, PROFILE_NAME, POLL_TYPE, EMAIL_CONF_ID, COMMENT, LAST_TICK, ACTIVE,
               <Mapping SourceColumn="ADDED_WHEN" DataSetColumn="ADDED_WHEN" />
               <Mapping SourceColumn="CHANGED_WHO" DataSetColumn="CHANGED_WHO" />
               <Mapping SourceColumn="CHANGED_WHEN" DataSetColumn="CHANGED_WHEN" />
+              <Mapping SourceColumn="VALIDATION_SQL" DataSetColumn="VALIDATION_SQL" />
             </Mappings>
             <Sources />
           </TableAdapter>
           <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBEMLP_POLL_PROCESSTableAdapter" GeneratorDataComponentClassName="TBEMLP_POLL_PROCESSTableAdapter" Name="TBEMLP_POLL_PROCESS" UserDataComponentName="TBEMLP_POLL_PROCESSTableAdapter">
             <MainSource>
-              <DbSource ConnectionRef="MyDatasetConnString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" 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">
+              <DbSource ConnectionRef="MyDatasetConnString (MySettings)" DbObjectName="DD_ECM.dbo.TBEMLP_POLL_PROCESS" 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 TBEMLP_POLL_PROCESS
-WHERE        (GUID = @Original_GUID)</CommandText>
+                    <CommandText>DELETE FROM [TBEMLP_POLL_PROCESS] WHERE (([GUID] = @Original_GUID) AND ([PROCESS_NAME] = @Original_PROCESS_NAME) AND ([STEP_NAME] = @Original_STEP_NAME) AND ([PROFILE_ID] = @Original_PROFILE_ID) AND ([COPY_2_HDD] = @Original_COPY_2_HDD) AND ([WM_IMPORT] = @Original_WM_IMPORT) AND ((@IsNull_WM_OBJEKTTYPE = 1 AND [WM_OBJEKTTYPE] IS NULL) OR ([WM_OBJEKTTYPE] = @Original_WM_OBJEKTTYPE)) AND ((@IsNull_WM_VECTOR_LOG = 1 AND [WM_VECTOR_LOG] IS NULL) OR ([WM_VECTOR_LOG] = @Original_WM_VECTOR_LOG)) AND ((@IsNull_WM_PATH = 1 AND [WM_PATH] IS NULL) OR ([WM_PATH] = @Original_WM_PATH)) AND ((@IsNull_WM_FILE_NAME = 1 AND [WM_FILE_NAME] IS NULL) OR ([WM_FILE_NAME] = @Original_WM_FILE_NAME)) AND ((@IsNull_WM_REFERENCE_INDEX = 1 AND [WM_REFERENCE_INDEX] IS NULL) OR ([WM_REFERENCE_INDEX] = @Original_WM_REFERENCE_INDEX)) AND ([PATH_EMAIL_TEMP] = @Original_PATH_EMAIL_TEMP) AND ([PATH_EMAIL_ERRORS] = @Original_PATH_EMAIL_ERRORS) AND ([DELETE_MAIL] = @Original_DELETE_MAIL) AND ((@IsNull_COMMENT = 1 AND [COMMENT] IS NULL) OR ([COMMENT] = @Original_COMMENT)) AND ([ACTIVE] = @Original_ACTIVE) AND ((@IsNull_SEQUENCE = 1 AND [SEQUENCE] IS NULL) OR ([SEQUENCE] = @Original_SEQUENCE)) AND ((@IsNull_ADDED_WHO = 1 AND [ADDED_WHO] IS NULL) OR ([ADDED_WHO] = @Original_ADDED_WHO)) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([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 ([WM_IDX_BODY_TEXT] = @Original_WM_IDX_BODY_TEXT) AND ([WM_IDX_BODY_SUBSTR_LENGTH] = @Original_WM_IDX_BODY_SUBSTR_LENGTH) AND ((@IsNull_PATH_ORIGINAL = 1 AND [PATH_ORIGINAL] IS NULL) OR ([PATH_ORIGINAL] = @Original_PATH_ORIGINAL)) AND ((@IsNull_ALLOW_XML_RECEIPTS = 1 AND [ALLOW_XML_RECEIPTS] IS NULL) OR ([ALLOW_XML_RECEIPTS] = @Original_ALLOW_XML_RECEIPTS)))</CommandText>
                     <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="" 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="" 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_PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_STEP_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="STEP_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_COPY_2_HDD" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="COPY_2_HDD" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_WM_IMPORT" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="WM_IMPORT" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_OBJEKTTYPE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_OBJEKTTYPE" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_OBJEKTTYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_OBJEKTTYPE" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_VECTOR_LOG" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_VECTOR_LOG" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_VECTOR_LOG" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_VECTOR_LOG" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_PATH" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_PATH" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_PATH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_PATH" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_FILE_NAME" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_FILE_NAME" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_FILE_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_FILE_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_REFERENCE_INDEX" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_REFERENCE_INDEX" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_REFERENCE_INDEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_REFERENCE_INDEX" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_PATH_EMAIL_TEMP" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_EMAIL_TEMP" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_PATH_EMAIL_ERRORS" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_EMAIL_ERRORS" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_DELETE_MAIL" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="DELETE_MAIL" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_COMMENT" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="COMMENT" 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="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="true" 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="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="true" 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="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" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_IDX_BODY_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_IDX_BODY_TEXT" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_WM_IDX_BODY_SUBSTR_LENGTH" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_IDX_BODY_SUBSTR_LENGTH" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_PATH_ORIGINAL" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PATH_ORIGINAL" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_PATH_ORIGINAL" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_ORIGINAL" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ALLOW_XML_RECEIPTS" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ALLOW_XML_RECEIPTS" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_ALLOW_XML_RECEIPTS" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ALLOW_XML_RECEIPTS" SourceColumnNullMapping="false" SourceVersion="Original" />
                     </Parameters>
                   </DbCommand>
                 </DeleteCommand>
                 <InsertCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>INSERT INTO TBEMLP_POLL_PROCESS
-                         (PROCESS_NAME, STEP_NAME, PROFILE_ID, COPY_2_HDD, WM_IMPORT, WM_OBJEKTTYPE, WM_VECTOR_LOG, WM_PATH, WM_FILE_NAME, WM_REFERENCE_INDEX, PATH_EMAIL_TEMP, PATH_EMAIL_ERRORS, 
-                         DELETE_MAIL, COMMENT, ACTIVE, SEQUENCE, ADDED_WHO, WM_IDX_BODY_TEXT, WM_IDX_BODY_SUBSTR_LENGTH, PATH_ORIGINAL)
-VALUES        (@PROCESS_NAME,@STEP_NAME,@PROFILE_ID,@COPY_2_HDD,@WM_IMPORT,@WM_OBJEKTTYPE,@WM_VECTOR_LOG,@WM_PATH,@WM_FILE_NAME,@WM_REFERENCE_INDEX,@PATH_EMAIL_TEMP,@PATH_EMAIL_ERRORS,@DELETE_MAIL,@COMMENT,@ACTIVE,@SEQUENCE,@ADDED_WHO,@WM_IDX_BODY_TEXT,@WM_IDX_BODY_SUBSTR_LENGTH,@PATH_ORIGINAL);  
-SELECT GUID, PROCESS_NAME, STEP_NAME, PROFILE_ID, COPY_2_HDD, WM_IMPORT, WM_OBJEKTTYPE, WM_VECTOR_LOG, WM_PATH, WM_FILE_NAME, WM_REFERENCE_INDEX, PATH_EMAIL_TEMP, PATH_EMAIL_ERRORS, DELETE_MAIL, COMMENT, ACTIVE, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, WM_IDX_BODY_TEXT, WM_IDX_BODY_SUBSTR_LENGTH FROM TBEMLP_POLL_PROCESS WHERE (GUID = SCOPE_IDENTITY())</CommandText>
+                  <DbCommand CommandType="Text" ModifiedByUser="false">
+                    <CommandText>INSERT INTO [TBEMLP_POLL_PROCESS] ([PROCESS_NAME], [STEP_NAME], [PROFILE_ID], [COPY_2_HDD], [WM_IMPORT], [WM_OBJEKTTYPE], [WM_VECTOR_LOG], [WM_PATH], [WM_FILE_NAME], [WM_REFERENCE_INDEX], [PATH_EMAIL_TEMP], [PATH_EMAIL_ERRORS], [DELETE_MAIL], [COMMENT], [ACTIVE], [SEQUENCE], [ADDED_WHO], [ADDED_WHEN], [CHANGED_WHO], [CHANGED_WHEN], [WM_IDX_BODY_TEXT], [WM_IDX_BODY_SUBSTR_LENGTH], [PATH_ORIGINAL], [ALLOW_XML_RECEIPTS]) VALUES (@PROCESS_NAME, @STEP_NAME, @PROFILE_ID, @COPY_2_HDD, @WM_IMPORT, @WM_OBJEKTTYPE, @WM_VECTOR_LOG, @WM_PATH, @WM_FILE_NAME, @WM_REFERENCE_INDEX, @PATH_EMAIL_TEMP, @PATH_EMAIL_ERRORS, @DELETE_MAIL, @COMMENT, @ACTIVE, @SEQUENCE, @ADDED_WHO, @ADDED_WHEN, @CHANGED_WHO, @CHANGED_WHEN, @WM_IDX_BODY_TEXT, @WM_IDX_BODY_SUBSTR_LENGTH, @PATH_ORIGINAL, @ALLOW_XML_RECEIPTS);
+SELECT GUID, PROCESS_NAME, STEP_NAME, PROFILE_ID, COPY_2_HDD, WM_IMPORT, WM_OBJEKTTYPE, WM_VECTOR_LOG, WM_PATH, WM_FILE_NAME, WM_REFERENCE_INDEX, PATH_EMAIL_TEMP, PATH_EMAIL_ERRORS, DELETE_MAIL, COMMENT, ACTIVE, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, WM_IDX_BODY_TEXT, WM_IDX_BODY_SUBSTR_LENGTH, PATH_ORIGINAL, ALLOW_XML_RECEIPTS FROM TBEMLP_POLL_PROCESS WHERE (GUID = SCOPE_IDENTITY())</CommandText>
                     <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="PROCESS_NAME" ColumnName="PROCESS_NAME" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="STEP_NAME" ColumnName="STEP_NAME" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@STEP_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="STEP_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="PROFILE_ID" ColumnName="PROFILE_ID" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="COPY_2_HDD" ColumnName="COPY_2_HDD" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@COPY_2_HDD" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="COPY_2_HDD" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="WM_IMPORT" ColumnName="WM_IMPORT" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@WM_IMPORT" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="WM_IMPORT" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_OBJEKTTYPE" ColumnName="WM_OBJEKTTYPE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WM_OBJEKTTYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WM_OBJEKTTYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_VECTOR_LOG" ColumnName="WM_VECTOR_LOG" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WM_VECTOR_LOG" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WM_VECTOR_LOG" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_PATH" ColumnName="WM_PATH" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@WM_PATH" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="WM_PATH" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_FILE_NAME" ColumnName="WM_FILE_NAME" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WM_FILE_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WM_FILE_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_REFERENCE_INDEX" ColumnName="WM_REFERENCE_INDEX" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WM_REFERENCE_INDEX" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WM_REFERENCE_INDEX" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="PATH_EMAIL_TEMP" ColumnName="PATH_EMAIL_TEMP" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@PATH_EMAIL_TEMP" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="PATH_EMAIL_TEMP" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="PATH_EMAIL_ERRORS" ColumnName="PATH_EMAIL_ERRORS" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@PATH_EMAIL_ERRORS" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="PATH_EMAIL_ERRORS" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="DELETE_MAIL" ColumnName="DELETE_MAIL" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@DELETE_MAIL" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="DELETE_MAIL" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="COMMENT" ColumnName="COMMENT" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="WM_IDX_BODY_TEXT" ColumnName="WM_IDX_BODY_TEXT" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@WM_IDX_BODY_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="WM_IDX_BODY_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="WM_IDX_BODY_SUBSTR_LENGTH" ColumnName="WM_IDX_BODY_SUBSTR_LENGTH" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@WM_IDX_BODY_SUBSTR_LENGTH" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="WM_IDX_BODY_SUBSTR_LENGTH" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="PATH_ORIGINAL" ColumnName="PATH_ORIGINAL" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@PATH_ORIGINAL" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="PATH_ORIGINAL" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@STEP_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="STEP_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@COPY_2_HDD" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="COPY_2_HDD" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@WM_IMPORT" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="WM_IMPORT" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_OBJEKTTYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_OBJEKTTYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_VECTOR_LOG" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_VECTOR_LOG" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_PATH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_PATH" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_FILE_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_FILE_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_REFERENCE_INDEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_REFERENCE_INDEX" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PATH_EMAIL_TEMP" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_EMAIL_TEMP" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PATH_EMAIL_ERRORS" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_EMAIL_ERRORS" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@DELETE_MAIL" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="DELETE_MAIL" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_IDX_BODY_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_IDX_BODY_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@WM_IDX_BODY_SUBSTR_LENGTH" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_IDX_BODY_SUBSTR_LENGTH" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PATH_ORIGINAL" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_ORIGINAL" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@ALLOW_XML_RECEIPTS" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ALLOW_XML_RECEIPTS" SourceColumnNullMapping="false" SourceVersion="Current" />
                     </Parameters>
                   </DbCommand>
                 </InsertCommand>
                 <SelectCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="false">
+                  <DbCommand CommandType="Text" ModifiedByUser="true">
                     <CommandText>SELECT        GUID, PROCESS_NAME, STEP_NAME, PROFILE_ID, COPY_2_HDD, WM_IMPORT, WM_OBJEKTTYPE, WM_VECTOR_LOG, WM_PATH, WM_FILE_NAME, WM_REFERENCE_INDEX, PATH_EMAIL_TEMP, PATH_EMAIL_ERRORS, 
-                         DELETE_MAIL, COMMENT, ACTIVE, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, WM_IDX_BODY_TEXT, WM_IDX_BODY_SUBSTR_LENGTH, PATH_ORIGINAL
+                         DELETE_MAIL, COMMENT, ACTIVE, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, WM_IDX_BODY_TEXT, WM_IDX_BODY_SUBSTR_LENGTH, PATH_ORIGINAL, ALLOW_XML_RECEIPTS
 FROM            TBEMLP_POLL_PROCESS</CommandText>
                     <Parameters />
                   </DbCommand>
                 </SelectCommand>
                 <UpdateCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>UPDATE       TBEMLP_POLL_PROCESS
-SET                PROCESS_NAME = @PROCESS_NAME, STEP_NAME = @STEP_NAME, PROFILE_ID = @PROFILE_ID, COPY_2_HDD = @COPY_2_HDD, WM_IMPORT = @WM_IMPORT, WM_OBJEKTTYPE = @WM_OBJEKTTYPE, 
-                         WM_VECTOR_LOG = @WM_VECTOR_LOG, WM_PATH = @WM_PATH, WM_FILE_NAME = @WM_FILE_NAME, WM_REFERENCE_INDEX = @WM_REFERENCE_INDEX, PATH_EMAIL_TEMP = @PATH_EMAIL_TEMP, 
-                         PATH_EMAIL_ERRORS = @PATH_EMAIL_ERRORS, DELETE_MAIL = @DELETE_MAIL, COMMENT = @COMMENT, ACTIVE = @ACTIVE, SEQUENCE = @SEQUENCE, CHANGED_WHO = @CHANGED_WHO, 
-                         WM_IDX_BODY_TEXT = @WM_IDX_BODY_TEXT, WM_IDX_BODY_SUBSTR_LENGTH = @WM_IDX_BODY_SUBSTR_LENGTH, PATH_ORIGINAL = @PATH_ORIGINAL
-WHERE        (GUID = @Original_GUID);  
-SELECT GUID, PROCESS_NAME, STEP_NAME, PROFILE_ID, COPY_2_HDD, WM_IMPORT, WM_OBJEKTTYPE, WM_VECTOR_LOG, WM_PATH, WM_FILE_NAME, WM_REFERENCE_INDEX, PATH_EMAIL_TEMP, PATH_EMAIL_ERRORS, DELETE_MAIL, COMMENT, ACTIVE, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, WM_IDX_BODY_TEXT, WM_IDX_BODY_SUBSTR_LENGTH FROM TBEMLP_POLL_PROCESS WHERE (GUID = @GUID)</CommandText>
+                  <DbCommand CommandType="Text" ModifiedByUser="false">
+                    <CommandText>UPDATE [TBEMLP_POLL_PROCESS] SET [PROCESS_NAME] = @PROCESS_NAME, [STEP_NAME] = @STEP_NAME, [PROFILE_ID] = @PROFILE_ID, [COPY_2_HDD] = @COPY_2_HDD, [WM_IMPORT] = @WM_IMPORT, [WM_OBJEKTTYPE] = @WM_OBJEKTTYPE, [WM_VECTOR_LOG] = @WM_VECTOR_LOG, [WM_PATH] = @WM_PATH, [WM_FILE_NAME] = @WM_FILE_NAME, [WM_REFERENCE_INDEX] = @WM_REFERENCE_INDEX, [PATH_EMAIL_TEMP] = @PATH_EMAIL_TEMP, [PATH_EMAIL_ERRORS] = @PATH_EMAIL_ERRORS, [DELETE_MAIL] = @DELETE_MAIL, [COMMENT] = @COMMENT, [ACTIVE] = @ACTIVE, [SEQUENCE] = @SEQUENCE, [ADDED_WHO] = @ADDED_WHO, [ADDED_WHEN] = @ADDED_WHEN, [CHANGED_WHO] = @CHANGED_WHO, [CHANGED_WHEN] = @CHANGED_WHEN, [WM_IDX_BODY_TEXT] = @WM_IDX_BODY_TEXT, [WM_IDX_BODY_SUBSTR_LENGTH] = @WM_IDX_BODY_SUBSTR_LENGTH, [PATH_ORIGINAL] = @PATH_ORIGINAL, [ALLOW_XML_RECEIPTS] = @ALLOW_XML_RECEIPTS WHERE (([GUID] = @Original_GUID) AND ([PROCESS_NAME] = @Original_PROCESS_NAME) AND ([STEP_NAME] = @Original_STEP_NAME) AND ([PROFILE_ID] = @Original_PROFILE_ID) AND ([COPY_2_HDD] = @Original_COPY_2_HDD) AND ([WM_IMPORT] = @Original_WM_IMPORT) AND ((@IsNull_WM_OBJEKTTYPE = 1 AND [WM_OBJEKTTYPE] IS NULL) OR ([WM_OBJEKTTYPE] = @Original_WM_OBJEKTTYPE)) AND ((@IsNull_WM_VECTOR_LOG = 1 AND [WM_VECTOR_LOG] IS NULL) OR ([WM_VECTOR_LOG] = @Original_WM_VECTOR_LOG)) AND ((@IsNull_WM_PATH = 1 AND [WM_PATH] IS NULL) OR ([WM_PATH] = @Original_WM_PATH)) AND ((@IsNull_WM_FILE_NAME = 1 AND [WM_FILE_NAME] IS NULL) OR ([WM_FILE_NAME] = @Original_WM_FILE_NAME)) AND ((@IsNull_WM_REFERENCE_INDEX = 1 AND [WM_REFERENCE_INDEX] IS NULL) OR ([WM_REFERENCE_INDEX] = @Original_WM_REFERENCE_INDEX)) AND ([PATH_EMAIL_TEMP] = @Original_PATH_EMAIL_TEMP) AND ([PATH_EMAIL_ERRORS] = @Original_PATH_EMAIL_ERRORS) AND ([DELETE_MAIL] = @Original_DELETE_MAIL) AND ((@IsNull_COMMENT = 1 AND [COMMENT] IS NULL) OR ([COMMENT] = @Original_COMMENT)) AND ([ACTIVE] = @Original_ACTIVE) AND ((@IsNull_SEQUENCE = 1 AND [SEQUENCE] IS NULL) OR ([SEQUENCE] = @Original_SEQUENCE)) AND ((@IsNull_ADDED_WHO = 1 AND [ADDED_WHO] IS NULL) OR ([ADDED_WHO] = @Original_ADDED_WHO)) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([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 ([WM_IDX_BODY_TEXT] = @Original_WM_IDX_BODY_TEXT) AND ([WM_IDX_BODY_SUBSTR_LENGTH] = @Original_WM_IDX_BODY_SUBSTR_LENGTH) AND ((@IsNull_PATH_ORIGINAL = 1 AND [PATH_ORIGINAL] IS NULL) OR ([PATH_ORIGINAL] = @Original_PATH_ORIGINAL)) AND ((@IsNull_ALLOW_XML_RECEIPTS = 1 AND [ALLOW_XML_RECEIPTS] IS NULL) OR ([ALLOW_XML_RECEIPTS] = @Original_ALLOW_XML_RECEIPTS)));
+SELECT GUID, PROCESS_NAME, STEP_NAME, PROFILE_ID, COPY_2_HDD, WM_IMPORT, WM_OBJEKTTYPE, WM_VECTOR_LOG, WM_PATH, WM_FILE_NAME, WM_REFERENCE_INDEX, PATH_EMAIL_TEMP, PATH_EMAIL_ERRORS, DELETE_MAIL, COMMENT, ACTIVE, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, WM_IDX_BODY_TEXT, WM_IDX_BODY_SUBSTR_LENGTH, PATH_ORIGINAL, ALLOW_XML_RECEIPTS FROM TBEMLP_POLL_PROCESS WHERE (GUID = @GUID)</CommandText>
                     <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="PROCESS_NAME" ColumnName="PROCESS_NAME" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="STEP_NAME" ColumnName="STEP_NAME" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@STEP_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="STEP_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="PROFILE_ID" ColumnName="PROFILE_ID" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="COPY_2_HDD" ColumnName="COPY_2_HDD" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@COPY_2_HDD" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="COPY_2_HDD" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="WM_IMPORT" ColumnName="WM_IMPORT" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@WM_IMPORT" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="WM_IMPORT" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_OBJEKTTYPE" ColumnName="WM_OBJEKTTYPE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WM_OBJEKTTYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WM_OBJEKTTYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_VECTOR_LOG" ColumnName="WM_VECTOR_LOG" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WM_VECTOR_LOG" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WM_VECTOR_LOG" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_PATH" ColumnName="WM_PATH" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@WM_PATH" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="WM_PATH" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_FILE_NAME" ColumnName="WM_FILE_NAME" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WM_FILE_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WM_FILE_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="WM_REFERENCE_INDEX" ColumnName="WM_REFERENCE_INDEX" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@WM_REFERENCE_INDEX" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WM_REFERENCE_INDEX" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="PATH_EMAIL_TEMP" ColumnName="PATH_EMAIL_TEMP" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@PATH_EMAIL_TEMP" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="PATH_EMAIL_TEMP" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="PATH_EMAIL_ERRORS" ColumnName="PATH_EMAIL_ERRORS" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@PATH_EMAIL_ERRORS" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="PATH_EMAIL_ERRORS" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="DELETE_MAIL" ColumnName="DELETE_MAIL" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@DELETE_MAIL" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="DELETE_MAIL" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="COMMENT" ColumnName="COMMENT" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="WM_IDX_BODY_TEXT" ColumnName="WM_IDX_BODY_TEXT" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@WM_IDX_BODY_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="WM_IDX_BODY_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="WM_IDX_BODY_SUBSTR_LENGTH" ColumnName="WM_IDX_BODY_SUBSTR_LENGTH" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@WM_IDX_BODY_SUBSTR_LENGTH" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="WM_IDX_BODY_SUBSTR_LENGTH" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="PATH_ORIGINAL" ColumnName="PATH_ORIGINAL" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@PATH_ORIGINAL" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="PATH_ORIGINAL" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@STEP_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="STEP_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@COPY_2_HDD" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="COPY_2_HDD" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@WM_IMPORT" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="WM_IMPORT" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_OBJEKTTYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_OBJEKTTYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_VECTOR_LOG" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_VECTOR_LOG" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_PATH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_PATH" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_FILE_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_FILE_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_REFERENCE_INDEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_REFERENCE_INDEX" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PATH_EMAIL_TEMP" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_EMAIL_TEMP" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PATH_EMAIL_ERRORS" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_EMAIL_ERRORS" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@DELETE_MAIL" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="DELETE_MAIL" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WM_IDX_BODY_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_IDX_BODY_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@WM_IDX_BODY_SUBSTR_LENGTH" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_IDX_BODY_SUBSTR_LENGTH" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@PATH_ORIGINAL" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_ORIGINAL" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@ALLOW_XML_RECEIPTS" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ALLOW_XML_RECEIPTS" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <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_PROCESS_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PROCESS_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_STEP_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="STEP_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_PROFILE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFILE_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_COPY_2_HDD" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="COPY_2_HDD" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_WM_IMPORT" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="WM_IMPORT" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_OBJEKTTYPE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_OBJEKTTYPE" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_OBJEKTTYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_OBJEKTTYPE" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_VECTOR_LOG" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_VECTOR_LOG" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_VECTOR_LOG" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_VECTOR_LOG" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_PATH" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_PATH" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_PATH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_PATH" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_FILE_NAME" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_FILE_NAME" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_FILE_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_FILE_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_WM_REFERENCE_INDEX" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_REFERENCE_INDEX" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_REFERENCE_INDEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_REFERENCE_INDEX" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_PATH_EMAIL_TEMP" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_EMAIL_TEMP" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_PATH_EMAIL_ERRORS" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_EMAIL_ERRORS" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_DELETE_MAIL" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="DELETE_MAIL" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_COMMENT" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="COMMENT" 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="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="true" 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="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="true" 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="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" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WM_IDX_BODY_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WM_IDX_BODY_TEXT" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_WM_IDX_BODY_SUBSTR_LENGTH" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="WM_IDX_BODY_SUBSTR_LENGTH" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_PATH_ORIGINAL" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PATH_ORIGINAL" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_PATH_ORIGINAL" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="PATH_ORIGINAL" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ALLOW_XML_RECEIPTS" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ALLOW_XML_RECEIPTS" SourceColumnNullMapping="true" SourceVersion="Original" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_ALLOW_XML_RECEIPTS" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ALLOW_XML_RECEIPTS" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBEMLP_POLL_PROCESS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
                     </Parameters>
                   </DbCommand>
                 </UpdateCommand>
@@ -213,6 +289,7 @@ SELECT GUID, PROCESS_NAME, STEP_NAME, PROFILE_ID, COPY_2_HDD, WM_IMPORT, WM_OBJE
               <Mapping SourceColumn="WM_IDX_BODY_TEXT" DataSetColumn="WM_IDX_BODY_TEXT" />
               <Mapping SourceColumn="WM_IDX_BODY_SUBSTR_LENGTH" DataSetColumn="WM_IDX_BODY_SUBSTR_LENGTH" />
               <Mapping SourceColumn="PATH_ORIGINAL" DataSetColumn="PATH_ORIGINAL" />
+              <Mapping SourceColumn="ALLOW_XML_RECEIPTS" DataSetColumn="ALLOW_XML_RECEIPTS" />
             </Mappings>
             <Sources />
           </TableAdapter>
@@ -602,431 +679,433 @@ SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, A
       </DataSource>
     </xs:appinfo>
   </xs:annotation>
-  <xs:element name="MyDataset" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="MyDataset" msprop:Generator_UserDSName="MyDataset">
+  <xs:element name="MyDataset" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:Generator_UserDSName="MyDataset" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="MyDataset">
     <xs:complexType>
       <xs:choice minOccurs="0" maxOccurs="unbounded">
-        <xs:element name="TBEMLP_POLL_PROFILES" msprop:Generator_TableClassName="TBEMLP_POLL_PROFILESDataTable" msprop:Generator_TableVarName="tableTBEMLP_POLL_PROFILES" msprop:Generator_TablePropName="TBEMLP_POLL_PROFILES" msprop:Generator_RowDeletingName="TBEMLP_POLL_PROFILESRowDeleting" msprop:Generator_RowChangingName="TBEMLP_POLL_PROFILESRowChanging" msprop:Generator_RowEvHandlerName="TBEMLP_POLL_PROFILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_POLL_PROFILESRowDeleted" msprop:Generator_UserTableName="TBEMLP_POLL_PROFILES" msprop:Generator_RowChangedName="TBEMLP_POLL_PROFILESRowChanged" msprop:Generator_RowEvArgName="TBEMLP_POLL_PROFILESRowChangeEvent" msprop:Generator_RowClassName="TBEMLP_POLL_PROFILESRow">
+        <xs:element name="TBEMLP_POLL_PROFILES" msprop:Generator_RowEvHandlerName="TBEMLP_POLL_PROFILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_POLL_PROFILESRowDeleted" msprop:Generator_RowDeletingName="TBEMLP_POLL_PROFILESRowDeleting" msprop:Generator_RowEvArgName="TBEMLP_POLL_PROFILESRowChangeEvent" msprop:Generator_TablePropName="TBEMLP_POLL_PROFILES" msprop:Generator_RowChangedName="TBEMLP_POLL_PROFILESRowChanged" msprop:Generator_UserTableName="TBEMLP_POLL_PROFILES" msprop:Generator_RowChangingName="TBEMLP_POLL_PROFILESRowChanging" msprop:Generator_RowClassName="TBEMLP_POLL_PROFILESRow" msprop:Generator_TableClassName="TBEMLP_POLL_PROFILESDataTable" msprop:Generator_TableVarName="tableTBEMLP_POLL_PROFILES">
           <xs:complexType>
             <xs:sequence>
-              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
-              <xs:element name="PROFILE_NAME" msprop:Generator_ColumnVarNameInTable="columnPROFILE_NAME" msprop:Generator_ColumnPropNameInRow="PROFILE_NAME" msprop:Generator_ColumnPropNameInTable="PROFILE_NAMEColumn" msprop:Generator_UserColumnName="PROFILE_NAME">
+              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_UserColumnName="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" type="xs:int" />
+              <xs:element name="PROFILE_NAME" msprop:Generator_ColumnPropNameInTable="PROFILE_NAMEColumn" msprop:Generator_ColumnPropNameInRow="PROFILE_NAME" msprop:Generator_UserColumnName="PROFILE_NAME" msprop:Generator_ColumnVarNameInTable="columnPROFILE_NAME">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="POLL_TYPE" msprop:Generator_ColumnVarNameInTable="columnPOLL_TYPE" msprop:Generator_ColumnPropNameInRow="POLL_TYPE" msprop:Generator_ColumnPropNameInTable="POLL_TYPEColumn" msprop:Generator_UserColumnName="POLL_TYPE">
+              <xs:element name="POLL_TYPE" msprop:Generator_ColumnPropNameInTable="POLL_TYPEColumn" msprop:Generator_ColumnPropNameInRow="POLL_TYPE" msprop:Generator_UserColumnName="POLL_TYPE" msprop:Generator_ColumnVarNameInTable="columnPOLL_TYPE" default="IMAP">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_CONF_ID" msprop:Generator_ColumnVarNameInTable="columnEMAIL_CONF_ID" msprop:Generator_ColumnPropNameInRow="EMAIL_CONF_ID" msprop:Generator_ColumnPropNameInTable="EMAIL_CONF_IDColumn" msprop:Generator_UserColumnName="EMAIL_CONF_ID" type="xs:int" />
-              <xs:element name="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_UserColumnName="COMMENT" minOccurs="0">
+              <xs:element name="EMAIL_CONF_ID" msprop:Generator_ColumnPropNameInTable="EMAIL_CONF_IDColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_CONF_ID" msprop:Generator_UserColumnName="EMAIL_CONF_ID" msprop:Generator_ColumnVarNameInTable="columnEMAIL_CONF_ID" type="xs:int" />
+              <xs:element name="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_UserColumnName="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="500" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="LAST_TICK" msprop:Generator_ColumnVarNameInTable="columnLAST_TICK" msprop:Generator_ColumnPropNameInRow="LAST_TICK" msprop:Generator_ColumnPropNameInTable="LAST_TICKColumn" msprop:Generator_UserColumnName="LAST_TICK" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" default="false" />
-              <xs:element name="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_UserColumnName="SEQUENCE" type="xs:int" minOccurs="0" />
-              <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO" minOccurs="0">
+              <xs:element name="LAST_TICK" msprop:Generator_ColumnPropNameInTable="LAST_TICKColumn" msprop:Generator_ColumnPropNameInRow="LAST_TICK" msprop:Generator_UserColumnName="LAST_TICK" msprop:Generator_ColumnVarNameInTable="columnLAST_TICK" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_UserColumnName="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" type="xs:boolean" default="false" />
+              <xs:element name="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_UserColumnName="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" type="xs:int" minOccurs="0" />
+              <xs:element name="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_UserColumnName="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
+              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_UserColumnName="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_UserColumnName="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="VALIDATION_SQL" msprop:Generator_ColumnPropNameInTable="VALIDATION_SQLColumn" msprop:Generator_ColumnPropNameInRow="VALIDATION_SQL" msprop:Generator_UserColumnName="VALIDATION_SQL" msprop:Generator_ColumnVarNameInTable="columnVALIDATION_SQL" type="xs:string" default="" />
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBEMLP_POLL_PROCESS" msprop:Generator_TableClassName="TBEMLP_POLL_PROCESSDataTable" msprop:Generator_TableVarName="tableTBEMLP_POLL_PROCESS" msprop:Generator_TablePropName="TBEMLP_POLL_PROCESS" msprop:Generator_RowDeletingName="TBEMLP_POLL_PROCESSRowDeleting" msprop:Generator_RowChangingName="TBEMLP_POLL_PROCESSRowChanging" msprop:Generator_RowEvHandlerName="TBEMLP_POLL_PROCESSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_POLL_PROCESSRowDeleted" msprop:Generator_UserTableName="TBEMLP_POLL_PROCESS" msprop:Generator_RowChangedName="TBEMLP_POLL_PROCESSRowChanged" msprop:Generator_RowEvArgName="TBEMLP_POLL_PROCESSRowChangeEvent" msprop:Generator_RowClassName="TBEMLP_POLL_PROCESSRow">
+        <xs:element name="TBEMLP_POLL_PROCESS" msprop:Generator_RowEvHandlerName="TBEMLP_POLL_PROCESSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_POLL_PROCESSRowDeleted" msprop:Generator_RowDeletingName="TBEMLP_POLL_PROCESSRowDeleting" msprop:Generator_RowEvArgName="TBEMLP_POLL_PROCESSRowChangeEvent" msprop:Generator_TablePropName="TBEMLP_POLL_PROCESS" msprop:Generator_RowChangedName="TBEMLP_POLL_PROCESSRowChanged" msprop:Generator_UserTableName="TBEMLP_POLL_PROCESS" msprop:Generator_RowChangingName="TBEMLP_POLL_PROCESSRowChanging" msprop:Generator_RowClassName="TBEMLP_POLL_PROCESSRow" msprop:Generator_TableClassName="TBEMLP_POLL_PROCESSDataTable" msprop:Generator_TableVarName="tableTBEMLP_POLL_PROCESS">
           <xs:complexType>
             <xs:sequence>
-              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
-              <xs:element name="PROCESS_NAME" msprop:Generator_ColumnVarNameInTable="columnPROCESS_NAME" msprop:Generator_ColumnPropNameInRow="PROCESS_NAME" msprop:Generator_ColumnPropNameInTable="PROCESS_NAMEColumn" msprop:Generator_UserColumnName="PROCESS_NAME">
+              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_UserColumnName="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" type="xs:int" />
+              <xs:element name="PROCESS_NAME" msprop:Generator_ColumnPropNameInTable="PROCESS_NAMEColumn" msprop:Generator_ColumnPropNameInRow="PROCESS_NAME" msprop:Generator_UserColumnName="PROCESS_NAME" msprop:Generator_ColumnVarNameInTable="columnPROCESS_NAME">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="STEP_NAME" msprop:Generator_ColumnVarNameInTable="columnSTEP_NAME" msprop:Generator_ColumnPropNameInRow="STEP_NAME" msprop:Generator_ColumnPropNameInTable="STEP_NAMEColumn" msprop:Generator_UserColumnName="STEP_NAME">
+              <xs:element name="STEP_NAME" msprop:Generator_ColumnPropNameInTable="STEP_NAMEColumn" msprop:Generator_ColumnPropNameInRow="STEP_NAME" msprop:Generator_UserColumnName="STEP_NAME" msprop:Generator_ColumnVarNameInTable="columnSTEP_NAME">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="PROFILE_ID" msprop:Generator_ColumnVarNameInTable="columnPROFILE_ID" msprop:Generator_ColumnPropNameInRow="PROFILE_ID" msprop:Generator_ColumnPropNameInTable="PROFILE_IDColumn" msprop:Generator_UserColumnName="PROFILE_ID" type="xs:int" />
-              <xs:element name="COPY_2_HDD" msprop:Generator_ColumnVarNameInTable="columnCOPY_2_HDD" msprop:Generator_ColumnPropNameInRow="COPY_2_HDD" msprop:Generator_ColumnPropNameInTable="COPY_2_HDDColumn" msprop:Generator_UserColumnName="COPY_2_HDD" type="xs:boolean" default="false" />
-              <xs:element name="WM_IMPORT" msprop:Generator_ColumnVarNameInTable="columnWM_IMPORT" msprop:Generator_ColumnPropNameInRow="WM_IMPORT" msprop:Generator_ColumnPropNameInTable="WM_IMPORTColumn" msprop:Generator_UserColumnName="WM_IMPORT" type="xs:boolean" default="false" />
-              <xs:element name="WM_OBJEKTTYPE" msprop:Generator_ColumnVarNameInTable="columnWM_OBJEKTTYPE" msprop:Generator_ColumnPropNameInRow="WM_OBJEKTTYPE" msprop:Generator_ColumnPropNameInTable="WM_OBJEKTTYPEColumn" msprop:Generator_UserColumnName="WM_OBJEKTTYPE" minOccurs="0">
+              <xs:element name="PROFILE_ID" msprop:Generator_ColumnPropNameInTable="PROFILE_IDColumn" msprop:Generator_ColumnPropNameInRow="PROFILE_ID" msprop:Generator_UserColumnName="PROFILE_ID" msprop:Generator_ColumnVarNameInTable="columnPROFILE_ID" type="xs:int" />
+              <xs:element name="COPY_2_HDD" msprop:Generator_ColumnPropNameInTable="COPY_2_HDDColumn" msprop:Generator_ColumnPropNameInRow="COPY_2_HDD" msprop:Generator_UserColumnName="COPY_2_HDD" msprop:Generator_ColumnVarNameInTable="columnCOPY_2_HDD" type="xs:boolean" default="false" />
+              <xs:element name="WM_IMPORT" msprop:Generator_ColumnPropNameInTable="WM_IMPORTColumn" msprop:Generator_ColumnPropNameInRow="WM_IMPORT" msprop:Generator_UserColumnName="WM_IMPORT" msprop:Generator_ColumnVarNameInTable="columnWM_IMPORT" type="xs:boolean" default="false" />
+              <xs:element name="WM_OBJEKTTYPE" msprop:Generator_ColumnPropNameInTable="WM_OBJEKTTYPEColumn" msprop:Generator_ColumnPropNameInRow="WM_OBJEKTTYPE" msprop:Generator_UserColumnName="WM_OBJEKTTYPE" msprop:Generator_ColumnVarNameInTable="columnWM_OBJEKTTYPE" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="WM_VECTOR_LOG" msprop:Generator_ColumnVarNameInTable="columnWM_VECTOR_LOG" msprop:Generator_ColumnPropNameInRow="WM_VECTOR_LOG" msprop:Generator_ColumnPropNameInTable="WM_VECTOR_LOGColumn" msprop:Generator_UserColumnName="WM_VECTOR_LOG" minOccurs="0">
+              <xs:element name="WM_VECTOR_LOG" msprop:Generator_ColumnPropNameInTable="WM_VECTOR_LOGColumn" msprop:Generator_ColumnPropNameInRow="WM_VECTOR_LOG" msprop:Generator_UserColumnName="WM_VECTOR_LOG" msprop:Generator_ColumnVarNameInTable="columnWM_VECTOR_LOG" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="WM_PATH" msprop:Generator_ColumnVarNameInTable="columnWM_PATH" msprop:Generator_ColumnPropNameInRow="WM_PATH" msprop:Generator_ColumnPropNameInTable="WM_PATHColumn" msprop:Generator_UserColumnName="WM_PATH" minOccurs="0">
+              <xs:element name="WM_PATH" msprop:Generator_ColumnPropNameInTable="WM_PATHColumn" msprop:Generator_ColumnPropNameInRow="WM_PATH" msprop:Generator_UserColumnName="WM_PATH" msprop:Generator_ColumnVarNameInTable="columnWM_PATH" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="WM_FILE_NAME" msprop:Generator_ColumnVarNameInTable="columnWM_FILE_NAME" msprop:Generator_ColumnPropNameInRow="WM_FILE_NAME" msprop:Generator_ColumnPropNameInTable="WM_FILE_NAMEColumn" msprop:Generator_UserColumnName="WM_FILE_NAME" minOccurs="0">
+              <xs:element name="WM_FILE_NAME" msprop:Generator_ColumnPropNameInTable="WM_FILE_NAMEColumn" msprop:Generator_ColumnPropNameInRow="WM_FILE_NAME" msprop:Generator_UserColumnName="WM_FILE_NAME" msprop:Generator_ColumnVarNameInTable="columnWM_FILE_NAME" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="WM_REFERENCE_INDEX" msprop:Generator_ColumnVarNameInTable="columnWM_REFERENCE_INDEX" msprop:Generator_ColumnPropNameInRow="WM_REFERENCE_INDEX" msprop:Generator_ColumnPropNameInTable="WM_REFERENCE_INDEXColumn" msprop:Generator_UserColumnName="WM_REFERENCE_INDEX" minOccurs="0">
+              <xs:element name="WM_REFERENCE_INDEX" msprop:Generator_ColumnPropNameInTable="WM_REFERENCE_INDEXColumn" msprop:Generator_ColumnPropNameInRow="WM_REFERENCE_INDEX" msprop:Generator_UserColumnName="WM_REFERENCE_INDEX" msprop:Generator_ColumnVarNameInTable="columnWM_REFERENCE_INDEX" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="PATH_EMAIL_TEMP" msprop:Generator_ColumnVarNameInTable="columnPATH_EMAIL_TEMP" msprop:Generator_ColumnPropNameInRow="PATH_EMAIL_TEMP" msprop:Generator_ColumnPropNameInTable="PATH_EMAIL_TEMPColumn" msprop:Generator_UserColumnName="PATH_EMAIL_TEMP">
+              <xs:element name="PATH_EMAIL_TEMP" msprop:Generator_ColumnPropNameInTable="PATH_EMAIL_TEMPColumn" msprop:Generator_ColumnPropNameInRow="PATH_EMAIL_TEMP" msprop:Generator_UserColumnName="PATH_EMAIL_TEMP" msprop:Generator_ColumnVarNameInTable="columnPATH_EMAIL_TEMP">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="PATH_EMAIL_ERRORS" msprop:Generator_ColumnVarNameInTable="columnPATH_EMAIL_ERRORS" msprop:Generator_ColumnPropNameInRow="PATH_EMAIL_ERRORS" msprop:Generator_ColumnPropNameInTable="PATH_EMAIL_ERRORSColumn" msprop:Generator_UserColumnName="PATH_EMAIL_ERRORS">
+              <xs:element name="PATH_EMAIL_ERRORS" msprop:Generator_ColumnPropNameInTable="PATH_EMAIL_ERRORSColumn" msprop:Generator_ColumnPropNameInRow="PATH_EMAIL_ERRORS" msprop:Generator_UserColumnName="PATH_EMAIL_ERRORS" msprop:Generator_ColumnVarNameInTable="columnPATH_EMAIL_ERRORS">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="DELETE_MAIL" msprop:Generator_ColumnVarNameInTable="columnDELETE_MAIL" msprop:Generator_ColumnPropNameInRow="DELETE_MAIL" msprop:Generator_ColumnPropNameInTable="DELETE_MAILColumn" msprop:Generator_UserColumnName="DELETE_MAIL" type="xs:boolean" default="false" />
-              <xs:element name="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_UserColumnName="COMMENT" minOccurs="0">
+              <xs:element name="DELETE_MAIL" msprop:Generator_ColumnPropNameInTable="DELETE_MAILColumn" msprop:Generator_ColumnPropNameInRow="DELETE_MAIL" msprop:Generator_UserColumnName="DELETE_MAIL" msprop:Generator_ColumnVarNameInTable="columnDELETE_MAIL" type="xs:boolean" default="false" />
+              <xs:element name="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_UserColumnName="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="500" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" default="true" />
-              <xs:element name="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_UserColumnName="SEQUENCE" type="xs:int" minOccurs="0" />
-              <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO" minOccurs="0">
+              <xs:element name="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_UserColumnName="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" type="xs:boolean" default="true" />
+              <xs:element name="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_UserColumnName="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" type="xs:int" minOccurs="0" />
+              <xs:element name="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_UserColumnName="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
+              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_UserColumnName="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="WM_IDX_BODY_TEXT" msprop:Generator_ColumnVarNameInTable="columnWM_IDX_BODY_TEXT" msprop:Generator_ColumnPropNameInRow="WM_IDX_BODY_TEXT" msprop:Generator_ColumnPropNameInTable="WM_IDX_BODY_TEXTColumn" msprop:Generator_UserColumnName="WM_IDX_BODY_TEXT" default="">
+              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_UserColumnName="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="WM_IDX_BODY_TEXT" msprop:Generator_ColumnPropNameInTable="WM_IDX_BODY_TEXTColumn" msprop:Generator_ColumnPropNameInRow="WM_IDX_BODY_TEXT" msprop:Generator_UserColumnName="WM_IDX_BODY_TEXT" msprop:Generator_ColumnVarNameInTable="columnWM_IDX_BODY_TEXT" default="">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="WM_IDX_BODY_SUBSTR_LENGTH" msprop:Generator_ColumnVarNameInTable="columnWM_IDX_BODY_SUBSTR_LENGTH" msprop:Generator_ColumnPropNameInRow="WM_IDX_BODY_SUBSTR_LENGTH" msprop:Generator_ColumnPropNameInTable="WM_IDX_BODY_SUBSTR_LENGTHColumn" msprop:Generator_UserColumnName="WM_IDX_BODY_SUBSTR_LENGTH" type="xs:int" default="0" />
-              <xs:element name="PATH_ORIGINAL" msprop:Generator_ColumnVarNameInTable="columnPATH_ORIGINAL" msprop:Generator_ColumnPropNameInRow="PATH_ORIGINAL" msprop:Generator_ColumnPropNameInTable="PATH_ORIGINALColumn" msprop:Generator_UserColumnName="PATH_ORIGINAL" minOccurs="0">
+              <xs:element name="WM_IDX_BODY_SUBSTR_LENGTH" msprop:Generator_ColumnPropNameInTable="WM_IDX_BODY_SUBSTR_LENGTHColumn" msprop:Generator_ColumnPropNameInRow="WM_IDX_BODY_SUBSTR_LENGTH" msprop:Generator_UserColumnName="WM_IDX_BODY_SUBSTR_LENGTH" msprop:Generator_ColumnVarNameInTable="columnWM_IDX_BODY_SUBSTR_LENGTH" type="xs:int" default="0" />
+              <xs:element name="PATH_ORIGINAL" msprop:Generator_ColumnPropNameInTable="PATH_ORIGINALColumn" msprop:Generator_ColumnPropNameInRow="PATH_ORIGINAL" msprop:Generator_UserColumnName="PATH_ORIGINAL" msprop:Generator_ColumnVarNameInTable="columnPATH_ORIGINAL" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
+              <xs:element name="ALLOW_XML_RECEIPTS" msprop:Generator_ColumnPropNameInRow="ALLOW_XML_RECEIPTS" msprop:Generator_ColumnPropNameInTable="ALLOW_XML_RECEIPTSColumn" msprop:Generator_ColumnVarNameInTable="columnALLOW_XML_RECEIPTS" msprop:Generator_UserColumnName="ALLOW_XML_RECEIPTS" type="xs:boolean" minOccurs="0" />
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBEMLP_POLL_STEPS" msprop:Generator_TableClassName="TBEMLP_POLL_STEPSDataTable" msprop:Generator_TableVarName="tableTBEMLP_POLL_STEPS" msprop:Generator_TablePropName="TBEMLP_POLL_STEPS" msprop:Generator_RowDeletingName="TBEMLP_POLL_STEPSRowDeleting" msprop:Generator_RowChangingName="TBEMLP_POLL_STEPSRowChanging" msprop:Generator_RowEvHandlerName="TBEMLP_POLL_STEPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_POLL_STEPSRowDeleted" msprop:Generator_UserTableName="TBEMLP_POLL_STEPS" msprop:Generator_RowChangedName="TBEMLP_POLL_STEPSRowChanged" msprop:Generator_RowEvArgName="TBEMLP_POLL_STEPSRowChangeEvent" msprop:Generator_RowClassName="TBEMLP_POLL_STEPSRow">
+        <xs:element name="TBEMLP_POLL_STEPS" msprop:Generator_RowEvHandlerName="TBEMLP_POLL_STEPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_POLL_STEPSRowDeleted" msprop:Generator_RowDeletingName="TBEMLP_POLL_STEPSRowDeleting" msprop:Generator_RowEvArgName="TBEMLP_POLL_STEPSRowChangeEvent" msprop:Generator_TablePropName="TBEMLP_POLL_STEPS" msprop:Generator_RowChangedName="TBEMLP_POLL_STEPSRowChanged" msprop:Generator_UserTableName="TBEMLP_POLL_STEPS" msprop:Generator_RowChangingName="TBEMLP_POLL_STEPSRowChanging" msprop:Generator_RowClassName="TBEMLP_POLL_STEPSRow" msprop:Generator_TableClassName="TBEMLP_POLL_STEPSDataTable" msprop:Generator_TableVarName="tableTBEMLP_POLL_STEPS">
           <xs:complexType>
             <xs:sequence>
-              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
-              <xs:element name="PROCESS_ID" msprop:Generator_ColumnVarNameInTable="columnPROCESS_ID" msprop:Generator_ColumnPropNameInRow="PROCESS_ID" msprop:Generator_ColumnPropNameInTable="PROCESS_IDColumn" msprop:Generator_UserColumnName="PROCESS_ID" type="xs:int" />
-              <xs:element name="STEP_NAME" msprop:Generator_ColumnVarNameInTable="columnSTEP_NAME" msprop:Generator_ColumnPropNameInRow="STEP_NAME" msprop:Generator_ColumnPropNameInTable="STEP_NAMEColumn" msprop:Generator_UserColumnName="STEP_NAME">
+              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_UserColumnName="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" type="xs:int" />
+              <xs:element name="PROCESS_ID" msprop:Generator_ColumnPropNameInTable="PROCESS_IDColumn" msprop:Generator_ColumnPropNameInRow="PROCESS_ID" msprop:Generator_UserColumnName="PROCESS_ID" msprop:Generator_ColumnVarNameInTable="columnPROCESS_ID" type="xs:int" />
+              <xs:element name="STEP_NAME" msprop:Generator_ColumnPropNameInTable="STEP_NAMEColumn" msprop:Generator_ColumnPropNameInRow="STEP_NAME" msprop:Generator_UserColumnName="STEP_NAME" msprop:Generator_ColumnVarNameInTable="columnSTEP_NAME">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="KEYWORDS_BODY" msprop:Generator_ColumnVarNameInTable="columnKEYWORDS_BODY" msprop:Generator_ColumnPropNameInRow="KEYWORDS_BODY" msprop:Generator_ColumnPropNameInTable="KEYWORDS_BODYColumn" msprop:Generator_UserColumnName="KEYWORDS_BODY" minOccurs="0">
+              <xs:element name="KEYWORDS_BODY" msprop:Generator_ColumnPropNameInTable="KEYWORDS_BODYColumn" msprop:Generator_ColumnPropNameInRow="KEYWORDS_BODY" msprop:Generator_UserColumnName="KEYWORDS_BODY" msprop:Generator_ColumnVarNameInTable="columnKEYWORDS_BODY" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_UserColumnName="COMMENT" minOccurs="0">
+              <xs:element name="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_UserColumnName="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="500" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" default="true" />
-              <xs:element name="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_UserColumnName="SEQUENCE" type="xs:int" minOccurs="0" />
-              <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO" minOccurs="0">
+              <xs:element name="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_UserColumnName="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" type="xs:boolean" default="true" />
+              <xs:element name="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_UserColumnName="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" type="xs:int" minOccurs="0" />
+              <xs:element name="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_UserColumnName="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
+              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_UserColumnName="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_UserColumnName="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBEMLP_POLL_INDEXING_STEPS" msprop:Generator_TableClassName="TBEMLP_POLL_INDEXING_STEPSDataTable" msprop:Generator_TableVarName="tableTBEMLP_POLL_INDEXING_STEPS" msprop:Generator_TablePropName="TBEMLP_POLL_INDEXING_STEPS" msprop:Generator_RowDeletingName="TBEMLP_POLL_INDEXING_STEPSRowDeleting" msprop:Generator_RowChangingName="TBEMLP_POLL_INDEXING_STEPSRowChanging" msprop:Generator_RowEvHandlerName="TBEMLP_POLL_INDEXING_STEPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_POLL_INDEXING_STEPSRowDeleted" msprop:Generator_UserTableName="TBEMLP_POLL_INDEXING_STEPS" msprop:Generator_RowChangedName="TBEMLP_POLL_INDEXING_STEPSRowChanged" msprop:Generator_RowEvArgName="TBEMLP_POLL_INDEXING_STEPSRowChangeEvent" msprop:Generator_RowClassName="TBEMLP_POLL_INDEXING_STEPSRow">
+        <xs:element name="TBEMLP_POLL_INDEXING_STEPS" msprop:Generator_RowEvHandlerName="TBEMLP_POLL_INDEXING_STEPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_POLL_INDEXING_STEPSRowDeleted" msprop:Generator_RowDeletingName="TBEMLP_POLL_INDEXING_STEPSRowDeleting" msprop:Generator_RowEvArgName="TBEMLP_POLL_INDEXING_STEPSRowChangeEvent" msprop:Generator_TablePropName="TBEMLP_POLL_INDEXING_STEPS" msprop:Generator_RowChangedName="TBEMLP_POLL_INDEXING_STEPSRowChanged" msprop:Generator_UserTableName="TBEMLP_POLL_INDEXING_STEPS" msprop:Generator_RowChangingName="TBEMLP_POLL_INDEXING_STEPSRowChanging" msprop:Generator_RowClassName="TBEMLP_POLL_INDEXING_STEPSRow" msprop:Generator_TableClassName="TBEMLP_POLL_INDEXING_STEPSDataTable" msprop:Generator_TableVarName="tableTBEMLP_POLL_INDEXING_STEPS">
           <xs:complexType>
             <xs:sequence>
-              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
-              <xs:element name="STEP_ID" msprop:Generator_ColumnVarNameInTable="columnSTEP_ID" msprop:Generator_ColumnPropNameInRow="STEP_ID" msprop:Generator_ColumnPropNameInTable="STEP_IDColumn" msprop:Generator_UserColumnName="STEP_ID" type="xs:int" />
-              <xs:element name="INDEXNAME" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_UserColumnName="INDEXNAME">
+              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_UserColumnName="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" type="xs:short" />
+              <xs:element name="STEP_ID" msprop:Generator_ColumnPropNameInTable="STEP_IDColumn" msprop:Generator_ColumnPropNameInRow="STEP_ID" msprop:Generator_UserColumnName="STEP_ID" msprop:Generator_ColumnVarNameInTable="columnSTEP_ID" type="xs:int" />
+              <xs:element name="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_UserColumnName="INDEXNAME" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="INDEXVALUE" msprop:Generator_ColumnVarNameInTable="columnINDEXVALUE" msprop:Generator_ColumnPropNameInRow="INDEXVALUE" msprop:Generator_ColumnPropNameInTable="INDEXVALUEColumn" msprop:Generator_UserColumnName="INDEXVALUE">
+              <xs:element name="INDEXVALUE" msprop:Generator_ColumnPropNameInTable="INDEXVALUEColumn" msprop:Generator_ColumnPropNameInRow="INDEXVALUE" msprop:Generator_UserColumnName="INDEXVALUE" msprop:Generator_ColumnVarNameInTable="columnINDEXVALUE">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" default="true" />
-              <xs:element name="USE_FOR_DIRECT_ANSWER" msprop:Generator_ColumnVarNameInTable="columnUSE_FOR_DIRECT_ANSWER" msprop:Generator_ColumnPropNameInRow="USE_FOR_DIRECT_ANSWER" msprop:Generator_ColumnPropNameInTable="USE_FOR_DIRECT_ANSWERColumn" msprop:Generator_UserColumnName="USE_FOR_DIRECT_ANSWER" type="xs:boolean" default="false" />
-              <xs:element name="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_UserColumnName="SEQUENCE" type="xs:int" default="0" minOccurs="0" />
-              <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO" minOccurs="0">
+              <xs:element name="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_UserColumnName="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" type="xs:boolean" default="true" />
+              <xs:element name="USE_FOR_DIRECT_ANSWER" msprop:Generator_ColumnPropNameInTable="USE_FOR_DIRECT_ANSWERColumn" msprop:Generator_ColumnPropNameInRow="USE_FOR_DIRECT_ANSWER" msprop:Generator_UserColumnName="USE_FOR_DIRECT_ANSWER" msprop:Generator_ColumnVarNameInTable="columnUSE_FOR_DIRECT_ANSWER" type="xs:boolean" default="false" />
+              <xs:element name="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_UserColumnName="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" type="xs:int" default="0" minOccurs="0" />
+              <xs:element name="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_UserColumnName="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
+              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_UserColumnName="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_UserColumnName="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBEMLP_HISTORY" msprop:Generator_TableClassName="TBEMLP_HISTORYDataTable" msprop:Generator_TableVarName="tableTBEMLP_HISTORY" msprop:Generator_RowChangedName="TBEMLP_HISTORYRowChanged" msprop:Generator_TablePropName="TBEMLP_HISTORY" msprop:Generator_RowDeletingName="TBEMLP_HISTORYRowDeleting" msprop:Generator_RowChangingName="TBEMLP_HISTORYRowChanging" msprop:Generator_RowEvHandlerName="TBEMLP_HISTORYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_HISTORYRowDeleted" msprop:Generator_RowClassName="TBEMLP_HISTORYRow" msprop:Generator_UserTableName="TBEMLP_HISTORY" msprop:Generator_RowEvArgName="TBEMLP_HISTORYRowChangeEvent">
+        <xs:element name="TBEMLP_HISTORY" msprop:Generator_RowEvHandlerName="TBEMLP_HISTORYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_HISTORYRowDeleted" msprop:Generator_RowDeletingName="TBEMLP_HISTORYRowDeleting" msprop:Generator_RowEvArgName="TBEMLP_HISTORYRowChangeEvent" msprop:Generator_TablePropName="TBEMLP_HISTORY" msprop:Generator_RowChangedName="TBEMLP_HISTORYRowChanged" msprop:Generator_UserTableName="TBEMLP_HISTORY" msprop:Generator_RowChangingName="TBEMLP_HISTORYRowChanging" msprop:Generator_RowClassName="TBEMLP_HISTORYRow" msprop:Generator_TableClassName="TBEMLP_HISTORYDataTable" msprop:Generator_TableVarName="tableTBEMLP_HISTORY">
           <xs:complexType>
             <xs:sequence>
-              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
-              <xs:element name="WORK_PROCESS" msprop:Generator_ColumnVarNameInTable="columnWORK_PROCESS" msprop:Generator_ColumnPropNameInRow="WORK_PROCESS" msprop:Generator_ColumnPropNameInTable="WORK_PROCESSColumn" msprop:Generator_UserColumnName="WORK_PROCESS" minOccurs="0">
+              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_UserColumnName="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" type="xs:int" />
+              <xs:element name="WORK_PROCESS" msprop:Generator_ColumnPropNameInTable="WORK_PROCESSColumn" msprop:Generator_ColumnPropNameInRow="WORK_PROCESS" msprop:Generator_UserColumnName="WORK_PROCESS" msprop:Generator_ColumnVarNameInTable="columnWORK_PROCESS" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_MSGID" msprop:Generator_ColumnVarNameInTable="columnEMAIL_MSGID" msprop:Generator_ColumnPropNameInRow="EMAIL_MSGID" msprop:Generator_ColumnPropNameInTable="EMAIL_MSGIDColumn" msprop:Generator_UserColumnName="EMAIL_MSGID">
+              <xs:element name="EMAIL_MSGID" msprop:Generator_ColumnPropNameInTable="EMAIL_MSGIDColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_MSGID" msprop:Generator_UserColumnName="EMAIL_MSGID" msprop:Generator_ColumnVarNameInTable="columnEMAIL_MSGID">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="500" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_SUBJECT" msprop:Generator_ColumnVarNameInTable="columnEMAIL_SUBJECT" msprop:Generator_ColumnPropNameInRow="EMAIL_SUBJECT" msprop:Generator_ColumnPropNameInTable="EMAIL_SUBJECTColumn" msprop:Generator_UserColumnName="EMAIL_SUBJECT" minOccurs="0">
+              <xs:element name="EMAIL_SUBJECT" msprop:Generator_ColumnPropNameInTable="EMAIL_SUBJECTColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_SUBJECT" msprop:Generator_UserColumnName="EMAIL_SUBJECT" msprop:Generator_ColumnVarNameInTable="columnEMAIL_SUBJECT" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="2147483647" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_DATE" msprop:Generator_ColumnVarNameInTable="columnEMAIL_DATE" msprop:Generator_ColumnPropNameInRow="EMAIL_DATE" msprop:Generator_ColumnPropNameInTable="EMAIL_DATEColumn" msprop:Generator_UserColumnName="EMAIL_DATE" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="EMAIL_BODY" msprop:Generator_ColumnVarNameInTable="columnEMAIL_BODY" msprop:Generator_ColumnPropNameInRow="EMAIL_BODY" msprop:Generator_ColumnPropNameInTable="EMAIL_BODYColumn" msprop:Generator_UserColumnName="EMAIL_BODY" minOccurs="0">
+              <xs:element name="EMAIL_DATE" msprop:Generator_ColumnPropNameInTable="EMAIL_DATEColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_DATE" msprop:Generator_UserColumnName="EMAIL_DATE" msprop:Generator_ColumnVarNameInTable="columnEMAIL_DATE" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="EMAIL_BODY" msprop:Generator_ColumnPropNameInTable="EMAIL_BODYColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_BODY" msprop:Generator_UserColumnName="EMAIL_BODY" msprop:Generator_ColumnVarNameInTable="columnEMAIL_BODY" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="2147483647" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_SUBSTRING1" msprop:Generator_ColumnVarNameInTable="columnEMAIL_SUBSTRING1" msprop:Generator_ColumnPropNameInRow="EMAIL_SUBSTRING1" msprop:Generator_ColumnPropNameInTable="EMAIL_SUBSTRING1Column" msprop:Generator_UserColumnName="EMAIL_SUBSTRING1" minOccurs="0">
+              <xs:element name="EMAIL_SUBSTRING1" msprop:Generator_ColumnPropNameInTable="EMAIL_SUBSTRING1Column" msprop:Generator_ColumnPropNameInRow="EMAIL_SUBSTRING1" msprop:Generator_UserColumnName="EMAIL_SUBSTRING1" msprop:Generator_ColumnVarNameInTable="columnEMAIL_SUBSTRING1" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="2000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_SUBSTRING2" msprop:Generator_ColumnVarNameInTable="columnEMAIL_SUBSTRING2" msprop:Generator_ColumnPropNameInRow="EMAIL_SUBSTRING2" msprop:Generator_ColumnPropNameInTable="EMAIL_SUBSTRING2Column" msprop:Generator_UserColumnName="EMAIL_SUBSTRING2" minOccurs="0">
+              <xs:element name="EMAIL_SUBSTRING2" msprop:Generator_ColumnPropNameInTable="EMAIL_SUBSTRING2Column" msprop:Generator_ColumnPropNameInRow="EMAIL_SUBSTRING2" msprop:Generator_UserColumnName="EMAIL_SUBSTRING2" msprop:Generator_ColumnVarNameInTable="columnEMAIL_SUBSTRING2" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="2000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_UserColumnName="COMMENT" minOccurs="0">
+              <xs:element name="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_UserColumnName="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="500" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" type="xs:dateTime" minOccurs="0" />
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBEMLP_CONFIG" msprop:Generator_TableClassName="TBEMLP_CONFIGDataTable" msprop:Generator_TableVarName="tableTBEMLP_CONFIG" msprop:Generator_RowChangedName="TBEMLP_CONFIGRowChanged" msprop:Generator_TablePropName="TBEMLP_CONFIG" msprop:Generator_RowDeletingName="TBEMLP_CONFIGRowDeleting" msprop:Generator_RowChangingName="TBEMLP_CONFIGRowChanging" msprop:Generator_RowEvHandlerName="TBEMLP_CONFIGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_CONFIGRowDeleted" msprop:Generator_RowClassName="TBEMLP_CONFIGRow" msprop:Generator_UserTableName="TBEMLP_CONFIG" msprop:Generator_RowEvArgName="TBEMLP_CONFIGRowChangeEvent">
+        <xs:element name="TBEMLP_CONFIG" msprop:Generator_RowEvHandlerName="TBEMLP_CONFIGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEMLP_CONFIGRowDeleted" msprop:Generator_RowDeletingName="TBEMLP_CONFIGRowDeleting" msprop:Generator_RowEvArgName="TBEMLP_CONFIGRowChangeEvent" msprop:Generator_TablePropName="TBEMLP_CONFIG" msprop:Generator_RowChangedName="TBEMLP_CONFIGRowChanged" msprop:Generator_UserTableName="TBEMLP_CONFIG" msprop:Generator_RowChangingName="TBEMLP_CONFIGRowChanging" msprop:Generator_RowClassName="TBEMLP_CONFIGRow" msprop:Generator_TableClassName="TBEMLP_CONFIGDataTable" msprop:Generator_TableVarName="tableTBEMLP_CONFIG">
           <xs:complexType>
             <xs:sequence>
-              <xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:unsignedByte" />
-              <xs:element name="FONT_BODY" msprop:Generator_ColumnVarNameInTable="columnFONT_BODY" msprop:Generator_ColumnPropNameInRow="FONT_BODY" msprop:Generator_ColumnPropNameInTable="FONT_BODYColumn" msprop:Generator_UserColumnName="FONT_BODY">
+              <xs:element name="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_UserColumnName="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" type="xs:unsignedByte" />
+              <xs:element name="FONT_BODY" msprop:Generator_ColumnPropNameInTable="FONT_BODYColumn" msprop:Generator_ColumnPropNameInRow="FONT_BODY" msprop:Generator_UserColumnName="FONT_BODY" msprop:Generator_ColumnVarNameInTable="columnFONT_BODY">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="LOG_ERRORS_ONLY" msprop:Generator_ColumnVarNameInTable="columnLOG_ERRORS_ONLY" msprop:Generator_ColumnPropNameInRow="LOG_ERRORS_ONLY" msprop:Generator_ColumnPropNameInTable="LOG_ERRORS_ONLYColumn" msprop:Generator_UserColumnName="LOG_ERRORS_ONLY" type="xs:boolean" />
-              <xs:element name="CHECK_INTERVALL_MINUTES" msprop:Generator_ColumnVarNameInTable="columnCHECK_INTERVALL_MINUTES" msprop:Generator_ColumnPropNameInRow="CHECK_INTERVALL_MINUTES" msprop:Generator_ColumnPropNameInTable="CHECK_INTERVALL_MINUTESColumn" msprop:Generator_UserColumnName="CHECK_INTERVALL_MINUTES" type="xs:int" />
-              <xs:element name="LAST_TICK" msprop:Generator_ColumnVarNameInTable="columnLAST_TICK" msprop:Generator_ColumnPropNameInRow="LAST_TICK" msprop:Generator_ColumnPropNameInTable="LAST_TICKColumn" msprop:Generator_UserColumnName="LAST_TICK" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="PATH_EMAIL_TEMP" msprop:Generator_ColumnVarNameInTable="columnPATH_EMAIL_TEMP" msprop:Generator_ColumnPropNameInRow="PATH_EMAIL_TEMP" msprop:Generator_ColumnPropNameInTable="PATH_EMAIL_TEMPColumn" msprop:Generator_UserColumnName="PATH_EMAIL_TEMP">
+              <xs:element name="LOG_ERRORS_ONLY" msprop:Generator_ColumnPropNameInTable="LOG_ERRORS_ONLYColumn" msprop:Generator_ColumnPropNameInRow="LOG_ERRORS_ONLY" msprop:Generator_UserColumnName="LOG_ERRORS_ONLY" msprop:Generator_ColumnVarNameInTable="columnLOG_ERRORS_ONLY" type="xs:boolean" />
+              <xs:element name="CHECK_INTERVALL_MINUTES" msprop:Generator_ColumnPropNameInTable="CHECK_INTERVALL_MINUTESColumn" msprop:Generator_ColumnPropNameInRow="CHECK_INTERVALL_MINUTES" msprop:Generator_UserColumnName="CHECK_INTERVALL_MINUTES" msprop:Generator_ColumnVarNameInTable="columnCHECK_INTERVALL_MINUTES" type="xs:int" />
+              <xs:element name="LAST_TICK" msprop:Generator_ColumnPropNameInTable="LAST_TICKColumn" msprop:Generator_ColumnPropNameInRow="LAST_TICK" msprop:Generator_UserColumnName="LAST_TICK" msprop:Generator_ColumnVarNameInTable="columnLAST_TICK" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="PATH_EMAIL_TEMP" msprop:Generator_ColumnPropNameInTable="PATH_EMAIL_TEMPColumn" msprop:Generator_ColumnPropNameInRow="PATH_EMAIL_TEMP" msprop:Generator_UserColumnName="PATH_EMAIL_TEMP" msprop:Generator_ColumnVarNameInTable="columnPATH_EMAIL_TEMP">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="PATH_EMAIL_ERRORS" msprop:Generator_ColumnVarNameInTable="columnPATH_EMAIL_ERRORS" msprop:Generator_ColumnPropNameInRow="PATH_EMAIL_ERRORS" msprop:Generator_ColumnPropNameInTable="PATH_EMAIL_ERRORSColumn" msprop:Generator_UserColumnName="PATH_EMAIL_ERRORS">
+              <xs:element name="PATH_EMAIL_ERRORS" msprop:Generator_ColumnPropNameInTable="PATH_EMAIL_ERRORSColumn" msprop:Generator_ColumnPropNameInRow="PATH_EMAIL_ERRORS" msprop:Generator_UserColumnName="PATH_EMAIL_ERRORS" msprop:Generator_ColumnVarNameInTable="columnPATH_EMAIL_ERRORS">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="WM_CON_STRING" msprop:Generator_ColumnVarNameInTable="columnWM_CON_STRING" msprop:Generator_ColumnPropNameInRow="WM_CON_STRING" msprop:Generator_ColumnPropNameInTable="WM_CON_STRINGColumn" msprop:Generator_UserColumnName="WM_CON_STRING">
+              <xs:element name="WM_CON_STRING" msprop:Generator_ColumnPropNameInTable="WM_CON_STRINGColumn" msprop:Generator_ColumnPropNameInRow="WM_CON_STRING" msprop:Generator_UserColumnName="WM_CON_STRING" msprop:Generator_ColumnVarNameInTable="columnWM_CON_STRING">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
+              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_UserColumnName="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_UserColumnName="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBDD_EMAIL_ACCOUNT" msprop:Generator_TableClassName="TBDD_EMAIL_ACCOUNTDataTable" msprop:Generator_TableVarName="tableTBDD_EMAIL_ACCOUNT" msprop:Generator_RowChangedName="TBDD_EMAIL_ACCOUNTRowChanged" msprop:Generator_TablePropName="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowDeletingName="TBDD_EMAIL_ACCOUNTRowDeleting" msprop:Generator_RowChangingName="TBDD_EMAIL_ACCOUNTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_EMAIL_ACCOUNTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EMAIL_ACCOUNTRowDeleted" msprop:Generator_RowClassName="TBDD_EMAIL_ACCOUNTRow" msprop:Generator_UserTableName="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowEvArgName="TBDD_EMAIL_ACCOUNTRowChangeEvent">
+        <xs:element name="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowEvHandlerName="TBDD_EMAIL_ACCOUNTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EMAIL_ACCOUNTRowDeleted" msprop:Generator_RowDeletingName="TBDD_EMAIL_ACCOUNTRowDeleting" msprop:Generator_RowEvArgName="TBDD_EMAIL_ACCOUNTRowChangeEvent" msprop:Generator_TablePropName="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowChangedName="TBDD_EMAIL_ACCOUNTRowChanged" msprop:Generator_UserTableName="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowChangingName="TBDD_EMAIL_ACCOUNTRowChanging" msprop:Generator_RowClassName="TBDD_EMAIL_ACCOUNTRow" msprop:Generator_TableClassName="TBDD_EMAIL_ACCOUNTDataTable" msprop:Generator_TableVarName="tableTBDD_EMAIL_ACCOUNT">
           <xs:complexType>
             <xs:sequence>
-              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
-              <xs:element name="NAME" msprop:Generator_ColumnVarNameInTable="columnNAME" msprop:Generator_ColumnPropNameInRow="NAME" msprop:Generator_ColumnPropNameInTable="NAMEColumn" msprop:Generator_UserColumnName="NAME" minOccurs="0">
+              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_UserColumnName="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" type="xs:int" />
+              <xs:element name="NAME" msprop:Generator_ColumnPropNameInTable="NAMEColumn" msprop:Generator_ColumnPropNameInRow="NAME" msprop:Generator_UserColumnName="NAME" msprop:Generator_ColumnVarNameInTable="columnNAME" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_FROM" msprop:Generator_ColumnVarNameInTable="columnEMAIL_FROM" msprop:Generator_ColumnPropNameInRow="EMAIL_FROM" msprop:Generator_ColumnPropNameInTable="EMAIL_FROMColumn" msprop:Generator_UserColumnName="EMAIL_FROM">
+              <xs:element name="EMAIL_FROM" msprop:Generator_ColumnPropNameInTable="EMAIL_FROMColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_FROM" msprop:Generator_UserColumnName="EMAIL_FROM" msprop:Generator_ColumnVarNameInTable="columnEMAIL_FROM">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_SMTP" msprop:Generator_ColumnVarNameInTable="columnEMAIL_SMTP" msprop:Generator_ColumnPropNameInRow="EMAIL_SMTP" msprop:Generator_ColumnPropNameInTable="EMAIL_SMTPColumn" msprop:Generator_UserColumnName="EMAIL_SMTP">
+              <xs:element name="EMAIL_SMTP" msprop:Generator_ColumnPropNameInTable="EMAIL_SMTPColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_SMTP" msprop:Generator_UserColumnName="EMAIL_SMTP" msprop:Generator_ColumnVarNameInTable="columnEMAIL_SMTP">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_USER" msprop:Generator_ColumnVarNameInTable="columnEMAIL_USER" msprop:Generator_ColumnPropNameInRow="EMAIL_USER" msprop:Generator_ColumnPropNameInTable="EMAIL_USERColumn" msprop:Generator_UserColumnName="EMAIL_USER">
+              <xs:element name="EMAIL_USER" msprop:Generator_ColumnPropNameInTable="EMAIL_USERColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_USER" msprop:Generator_UserColumnName="EMAIL_USER" msprop:Generator_ColumnVarNameInTable="columnEMAIL_USER">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="EMAIL_PW" msprop:Generator_ColumnVarNameInTable="columnEMAIL_PW" msprop:Generator_ColumnPropNameInRow="EMAIL_PW" msprop:Generator_ColumnPropNameInTable="EMAIL_PWColumn" msprop:Generator_UserColumnName="EMAIL_PW" default="">
+              <xs:element name="EMAIL_PW" msprop:Generator_ColumnPropNameInTable="EMAIL_PWColumn" msprop:Generator_ColumnPropNameInRow="EMAIL_PW" msprop:Generator_UserColumnName="EMAIL_PW" msprop:Generator_ColumnVarNameInTable="columnEMAIL_PW" default="">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="1000" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="PORT" msprop:Generator_ColumnVarNameInTable="columnPORT" msprop:Generator_ColumnPropNameInRow="PORT" msprop:Generator_ColumnPropNameInTable="PORTColumn" msprop:Generator_UserColumnName="PORT" type="xs:int" default="25" />
-              <xs:element name="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" default="false" />
-              <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO" minOccurs="0">
+              <xs:element name="PORT" msprop:Generator_ColumnPropNameInTable="PORTColumn" msprop:Generator_ColumnPropNameInRow="PORT" msprop:Generator_UserColumnName="PORT" msprop:Generator_ColumnVarNameInTable="columnPORT" type="xs:int" default="25" />
+              <xs:element name="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_UserColumnName="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" type="xs:boolean" default="false" />
+              <xs:element name="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_UserColumnName="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
+              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" type="xs:dateTime" minOccurs="0" />
+              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_UserColumnName="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" default="1900-01-01T00:00:00+01:00" minOccurs="0" />
-              <xs:element name="SSL_AUTH" msprop:Generator_ColumnVarNameInTable="columnSSL_AUTH" msprop:Generator_ColumnPropNameInRow="SSL_AUTH" msprop:Generator_ColumnPropNameInTable="SSL_AUTHColumn" msprop:Generator_UserColumnName="SSL_AUTH" type="xs:boolean" default="true" />
-              <xs:element name="AUTH_TYPE" msprop:Generator_ColumnVarNameInTable="columnAUTH_TYPE" msprop:Generator_ColumnPropNameInRow="AUTH_TYPE" msprop:Generator_ColumnPropNameInTable="AUTH_TYPEColumn" msprop:Generator_UserColumnName="AUTH_TYPE" default="SSL" minOccurs="0">
+              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_UserColumnName="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" type="xs:dateTime" default="1900-01-01T00:00:00+01:00" minOccurs="0" />
+              <xs:element name="SSL_AUTH" msprop:Generator_ColumnPropNameInTable="SSL_AUTHColumn" msprop:Generator_ColumnPropNameInRow="SSL_AUTH" msprop:Generator_UserColumnName="SSL_AUTH" msprop:Generator_ColumnVarNameInTable="columnSSL_AUTH" type="xs:boolean" default="true" />
+              <xs:element name="AUTH_TYPE" msprop:Generator_ColumnPropNameInTable="AUTH_TYPEColumn" msprop:Generator_ColumnPropNameInRow="AUTH_TYPE" msprop:Generator_UserColumnName="AUTH_TYPE" msprop:Generator_ColumnVarNameInTable="columnAUTH_TYPE" default="SSL" minOccurs="0">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="50" />
                   </xs:restriction>
                 </xs:simpleType>
               </xs:element>
-              <xs:element name="PORT_IN" msprop:Generator_ColumnVarNameInTable="columnPORT_IN" msprop:Generator_ColumnPropNameInRow="PORT_IN" msprop:Generator_ColumnPropNameInTable="PORT_INColumn" msprop:Generator_UserColumnName="PORT_IN" type="xs:int" default="25" />
-              <xs:element name="ARCHIVE_FOLDER" msprop:Generator_ColumnVarNameInTable="columnARCHIVE_FOLDER" msprop:Generator_ColumnPropNameInRow="ARCHIVE_FOLDER" msprop:Generator_ColumnPropNameInTable="ARCHIVE_FOLDERColumn" msprop:Generator_UserColumnName="ARCHIVE_FOLDER">
+              <xs:element name="PORT_IN" msprop:Generator_ColumnPropNameInTable="PORT_INColumn" msprop:Generator_ColumnPropNameInRow="PORT_IN" msprop:Generator_UserColumnName="PORT_IN" msprop:Generator_ColumnVarNameInTable="columnPORT_IN" type="xs:int" default="25" />
+              <xs:element name="ARCHIVE_FOLDER" msprop:Generator_ColumnPropNameInTable="ARCHIVE_FOLDERColumn" msprop:Generator_ColumnPropNameInRow="ARCHIVE_FOLDER" msprop:Generator_UserColumnName="ARCHIVE_FOLDER" msprop:Generator_ColumnVarNameInTable="columnARCHIVE_FOLDER" default="">
                 <xs:simpleType>
                   <xs:restriction base="xs:string">
                     <xs:maxLength value="100" />
@@ -1069,9 +1148,9 @@ SELECT GUID, NAME, EMAIL_FROM, EMAIL_SMTP, EMAIL_USER, EMAIL_PW, PORT, ACTIVE, A
   </xs:element>
   <xs:annotation>
     <xs:appinfo>
-      <msdata:Relationship name="FK_TBEMLP_POLL_PROCESS_PROFILE_ID" msdata:parent="TBEMLP_POLL_PROFILES" msdata:child="TBEMLP_POLL_PROCESS" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBEMLP_POLL_PROCESS" msprop:Generator_ChildPropName="GetTBEMLP_POLL_PROCESSRows" msprop:Generator_UserRelationName="FK_TBEMLP_POLL_PROCESS_PROFILE_ID" msprop:Generator_ParentPropName="TBEMLP_POLL_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBEMLP_POLL_PROCESS_PROFILE_ID" msprop:Generator_UserParentTable="TBEMLP_POLL_PROFILES" />
-      <msdata:Relationship name="FK_TBEMLP_POLL_STEPS_PROCESS_ID" msdata:parent="TBEMLP_POLL_PROCESS" msdata:child="TBEMLP_POLL_STEPS" msdata:parentkey="GUID" msdata:childkey="PROCESS_ID" msprop:Generator_UserChildTable="TBEMLP_POLL_STEPS" msprop:Generator_ChildPropName="GetTBEMLP_POLL_STEPSRows" msprop:Generator_UserRelationName="FK_TBEMLP_POLL_STEPS_PROCESS_ID" msprop:Generator_ParentPropName="TBEMLP_POLL_PROCESSRow" msprop:Generator_RelationVarName="relationFK_TBEMLP_POLL_STEPS_PROCESS_ID" msprop:Generator_UserParentTable="TBEMLP_POLL_PROCESS" />
-      <msdata:Relationship name="FK_TBEMLP_POLL_INDEXING_STEPS_STEP_ID" msdata:parent="TBEMLP_POLL_STEPS" msdata:child="TBEMLP_POLL_INDEXING_STEPS" msdata:parentkey="GUID" msdata:childkey="STEP_ID" msprop:Generator_UserChildTable="TBEMLP_POLL_INDEXING_STEPS" msprop:Generator_ChildPropName="GetTBEMLP_POLL_INDEXING_STEPSRows" msprop:Generator_UserRelationName="FK_TBEMLP_POLL_INDEXING_STEPS_STEP_ID" msprop:Generator_ParentPropName="TBEMLP_POLL_STEPSRow" msprop:Generator_RelationVarName="relationFK_TBEMLP_POLL_INDEXING_STEPS_STEP_ID" msprop:Generator_UserParentTable="TBEMLP_POLL_STEPS" />
+      <msdata:Relationship name="FK_TBEMLP_POLL_PROCESS_PROFILE_ID" msdata:parent="TBEMLP_POLL_PROFILES" msdata:child="TBEMLP_POLL_PROCESS" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserParentTable="TBEMLP_POLL_PROFILES" msprop:Generator_UserChildTable="TBEMLP_POLL_PROCESS" msprop:Generator_RelationVarName="relationFK_TBEMLP_POLL_PROCESS_PROFILE_ID" msprop:Generator_ChildPropName="GetTBEMLP_POLL_PROCESSRows" msprop:Generator_ParentPropName="TBEMLP_POLL_PROFILESRow" msprop:Generator_UserRelationName="FK_TBEMLP_POLL_PROCESS_PROFILE_ID" />
+      <msdata:Relationship name="FK_TBEMLP_POLL_STEPS_PROCESS_ID" msdata:parent="TBEMLP_POLL_PROCESS" msdata:child="TBEMLP_POLL_STEPS" msdata:parentkey="GUID" msdata:childkey="PROCESS_ID" msprop:Generator_UserParentTable="TBEMLP_POLL_PROCESS" msprop:Generator_UserChildTable="TBEMLP_POLL_STEPS" msprop:Generator_RelationVarName="relationFK_TBEMLP_POLL_STEPS_PROCESS_ID" msprop:Generator_ChildPropName="GetTBEMLP_POLL_STEPSRows" msprop:Generator_ParentPropName="TBEMLP_POLL_PROCESSRow" msprop:Generator_UserRelationName="FK_TBEMLP_POLL_STEPS_PROCESS_ID" />
+      <msdata:Relationship name="FK_TBEMLP_POLL_INDEXING_STEPS_STEP_ID" msdata:parent="TBEMLP_POLL_STEPS" msdata:child="TBEMLP_POLL_INDEXING_STEPS" msdata:parentkey="GUID" msdata:childkey="STEP_ID" msprop:Generator_UserParentTable="TBEMLP_POLL_STEPS" msprop:Generator_UserChildTable="TBEMLP_POLL_INDEXING_STEPS" msprop:Generator_RelationVarName="relationFK_TBEMLP_POLL_INDEXING_STEPS_STEP_ID" msprop:Generator_ChildPropName="GetTBEMLP_POLL_INDEXING_STEPSRows" msprop:Generator_ParentPropName="TBEMLP_POLL_STEPSRow" msprop:Generator_UserRelationName="FK_TBEMLP_POLL_INDEXING_STEPS_STEP_ID" />
     </xs:appinfo>
   </xs:annotation>
 </xs:schema>

App/EmailProfiler.Form/MyDataset.xss

@@ -4,15 +4,15 @@
      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="-10" ViewPortY="13" 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="-10" ViewPortY="13" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
   <Shapes>
     <Shape ID="DesignTable:TBEMLP_POLL_PROFILES" ZOrder="10" X="21" Y="23" Height="305" Width="287" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
     <Shape ID="DesignTable:TBEMLP_POLL_PROCESS" ZOrder="9" X="354" Y="46" Height="305" Width="285" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
     <Shape ID="DesignTable:TBEMLP_POLL_STEPS" ZOrder="7" X="690" Y="111" Height="286" Width="267" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
     <Shape ID="DesignTable:TBEMLP_POLL_INDEXING_STEPS" ZOrder="5" X="993" Y="271" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
-    <Shape ID="DesignTable:TBEMLP_HISTORY" ZOrder="3" X="242" Y="387" Height="267" Width="249" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" />
-    <Shape ID="DesignTable:TBEMLP_CONFIG" ZOrder="2" X="757" Y="447" Height="286" Width="243" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
-    <Shape ID="DesignTable:TBDD_EMAIL_ACCOUNT" ZOrder="1" X="457" Y="458" Height="305" Width="292" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
+    <Shape ID="DesignTable:TBEMLP_HISTORY" ZOrder="1" X="33" Y="398" Height="267" Width="249" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" />
+    <Shape ID="DesignTable:TBEMLP_CONFIG" ZOrder="3" X="698" Y="456" Height="286" Width="243" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
+    <Shape ID="DesignTable:TBDD_EMAIL_ACCOUNT" ZOrder="2" X="347" Y="418" Height="343" Width="292" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
   </Shapes>
   <Connectors>
     <Connector ID="DesignRelation:FK_TBEMLP_POLL_PROCESS_PROFILE_ID" ZOrder="8" LineWidth="11">

App/EmailProfiler.Form/Settings.vb

@@ -0,0 +1,11 @@
+
+Namespace My
+    
+    'Diese Klasse ermöglicht die Behandlung bestimmter Ereignisse der Einstellungsklasse:
+    ' Das SettingChanging-Ereignis wird ausgelöst, bevor der Wert einer Einstellung geändert wird.
+    ' Das PropertyChanged-Ereignis wird ausgelöst, nachdem der Wert einer Einstellung geändert wurde.
+    ' Das SettingsLoaded-Ereignis wird ausgelöst, nachdem die Einstellungswerte geladen wurden.
+    ' Das SettingsSaving-Ereignis wird ausgelöst, bevor die Einstellungswerte gespeichert werden.
+    Partial Friend NotInheritable Class MySettings
+    End Class
+End Namespace

App/EmailProfiler.Form/packages.config

@@ -0,0 +1,7 @@
+<?xml version="1.0" encoding="utf-8"?>
+<packages>
+  <package id="Microsoft.Identity.Client" version="4.55.0" targetFramework="net462" />
+  <package id="Microsoft.IdentityModel.Abstractions" version="6.22.0" targetFramework="net462" />
+  <package id="NLog" version="5.0.5" targetFramework="net461" />
+  <package id="S22.Imap" version="3.6.0.0" targetFramework="net462" />
+</packages>

App/EmailProfiler.Service/App.config

@@ -0,0 +1,54 @@
+<?xml version="1.0" encoding="utf-8"?>
+<configuration>
+    <configSections>
+        <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
+            <section name="EmailProfiler.Service.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
+        </sectionGroup>
+    </configSections>
+    <connectionStrings />
+    <startup> 
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2"/>
+    </startup>
+  <runtime>
+    <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
+      <dependentAssembly>
+        <assemblyIdentity name="NLog" publicKeyToken="5120e14c03d0593c" culture="neutral"/>
+        <bindingRedirect oldVersion="0.0.0.0-5.0.0.0" newVersion="5.0.0.0"/>
+      </dependentAssembly>
+    </assemblyBinding>
+  </runtime>
+  <applicationSettings>
+    <EmailProfiler.Service.My.MySettings>
+      <setting name="FB_DATASOURCE" serializeAs="String">
+        <value>172.24.12.41</value>
+      </setting>
+      <setting name="FB_DATABASE" serializeAs="String">
+        <value>172.24.12.41:E:\DB\Firebird\Databases\EDMI_TEMPLATE\EDMI_MASTER.FDB</value>
+      </setting>
+      <setting name="FB_USER" serializeAs="String">
+        <value>sysdba</value>
+      </setting>
+      <setting name="FB_PW" serializeAs="String">
+        <value>dd</value>
+      </setting>
+      <setting name="DEBUG" serializeAs="String">
+        <value>False</value>
+      </setting>
+      <setting name="USE_WM" serializeAs="String">
+        <value>False</value>
+      </setting>
+      <setting name="EmailAccountID" serializeAs="String">
+        <value>2</value>
+      </setting>
+      <setting name="EmailProfilerPraefix" serializeAs="String">
+        <value>EmailProfiler</value>
+      </setting>
+      <setting name="EML_LIMITATION_SENDER" serializeAs="String">
+        <value>NONE</value>
+      </setting>
+      <setting name="MyConnectionString" serializeAs="String">
+        <value>Server=SDB01\DIGITALDATA;Database=DD_ECM;User Id=sa;Password=+bk8oAbbQP1AzoHtvZUbd+Mbok2f8Fl4miEx1qssJ5yEaEWoQJ9prg4L14fURpPnVyz+pQgGwwFrC6HCYzpmU3D2IL51z3wZ5odRZQbqYbM=;</value>
+      </setting>
+    </EmailProfiler.Service.My.MySettings>
+  </applicationSettings>
+</configuration>

App/EmailProfiler.Service/EmailProfiler.Service.vbproj

@@ -6,13 +6,14 @@
     <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
     <ProjectGuid>{1F3C569B-91DA-427F-8D81-BBCC556B11A4}</ProjectGuid>
     <OutputType>WinExe</OutputType>
-    <StartupObject>SERV_EMAIL.MyService</StartupObject>
-    <RootNamespace>SERV_EMAIL</RootNamespace>
-    <AssemblyName>SERV_EMAIL</AssemblyName>
+    <StartupObject>EmailProfiler.Service.MyService</StartupObject>
+    <RootNamespace>EmailProfiler.Service</RootNamespace>
+    <AssemblyName>EmailProfiler.Service</AssemblyName>
     <FileAlignment>512</FileAlignment>
     <MyType>Console</MyType>
-    <TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
+    <TargetFrameworkVersion>v4.6.2</TargetFrameworkVersion>
     <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
+    <TargetFrameworkProfile />
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
     <PlatformTarget>AnyCPU</PlatformTarget>
@@ -21,7 +22,7 @@
     <DefineDebug>true</DefineDebug>
     <DefineTrace>true</DefineTrace>
     <OutputPath>bin\Debug\</OutputPath>
-    <DocumentationFile>SERV_EMAIL.xml</DocumentationFile>
+    <DocumentationFile>EmailProfiler.Service.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
@@ -31,7 +32,7 @@
     <DefineTrace>true</DefineTrace>
     <Optimize>true</Optimize>
     <OutputPath>bin\Release\</OutputPath>
-    <DocumentationFile>SERV_EMAIL.xml</DocumentationFile>
+    <DocumentationFile>EmailProfiler.Service.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
   </PropertyGroup>
   <PropertyGroup>
@@ -47,36 +48,31 @@
     <OptionInfer>On</OptionInfer>
   </PropertyGroup>
   <ItemGroup>
-    <Reference Include="DigitalData.EMLProfiler">
-      <HintPath>..\DigitalData.EMLProfiler\bin\Debug\DigitalData.EMLProfiler.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Logging, Version=0.0.0.1, Culture=neutral, processorArchitecture=MSIL">
+    <Reference Include="DigitalData.Modules.Base, Version=1.3.6.0, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\DDMonorepo\Modules.Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
     </Reference>
-    <Reference Include="Independentsoft.Email">
-      <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Independentsoft.Email.dll</HintPath>
+    <Reference Include="DigitalData.Modules.Config, Version=1.2.2.0, Culture=neutral, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
     </Reference>
-    <Reference Include="Interop.WINDREAMLib">
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll</HintPath>
-      <EmbedInteropTypes>False</EmbedInteropTypes>
+    <Reference Include="DigitalData.Modules.Database, Version=2.3.4.0, Culture=neutral, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
     </Reference>
-    <Reference Include="Interop.WMOBRWSLib">
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOBRWSLib.dll</HintPath>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
+    <Reference Include="DigitalData.Modules.Logging, Version=2.6.3.0, Culture=neutral, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\..\..\2_DLL Projekte\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
     </Reference>
-    <Reference Include="Interop.WMOSRCHLib">
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOSRCHLib.dll</HintPath>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
+    <Reference Include="EmailProfiler.Common">
+      <HintPath>..\EmailProfiler.Common\bin\Debug\EmailProfiler.Common.dll</HintPath>
     </Reference>
-    <Reference Include="Interop.WMOTOOLLib">
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOTOOLLib.dll</HintPath>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
+    <Reference Include="EmailProfiler.Common">
+      <HintPath>..\EmailProfiler.Common\bin\Debug\EmailProfiler.Common.dll</HintPath>
     </Reference>
     <Reference Include="Microsoft.CSharp" />
-    <Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\NLog.dll</HintPath>
+    <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="System" />
     <Reference Include="System.Configuration" />
@@ -109,6 +105,7 @@
     <Compile Include="My Project\Application.Designer.vb">
       <AutoGen>True</AutoGen>
       <DependentUpon>Application.myapp</DependentUpon>
+      <DesignTime>True</DesignTime>
     </Compile>
     <Compile Include="MyService.vb">
       <SubType>Component</SubType>
@@ -161,5 +158,10 @@
     <None Include="App.config" />
     <None Include="packages.config" />
   </ItemGroup>
+  <ItemGroup>
+    <Content Include="MailLicense.xml">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+  </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
 </Project>

App/EmailProfiler.Service/MailLicense.xml

@@ -0,0 +1,23 @@
+<?xml version="1.0" encoding="utf-8"?>
+<License>
+  <Id>4dc5ef40-f1a9-468b-994c-b7ed600ad878</Id>
+  <ProductName>Mail.dll</ProductName>
+  <SubscriptionUntil>2022-07-29</SubscriptionUntil>
+  <RegisteredTo>Digital Data GmbH</RegisteredTo>
+  <LicenseType>single developer</LicenseType>
+  <BuyerName>Digital Data GmbH</BuyerName>
+  <Signature xmlns="http://www.w3.org/2000/09/xmldsig#">
+    <SignedInfo>
+      <CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" />
+      <SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" />
+      <Reference URI="">
+        <Transforms>
+          <Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" />
+        </Transforms>
+        <DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
+        <DigestValue>75MRtl4ipYelIZYlpT8O7QDX9Zc=</DigestValue>
+      </Reference>
+    </SignedInfo>
+    <SignatureValue>Raxfkz6DfQVs/sMvH+F2nH0eHXD8FoUFSdP3t7AgBUdpABJQx86srlyuMSEhXPlc1THCqPouEVob4RsWnd9OXvTiPPSOUSK9zuNG6uz93KLAhpSD5PraAgBCF4jwZArlAp7aCNfZpHqQ3w6TRHS+CfravUU0AHHG3MZ1ZcRkGuo=</SignatureValue>
+  </Signature>
+</License>

App/EmailProfiler.Service/My Project/Application.Designer.vb

@@ -1,10 +1,10 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.42000
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
 '
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
 ' </auto-generated>
 '------------------------------------------------------------------------------
 

App/EmailProfiler.Service/My Project/AssemblyInfo.vb

@@ -12,8 +12,8 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyDescription("")>
 <Assembly: AssemblyCompany("")>
 <Assembly: AssemblyProduct("SERV_EMAIL")>
-<Assembly: AssemblyCopyright("Copyright ©  2018")>
-<Assembly: AssemblyTrademark("")>
+<Assembly: AssemblyCopyright("Copyright © 2025")>
+<Assembly: AssemblyTrademark("3.3.0")>
 
 <Assembly: ComVisible(False)>
 
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("2.3.0.0")>
-<Assembly: AssemblyFileVersion("1.0.0.0")>
+<Assembly: AssemblyVersion("3.3.0.0")>
+<Assembly: AssemblyFileVersion("3.3.0.0")>

App/EmailProfiler.Service/My Project/Resources.Designer.vb

@@ -0,0 +1,63 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+Imports System
+
+Namespace My.Resources
+    
+    'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
+    '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
+    'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
+    'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
+    '''<summary>
+    '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
+    '''</summary>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
+    Friend Module Resources
+        
+        Private resourceMan As Global.System.Resources.ResourceManager
+        
+        Private resourceCulture As Global.System.Globalization.CultureInfo
+        
+        '''<summary>
+        '''  Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+            Get
+                If Object.ReferenceEquals(resourceMan, Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("EmailProfiler.Service.Resources", GetType(Resources).Assembly)
+                    resourceMan = temp
+                End If
+                Return resourceMan
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
+        '''  Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend Property Culture() As Global.System.Globalization.CultureInfo
+            Get
+                Return resourceCulture
+            End Get
+            Set
+                resourceCulture = value
+            End Set
+        End Property
+    End Module
+End Namespace

App/EmailProfiler.Service/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", "16.4.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.5.0.0"),  _
      Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
     Partial Friend NotInheritable Class MySettings
         Inherits Global.System.Configuration.ApplicationSettingsBase
@@ -54,17 +54,6 @@ Namespace My
             End Get
         End Property
         
-        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_TEST;Persist Security Info="& _ 
-            "True;User ID=sa;Password=dd")>  _
-        Public ReadOnly Property MyConnectionString() As String
-            Get
-                Return CType(Me("MyConnectionString"),String)
-            End Get
-        End Property
-        
         <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
          Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
          Global.System.Configuration.DefaultSettingValueAttribute("172.24.12.41")>  _
@@ -118,6 +107,44 @@ Namespace My
                 Return CType(Me("USE_WM"),Boolean)
             End Get
         End Property
+        
+        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("2")>  _
+        Public ReadOnly Property EmailAccountID() As Integer
+            Get
+                Return CType(Me("EmailAccountID"),Integer)
+            End Get
+        End Property
+        
+        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("EmailProfiler")>  _
+        Public ReadOnly Property EmailProfilerPraefix() As String
+            Get
+                Return CType(Me("EmailProfilerPraefix"),String)
+            End Get
+        End Property
+        
+        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("NONE")>  _
+        Public ReadOnly Property EML_LIMITATION_SENDER() As String
+            Get
+                Return CType(Me("EML_LIMITATION_SENDER"),String)
+            End Get
+        End Property
+        
+        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("Server=SDB01\DIGITALDATA;Database=DD_ECM;User Id=sa;Password=+bk8oAbbQP1AzoHtvZUb"& _ 
+            "d+Mbok2f8Fl4miEx1qssJ5yEaEWoQJ9prg4L14fURpPnVyz+pQgGwwFrC6HCYzpmU3D2IL51z3wZ5odR"& _ 
+            "ZQbqYbM=;")>  _
+        Public ReadOnly Property MyConnectionString() As String
+            Get
+                Return CType(Me("MyConnectionString"),String)
+            End Get
+        End Property
     End Class
 End Namespace
 
@@ -129,9 +156,9 @@ Namespace My
     Friend Module MySettingsProperty
         
         <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
-        Friend ReadOnly Property Settings() As Global.SERV_EMAIL.My.MySettings
+        Friend ReadOnly Property Settings() As Global.EmailProfiler.Service.My.MySettings
             Get
-                Return Global.SERV_EMAIL.My.MySettings.Default
+                Return Global.EmailProfiler.Service.My.MySettings.Default
             End Get
         End Property
     End Module

App/EmailProfiler.Service/My Project/Settings.settings

@@ -2,14 +2,6 @@
 <SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
   <Profiles />
   <Settings>
-    <Setting Name="MyConnectionString" Type="(Connection string)" Scope="Application">
-      <DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
-&lt;SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"&gt;
-  &lt;ConnectionString&gt;Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd&lt;/ConnectionString&gt;
-  &lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt;
-&lt;/SerializableConnectionString&gt;</DesignTimeValue>
-      <Value Profile="(Default)">Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd</Value>
-    </Setting>
     <Setting Name="FB_DATASOURCE" Type="System.String" Scope="Application">
       <Value Profile="(Default)">172.24.12.41</Value>
     </Setting>
@@ -28,5 +20,17 @@
     <Setting Name="USE_WM" Type="System.Boolean" Scope="Application">
       <Value Profile="(Default)">False</Value>
     </Setting>
+    <Setting Name="EmailAccountID" Type="System.Int32" Scope="Application">
+      <Value Profile="(Default)">2</Value>
+    </Setting>
+    <Setting Name="EmailProfilerPraefix" Type="System.String" Scope="Application">
+      <Value Profile="(Default)">EmailProfiler</Value>
+    </Setting>
+    <Setting Name="EML_LIMITATION_SENDER" Type="System.String" Scope="Application">
+      <Value Profile="(Default)">NONE</Value>
+    </Setting>
+    <Setting Name="MyConnectionString" Type="System.String" Scope="Application">
+      <Value Profile="(Default)">Server=SDB01\DIGITALDATA;Database=DD_ECM;User Id=sa;Password=+bk8oAbbQP1AzoHtvZUbd+Mbok2f8Fl4miEx1qssJ5yEaEWoQJ9prg4L14fURpPnVyz+pQgGwwFrC6HCYzpmU3D2IL51z3wZ5odRZQbqYbM=;</Value>
+    </Setting>
   </Settings>
 </SettingsFile>

App/EmailProfiler.Service/MyService.vb

@@ -0,0 +1,128 @@
+Imports System.ComponentModel
+Imports System.IO
+Imports EmailProfiler.Common
+Imports DigitalData.Modules.Config
+Imports DigitalData.Modules.Database
+Imports DigitalData.Modules.Logging
+
+Public Class MyService
+#Region "+++++ variables +++++"
+    Private Worker As BackgroundWorker
+    Private WithEvents Timer As New Timers.Timer
+
+    Private LogConfig As LogConfig
+    Private Logger As Logger
+
+    'Private EmailWorker As clsWorkEmail
+
+    Private _DBConfig As ClassDBConfig.Config
+
+    Private ConfigManager As ConfigManager(Of Config)
+    Private _ConfigData As Config
+
+    Private Database As MSSQLServer
+#End Region
+
+    Protected Overrides Sub OnStart(args() As String)
+        Try
+            Dim oLogPath = Path.Combine(My.Application.Info.DirectoryPath, "Log")
+            LogConfig = New LogConfig(LogConfig.PathType.CustomPath, oLogPath, Nothing, "Digital Data", "DD EmailProfiler", 30)
+            Logger = LogConfig.GetLogger
+
+            Logger.Info("Service started.")
+
+            ConfigManager = New ConfigManager(Of Config)(LogConfig, My.Application.Info.DirectoryPath)
+            _ConfigData = ConfigManager.Config
+
+            If _ConfigData.ConnectionString = String.Empty Then
+                Logger.Warn("No ConnectionString configured. Exiting.")
+            Else
+                If _ConfigData.Debug = True Then
+                    LogConfig.Debug = True
+                Else
+                    LogConfig.Debug = False
+                End If
+
+                Database = New MSSQLServer(LogConfig, _ConfigData.ConnectionString)
+                Logger.Debug("Database initialized!")
+
+                Dim oDBConfigManager As ClassDBConfig = New ClassDBConfig(LogConfig, Database)
+                _DBConfig = oDBConfigManager.GetConfig()
+
+                If _DBConfig IsNot Nothing Then
+                    Logger.Debug("DBConfig initialized!")
+                Else
+                    Logger.Warn("Error while initializing DBConfig")
+                End If
+
+                ' MP 10.01.25 - Das Objekt wird hier gar nicht weiter verwendet. erstmal raus damit
+                'EmailWorker = New clsWorkEmail(LogConfig, _ConfigData.ConnectionString, _DBConfig.WindreamConnectionString, _ConfigData)
+                'Logger.Debug("Module Workmail initialized")
+
+                If Database.DBInitialized = False Then
+                    Logger.Warn("No Connection was established! Exiting.")
+                Else
+                    '### Thread für das nachträgliche Setzen von Rechten generieren
+                    Logger.Debug("Setting up Background Worker")
+                    Worker = New BackgroundWorker With {
+                        .WorkerReportsProgress = True,
+                        .WorkerSupportsCancellation = True
+                    }
+                    AddHandler Worker.DoWork, AddressOf DoWork
+                    AddHandler Worker.RunWorkerCompleted, AddressOf Worker_Completed
+
+                    ' Set the Interval
+                    Timer.Interval = _DBConfig.TimerInterval * 60000
+                    Timer.Enabled = True
+                    Logger.Debug("Timer started.")
+
+                    ' Und den Durchlauf das erste Mal starten
+                    Worker.RunWorkerAsync()
+                End If
+            End If
+        Catch ex As Exception
+            Logger.Warn("Unexpected error while starting.")
+            Logger.Error(ex)
+        End Try
+    End Sub
+    Public Sub Thread_Run() Handles Timer.Elapsed
+        Logger.Debug("Starting Worker..")
+        If Not Worker.IsBusy Then
+            Logger.Debug("Running Worker..")
+            Worker.RunWorkerAsync()
+        End If
+    End Sub
+    Public Sub DoWork(sender As Object, e As DoWorkEventArgs)
+        Try
+            Dim oProfileIdForPolling = 0
+
+            Dim oWorker As New clsWorker(LogConfig,
+                                         _ConfigData.ConnectionString,
+                                         _DBConfig.WindreamConnectionString,
+                                         oProfileIdForPolling,
+                                         _ConfigData)
+            oWorker.Start_WorkingProfiles(False)
+        Catch ex As Exception
+            Logger.Error(ex)
+        End Try
+    End Sub
+    Protected Overrides Sub OnStop()
+        Logger.Info("## Service was stopped manually. ##")
+    End Sub
+
+    Private Sub Worker_Completed(sender As Object, e As RunWorkerCompletedEventArgs)
+        'This event fires when the DoWork event completes
+        Try
+            Dim result As String = ""
+            If e.Cancelled Then
+                EventLog.WriteEntry("DD EmailProfiler", "The thread was cancelled!", EventLogEntryType.Error)
+                Logger.Warn("## The thread was cancelled.")
+            ElseIf e.Error IsNot Nothing Then
+                EventLog.WriteEntry("DD EmailProfiler", "Unexpected error in thread!", EventLogEntryType.Error)
+                Logger.Warn("Unexpected error in thread: " & e.Error.Message)
+            End If
+        Catch ex As Exception
+            Logger.Error(ex)
+        End Try
+    End Sub
+End Class

App/EmailProfiler.Service/ProjectInstaller.Designer.vb

@@ -19,7 +19,7 @@
     'Hinweis: Die folgende Prozedur ist für den Komponenten-Designer erforderlich.
     'Das Bearbeiten ist mit dem Komponenten-Designer möglich.  
     'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-    <System.Diagnostics.DebuggerStepThrough()> _
+    <System.Diagnostics.DebuggerStepThrough()>
     Private Sub InitializeComponent()
         Me.ServiceProcessInstaller1 = New System.ServiceProcess.ServiceProcessInstaller()
         Me.ServiceInstaller1 = New System.ServiceProcess.ServiceInstaller()
@@ -33,6 +33,7 @@
         'ServiceInstaller1
         '
         Me.ServiceInstaller1.Description = "Checks and works emails from configured profiles"
+        Me.ServiceInstaller1.DisplayName = "Digital Data Email Profiler"
         Me.ServiceInstaller1.ServiceName = "DD EmailProfiler"
         Me.ServiceInstaller1.StartType = System.ServiceProcess.ServiceStartMode.Automatic
         '

App/EmailProfiler.Service/ProjectInstaller.resx

@@ -121,7 +121,7 @@
     <value>17, 56</value>
   </metadata>
   <metadata name="ServiceInstaller1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>197, 17</value>
+    <value>211, 52</value>
   </metadata>
   <metadata name="$this.TrayLargeIcon" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>False</value>

App/EmailProfiler.Service/packages.config

@@ -0,0 +1,4 @@
+<?xml version="1.0" encoding="utf-8"?>
+<packages>
+  <package id="NLog" version="5.0.5" targetFramework="net462" />
+</packages>

App/EmailProfiler.sln

@@ -1,13 +1,18 @@
 
 Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio 15
-VisualStudioVersion = 15.0.27703.2018
+# Visual Studio Version 17
+VisualStudioVersion = 17.5.33516.290
 MinimumVisualStudioVersion = 10.0.40219.1
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "SERV_EMAIL", "SERV_EMAIL\SERV_EMAIL.vbproj", "{1F3C569B-91DA-427F-8D81-BBCC556B11A4}"
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EmailProfiler.Service", "EmailProfiler.Service\EmailProfiler.Service.vbproj", "{1F3C569B-91DA-427F-8D81-BBCC556B11A4}"
 EndProject
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "CONFIG_APP", "CONFIG_APP\CONFIG_APP.vbproj", "{CADEB4EE-C7EF-446D-8F18-69A89E65EBBD}"
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EmailProfiler.Form", "EmailProfiler.Form\EmailProfiler.Form.vbproj", "{CADEB4EE-C7EF-446D-8F18-69A89E65EBBD}"
 EndProject
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DigitalData.EMLProfiler", "DigitalData.EMLProfiler\DigitalData.EMLProfiler.vbproj", "{9F748DCD-952E-40A0-9DAD-65BF8A39B231}"
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EmailProfiler.Common", "EmailProfiler.Common\EmailProfiler.Common.vbproj", "{9F748DCD-952E-40A0-9DAD-65BF8A39B231}"
+EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "wisag_check_Att", "wisag_check_Att\wisag_check_Att.vbproj", "{CD67B0B9-A7DE-447D-9982-E7AC43481DDC}"
+	ProjectSection(ProjectDependencies) = postProject
+		{9F748DCD-952E-40A0-9DAD-65BF8A39B231} = {9F748DCD-952E-40A0-9DAD-65BF8A39B231}
+	EndProjectSection
 EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
@@ -27,6 +32,10 @@ Global
 		{9F748DCD-952E-40A0-9DAD-65BF8A39B231}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{9F748DCD-952E-40A0-9DAD-65BF8A39B231}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{9F748DCD-952E-40A0-9DAD-65BF8A39B231}.Release|Any CPU.Build.0 = Release|Any CPU
+		{CD67B0B9-A7DE-447D-9982-E7AC43481DDC}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{CD67B0B9-A7DE-447D-9982-E7AC43481DDC}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{CD67B0B9-A7DE-447D-9982-E7AC43481DDC}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{CD67B0B9-A7DE-447D-9982-E7AC43481DDC}.Release|Any CPU.Build.0 = Release|Any CPU
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE

App/SERV_EMAIL/App.config

@@ -1,37 +0,0 @@
-<?xml version="1.0" encoding="utf-8" ?>
-<configuration>
-    <configSections>
-        <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
-            <section name="SERV_EMAIL.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
-        </sectionGroup>
-    </configSections>
-    <connectionStrings>
-        <add name="SERV_EMAIL.My.MySettings.MyConnectionString" connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
-            providerName="System.Data.SqlClient" />
-    </connectionStrings>
-    <startup> 
-        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
-    </startup>
-    <applicationSettings>
-        <SERV_EMAIL.My.MySettings>
-            <setting name="FB_DATASOURCE" serializeAs="String">
-                <value>172.24.12.41</value>
-            </setting>
-            <setting name="FB_DATABASE" serializeAs="String">
-                <value>172.24.12.41:E:\DB\Firebird\Databases\EDMI_TEMPLATE\EDMI_MASTER.FDB</value>
-            </setting>
-            <setting name="FB_USER" serializeAs="String">
-                <value>sysdba</value>
-            </setting>
-            <setting name="FB_PW" serializeAs="String">
-                <value>dd</value>
-            </setting>
-            <setting name="DEBUG" serializeAs="String">
-                <value>False</value>
-            </setting>
-            <setting name="USE_WM" serializeAs="String">
-                <value>False</value>
-            </setting>
-        </SERV_EMAIL.My.MySettings>
-    </applicationSettings>
-</configuration>

App/SERV_EMAIL/MyService.vb

@@ -1,117 +0,0 @@
-Imports System.ComponentModel
-Imports System.IO
-Imports Independentsoft.Email.Mime
-Imports DigitalData.EMLProfiler
-Imports DigitalData.EMLProfiler.ClassCurrent
-Imports DigitalData.Modules.Logging
-Public Class MyService
-#Region "+++++ variables +++++"
-    Private _threadRunner As BackgroundWorker
-    Private MyLogger As LogConfig
-    Private Logger As Logger
-    Private _database As clsDatabase
-    Private _email As clsEmail
-    Private _windream As clsWindream_allgemein
-    Private _workmail As clsWorkEmail
-#End Region
-    Public Sub New()
-        MyBase.New()
-        InitializeComponent()
-    End Sub
-    Protected Overrides Sub OnStart(ByVal args() As String)
-        ' Code zum Starten des Dienstes hier einfügen. Diese Methode sollte Vorgänge
-        ' ausführen, damit der Dienst gestartet werden kann.
-        Try
-            MyLogger = New LogConfig(LogConfig.PathType.CustomPath, Path.Combine(My.Application.Info.DirectoryPath, "Log"), Nothing, "Digital Data", "DD EmailProfiler")
-            Logger = MyLogger.GetLogger
-
-            Try
-                Dim directory As New IO.DirectoryInfo(MyLogger.LogDirectory)
-
-                For Each file As IO.FileInfo In directory.GetFiles
-                    If (Now - file.CreationTime).Days > 29 Then
-                        file.Delete()
-                    Else
-                        Exit For
-                    End If
-                Next
-            Catch ex As Exception
-
-            End Try
-
-            Logger.Info("## Service started  ## ")
-
-            If My.Settings.MyConnectionString = String.Empty Then
-                Logger.Warn("NO CONNECTIONSTRING CONFIGURED.")
-            Else
-                If My.Settings.DEBUG = True Then
-                    Logger.Info("DEBUG ACTIVATED")
-                    MyLogger.Debug = True
-                Else
-                    MyLogger.Debug = False
-                End If
-
-                _database = New clsDatabase(MyLogger, My.Settings.MyConnectionString)
-                _email = New clsEmail(MyLogger)
-                Logger.Debug("_database and _email initialized")
-                _workmail = New clsWorkEmail(MyLogger, My.Settings.MyConnectionString, My.Settings.FB_DATASOURCE, My.Settings.FB_DATABASE, My.Settings.FB_USER, My.Settings.FB_PW, My.Settings.USE_WM)
-                Logger.Debug("_workmail initialized")
-                If _database.Init(My.Settings.MyConnectionString) = False Then
-                    Logger.Warn("ATTENTION: No Connection was established '" & My.Settings.MyConnectionString & "'!")
-                Else
-                    '### Thread für das nachträgliche Setzen von Rechten generieren
-                    _threadRunner = New BackgroundWorker()
-                    _threadRunner.WorkerReportsProgress = True
-                    _threadRunner.WorkerSupportsCancellation = True
-                    AddHandler _threadRunner.DoWork, AddressOf RUN_THREAD
-                    AddHandler _threadRunner.RunWorkerCompleted, AddressOf Thread1_Completed
-                    '### Den Timer generieren
-                    Dim Timer_Durchlauf As New System.Timers.Timer()
-                    'Das Event hinterlegen welches bei "Tick" ausgelöst wird
-                    AddHandler Timer_Durchlauf.Elapsed, AddressOf Thread_Run
-                    ' Set the Interval
-                    Timer_Durchlauf.Interval = (TIMER_INTERVALL * 60000)
-                    Timer_Durchlauf.Enabled = True
-                    Logger.Debug("...Timer started.")
-                    ' Und den Durchlauf das erste Mal starten
-                    _threadRunner.RunWorkerAsync()
-                End If
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-        End Try
-    End Sub
-    Public Sub Thread_Run()
-        If Not _threadRunner.IsBusy Then
-            _threadRunner.RunWorkerAsync()
-        End If
-    End Sub
-    Public Sub RUN_THREAD(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs)
-        Try
-            Dim notcompleted As Boolean = False
-            Dim _work As New clsWorker(MyLogger, My.Settings.MyConnectionString, 0, My.Settings.FB_DATASOURCE, My.Settings.FB_DATABASE, My.Settings.FB_USER, My.Settings.FB_PW, My.Settings.USE_WM)
-            _work.Start_WorkingProfiles()
-        Catch ex As Exception
-            Logger.Error(ex)
-        End Try
-    End Sub
-    Protected Overrides Sub OnStop()
-        ' Hier Code zum Ausführen erforderlicher Löschvorgänge zum Beenden des Dienstes einfügen.
-        Logger.Info("## Service was stopped manually. ##")
-    End Sub
-    Private Sub Thread1_Completed(ByVal sender As Object, ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs) 'Handles threadDateiimport.RunWorkerCompleted
-        'This event fires when the DoWork event completes
-        Try
-            Dim result As String = ""
-            If e.Cancelled Then
-                EventLog.WriteEntry("DD EmailProfiler", "The thread was cancelled!", EventLogEntryType.Error)
-                Logger.Warn("## The thread was cancelled.")
-            ElseIf e.Error IsNot Nothing Then
-                EventLog.WriteEntry("DD EmailProfiler", "Unexpected error in thread!", EventLogEntryType.Error)
-                Logger.Warn("Unexpected error in thread: " & e.Error.Message)
-            End If
-        Catch ex As Exception
-            Logger.Error(ex)
-        End Try
-    End Sub
-End Class

App/SERV_EMAIL/packages.config

@@ -1,4 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<packages>
-  <package id="NLog" version="4.5.8" targetFramework="net461" />
-</packages>