MS Release 2.3.9.1

This commit is contained in:
SchreiberM 2022-12-01 14:22:40 +01:00
parent 01288c5bbb
commit 4f1ff62ce6
22 changed files with 3826 additions and 4239 deletions

View File

@ -1,4 +1,5 @@
Imports DigitalData.Modules.Config.ConfigAttributes
Imports DigitalData.Modules.Logging
Public Class ClassConfig
' Global Settings (from computerconfig, overridable by userconfig)
@ -36,5 +37,11 @@ Public Class ClassConfig
Public Property LastExportPath As String = ""
Public Property ADDITIONAL_SEARCHES_LOAD_ONCLICK As Boolean = True
Public Property GridFontSizeDelta As Integer = 0
Public Property ProfileConfig As New ProfileUserConfig
Public Class ProfileUserConfig
Public Property ProfileID As Integer
Public Property ShowFile As Boolean = True
Public Property ShowSearchesDirect As Boolean = True
End Class
End Class

View File

@ -245,6 +245,15 @@ Public Class ClassInit
LOGGER.Debug("license initialized....")
LICENSE_PROFILES = split(2)
Try
Dim oMod = split(3)
If Not IsNothing(split(3)) Then
LIC_MODULES = split(3)
End If
Catch ex As Exception
End Try
Catch ex As Exception
LOGGER.Error(ex)
LOGGER.Info("Unexpected error in Refresh license: " & ex.Message, True)

View File

@ -16,6 +16,7 @@ Public Class ClassParamRefresh
oLicenseoverSQL = True
ElseIf oRow.Item("TITLE") = "PM_PROFILES_USER" Then
SQL_PROFILES_USER = oRow.Item("SQL_COMMAND")
LOGGER.Info($"SQL FROM SQLCommands DD: {SQL_PROFILES_USER}")
End If
Next
End If

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

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

View File

@ -33,6 +33,7 @@ Module ModuleRuntimeVariables
Public Property CURRENT_ProfilGUID As Integer
Public Property CURRENT_ProfilName As String
Public Property CURRENT_PROFILE_LOG_INDEX As String
Public Property PROFILE_SHOW_DOCUMENT As Boolean = True
Public Property CURRENT_DOC_GUID As Int64
Public Property CURRENT_DOC_ID As Int64
@ -170,4 +171,6 @@ Module ModuleRuntimeVariables
Public WMDriveLetter As String = "W"
Public WMSUFFIX As String = "\\windream\objects"
Public WM_AHWF_docPath As String
Public LIC_MODULES As String = "NONE"
End Module

View File

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

View File

@ -156,6 +156,8 @@ Partial Class frmAdministration
Me.pnlEdit = New System.Windows.Forms.Panel()
Me.tabctrl_Profilkonfig = New System.Windows.Forms.TabControl()
Me.TabPage5 = New System.Windows.Forms.TabPage()
Me.lblDescription = New System.Windows.Forms.Label()
Me.btnofbAHW = New System.Windows.Forms.Button()
Me.lblPriority = New System.Windows.Forms.Label()
Me.lblSearch = New System.Windows.Forms.Label()
Me.Label4 = New System.Windows.Forms.Label()
@ -247,9 +249,8 @@ Partial Class frmAdministration
Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = New DD_ProcessManager.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter()
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.btnofbAHW = New System.Windows.Forms.Button()
Me.lblDescription = New System.Windows.Forms.Label()
Me.FolderBrowserDialog2 = New System.Windows.Forms.FolderBrowserDialog()
Me.SHOW_DOCUMENTCheckBox = New System.Windows.Forms.CheckBox()
GUIDLabel = New System.Windows.Forms.Label()
NAMELabel = New System.Windows.Forms.Label()
ADDED_WHOLabel = New System.Windows.Forms.Label()
@ -1270,6 +1271,8 @@ Partial Class frmAdministration
'
'pnlEdit
'
resources.ApplyResources(Me.pnlEdit, "pnlEdit")
Me.pnlEdit.Controls.Add(Me.SHOW_DOCUMENTCheckBox)
Me.pnlEdit.Controls.Add(Me.PROFILGUIDTextBox)
Me.pnlEdit.Controls.Add(Me.tabctrl_Profilkonfig)
Me.pnlEdit.Controls.Add(GUIDLabel)
@ -1279,7 +1282,6 @@ Partial Class frmAdministration
Me.pnlEdit.Controls.Add(NAMELabel)
Me.pnlEdit.Controls.Add(Me.TITLETextBox)
Me.pnlEdit.Controls.Add(Me.NAMETextBox)
resources.ApplyResources(Me.pnlEdit, "pnlEdit")
Me.pnlEdit.Name = "pnlEdit"
'
'tabctrl_Profilkonfig
@ -1323,6 +1325,17 @@ Partial Class frmAdministration
Me.TabPage5.Name = "TabPage5"
Me.TabPage5.UseVisualStyleBackColor = True
'
'lblDescription
'
resources.ApplyResources(Me.lblDescription, "lblDescription")
Me.lblDescription.Name = "lblDescription"
'
'btnofbAHW
'
resources.ApplyResources(Me.btnofbAHW, "btnofbAHW")
Me.btnofbAHW.Name = "btnofbAHW"
Me.btnofbAHW.UseVisualStyleBackColor = True
'
'lblPriority
'
resources.ApplyResources(Me.lblPriority, "lblPriority")
@ -1348,7 +1361,7 @@ Partial Class frmAdministration
Me.DISPLAY_MODEComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_PROFILEBindingSource, "DISPLAY_MODE", True))
resources.ApplyResources(Me.DISPLAY_MODEComboBox, "DISPLAY_MODEComboBox")
Me.DISPLAY_MODEComboBox.FormattingEnabled = True
Me.DISPLAY_MODEComboBox.Items.AddRange(New Object() {resources.GetString("DISPLAY_MODEComboBox.Items"), resources.GetString("DISPLAY_MODEComboBox.Items1"), resources.GetString("DISPLAY_MODEComboBox.Items2"), resources.GetString("DISPLAY_MODEComboBox.Items3")})
Me.DISPLAY_MODEComboBox.Items.AddRange(New Object() {resources.GetString("DISPLAY_MODEComboBox.Items"), resources.GetString("DISPLAY_MODEComboBox.Items1"), resources.GetString("DISPLAY_MODEComboBox.Items2"), resources.GetString("DISPLAY_MODEComboBox.Items3"), resources.GetString("DISPLAY_MODEComboBox.Items4")})
Me.DISPLAY_MODEComboBox.Name = "DISPLAY_MODEComboBox"
'
'cmbLOGIndex
@ -1915,16 +1928,12 @@ Partial Class frmAdministration
Me.RibbonPage2.Name = "RibbonPage2"
resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
'
'btnofbAHW
'SHOW_DOCUMENTCheckBox
'
resources.ApplyResources(Me.btnofbAHW, "btnofbAHW")
Me.btnofbAHW.Name = "btnofbAHW"
Me.btnofbAHW.UseVisualStyleBackColor = True
'
'lblDescription
'
resources.ApplyResources(Me.lblDescription, "lblDescription")
Me.lblDescription.Name = "lblDescription"
Me.SHOW_DOCUMENTCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPM_PROFILEBindingSource, "SHOW_DOCUMENT", True))
resources.ApplyResources(Me.SHOW_DOCUMENTCheckBox, "SHOW_DOCUMENTCheckBox")
Me.SHOW_DOCUMENTCheckBox.Name = "SHOW_DOCUMENTCheckBox"
Me.SHOW_DOCUMENTCheckBox.UseVisualStyleBackColor = True
'
'frmAdministration
'
@ -2237,4 +2246,5 @@ Partial Class frmAdministration
Friend WithEvents btnofbAHW As Button
Friend WithEvents lblDescription As Label
Friend WithEvents FolderBrowserDialog2 As FolderBrowserDialog
Friend WithEvents SHOW_DOCUMENTCheckBox As CheckBox
End Class

File diff suppressed because it is too large Load Diff

View File

@ -1536,7 +1536,7 @@ Public Class frmAdministration
Private Sub DISPLAY_MODEComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DISPLAY_MODEComboBox.SelectedIndexChanged
If DISPLAY_MODEComboBox.SelectedIndex <> -1 Then
If DISPLAY_MODEComboBox.Text = "AdHoc BlindFile" Then
If DISPLAY_MODEComboBox.Text.StartsWith("AdHoc BlindFile") Then
lblSearch.Text = "Select BlindDocument:"
btnWMopenSuche.Visible = False
lblDescription.Text = "Targetpath WM:"

View File

@ -287,7 +287,11 @@ Public Class frmFormDesigner
SetMovementHandlers(dgv)
Case "TABLE"
Dim oDTColumnsPerDevExGrid As DataTable = DatabaseFallback.GetDatatableECM($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {guid} ORDER BY [SEQUENCE]") ', "FDesignLaodControls")
Dim oSQL = $"SELECT IIF(LANG.CAPTION IS NULL,T.SPALTEN_HEADER,LANG.CAPTION) SPALTEN_HEADER_LANG, T.* FROM TBPM_CONTROL_TABLE T
INNER JOIN TBPM_PROFILE_CONTROLS T1 ON T.CONTROL_ID = T1.GUID LEFT JOIN (SELECT * FROM TBPM_CONTOL_TABLE_LANG WHERE LANG_CODE = '{USER_LANGUAGE}') LANG ON T.GUID = LANG.COL_ID
WHERE T1.CONTROL_ACTIVE = 1 AND T.CONTROL_ID = T1.GUID AND T.CONTROL_ID = {guid} ORDER BY T.SEQUENCE"
Dim oDTColumnsPerDevExGrid As DataTable = DatabaseFallback.GetDatatableECM(oSQL) ', "FDesignLaodControls")
Dim table = ClassControlCreator.CreateExistingGridControl(row, oDTColumnsPerDevExGrid, True)
@ -315,7 +319,7 @@ Public Class frmFormDesigner
Next
Catch ex As Exception
_LOGGER.Error(ex)
MsgBox("Fehler bei LoadControls " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
MsgBox("Unexpected error in LoadControls " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
End Try
End Sub

View File

@ -29,20 +29,22 @@ Partial Class frmLicense
Me.lblPW = New System.Windows.Forms.Label()
Me.grbBoxlicense = New System.Windows.Forms.GroupBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.txtProfile = New System.Windows.Forms.TextBox()
Me.txtProfileCount = New System.Windows.Forms.TextBox()
Me.Label2 = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label()
Me.dtp_Gültigkeit = New System.Windows.Forms.DateTimePicker()
Me.txtlicensekey = New System.Windows.Forms.TextBox()
Me.lblReadKey = New System.Windows.Forms.Label()
Me.btnnewLicenses = New System.Windows.Forms.Button()
Me.txtNewlizences = New System.Windows.Forms.TextBox()
Me.txtlicenseCount = New System.Windows.Forms.TextBox()
Me.lblnewlicenses = New System.Windows.Forms.Label()
Me.lblAktuelleLizenzen = New System.Windows.Forms.Label()
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.Label4 = New System.Windows.Forms.Label()
Me.txtModules = New System.Windows.Forms.TextBox()
Me.grbBoxlicense.SuspendLayout()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@ -67,15 +69,17 @@ Partial Class frmLicense
'
'grbBoxlicense
'
Me.grbBoxlicense.Controls.Add(Me.txtModules)
Me.grbBoxlicense.Controls.Add(Me.Label4)
Me.grbBoxlicense.Controls.Add(Me.Label3)
Me.grbBoxlicense.Controls.Add(Me.txtProfile)
Me.grbBoxlicense.Controls.Add(Me.txtProfileCount)
Me.grbBoxlicense.Controls.Add(Me.Label2)
Me.grbBoxlicense.Controls.Add(Me.Label1)
Me.grbBoxlicense.Controls.Add(Me.dtp_Gültigkeit)
Me.grbBoxlicense.Controls.Add(Me.txtlicensekey)
Me.grbBoxlicense.Controls.Add(Me.lblReadKey)
Me.grbBoxlicense.Controls.Add(Me.btnnewLicenses)
Me.grbBoxlicense.Controls.Add(Me.txtNewlizences)
Me.grbBoxlicense.Controls.Add(Me.txtlicenseCount)
Me.grbBoxlicense.Controls.Add(Me.lblnewlicenses)
Me.grbBoxlicense.Controls.Add(Me.lblAktuelleLizenzen)
resources.ApplyResources(Me.grbBoxlicense, "grbBoxlicense")
@ -87,10 +91,10 @@ Partial Class frmLicense
resources.ApplyResources(Me.Label3, "Label3")
Me.Label3.Name = "Label3"
'
'txtProfile
'txtProfileCount
'
resources.ApplyResources(Me.txtProfile, "txtProfile")
Me.txtProfile.Name = "txtProfile"
resources.ApplyResources(Me.txtProfileCount, "txtProfileCount")
Me.txtProfileCount.Name = "txtProfileCount"
'
'Label2
'
@ -126,10 +130,10 @@ Partial Class frmLicense
Me.btnnewLicenses.Name = "btnnewLicenses"
Me.btnnewLicenses.UseVisualStyleBackColor = True
'
'txtNewlizences
'txtlicenseCount
'
resources.ApplyResources(Me.txtNewlizences, "txtNewlizences")
Me.txtNewlizences.Name = "txtNewlizences"
resources.ApplyResources(Me.txtlicenseCount, "txtlicenseCount")
Me.txtlicenseCount.Name = "txtlicenseCount"
'
'lblnewlicenses
'
@ -160,6 +164,8 @@ Partial Class frmLicense
Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
Me.TableAdapterManager.Connection = Nothing
Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
Me.TableAdapterManager.TBDD_EMAIL_TEMPLATETableAdapter = Nothing
Me.TableAdapterManager.TBDD_GUI_LANGUAGE_PHRASETableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBPM_CONTROL_TABLETableAdapter = Nothing
Me.TableAdapterManager.TBPM_ERROR_LOGTableAdapter = Nothing
@ -171,6 +177,18 @@ Partial Class frmLicense
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
'
'Label4
'
resources.ApplyResources(Me.Label4, "Label4")
Me.Label4.Name = "Label4"
'
'txtModules
'
Me.txtModules.AcceptsReturn = True
Me.txtModules.BackColor = System.Drawing.SystemColors.InactiveCaption
resources.ApplyResources(Me.txtModules, "txtModules")
Me.txtModules.Name = "txtModules"
'
'frmLicense
'
resources.ApplyResources(Me, "$this")
@ -196,7 +214,7 @@ Partial Class frmLicense
Friend WithEvents txtlicensekey As System.Windows.Forms.TextBox
Friend WithEvents lblReadKey As System.Windows.Forms.Label
Friend WithEvents btnnewLicenses As System.Windows.Forms.Button
Friend WithEvents txtNewlizences As System.Windows.Forms.TextBox
Friend WithEvents txtlicenseCount As System.Windows.Forms.TextBox
Friend WithEvents lblnewlicenses As System.Windows.Forms.Label
Friend WithEvents lblAktuelleLizenzen As System.Windows.Forms.Label
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet
@ -206,6 +224,8 @@ Partial Class frmLicense
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents dtp_Gültigkeit As System.Windows.Forms.DateTimePicker
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents txtProfile As System.Windows.Forms.TextBox
Friend WithEvents txtProfileCount As System.Windows.Forms.TextBox
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents txtModules As TextBox
Friend WithEvents Label4 As Label
End Class

View File

@ -178,7 +178,7 @@
<value>8, 10</value>
</data>
<data name="lblPW.Size" type="System.Drawing.Size, System.Drawing">
<value>32, 16</value>
<value>31, 16</value>
</data>
<data name="lblPW.TabIndex" type="System.Int32, mscorlib">
<value>27</value>
@ -198,6 +198,195 @@
<data name="&gt;&gt;lblPW.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="&gt;&gt;txtModules.Name" xml:space="preserve">
<value>txtModules</value>
</data>
<data name="&gt;&gt;txtModules.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txtModules.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;txtModules.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="&gt;&gt;Label4.Name" xml:space="preserve">
<value>Label4</value>
</data>
<data name="&gt;&gt;Label4.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Label4.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;Label4.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="&gt;&gt;Label3.Name" xml:space="preserve">
<value>Label3</value>
</data>
<data name="&gt;&gt;Label3.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Label3.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;Label3.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="&gt;&gt;txtProfileCount.Name" xml:space="preserve">
<value>txtProfileCount</value>
</data>
<data name="&gt;&gt;txtProfileCount.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txtProfileCount.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;txtProfileCount.ZOrder" xml:space="preserve">
<value>3</value>
</data>
<data name="&gt;&gt;Label2.Name" xml:space="preserve">
<value>Label2</value>
</data>
<data name="&gt;&gt;Label2.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Label2.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;Label2.ZOrder" xml:space="preserve">
<value>4</value>
</data>
<data name="&gt;&gt;Label1.Name" xml:space="preserve">
<value>Label1</value>
</data>
<data name="&gt;&gt;Label1.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Label1.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
<value>5</value>
</data>
<data name="&gt;&gt;dtp_Gültigkeit.Name" xml:space="preserve">
<value>dtp_Gültigkeit</value>
</data>
<data name="&gt;&gt;dtp_Gültigkeit.Type" xml:space="preserve">
<value>System.Windows.Forms.DateTimePicker, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;dtp_Gültigkeit.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;dtp_Gültigkeit.ZOrder" xml:space="preserve">
<value>6</value>
</data>
<data name="&gt;&gt;txtlicensekey.Name" xml:space="preserve">
<value>txtlicensekey</value>
</data>
<data name="&gt;&gt;txtlicensekey.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txtlicensekey.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;txtlicensekey.ZOrder" xml:space="preserve">
<value>7</value>
</data>
<data name="&gt;&gt;lblReadKey.Name" xml:space="preserve">
<value>lblReadKey</value>
</data>
<data name="&gt;&gt;lblReadKey.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;lblReadKey.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;lblReadKey.ZOrder" xml:space="preserve">
<value>8</value>
</data>
<data name="&gt;&gt;btnnewLicenses.Name" xml:space="preserve">
<value>btnnewLicenses</value>
</data>
<data name="&gt;&gt;btnnewLicenses.Type" xml:space="preserve">
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;btnnewLicenses.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;btnnewLicenses.ZOrder" xml:space="preserve">
<value>9</value>
</data>
<data name="&gt;&gt;txtlicenseCount.Name" xml:space="preserve">
<value>txtlicenseCount</value>
</data>
<data name="&gt;&gt;txtlicenseCount.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txtlicenseCount.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;txtlicenseCount.ZOrder" xml:space="preserve">
<value>10</value>
</data>
<data name="&gt;&gt;lblnewlicenses.Name" xml:space="preserve">
<value>lblnewlicenses</value>
</data>
<data name="&gt;&gt;lblnewlicenses.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;lblnewlicenses.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;lblnewlicenses.ZOrder" xml:space="preserve">
<value>11</value>
</data>
<data name="&gt;&gt;lblAktuelleLizenzen.Name" xml:space="preserve">
<value>lblAktuelleLizenzen</value>
</data>
<data name="&gt;&gt;lblAktuelleLizenzen.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;lblAktuelleLizenzen.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;lblAktuelleLizenzen.ZOrder" xml:space="preserve">
<value>12</value>
</data>
<data name="grbBoxlicense.Location" type="System.Drawing.Point, System.Drawing">
<value>11, 42</value>
</data>
<data name="grbBoxlicense.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="grbBoxlicense.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="grbBoxlicense.Size" type="System.Drawing.Size, System.Drawing">
<value>567, 326</value>
</data>
<data name="grbBoxlicense.TabIndex" type="System.Int32, mscorlib">
<value>26</value>
</data>
<data name="grbBoxlicense.Text" xml:space="preserve">
<value>Lizenzanzahl ändern (nur Administrator):</value>
</data>
<data name="grbBoxlicense.Visible" type="System.Boolean, mscorlib">
<value>False</value>
</data>
<data name="&gt;&gt;grbBoxlicense.Name" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;grbBoxlicense.Type" xml:space="preserve">
<value>System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;grbBoxlicense.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;grbBoxlicense.ZOrder" xml:space="preserve">
<value>3</value>
</data>
<data name="Label3.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
@ -226,34 +415,34 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;Label3.ZOrder" xml:space="preserve">
<value>0</value>
<value>2</value>
</data>
<data name="txtProfile.Location" type="System.Drawing.Point, System.Drawing">
<data name="txtProfileCount.Location" type="System.Drawing.Point, System.Drawing">
<value>356, 62</value>
</data>
<data name="txtProfile.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<data name="txtProfileCount.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="txtProfile.Size" type="System.Drawing.Size, System.Drawing">
<data name="txtProfileCount.Size" type="System.Drawing.Size, System.Drawing">
<value>49, 23</value>
</data>
<data name="txtProfile.TabIndex" type="System.Int32, mscorlib">
<data name="txtProfileCount.TabIndex" type="System.Int32, mscorlib">
<value>11</value>
</data>
<data name="txtProfile.Text" xml:space="preserve">
<data name="txtProfileCount.Text" xml:space="preserve">
<value>5</value>
</data>
<data name="&gt;&gt;txtProfile.Name" xml:space="preserve">
<value>txtProfile</value>
<data name="&gt;&gt;txtProfileCount.Name" xml:space="preserve">
<value>txtProfileCount</value>
</data>
<data name="&gt;&gt;txtProfile.Type" xml:space="preserve">
<data name="&gt;&gt;txtProfileCount.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txtProfile.Parent" xml:space="preserve">
<data name="&gt;&gt;txtProfileCount.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;txtProfile.ZOrder" xml:space="preserve">
<value>1</value>
<data name="&gt;&gt;txtProfileCount.ZOrder" xml:space="preserve">
<value>3</value>
</data>
<data name="Label2.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
@ -262,7 +451,7 @@
<value>259, 65</value>
</data>
<data name="Label2.Size" type="System.Drawing.Size, System.Drawing">
<value>91, 16</value>
<value>90, 16</value>
</data>
<data name="Label2.TabIndex" type="System.Int32, mscorlib">
<value>10</value>
@ -280,7 +469,7 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;Label2.ZOrder" xml:space="preserve">
<value>2</value>
<value>4</value>
</data>
<data name="Label1.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
@ -289,7 +478,7 @@
<value>7, 94</value>
</data>
<data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
<value>65, 16</value>
<value>64, 16</value>
</data>
<data name="Label1.TabIndex" type="System.Int32, mscorlib">
<value>9</value>
@ -310,7 +499,7 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
<value>3</value>
<value>5</value>
</data>
<data name="dtp_Gültigkeit.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 89</value>
@ -331,10 +520,10 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;dtp_Gültigkeit.ZOrder" xml:space="preserve">
<value>4</value>
<value>6</value>
</data>
<data name="txtlicensekey.Location" type="System.Drawing.Point, System.Drawing">
<value>10, 146</value>
<value>13, 222</value>
</data>
<data name="txtlicensekey.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
@ -358,16 +547,16 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;txtlicensekey.ZOrder" xml:space="preserve">
<value>5</value>
<value>7</value>
</data>
<data name="lblReadKey.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="lblReadKey.Location" type="System.Drawing.Point, System.Drawing">
<value>7, 126</value>
<value>10, 202</value>
</data>
<data name="lblReadKey.Size" type="System.Drawing.Size, System.Drawing">
<value>105, 16</value>
<value>104, 16</value>
</data>
<data name="lblReadKey.TabIndex" type="System.Int32, mscorlib">
<value>6</value>
@ -385,7 +574,7 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;lblReadKey.ZOrder" xml:space="preserve">
<value>6</value>
<value>8</value>
</data>
<data name="btnnewLicenses.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>MiddleLeft</value>
@ -418,34 +607,34 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;btnnewLicenses.ZOrder" xml:space="preserve">
<value>7</value>
<value>9</value>
</data>
<data name="txtNewlizences.Location" type="System.Drawing.Point, System.Drawing">
<data name="txtlicenseCount.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 62</value>
</data>
<data name="txtNewlizences.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<data name="txtlicenseCount.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="txtNewlizences.Size" type="System.Drawing.Size, System.Drawing">
<data name="txtlicenseCount.Size" type="System.Drawing.Size, System.Drawing">
<value>49, 23</value>
</data>
<data name="txtNewlizences.TabIndex" type="System.Int32, mscorlib">
<data name="txtlicenseCount.TabIndex" type="System.Int32, mscorlib">
<value>4</value>
</data>
<data name="txtNewlizences.Text" xml:space="preserve">
<data name="txtlicenseCount.Text" xml:space="preserve">
<value>1</value>
</data>
<data name="&gt;&gt;txtNewlizences.Name" xml:space="preserve">
<value>txtNewlizences</value>
<data name="&gt;&gt;txtlicenseCount.Name" xml:space="preserve">
<value>txtlicenseCount</value>
</data>
<data name="&gt;&gt;txtNewlizences.Type" xml:space="preserve">
<data name="&gt;&gt;txtlicenseCount.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txtNewlizences.Parent" xml:space="preserve">
<data name="&gt;&gt;txtlicenseCount.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;txtNewlizences.ZOrder" xml:space="preserve">
<value>8</value>
<data name="&gt;&gt;txtlicenseCount.ZOrder" xml:space="preserve">
<value>10</value>
</data>
<data name="lblnewlicenses.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
@ -454,7 +643,7 @@
<value>7, 65</value>
</data>
<data name="lblnewlicenses.Size" type="System.Drawing.Size, System.Drawing">
<value>131, 16</value>
<value>130, 16</value>
</data>
<data name="lblnewlicenses.TabIndex" type="System.Int32, mscorlib">
<value>3</value>
@ -472,7 +661,7 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;lblnewlicenses.ZOrder" xml:space="preserve">
<value>9</value>
<value>11</value>
</data>
<data name="lblAktuelleLizenzen.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
@ -484,7 +673,7 @@
<value>7, 38</value>
</data>
<data name="lblAktuelleLizenzen.Size" type="System.Drawing.Size, System.Drawing">
<value>65, 16</value>
<value>64, 16</value>
</data>
<data name="lblAktuelleLizenzen.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
@ -502,40 +691,7 @@
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;lblAktuelleLizenzen.ZOrder" xml:space="preserve">
<value>10</value>
</data>
<data name="grbBoxlicense.Location" type="System.Drawing.Point, System.Drawing">
<value>11, 42</value>
</data>
<data name="grbBoxlicense.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="grbBoxlicense.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="grbBoxlicense.Size" type="System.Drawing.Size, System.Drawing">
<value>567, 222</value>
</data>
<data name="grbBoxlicense.TabIndex" type="System.Int32, mscorlib">
<value>26</value>
</data>
<data name="grbBoxlicense.Text" xml:space="preserve">
<value>Lizenzanzahl ändern (nur Administrator):</value>
</data>
<data name="grbBoxlicense.Visible" type="System.Boolean, mscorlib">
<value>False</value>
</data>
<data name="&gt;&gt;grbBoxlicense.Name" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;grbBoxlicense.Type" xml:space="preserve">
<value>System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;grbBoxlicense.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;grbBoxlicense.ZOrder" xml:space="preserve">
<value>3</value>
<value>12</value>
</data>
<metadata name="DD_DMSLiteDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
@ -549,6 +705,57 @@
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>699, 17</value>
</metadata>
<data name="Label4.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="Label4.Location" type="System.Drawing.Point, System.Drawing">
<value>7, 125</value>
</data>
<data name="Label4.Size" type="System.Drawing.Size, System.Drawing">
<value>91, 16</value>
</data>
<data name="Label4.TabIndex" type="System.Int32, mscorlib">
<value>13</value>
</data>
<data name="Label4.Text" xml:space="preserve">
<value>Zusatzmodule:</value>
</data>
<data name="&gt;&gt;Label4.Name" xml:space="preserve">
<value>Label4</value>
</data>
<data name="&gt;&gt;Label4.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Label4.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;Label4.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="txtModules.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 125</value>
</data>
<data name="txtModules.Multiline" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="txtModules.Size" type="System.Drawing.Size, System.Drawing">
<value>261, 64</value>
</data>
<data name="txtModules.TabIndex" type="System.Int32, mscorlib">
<value>15</value>
</data>
<data name="&gt;&gt;txtModules.Name" xml:space="preserve">
<value>txtModules</value>
</data>
<data name="&gt;&gt;txtModules.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txtModules.Parent" xml:space="preserve">
<value>grbBoxlicense</value>
</data>
<data name="&gt;&gt;txtModules.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
@ -556,7 +763,7 @@
<value>7, 16</value>
</data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>590, 276</value>
<value>590, 405</value>
</data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
@ -564,6 +771,9 @@
<data name="$this.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="$this.StartPosition" type="System.Windows.Forms.FormStartPosition, System.Windows.Forms">
<value>CenterScreen</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Lizenzmanager</value>
</data>

View File

@ -21,10 +21,14 @@ Public Class frmLicense
Private Sub btnnewLicenses_Click(sender As System.Object, e As System.EventArgs) Handles btnnewLicenses.Click
Try
If Me.txtNewlizences.Text <> "" And txtProfile.Text <> "" Then
If Me.txtlicenseCount.Text <> "" And txtProfileCount.Text <> "" Then
Dim dt As Date = CDate(dtp_Gültigkeit.Value)
Dim oDateddMMyyyy = dt.ToString("dd.MM.yyyy", CultureInfo.InvariantCulture)
Dim result As String = Me._lizenzManager.EncodeLicenseKey(txtNewlizences.Text & "#" & oDateddMMyyyy & "#" & txtProfile.Text, "#DigitalData35452!#")
Dim oLicString = txtlicenseCount.Text & "#" & oDateddMMyyyy & "#" & txtProfileCount.Text
If txtModules.Text <> String.Empty Then
oLicString = oLicString & "#" & txtModules.Text
End If
Dim result As String = Me._lizenzManager.EncodeLicenseKey(oLicString, "#DigitalData35452!#")
txtlicensekey.Text = result
Me.TBPM_KONFIGURATIONTableAdapter.CmdUpdateLizenz(USER_USERNAME, CStr(result))
Refresh_Licence(True)
@ -68,8 +72,17 @@ Public Class frmLicense
End Try
txtProfile.Text = split(2)
txtProfileCount.Text = split(2)
LICENSE_PROFILES = split(2)
Try
Dim oMod = split(3)
If Not IsNothing(split(3)) Then
txtModules.Text = split(3)
End If
Catch ex As Exception
End Try
Me.lblAktuelleLizenzen.Text = "Aktuelle Anzahl Lizenzen: " & lizenzzahl
If Neu = True Then
If CInt(lizenzzahl) > 0 Then

View File

@ -92,6 +92,9 @@ Partial Class frmMain
Me.cmbGridFontSize = New DevExpress.XtraEditors.Repository.RepositoryItemComboBox()
Me.BarButtonItem8 = New DevExpress.XtraBars.BarButtonItem()
Me.bsiRowCount = New DevExpress.XtraBars.BarStaticItem()
Me.BbtnitmAHWF1 = New DevExpress.XtraBars.BarButtonItem()
Me.BbtnitmAHWF2 = New DevExpress.XtraBars.BarButtonItem()
Me.BbtnitmAHWF3 = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPageStart = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@ -99,6 +102,7 @@ Partial Class frmMain
Me.RibbonPageGroupBasicConf = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup7 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroupAHW = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageTabelle = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup6 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@ -181,10 +185,8 @@ Partial Class frmMain
Me.XtraSaveFileDialog1 = New DevExpress.XtraEditors.XtraSaveFileDialog(Me.components)
Me.TimerInactivity = New System.Windows.Forms.Timer(Me.components)
Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPageGroupAHW = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.BbtnitmAHWF1 = New DevExpress.XtraBars.BarButtonItem()
Me.BbtnitmAHWF2 = New DevExpress.XtraBars.BarButtonItem()
Me.BbtnitmAHWF3 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem9 = New DevExpress.XtraBars.BarButtonItem()
Me.BbtnitmAHWF4 = New DevExpress.XtraBars.BarButtonItem()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel1.SuspendLayout()
CType(Me.GridControl_Docs, System.ComponentModel.ISupportInitialize).BeginInit()
@ -379,9 +381,9 @@ Partial Class frmMain
'RibbonControl1
'
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtniRefresh, Me.bbtniMonitor, Me.bbiProfilverwaltung, Me.bbiKonfiguration, Me.bbtniGrundeinstellung, Me.bbtnitemInfo, Me.BarButtonItem1, Me.bsiUser, Me.bsiLicenses, Me.bsiUserLoggedIn, Me.bsiVersion, Me.bsilastsync, Me.bsiDebug, Me.bsiMessage, Me.bbtniMetadataFile, Me.BarEditItem1, Me.bbtnitDashboardInv, Me.bsiGeneralInfo, Me.bbtnitmGhostMode, Me.bsi_GhostMode, Me.BarButtonItemGhostMode, Me.SearchItem1, Me.SearchItem2, Me.BarStaticItemAppServer, Me.bbtniCW, Me.bsiInactivityCheck, Me.BarButtonItem2, Me.BarCheckItemAutofilter, Me.BarCheckItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItemExportExcel, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItemWFSingle, Me.BarButtonItemWFGroup, Me.BarButtonItemFileLink, Me.BarButtonItemMassValidation, Me.BarCheckItemShowSearch, Me.barItemGridFontSize, Me.BarButtonItem8, Me.bsiRowCount, Me.BbtnitmAHWF1, Me.BbtnitmAHWF2, Me.BbtnitmAHWF3})
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtniRefresh, Me.bbtniMonitor, Me.bbiProfilverwaltung, Me.bbiKonfiguration, Me.bbtniGrundeinstellung, Me.bbtnitemInfo, Me.BarButtonItem1, Me.bsiUser, Me.bsiLicenses, Me.bsiUserLoggedIn, Me.bsiVersion, Me.bsilastsync, Me.bsiDebug, Me.bsiMessage, Me.bbtniMetadataFile, Me.BarEditItem1, Me.bbtnitDashboardInv, Me.bsiGeneralInfo, Me.bbtnitmGhostMode, Me.bsi_GhostMode, Me.BarButtonItemGhostMode, Me.SearchItem1, Me.SearchItem2, Me.BarStaticItemAppServer, Me.bbtniCW, Me.bsiInactivityCheck, Me.BarButtonItem2, Me.BarCheckItemAutofilter, Me.BarCheckItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItemExportExcel, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItemWFSingle, Me.BarButtonItemWFGroup, Me.BarButtonItemFileLink, Me.BarButtonItemMassValidation, Me.BarCheckItemShowSearch, Me.barItemGridFontSize, Me.BarButtonItem8, Me.bsiRowCount, Me.BbtnitmAHWF1, Me.BbtnitmAHWF2, Me.BbtnitmAHWF3, Me.BbtnitmAHWF4})
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.MaxItemId = 50
Me.RibbonControl1.MaxItemId = 51
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPageStart, Me.RibbonPageTabelle, Me.RibbonPageAktionen})
Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemProgressBar1, Me.RepositoryItemTrackBar1, Me.cmbGridFontSize})
@ -735,6 +737,45 @@ Partial Class frmMain
Me.bsiRowCount.Id = 43
Me.bsiRowCount.Name = "bsiRowCount"
'
'BbtnitmAHWF1
'
resources.ApplyResources(Me.BbtnitmAHWF1, "BbtnitmAHWF1")
Me.BbtnitmAHWF1.Id = 47
Me.BbtnitmAHWF1.ImageOptions.Image = CType(resources.GetObject("BbtnitmAHWF1.ImageOptions.Image"), System.Drawing.Image)
Me.BbtnitmAHWF1.ImageOptions.LargeImage = CType(resources.GetObject("BbtnitmAHWF1.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BbtnitmAHWF1.ItemAppearance.Normal.Font = CType(resources.GetObject("BbtnitmAHWF1.ItemAppearance.Normal.Font"), System.Drawing.Font)
Me.BbtnitmAHWF1.ItemAppearance.Normal.Options.UseFont = True
Me.BbtnitmAHWF1.Name = "BbtnitmAHWF1"
Me.BbtnitmAHWF1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
Me.BbtnitmAHWF1.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
'
'BbtnitmAHWF2
'
resources.ApplyResources(Me.BbtnitmAHWF2, "BbtnitmAHWF2")
Me.BbtnitmAHWF2.Id = 48
Me.BbtnitmAHWF2.ImageOptions.Image = CType(resources.GetObject("BbtnitmAHWF2.ImageOptions.Image"), System.Drawing.Image)
Me.BbtnitmAHWF2.ImageOptions.LargeImage = CType(resources.GetObject("BbtnitmAHWF2.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BbtnitmAHWF2.ItemAppearance.Normal.Font = CType(resources.GetObject("BbtnitmAHWF2.ItemAppearance.Normal.Font"), System.Drawing.Font)
Me.BbtnitmAHWF2.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Blue
Me.BbtnitmAHWF2.ItemAppearance.Normal.Options.UseFont = True
Me.BbtnitmAHWF2.ItemAppearance.Normal.Options.UseForeColor = True
Me.BbtnitmAHWF2.Name = "BbtnitmAHWF2"
Me.BbtnitmAHWF2.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
Me.BbtnitmAHWF2.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
'
'BbtnitmAHWF3
'
resources.ApplyResources(Me.BbtnitmAHWF3, "BbtnitmAHWF3")
Me.BbtnitmAHWF3.Id = 49
Me.BbtnitmAHWF3.ImageOptions.Image = CType(resources.GetObject("BbtnitmAHWF3.ImageOptions.Image"), System.Drawing.Image)
Me.BbtnitmAHWF3.ImageOptions.LargeImage = CType(resources.GetObject("BbtnitmAHWF3.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BbtnitmAHWF3.ItemAppearance.Normal.Font = CType(resources.GetObject("BbtnitmAHWF3.ItemAppearance.Normal.Font"), System.Drawing.Font)
Me.BbtnitmAHWF3.ItemAppearance.Normal.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer))
Me.BbtnitmAHWF3.ItemAppearance.Normal.Options.UseFont = True
Me.BbtnitmAHWF3.ItemAppearance.Normal.Options.UseForeColor = True
Me.BbtnitmAHWF3.Name = "BbtnitmAHWF3"
Me.BbtnitmAHWF3.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
'
'RibbonPageStart
'
Me.RibbonPageStart.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2, Me.RibbonPageGroup3, Me.RibbonPageGroupBasicConf, Me.RibbonPageGroup7, Me.RibbonPageGroup4, Me.RibbonPageGroupAHW})
@ -791,6 +832,17 @@ Partial Class frmMain
resources.ApplyResources(Me.RibbonPageGroup4, "RibbonPageGroup4")
Me.RibbonPageGroup4.Visible = False
'
'RibbonPageGroupAHW
'
Me.RibbonPageGroupAHW.AllowTextClipping = False
Me.RibbonPageGroupAHW.ItemLinks.Add(Me.BbtnitmAHWF1)
Me.RibbonPageGroupAHW.ItemLinks.Add(Me.BbtnitmAHWF2)
Me.RibbonPageGroupAHW.ItemLinks.Add(Me.BbtnitmAHWF3)
Me.RibbonPageGroupAHW.ItemLinks.Add(Me.BbtnitmAHWF4)
Me.RibbonPageGroupAHW.Name = "RibbonPageGroupAHW"
resources.ApplyResources(Me.RibbonPageGroupAHW, "RibbonPageGroupAHW")
Me.RibbonPageGroupAHW.Visible = False
'
'RibbonPageTabelle
'
Me.RibbonPageTabelle.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup6, Me.RibbonPageGroup5})
@ -1468,50 +1520,28 @@ Partial Class frmMain
Me.BarButtonItem5.Name = "BarButtonItem5"
Me.BarButtonItem5.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
'
'RibbonPageGroupAHW
'BarButtonItem9
'
Me.RibbonPageGroupAHW.AllowTextClipping = False
Me.RibbonPageGroupAHW.ItemLinks.Add(Me.BbtnitmAHWF1)
Me.RibbonPageGroupAHW.ItemLinks.Add(Me.BbtnitmAHWF2)
Me.RibbonPageGroupAHW.ItemLinks.Add(Me.BbtnitmAHWF3)
Me.RibbonPageGroupAHW.Name = "RibbonPageGroupAHW"
resources.ApplyResources(Me.RibbonPageGroupAHW, "RibbonPageGroupAHW")
Me.RibbonPageGroupAHW.Visible = False
resources.ApplyResources(Me.BarButtonItem9, "BarButtonItem9")
Me.BarButtonItem9.Id = 49
Me.BarButtonItem9.ImageOptions.Image = CType(resources.GetObject("BarButtonItem9.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem9.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem9.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem9.ItemAppearance.Normal.Font = CType(resources.GetObject("BarButtonItem9.ItemAppearance.Normal.Font"), System.Drawing.Font)
Me.BarButtonItem9.ItemAppearance.Normal.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer))
Me.BarButtonItem9.ItemAppearance.Normal.Options.UseFont = True
Me.BarButtonItem9.ItemAppearance.Normal.Options.UseForeColor = True
Me.BarButtonItem9.Name = "BarButtonItem9"
Me.BarButtonItem9.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
'
'BbtnitmAHWF1
'BbtnitmAHWF4
'
resources.ApplyResources(Me.BbtnitmAHWF1, "BbtnitmAHWF1")
Me.BbtnitmAHWF1.Id = 47
Me.BbtnitmAHWF1.ImageOptions.Image = CType(resources.GetObject("BarButtonItem9.ImageOptions.Image"), System.Drawing.Image)
Me.BbtnitmAHWF1.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem9.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BbtnitmAHWF1.ItemAppearance.Normal.Font = CType(resources.GetObject("BarButtonItem9.ItemAppearance.Normal.Font"), System.Drawing.Font)
Me.BbtnitmAHWF1.ItemAppearance.Normal.Options.UseFont = True
Me.BbtnitmAHWF1.Name = "BbtnitmAHWF1"
Me.BbtnitmAHWF1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
'
'BbtnitmAHWF2
'
resources.ApplyResources(Me.BbtnitmAHWF2, "BbtnitmAHWF2")
Me.BbtnitmAHWF2.Id = 48
Me.BbtnitmAHWF2.ImageOptions.Image = CType(resources.GetObject("BarButtonItem9.ImageOptions.Image1"), System.Drawing.Image)
Me.BbtnitmAHWF2.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem9.ImageOptions.LargeImage1"), System.Drawing.Image)
Me.BbtnitmAHWF2.ItemAppearance.Normal.Font = CType(resources.GetObject("BarButtonItem9.ItemAppearance.Normal.Font1"), System.Drawing.Font)
Me.BbtnitmAHWF2.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Blue
Me.BbtnitmAHWF2.ItemAppearance.Normal.Options.UseFont = True
Me.BbtnitmAHWF2.ItemAppearance.Normal.Options.UseForeColor = True
Me.BbtnitmAHWF2.Name = "BbtnitmAHWF2"
'
'BbtnitmAHWF3
'
resources.ApplyResources(Me.BbtnitmAHWF3, "BbtnitmAHWF3")
Me.BbtnitmAHWF3.Id = 49
Me.BbtnitmAHWF3.ImageOptions.Image = CType(resources.GetObject("BarButtonItem9.ImageOptions.Image2"), System.Drawing.Image)
Me.BbtnitmAHWF3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem9.ImageOptions.LargeImage2"), System.Drawing.Image)
Me.BbtnitmAHWF3.ItemAppearance.Normal.Font = CType(resources.GetObject("BarButtonItem9.ItemAppearance.Normal.Font2"), System.Drawing.Font)
Me.BbtnitmAHWF3.ItemAppearance.Normal.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer))
Me.BbtnitmAHWF3.ItemAppearance.Normal.Options.UseFont = True
Me.BbtnitmAHWF3.ItemAppearance.Normal.Options.UseForeColor = True
Me.BbtnitmAHWF3.Name = "BbtnitmAHWF3"
resources.ApplyResources(Me.BbtnitmAHWF4, "BbtnitmAHWF4")
Me.BbtnitmAHWF4.Id = 50
Me.BbtnitmAHWF4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem10.ImageOptions.Image"), System.Drawing.Image)
Me.BbtnitmAHWF4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem10.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BbtnitmAHWF4.Name = "BbtnitmAHWF4"
Me.BbtnitmAHWF4.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
Me.BbtnitmAHWF4.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
'
'frmMain
'
@ -1713,4 +1743,6 @@ Partial Class frmMain
Friend WithEvents RibbonPageGroupAHW As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents BbtnitmAHWF2 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BbtnitmAHWF3 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BbtnitmAHWF4 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem9 As DevExpress.XtraBars.BarButtonItem
End Class

View File

@ -125,7 +125,7 @@
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw
CAAAAk1TRnQBSQFMAgEBAgEAAZgBCQGYAQkBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
CAAAAk1TRnQBSQFMAgEBAgEAAagBCQGoAQkBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@ -208,7 +208,7 @@
<value>Gesamtübersicht Workflows</value>
</data>
<data name="GridControl_Docs.Size" type="System.Drawing.Size, System.Drawing">
<value>1214, 347</value>
<value>1248, 347</value>
</data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="GridControl_Docs.TabIndex" type="System.Int32, mscorlib">
@ -453,7 +453,7 @@
<value>0, 158</value>
</data>
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>1447, 347</value>
<value>1481, 347</value>
</data>
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
<value>4</value>
@ -1624,41 +1624,7 @@
<data name="BbtnitmAHWF1.Caption" xml:space="preserve">
<value>BarButtonItem9</value>
</data>
<data name="BarButtonItem9.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAJXRFWHRUaXRsZQBzaG9wO2Nh
cnQ7YnV5O3N0dWZmO2dvb2RzO2Z1bGw7kuUJygAAAPhJREFUOE+l0aFOw0Acx/GugicYDo1bhgFVQzI7
wSTJ5DweSULCA2D2CjUTPAFLJpC8AAg0QSEI2fH9Xe4uf3pdm4H49Hq/+/+v17Zwzv1La1hV1RVeNbat
W61haHYaTRbVYU3qrDkUZyfgXk4Qm73ORjvHAZZQ4zX8proMMArjr6PbOYb4xDeOkDaYQ0W36DrBDVS3
gm8WXU6xxRfGCsW8lujp79AG5yHz4s09tPiGCUqzwRk20PoT9KrZBvpAD1DRLi84RmoWOymxwBrxuB94
xh0OYeu9LNhXM7jAI6Y9WdIM9JF0dDV0ZUkzuIQaZj1Zkv7337jiBysWl4xXz/GOAAAAAElFTkSuQmCC
</value>
</data>
<data name="BarButtonItem9.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAJXRFWHRUaXRsZQBzaG9wO2Nh
cnQ7YnV5O3N0dWZmO2dvb2RzO2Z1bGw7kuUJygAAAjNJREFUWEfF1T1oFGEQgOEYJURBEIkBAyJIWlu1
uC4KNgmIldorpEgjEcEmaGcnCLYWKUQEUSwlBNHKUgKKoFaCWAmJiqLrO8fMMjs7d593xV3gSS6z83fZ
L3sTVVWNVRocpTQ4St1vnU4nFZNLsh6OfL3ED1T4iZW+hXFASdZDXcIfyGDvbd/COKAk64Ej2EYc/g3L
/QpbA0qyHrgLG/oRJzGJ7vV+ha0BJUmPPfgCW2ABjZxehV2h+RzWsKXk9VzIic7Chr/RWEOvwrqpay4D
rZlZCznRfVjuDY019Cqsm7rm8q79cLEVcrxpyEGz3HnEnIFuwaALnIflvdZYS1ZYC80HvQWPYHlXNdZi
hftxDRfsgvIH7x029ad/XR9IWN0ByJNOhv+FPAt835otcBu27Wm5oNJ3rbK41V3WmHihsZQtcBNWsCEX
VHrfVRa3OvnrWPyKxlK2wGF8hxWdgsSHWeAo7Ln/CzOoB0b+8NyDNXuisWFuwXUXe6axnvwCx/AbUigH
5wTSp5/K4rvxHrbARTQGRn4BsQ4rlkaH4K+X3ILVf8VeZHm1uMBx+M/tD1jEPvg8bxZn8BhWJ1aR5TfE
BcQd+EbDeIUpxN4t2QJS+ABZ4//xHAcR+6ayBcw5PMVnyKHMhokdfMJDLGEXsn6p7gLjlAYF26X/aoPm
lKRBoc3inzt++hVzStKgoJG8o9g8fv4Xc0rSoJBGoXGrufwerrdyStKgoNHYb8F4D+FoVBP/AFUrX/E8
p6dMAAAAAElFTkSuQmCC
</value>
</data>
<data name="BarButtonItem9.ItemAppearance.Normal.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 8.25pt, style=Bold</value>
</data>
<data name="BbtnitmAHWF2.Caption" xml:space="preserve">
<value>BarButtonItem9</value>
</data>
<data name="BarButtonItem9.ImageOptions.Image1" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<data name="BbtnitmAHWF1.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAHNob3A7Y2FydDtidXk7c3R1ZmY7
@ -1669,7 +1635,7 @@
pj1Z0gz0kXR0NXRlSTO4hBpmPVmS/vffuOIHKxaXjFfP8Y4AAAAASUVORK5CYII=
</value>
</data>
<data name="BarButtonItem9.ImageOptions.LargeImage1" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<data name="BbtnitmAHWF1.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAHNob3A7Y2FydDtidXk7c3R1ZmY7
@ -1686,13 +1652,81 @@
YII=
</value>
</data>
<data name="BarButtonItem9.ItemAppearance.Normal.Font1" type="System.Drawing.Font, System.Drawing">
<data name="BbtnitmAHWF1.ItemAppearance.Normal.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 8.25pt, style=Bold</value>
</data>
<data name="BbtnitmAHWF2.Caption" xml:space="preserve">
<value>BarButtonItem9</value>
</data>
<data name="BbtnitmAHWF2.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAHNob3A7Y2FydDtidXk7c3R1ZmY7
Z29vZHM7ZnVsbDuS5QnKAAAA+ElEQVQ4T6XRoU7DQBzH8a6CJxgOjVuGAVVDMjvBJMnkPB5JQsIDYPYK
NRM8AUsmkLwACDRBIQjZ8f1d7i5/el2bgfj0er/7/6/XtnDO/UtrWFXVFV41tq1brWFodhpNFtVhTeqs
ORRnJ+BeThCbvc5GO8cBllDjNfymugwwCuOvo9s5hvjEN46QNphDRbfoOsENVLeCbxZdTrHFF8YKxbyW
6Onv0AbnIfPizT20+IYJSrPBGTbQ+hP0qtkG+kAPUNEuLzhGahY7KbHAGvG4H3jGHQ5h670s2FczuMAj
pj1Z0gz0kXR0NXRlSTO4hBpmPVmS/vffuOIHKxaXjFfP8Y4AAAAASUVORK5CYII=
</value>
</data>
<data name="BbtnitmAHWF2.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAHNob3A7Y2FydDtidXk7c3R1ZmY7
Z29vZHM7ZnVsbDuS5QnKAAACM0lEQVRYR8XVPWgUYRCA4RglREEQiQEDIkhaW7W4Lgo2CYiV2iukSCMR
wSZoZycIthYpRARRLCUE0cpSAoqgVoJYCYmKous7x8wyOzt3n3fFXeBJLrPzd9kvexNVVY1VGhylNDhK
3W+dTicVk0uyHo58vcQPVPiJlb6FcUBJ1kNdwh/IYO9t38I4oCTrgSPYRhz+Dcv9ClsDSrIeuAsb+hEn
MYnu9X6FrQElSY89+AJbYAGNnF6FXaH5HNawpeT1XMiJzsKGv9FYQ6/CuqlrLgOtmVkLOdF9WO4NjTX0
Kqybuubyrv1wsRVyvGnIQbPcecScgW7BoAuch+W91lhLVlgLzQe9BY9geVc11mKF+3ENF+yC8gfvHTb1
p39dH0hY3QHIk06G/4U8C3zfmi1wG7btabmg0netsrjVXdaYeKGxlC1wE1awIRdUet9VFrc6+etY/IrG
UrbAYXyHFZ2CxIdZ4Cjsuf8LM6gHRv7w3IM1e6KxYW7BdRd7prGe/ALH8BtSKAfnBNKnn8riu/EetsBF
NAZGfgGxDiuWRofgr5fcgtV/xV5kebW4wHH4z+0PWMQ++DxvFmfwGFYnVpHlN8QFxB34RsN4hSnE3i3Z
AlL4AFnj//EcBxH7prIFzDk8xWfIocyGiR18wkMsYReyfqnuAuOUBgXbpf9qg+aUpEGhzeKfO376FXNK
0qCgkbyj2Dx+/hdzStKgkEahcau5/B6ut3JK0qCg0dhvwXgP4WhUE/8AVStf8Tynp0wAAAAASUVORK5C
YII=
</value>
</data>
<data name="BbtnitmAHWF2.ItemAppearance.Normal.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 8.25pt, style=Bold</value>
</data>
<data name="BbtnitmAHWF3.Caption" xml:space="preserve">
<value>BarButtonItem9</value>
</data>
<data name="BarButtonItem9.ImageOptions.Image2" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<data name="BbtnitmAHWF3.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAHNob3A7Y2FydDtidXk7c3R1ZmY7
Z29vZHM7ZnVsbDuS5QnKAAAA+ElEQVQ4T6XRoU7DQBzH8a6CJxgOjVuGAVVDMjvBJMnkPB5JQsIDYPYK
NRM8AUsmkLwACDRBIQjZ8f1d7i5/el2bgfj0er/7/6/XtnDO/UtrWFXVFV41tq1brWFodhpNFtVhTeqs
ORRnJ+BeThCbvc5GO8cBllDjNfymugwwCuOvo9s5hvjEN46QNphDRbfoOsENVLeCbxZdTrHFF8YKxbyW
6Onv0AbnIfPizT20+IYJSrPBGTbQ+hP0qtkG+kAPUNEuLzhGahY7KbHAGvG4H3jGHQ5h670s2FczuMAj
pj1Z0gz0kXR0NXRlSTO4hBpmPVmS/vffuOIHKxaXjFfP8Y4AAAAASUVORK5CYII=
</value>
</data>
<data name="BbtnitmAHWF3.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAHNob3A7Y2FydDtidXk7c3R1ZmY7
Z29vZHM7ZnVsbDuS5QnKAAACM0lEQVRYR8XVPWgUYRCA4RglREEQiQEDIkhaW7W4Lgo2CYiV2iukSCMR
wSZoZycIthYpRARRLCUE0cpSAoqgVoJYCYmKous7x8wyOzt3n3fFXeBJLrPzd9kvexNVVY1VGhylNDhK
3W+dTicVk0uyHo58vcQPVPiJlb6FcUBJ1kNdwh/IYO9t38I4oCTrgSPYRhz+Dcv9ClsDSrIeuAsb+hEn
MYnu9X6FrQElSY89+AJbYAGNnF6FXaH5HNawpeT1XMiJzsKGv9FYQ6/CuqlrLgOtmVkLOdF9WO4NjTX0
Kqybuubyrv1wsRVyvGnIQbPcecScgW7BoAuch+W91lhLVlgLzQe9BY9geVc11mKF+3ENF+yC8gfvHTb1
p39dH0hY3QHIk06G/4U8C3zfmi1wG7btabmg0netsrjVXdaYeKGxlC1wE1awIRdUet9VFrc6+etY/IrG
UrbAYXyHFZ2CxIdZ4Cjsuf8LM6gHRv7w3IM1e6KxYW7BdRd7prGe/ALH8BtSKAfnBNKnn8riu/EetsBF
NAZGfgGxDiuWRofgr5fcgtV/xV5kebW4wHH4z+0PWMQ++DxvFmfwGFYnVpHlN8QFxB34RsN4hSnE3i3Z
AlL4AFnj//EcBxH7prIFzDk8xWfIocyGiR18wkMsYReyfqnuAuOUBgXbpf9qg+aUpEGhzeKfO376FXNK
0qCgkbyj2Dx+/hdzStKgkEahcau5/B6ut3JK0qCg0dhvwXgP4WhUE/8AVStf8Tynp0wAAAAASUVORK5C
YII=
</value>
</data>
<data name="BbtnitmAHWF3.ItemAppearance.Normal.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 8.25pt, style=Bold</value>
</data>
<data name="BbtnitmAHWF4.Caption" xml:space="preserve">
<value>BarButtonItem10</value>
</data>
<data name="BarButtonItem10.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAJXRFWHRUaXRsZQBzaG9wO2Nh
@ -1703,7 +1737,7 @@
xh0OYeu9LNhXM7jAI6Y9WdIM9JF0dDV0ZUkzuIQaZj1Zkv7337jiBysWl4xXz/GOAAAAAElFTkSuQmCC
</value>
</data>
<data name="BarButtonItem9.ImageOptions.LargeImage2" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<data name="BarButtonItem10.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAJXRFWHRUaXRsZQBzaG9wO2Nh
@ -1720,9 +1754,6 @@
p6dMAAAAAElFTkSuQmCC
</value>
</data>
<data name="BarButtonItem9.ItemAppearance.Normal.Font2" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 8.25pt, style=Bold</value>
</data>
<data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
</data>
@ -1763,13 +1794,13 @@
<value>Aktionen</value>
</data>
<data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>1447, 158</value>
<value>1481, 158</value>
</data>
<data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 505</value>
</data>
<data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
<value>1447, 22</value>
<value>1481, 22</value>
</data>
<data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
<value>RibbonStatusBar1</value>
@ -1811,7 +1842,7 @@
<value>0, 527</value>
</data>
<data name="barDockControlBottom.Size" type="System.Drawing.Size, System.Drawing">
<value>1447, 0</value>
<value>1481, 0</value>
</data>
<data name="&gt;&gt;barDockControlBottom.Name" xml:space="preserve">
<value>barDockControlBottom</value>
@ -1850,7 +1881,7 @@
<value>Right</value>
</data>
<data name="barDockControlRight.Location" type="System.Drawing.Point, System.Drawing">
<value>1447, 0</value>
<value>1481, 0</value>
</data>
<data name="barDockControlRight.Size" type="System.Drawing.Size, System.Drawing">
<value>0, 527</value>
@ -1871,13 +1902,13 @@
<value>True</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>63</value>
<value>25</value>
</metadata>
<data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
<value>9, 19</value>
</data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>1447, 527</value>
<value>1481, 527</value>
</data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 12pt</value>
@ -2429,6 +2460,24 @@
<data name="&gt;&gt;bsiRowCount.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF1.Name" xml:space="preserve">
<value>BbtnitmAHWF1</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF1.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF2.Name" xml:space="preserve">
<value>BbtnitmAHWF2</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF2.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF3.Name" xml:space="preserve">
<value>BbtnitmAHWF3</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF3.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPageStart.Name" xml:space="preserve">
<value>RibbonPageStart</value>
</data>
@ -2471,6 +2520,12 @@
<data name="&gt;&gt;RibbonPageGroup4.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPageGroupAHW.Name" xml:space="preserve">
<value>RibbonPageGroupAHW</value>
</data>
<data name="&gt;&gt;RibbonPageGroupAHW.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPageTabelle.Name" xml:space="preserve">
<value>RibbonPageTabelle</value>
</data>
@ -2933,28 +2988,16 @@
<data name="&gt;&gt;BarButtonItem5.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPageGroupAHW.Name" xml:space="preserve">
<value>RibbonPageGroupAHW</value>
<data name="&gt;&gt;BarButtonItem9.Name" xml:space="preserve">
<value>BarButtonItem9</value>
</data>
<data name="&gt;&gt;RibbonPageGroupAHW.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF1.Name" xml:space="preserve">
<value>BbtnitmAHWF1</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF1.Type" xml:space="preserve">
<data name="&gt;&gt;BarButtonItem9.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF2.Name" xml:space="preserve">
<value>BbtnitmAHWF2</value>
<data name="&gt;&gt;BbtnitmAHWF4.Name" xml:space="preserve">
<value>BbtnitmAHWF4</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF2.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF3.Name" xml:space="preserve">
<value>BbtnitmAHWF3</value>
</data>
<data name="&gt;&gt;BbtnitmAHWF3.Type" xml:space="preserve">
<data name="&gt;&gt;BbtnitmAHWF4.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
@ -3298,7 +3341,7 @@
<value>Graphisches Dokument</value>
</data>
<data name="barDockControlTop.Size" type="System.Drawing.Size, System.Drawing">
<value>1447, 0</value>
<value>1481, 0</value>
</data>
<data name="&gt;&gt;barDockControlTop.Name" xml:space="preserve">
<value>barDockControlTop</value>
@ -3367,4 +3410,38 @@
IDwvZz4NCjwvc3ZnPgs=
</value>
</data>
<data name="BarButtonItem9.Caption" xml:space="preserve">
<value>BarButtonItem9</value>
</data>
<data name="BarButtonItem9.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAHNob3A7Y2FydDtidXk7c3R1ZmY7
Z29vZHM7ZnVsbDuS5QnKAAAA+ElEQVQ4T6XRoU7DQBzH8a6CJxgOjVuGAVVDMjvBJMnkPB5JQsIDYPYK
NRM8AUsmkLwACDRBIQjZ8f1d7i5/el2bgfj0er/7/6/XtnDO/UtrWFXVFV41tq1brWFodhpNFtVhTeqs
ORRnJ+BeThCbvc5GO8cBllDjNfymugwwCuOvo9s5hvjEN46QNphDRbfoOsENVLeCbxZdTrHFF8YKxbyW
6Onv0AbnIfPizT20+IYJSrPBGTbQ+hP0qtkG+kAPUNEuLzhGahY7KbHAGvG4H3jGHQ5h670s2FczuMAj
pj1Z0gz0kXR0NXRlSTO4hBpmPVmS/vffuOIHKxaXjFfP8Y4AAAAASUVORK5CYII=
</value>
</data>
<data name="BarButtonItem9.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAHNob3A7Y2FydDtidXk7c3R1ZmY7
Z29vZHM7ZnVsbDuS5QnKAAACM0lEQVRYR8XVPWgUYRCA4RglREEQiQEDIkhaW7W4Lgo2CYiV2iukSCMR
wSZoZycIthYpRARRLCUE0cpSAoqgVoJYCYmKous7x8wyOzt3n3fFXeBJLrPzd9kvexNVVY1VGhylNDhK
3W+dTicVk0uyHo58vcQPVPiJlb6FcUBJ1kNdwh/IYO9t38I4oCTrgSPYRhz+Dcv9ClsDSrIeuAsb+hEn
MYnu9X6FrQElSY89+AJbYAGNnF6FXaH5HNawpeT1XMiJzsKGv9FYQ6/CuqlrLgOtmVkLOdF9WO4NjTX0
Kqybuubyrv1wsRVyvGnIQbPcecScgW7BoAuch+W91lhLVlgLzQe9BY9geVc11mKF+3ENF+yC8gfvHTb1
p39dH0hY3QHIk06G/4U8C3zfmi1wG7btabmg0netsrjVXdaYeKGxlC1wE1awIRdUet9VFrc6+etY/IrG
UrbAYXyHFZ2CxIdZ4Cjsuf8LM6gHRv7w3IM1e6KxYW7BdRd7prGe/ALH8BtSKAfnBNKnn8riu/EetsBF
NAZGfgGxDiuWRofgr5fcgtV/xV5kebW4wHH4z+0PWMQ++DxvFmfwGFYnVpHlN8QFxB34RsN4hSnE3i3Z
AlL4AFnj//EcBxH7prIFzDk8xWfIocyGiR18wkMsYReyfqnuAuOUBgXbpf9qg+aUpEGhzeKfO376FXNK
0qCgkbyj2Dx+/hdzStKgkEahcau5/B6ut3JK0qCg0dhvwXgP4WhUE/8AVStf8Tynp0wAAAAASUVORK5C
YII=
</value>
</data>
<data name="BarButtonItem9.ItemAppearance.Normal.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 8.25pt, style=Bold</value>
</data>
</root>

View File

@ -348,7 +348,7 @@ Public Class frmMain
LoadNavBar()
AddHandler NavBarControl1.LinkClicked, AddressOf navBar_LinkClicked
If Not IsNothing(CURR_DT_VWPM_PROFILE_AH_WORKFLOW) Then
If CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Rows.Count > 0 Then
If CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Rows.Count > 0 And LIC_MODULES.Contains("MOD_AdhocWorkflow_BlindFile") Then
RibbonPageGroupAHW.Visible = True
Dim OCounter As Integer = 1
For Each oRow As DataRow In CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Rows
@ -370,8 +370,11 @@ Public Class frmMain
End Select
OCounter += 1
Next
Else
LOGGER.Info($"NO ADHOC-WFs Blindfiles ({CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Rows.Count}) or License AHWF_NoBlindFile not integrated...")
End If
Else
LOGGER.Debug("NO ADHOC-WFs Blindfiles (Nothing)...")
End If
Try
If SHOW_CHARTS = True Then
@ -1420,6 +1423,7 @@ Public Class frmMain
If CURRENT_DT_PROFILE.Rows.Count = 1 Then
CURRENT_ProfilName = CURRENT_DT_PROFILE.Rows(0).Item("NAME")
CURRENT_WMObjecttype = CURRENT_DT_PROFILES.Rows(0).Item("WD_OBJECTTYPE")
PROFILE_SHOW_DOCUMENT = CURRENT_DT_PROFILES.Rows(0).Item("SHOW_DOCUMENT")
Else
MsgBox("Could not get a Profile - Check Your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
Exit Sub
@ -2320,7 +2324,9 @@ Public Class frmMain
If pMode = "bwBasicData" Then bwBasicData.ReportProgress(20)
If SQL_PROFILES_USER <> "" Then
oSQL = SQL_PROFILES_USER.Replace("@USER_ID", USER_ID)
LOGGER.Debug($"VWPM_PROFILE_ACTIVE-SELECT used from DD-SQL-Config..")
Else
oSQL = String.Format("SELECT T.* FROM VWPM_PROFILE_ACTIVE T WHERE T.FILE_COUNT > 0 AND T.GUID IN (SELECT PROFILE_ID FROM [dbo].[FNPM_GET_ACTIVE_PROFILES_USER] ({0}))", USER_ID)
@ -2329,9 +2335,12 @@ Public Class frmMain
CURR_DT_VWPM_PROFILE_ACTIVE = DatabaseFallback.GetDatatableECM(oSQL)
CURR_DT_VWPM_PROFILE_AH_WORKFLOW = CURR_DT_VWPM_PROFILE_ACTIVE.Copy
CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Clear()
Dim AHWFRows As DataRow() = CURR_DT_VWPM_PROFILE_ACTIVE.Select("DISPLAY_MODE = 'AdHoc BlindFile' OR DISPLAY_MODE = 'AdHoc'", "PRIORITY")
Dim AHWFRows As DataRow() = CURR_DT_VWPM_PROFILE_ACTIVE.Select("DISPLAY_MODE like 'AdHoc BlindFile%'", "PRIORITY")
If AHWFRows.Length > 0 Then
LOGGER.Info($"...NUMBER OF ADHOC-WORKFLOW PROFILES ({AHWFRows.Length})")
CURR_DT_VWPM_PROFILE_AH_WORKFLOW = AHWFRows.CopyToDataTable()
Else
LOGGER.Info($"...NO ADHOC-WORKFLOW PROFILES!")
End If
If pMode = "bwBasicData" Then bwBasicData.ReportProgress(30)
@ -3006,6 +3015,7 @@ where (CONVERT(DATE,GETDATE()) <= NOTE.DISPLAY_UNTIL or NOTE.DISPLAY_UNTIL IS NU
CURRENT_DT_PROFILES.Select(oExpression).CopyToDataTable(CURRENT_DT_PROFILE, LoadOption.PreserveChanges)
If CURRENT_DT_PROFILE.Rows.Count = 1 Then
CURRENT_ProfilName = CURRENT_DT_PROFILE.Rows(0).Item("NAME")
PROFILE_SHOW_DOCUMENT = CURRENT_DT_PROFILE.Rows(0).Item("SHOW_DOCUMENT")
Else
Exit Sub
End If
@ -3114,65 +3124,79 @@ where (CONVERT(DATE,GETDATE()) <= NOTE.DISPLAY_UNTIL or NOTE.DISPLAY_UNTIL IS NU
RowCount()
End Sub
Private Sub BbtnitmAHWF1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BbtnitmAHWF1.ItemClick
AdHocWorkflow_BlindFile(BbtnitmAHWF1.Tag)
Private Sub BbtnitmAHWF1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BbtnitmAHWF1.ItemClick, BbtnitmAHWF2.ItemClick, BbtnitmAHWF3.ItemClick, BbtnitmAHWF4.ItemClick
Dim obutton As DevExpress.XtraBars.BarButtonItem = TryCast(e.Item, DevExpress.XtraBars.BarButtonItem)
AdHocWorkflow_BlindFile(obutton.Tag)
End Sub
Private Sub AdHocWorkflow_BlindFile(pProfileID As Int16)
Try
If Not Application.OpenForms().OfType(Of frmValidator).Any Then
Dim oExpression = $"GUID = {pProfileID}"
LOGGER.Debug($"Starting AHWFNoFile for ProfileID: {pProfileID}...")
CURRENT_DT_PROFILE = Nothing
CURRENT_DT_PROFILE = CURRENT_DT_PROFILES.Clone
CURRENT_DT_PROFILES.Select(oExpression).CopyToDataTable(CURRENT_DT_PROFILE, LoadOption.PreserveChanges)
CURRENT_ProfilGUID = pProfileID
Dim sGUID As String
sGUID = System.Guid.NewGuid.ToString()
Dim oTargetPath = CURRENT_DT_PROFILES.Rows(0).Item("DESCRIPTION")
Dim oSourcePath = CURRENT_DT_PROFILES.Rows(0).Item("WD_SEARCH")
If oTargetPath = String.Empty Or oSourcePath = String.Empty Then
Exit Sub
If CURRENT_DT_PROFILE.Rows.Count = 1 Then
CURRENT_ProfilGUID = pProfileID
Dim sGUID As String
sGUID = System.Guid.NewGuid.ToString()
Dim oTargetPath = CURRENT_DT_PROFILE.Rows(0).Item("DESCRIPTION")
Dim oSourcePath = CURRENT_DT_PROFILE.Rows(0).Item("WD_SEARCH")
Dim oWMObjecttype = CURRENT_DT_PROFILE.Rows(0).Item("WD_OBJECTTYPE")
LOGGER.Debug($"oTargetPath: {oTargetPath}")
LOGGER.Debug($"oSourcePath: {oSourcePath}")
If oTargetPath = String.Empty Or oSourcePath = String.Empty Then
Exit Sub
End If
oTargetPath = $"{oTargetPath}\{Now.Year}\{Now.Month}\{Now.Day}"
oTargetPath = oTargetPath & "\" & sGUID & ".pdf"
LOGGER.Debug($"oTargetPath with NowParams: {oTargetPath}")
Dim oResult = WINDREAM_MOD.NewFileStream(oSourcePath, oTargetPath, oWMObjecttype)
If oResult = True Then
WM_AHWF_docPath = oTargetPath
Dim oDocID = WINDREAM_MOD.NewDocumentID
CURRENT_CLICKED_PROFILE_ID = pProfileID
PROFILE_SHOW_DOCUMENT = CURRENT_DT_PROFILE.Rows(0).Item("SHOW_DOCUMENT")
CURRENT_CLICKED_PROFILE_TITLE = CURRENT_DT_PROFILE.Rows(0).Item("TITLE")
CURRENT_WMObjecttype = CURRENT_DT_PROFILE.Rows(0).Item("WD_OBJECTTYPE")
CURRENT_DOC_ID = oDocID
CURRENT_DOC_GUID = 99123456789
ActiveWorkflowType = ConstAHWorkflow_BlindFile
CURRENT_JUMP_DOC_GUID = CURRENT_DOC_GUID
DT_FILTERED_PROFILE_SEARCHES_DOC = Nothing
DT_FILTERED_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Copy
DT_FILTERED_PROFILE_SEARCHES_DOC.Clear()
oExpression = $"PROFILE_ID = {CURRENT_ProfilGUID}"
BASEDATA_DT_PROFILES_SEARCHES_DOC.Select(oExpression, "TAB_INDEX").CopyToDataTable(DT_FILTERED_PROFILE_SEARCHES_DOC, LoadOption.PreserveChanges)
BASEDATA_DT_PROFILE_SEARCHES_SQL = Nothing
BASEDATA_DT_PROFILE_SEARCHES_SQL = BASEDATA_DT_PROFILES_SEARCHES_SQL.Copy
BASEDATA_DT_PROFILE_SEARCHES_SQL.Clear()
BASEDATA_DT_PROFILES_SEARCHES_SQL.Select(oExpression, "TAB_INDEX").CopyToDataTable(BASEDATA_DT_PROFILE_SEARCHES_SQL, LoadOption.PreserveChanges)
Try
Dim oEnvironment = GetEnvironment()
_FormValidator = New frmValidator(oEnvironment)
AddHandler _FormValidator.FormClosed, AddressOf ValidatorClosed
_FormValidator.Show()
Catch ex As Exception
LOGGER.Warn($"Error opening Form frmValidator [{ex.Message}]")
LOGGER.Warn($"ex.InnerException.Message [{ex.InnerException.Message}]")
LOGGER.Warn($"ex.InnerException.Source [{ex.InnerException.Source}]")
LOGGER.Error(ex.InnerException)
MsgBox(ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
End Try
End If
Else
LOGGER.Info("Attention: CURRENT_DT_PROFILE.Rows.Count <> 1")
End If
oTargetPath = $"{oTargetPath}\{Now.Year}\{Now.Month}\{Now.Day}"
oTargetPath = oTargetPath & "\" & sGUID & ".pdf"
Dim oResult = WINDREAM_MOD.NewFileStream(oSourcePath, oTargetPath)
If oResult = True Then
WM_AHWF_docPath = oTargetPath
Dim oDocID = WINDREAM_MOD.NewDocumentID
CURRENT_CLICKED_PROFILE_ID = pProfileID
CURRENT_CLICKED_PROFILE_TITLE = CURRENT_DT_PROFILES.Rows(0).Item("TITLE")
CURRENT_WMObjecttype = CURRENT_DT_PROFILES.Rows(0).Item("WD_OBJECTTYPE")
CURRENT_DOC_ID = oDocID
CURRENT_DOC_GUID = 99123456789
ActiveWorkflowType = ConstAHWorkflow_BlindFile
CURRENT_JUMP_DOC_GUID = CURRENT_DOC_GUID
DT_FILTERED_PROFILE_SEARCHES_DOC = Nothing
DT_FILTERED_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Copy
DT_FILTERED_PROFILE_SEARCHES_DOC.Clear()
oExpression = $"PROFILE_ID = {CURRENT_ProfilGUID}"
BASEDATA_DT_PROFILES_SEARCHES_DOC.Select(oExpression, "TAB_INDEX").CopyToDataTable(DT_FILTERED_PROFILE_SEARCHES_DOC, LoadOption.PreserveChanges)
BASEDATA_DT_PROFILE_SEARCHES_SQL = Nothing
BASEDATA_DT_PROFILE_SEARCHES_SQL = BASEDATA_DT_PROFILES_SEARCHES_SQL.Copy
BASEDATA_DT_PROFILE_SEARCHES_SQL.Clear()
BASEDATA_DT_PROFILES_SEARCHES_SQL.Select(oExpression, "TAB_INDEX").CopyToDataTable(BASEDATA_DT_PROFILE_SEARCHES_SQL, LoadOption.PreserveChanges)
Try
Dim oEnvironment = GetEnvironment()
_FormValidator = New frmValidator(oEnvironment)
AddHandler _FormValidator.FormClosed, AddressOf ValidatorClosed
_FormValidator.Show()
Catch ex As Exception
LOGGER.Warn($"Error opening Form frmValidator [{ex.Message}]")
LOGGER.Warn($"ex.InnerException.Message [{ex.InnerException.Message}]")
LOGGER.Warn($"ex.InnerException.Source [{ex.InnerException.Source}]")
LOGGER.Error(ex.InnerException)
MsgBox(ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
End Try
End If
Else
FormHelper.ShowInfoMessage(S.Bitte_schließen_Sie_den_offenen_Workflow_, omsgTitleWarning)
Exit Sub
@ -3182,4 +3206,6 @@ where (CONVERT(DATE,GETDATE()) <= NOTE.DISPLAY_UNTIL or NOTE.DISPLAY_UNTIL IS NU
LOGGER.Error(ex)
End Try
End Sub
End Class

View File

@ -100,6 +100,7 @@ Partial Class frmValidator
Me.barbtnitmExport = New DevExpress.XtraBars.BarButtonItem()
Me.ToggleSwitchItemLoadonClick = New DevExpress.XtraBars.BarToggleSwitchItem()
Me.Attmnt_bbtnitm_LoadonClick = New DevExpress.XtraBars.BarCheckItem()
Me.BarButtonItem6 = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPageConversations = New DevExpress.XtraBars.Ribbon.RibbonPageCategory()
Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroupConv1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@ -464,9 +465,9 @@ Partial Class frmValidator
'RibbonControl1
'
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bsiError, Me.bsiInformation, Me.bsiDocID, Me.BarButtonItemFileView, Me.BarButtonItem3, Me.BarButtonItem4, Me.bbtniRefresh, Me.bbtniRefreshSearches, Me.bbtniNext, Me.bbtniDelete, Me.bbtniAnnotation, Me.bsiInfo1, Me.bsiInfo2, Me.BbtnitmSave, Me.BarButtonItem2, Me.BarLinkContainerItem1, Me.btnitemConversationEnd, Me.bbtnitem_ConversationNew, Me.BarLinkContainerItem2, Me.BarEditItem1, Me.BarEditItem2, Me.BarEditItem3, Me.btnitemConversation_reload, Me.BarButtonItem5, Me.Attmt_bbtnitmShow, Me.barbtnitmExport, Me.ToggleSwitchItemLoadonClick, Me.Attmnt_bbtnitm_LoadonClick})
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bsiError, Me.bsiInformation, Me.bsiDocID, Me.BarButtonItemFileView, Me.BarButtonItem3, Me.BarButtonItem4, Me.bbtniRefresh, Me.bbtniRefreshSearches, Me.bbtniNext, Me.bbtniDelete, Me.bbtniAnnotation, Me.bsiInfo1, Me.bsiInfo2, Me.BbtnitmSave, Me.BarButtonItem2, Me.BarLinkContainerItem1, Me.btnitemConversationEnd, Me.bbtnitem_ConversationNew, Me.BarLinkContainerItem2, Me.BarEditItem1, Me.BarEditItem2, Me.BarEditItem3, Me.btnitemConversation_reload, Me.BarButtonItem5, Me.Attmt_bbtnitmShow, Me.barbtnitmExport, Me.ToggleSwitchItemLoadonClick, Me.Attmnt_bbtnitm_LoadonClick, Me.BarButtonItem6})
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.MaxItemId = 32
Me.RibbonControl1.MaxItemId = 33
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.RibbonPageConversations})
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
@ -722,6 +723,12 @@ Partial Class frmValidator
Me.Attmnt_bbtnitm_LoadonClick.ItemInMenuAppearance.Pressed.Options.UseForeColor = True
Me.Attmnt_bbtnitm_LoadonClick.Name = "Attmnt_bbtnitm_LoadonClick"
'
'BarButtonItem6
'
resources.ApplyResources(Me.BarButtonItem6, "BarButtonItem6")
Me.BarButtonItem6.Id = 32
Me.BarButtonItem6.Name = "BarButtonItem6"
'
'RibbonPageConversations
'
Me.RibbonPageConversations.Name = "RibbonPageConversations"
@ -770,6 +777,7 @@ Partial Class frmValidator
Me.RibbonPageGroup3.ItemLinks.Add(Me.bbtniNext)
Me.RibbonPageGroup3.ItemLinks.Add(Me.bbtniDelete)
Me.RibbonPageGroup3.ItemLinks.Add(Me.bbtniAnnotation)
Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem6)
Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3")
'
@ -938,4 +946,5 @@ Partial Class frmValidator
Friend WithEvents FolderBrowserDialog1 As FolderBrowserDialog
Friend WithEvents ToggleSwitchItemLoadonClick As DevExpress.XtraBars.BarToggleSwitchItem
Friend WithEvents Attmnt_bbtnitm_LoadonClick As DevExpress.XtraBars.BarCheckItem
Friend WithEvents BarButtonItem6 As DevExpress.XtraBars.BarButtonItem
End Class

View File

@ -131,31 +131,6 @@
<data name="SplitContainer1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
</data>
<data name="TITLELabel1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Top, Left, Right</value>
</data>
<data name="TITLELabel1.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI Symbol, 12pt, style=Bold</value>
</data>
<data name="TITLELabel1.Location" type="System.Drawing.Point, System.Drawing">
<value>3, 4</value>
</data>
<data name="TITLELabel1.RightToLeft" type="System.Windows.Forms.RightToLeft, System.Windows.Forms">
<value>No</value>
</data>
<data name="TITLELabel1.Size" type="System.Drawing.Size, System.Drawing">
<value>433, 29</value>
</data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="TITLELabel1.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="TITLELabel1.Text" xml:space="preserve">
<value>Label1</value>
</data>
<data name="TITLELabel1.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>MiddleLeft</value>
</data>
<data name="&gt;&gt;TITLELabel1.Name" xml:space="preserve">
<value>TITLELabel1</value>
</data>
@ -168,30 +143,6 @@
<data name="&gt;&gt;TITLELabel1.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="btnSave.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Bottom, Left, Right</value>
</data>
<data name="btnSave.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
</data>
<data name="btnSave.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>MiddleLeft</value>
</data>
<data name="btnSave.Location" type="System.Drawing.Point, System.Drawing">
<value>7, 446</value>
</data>
<data name="btnSave.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="btnSave.Size" type="System.Drawing.Size, System.Drawing">
<value>445, 50</value>
</data>
<data name="btnSave.TabIndex" type="System.Int32, mscorlib">
<value>11</value>
</data>
<data name="btnSave.Text" xml:space="preserve">
<value>Validierung speichern - Nächstes Dokument</value>
</data>
<data name="&gt;&gt;btnSave.Name" xml:space="preserve">
<value>btnSave</value>
</data>
@ -204,21 +155,6 @@
<data name="&gt;&gt;btnSave.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="DESCRIPTIONLabel.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Top, Left, Right</value>
</data>
<data name="DESCRIPTIONLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>5, 33</value>
</data>
<data name="DESCRIPTIONLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>447, 48</value>
</data>
<data name="DESCRIPTIONLabel.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="DESCRIPTIONLabel.Text" xml:space="preserve">
<value>Label3</value>
</data>
<data name="&gt;&gt;DESCRIPTIONLabel.Name" xml:space="preserve">
<value>DESCRIPTIONLabel</value>
</data>
@ -231,24 +167,6 @@
<data name="&gt;&gt;DESCRIPTIONLabel.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="PanelValidatorControl.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Top, Bottom, Left, Right</value>
</data>
<data name="PanelValidatorControl.AutoScroll" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="PanelValidatorControl.Location" type="System.Drawing.Point, System.Drawing">
<value>8, 85</value>
</data>
<data name="PanelValidatorControl.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="PanelValidatorControl.Size" type="System.Drawing.Size, System.Drawing">
<value>444, 353</value>
</data>
<data name="PanelValidatorControl.TabIndex" type="System.Int32, mscorlib">
<value>18</value>
</data>
<data name="&gt;&gt;PanelValidatorControl.Name" xml:space="preserve">
<value>PanelValidatorControl</value>
</data>
@ -273,6 +191,7 @@
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>455, 503</value>
</data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
<value>24</value>
</data>
@ -441,6 +360,135 @@
<data name="&gt;&gt;SplitContainer2_DV_Chat.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="TITLELabel1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Top, Left, Right</value>
</data>
<data name="TITLELabel1.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI Symbol, 12pt, style=Bold</value>
</data>
<data name="TITLELabel1.Location" type="System.Drawing.Point, System.Drawing">
<value>3, 4</value>
</data>
<data name="TITLELabel1.RightToLeft" type="System.Windows.Forms.RightToLeft, System.Windows.Forms">
<value>No</value>
</data>
<data name="TITLELabel1.Size" type="System.Drawing.Size, System.Drawing">
<value>433, 29</value>
</data>
<data name="TITLELabel1.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="TITLELabel1.Text" xml:space="preserve">
<value>Label1</value>
</data>
<data name="TITLELabel1.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>MiddleLeft</value>
</data>
<data name="&gt;&gt;TITLELabel1.Name" xml:space="preserve">
<value>TITLELabel1</value>
</data>
<data name="&gt;&gt;TITLELabel1.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;TITLELabel1.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;TITLELabel1.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="btnSave.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Bottom, Left, Right</value>
</data>
<data name="btnSave.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
</data>
<data name="btnSave.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>MiddleLeft</value>
</data>
<data name="btnSave.Location" type="System.Drawing.Point, System.Drawing">
<value>7, 446</value>
</data>
<data name="btnSave.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="btnSave.Size" type="System.Drawing.Size, System.Drawing">
<value>445, 50</value>
</data>
<data name="btnSave.TabIndex" type="System.Int32, mscorlib">
<value>11</value>
</data>
<data name="btnSave.Text" xml:space="preserve">
<value>Validierung speichern - Nächstes Dokument</value>
</data>
<data name="&gt;&gt;btnSave.Name" xml:space="preserve">
<value>btnSave</value>
</data>
<data name="&gt;&gt;btnSave.Type" xml:space="preserve">
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;btnSave.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;btnSave.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="DESCRIPTIONLabel.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Top, Left, Right</value>
</data>
<data name="DESCRIPTIONLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>5, 33</value>
</data>
<data name="DESCRIPTIONLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>447, 48</value>
</data>
<data name="DESCRIPTIONLabel.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="DESCRIPTIONLabel.Text" xml:space="preserve">
<value>Label3</value>
</data>
<data name="&gt;&gt;DESCRIPTIONLabel.Name" xml:space="preserve">
<value>DESCRIPTIONLabel</value>
</data>
<data name="&gt;&gt;DESCRIPTIONLabel.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;DESCRIPTIONLabel.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;DESCRIPTIONLabel.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="PanelValidatorControl.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Top, Bottom, Left, Right</value>
</data>
<data name="PanelValidatorControl.AutoScroll" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="PanelValidatorControl.Location" type="System.Drawing.Point, System.Drawing">
<value>8, 85</value>
</data>
<data name="PanelValidatorControl.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>3, 4, 3, 4</value>
</data>
<data name="PanelValidatorControl.Size" type="System.Drawing.Size, System.Drawing">
<value>444, 353</value>
</data>
<data name="PanelValidatorControl.TabIndex" type="System.Int32, mscorlib">
<value>18</value>
</data>
<data name="&gt;&gt;PanelValidatorControl.Name" xml:space="preserve">
<value>PanelValidatorControl</value>
</data>
<data name="&gt;&gt;PanelValidatorControl.Type" xml:space="preserve">
<value>System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;PanelValidatorControl.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;PanelValidatorControl.ZOrder" xml:space="preserve">
<value>3</value>
</data>
<metadata name="BarAndDockingController3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
@ -1026,46 +1074,15 @@
<data name="Attmnt_bbtnitm_LoadonClick.ItemInMenuAppearance.Pressed.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 8.25pt, style=Bold</value>
</data>
<data name="BarButtonItem6.Caption" xml:space="preserve">
<value>BarButtonItem6</value>
</data>
<data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
</data>
<data name="RibbonPageGroupConv1.Text" xml:space="preserve">
<value>Aktionen</value>
</data>
<data name="RibbonPageGroupConv_Change.Text" xml:space="preserve">
<value>Beendete Konversationen</value>
</data>
<data name="RibbonPage3.Text" xml:space="preserve">
<value>Funktionen</value>
</data>
<data name="RibbonPageConversations.Text" xml:space="preserve">
<value>Konversationen</value>
</data>
<data name="RibbonPageFile.Text" xml:space="preserve">
<value>Datei</value>
</data>
<data name="RibbonPageGroup3.Text" xml:space="preserve">
<value>Aktionen</value>
</data>
<data name="RibbonPageGroupCustom.Text" xml:space="preserve">
<value>Anhänge zu Beleg</value>
</data>
<data name="RibbonPageGroup2.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAVxJREFUWEfF
l7FxwzAMRT2Bq4yjPp1nyAAZxNu4dZkt0rnLCm4ZPF+gg5LPCLJko3h3Ovn/T5gCSWnXWitF3nwm48Uw
DHPsjYNxNM7Gxbj+wDX3+A0NWpUxsqSAF+Pd+DBaErR48KrMdAGvxslQg2TAS8af7EwBb8anoYKXQAZZ
k/y5AjB8GSrwHsiaFPFfAUzZFv/8N2SOj6NXAE2z5pnPQfatMXsF0LnKuCWMIQtg7aaXmvuCX+oEjLF3
XwxgA1EGifuCX+o6HNwXA9jFlFjivuCXug5H98UAtlIllrgv+KWuw9l9MYD9XIkl7gt+qetwcV8M4FBR
Yon7gl/qOlzdFwPKCyh/BOVNWL4MF21EK5EbUflWDOnDyH3BL3WC7mEE5ccxlL6QOKWvZA6GLWaCjMng
kCkAmLI1PYF3nPZItgCgaejc9BI10OK5NZxiSQHOYz/NqpA3n0fbfQM/tJcKTygMggAAAABJRU5ErkJg
gg==
</value>
</data>
<data name="RibbonPageGroup2.Text" xml:space="preserve">
<value>Information</value>
</data>
<data name="RibbonPage1.Text" xml:space="preserve">
<value>Start</value>
</data>
@ -1696,6 +1713,12 @@
<data name="&gt;&gt;Attmnt_bbtnitm_LoadonClick.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarCheckItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BarButtonItem6.Name" xml:space="preserve">
<value>BarButtonItem6</value>
</data>
<data name="&gt;&gt;BarButtonItem6.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPageConversations.Name" xml:space="preserve">
<value>RibbonPageConversations</value>
</data>
@ -1993,6 +2016,39 @@
<data name="PdfExactZoomListBarSubItem2.Caption" xml:space="preserve">
<value>Zoom</value>
</data>
<data name="PdfExactZoomListBarSubItem2.SuperTip" type="DevExpress.Utils.SuperToolTip, DevExpress.Utils.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYyMS4yLCBWZXJzaW9uPTIxLjIu
NC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE
ZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi
bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s
VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw
BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh
bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz
LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl
bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl
c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF
eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA
Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs
dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz
cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z
CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl
c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl
c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA
AAAAAAAAPAEAAAAGDAAAAARab29tBQgAAAAcRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRlbQcAAAAN
QWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50CE1heFdpZHRoEk93bmVyQWxs
b3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRlZmF1bHRCb29sZWFuAwAAABNT
eXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJdGVtSW1hZ2VPcHRp
b25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAABg8AAAApw4RuZGVybiBkZXIg
Wm9vbS1TdHVmZSBkZXMgUERGLURva3VtZW50cy4FCwAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJ
dGVtSW1hZ2VPcHRpb25zBQAAAAhJbWFnZVVyaQxTdmdJbWFnZVNpemUJQWxpZ25tZW50CkltYWdlSW5k
ZXgTSW1hZ2VUb1RleHREaXN0YW5jZQEEBAAAE1N5c3RlbS5EcmF3aW5nLlNpemUJAAAAJkRldkV4cHJl
c3MuVXRpbHMuVG9vbFRpcEltYWdlQWxpZ25tZW50AgAAAAgIAgAAAAYQAAAAAAXv////E1N5c3RlbS5E
cmF3aW5nLlNpemUCAAAABXdpZHRoBmhlaWdodAAACAgJAAAAAAAAAAAAAAAF7v///yZEZXZFeHByZXNz
LlV0aWxzLlRvb2xUaXBJbWFnZUFsaWdubWVudAEAAAAHdmFsdWVfXwAIAgAAAAAAAAD/////DgAAAAEO
AAAACwAAAAkQAAAAAe3////v////AAAAAAAAAAAB7P///+7///8AAAAA/////w4AAAAL
</value>
</data>
<data name="PdfZoom10CheckItem2.Caption" xml:space="preserve">
<value>10 %</value>
</data>
@ -2035,39 +2091,6 @@
<data name="PdfSetFitVisibleZoomModeCheckItem2.Caption" xml:space="preserve">
<value>sichtbare einpassen</value>
</data>
<data name="PdfExactZoomListBarSubItem2.SuperTip" type="DevExpress.Utils.SuperToolTip, DevExpress.Utils.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYyMS4yLCBWZXJzaW9uPTIxLjIu
NC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE
ZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi
bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s
VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw
BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh
bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz
LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl
bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl
c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF
eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA
Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs
dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz
cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z
CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl
c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl
c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA
AAAAAAAAPAEAAAAGDAAAAARab29tBQgAAAAcRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRlbQcAAAAN
QWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50CE1heFdpZHRoEk93bmVyQWxs
b3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRlZmF1bHRCb29sZWFuAwAAABNT
eXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJdGVtSW1hZ2VPcHRp
b25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAABg8AAAApw4RuZGVybiBkZXIg
Wm9vbS1TdHVmZSBkZXMgUERGLURva3VtZW50cy4FCwAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJ
dGVtSW1hZ2VPcHRpb25zBQAAAAhJbWFnZVVyaQxTdmdJbWFnZVNpemUJQWxpZ25tZW50CkltYWdlSW5k
ZXgTSW1hZ2VUb1RleHREaXN0YW5jZQEEBAAAE1N5c3RlbS5EcmF3aW5nLlNpemUJAAAAJkRldkV4cHJl
c3MuVXRpbHMuVG9vbFRpcEltYWdlQWxpZ25tZW50AgAAAAgIAgAAAAYQAAAAAAXv////E1N5c3RlbS5E
cmF3aW5nLlNpemUCAAAABXdpZHRoBmhlaWdodAAACAgJAAAAAAAAAAAAAAAF7v///yZEZXZFeHByZXNz
LlV0aWxzLlRvb2xUaXBJbWFnZUFsaWdubWVudAEAAAAHdmFsdWVfXwAIAgAAAAAAAAD/////DgAAAAEO
AAAACwAAAAkQAAAAAe3////v////AAAAAAAAAAAB7P///+7///8AAAAA/////w4AAAAL
</value>
</data>
<data name="BarButtonItem1.Caption" xml:space="preserve">
<value>BarButtonItem1</value>
</data>
@ -2080,6 +2103,40 @@
<metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1029, 17</value>
</metadata>
<data name="RibbonPage3.Text" xml:space="preserve">
<value>Funktionen</value>
</data>
<data name="RibbonPageGroupConv1.Text" xml:space="preserve">
<value>Aktionen</value>
</data>
<data name="RibbonPageGroupConv_Change.Text" xml:space="preserve">
<value>Beendete Konversationen</value>
</data>
<data name="RibbonPageFile.Text" xml:space="preserve">
<value>Datei</value>
</data>
<data name="RibbonPageGroup3.Text" xml:space="preserve">
<value>Aktionen</value>
</data>
<data name="RibbonPageGroupCustom.Text" xml:space="preserve">
<value>Anhänge zu Beleg</value>
</data>
<data name="RibbonPageGroup2.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAVxJREFUWEfF
l7FxwzAMRT2Bq4yjPp1nyAAZxNu4dZkt0rnLCm4ZPF+gg5LPCLJko3h3Ovn/T5gCSWnXWitF3nwm48Uw
DHPsjYNxNM7Gxbj+wDX3+A0NWpUxsqSAF+Pd+DBaErR48KrMdAGvxslQg2TAS8af7EwBb8anoYKXQAZZ
k/y5AjB8GSrwHsiaFPFfAUzZFv/8N2SOj6NXAE2z5pnPQfatMXsF0LnKuCWMIQtg7aaXmvuCX+oEjLF3
XwxgA1EGifuCX+o6HNwXA9jFlFjivuCXug5H98UAtlIllrgv+KWuw9l9MYD9XIkl7gt+qetwcV8M4FBR
Yon7gl/qOlzdFwPKCyh/BOVNWL4MF21EK5EbUflWDOnDyH3BL3WC7mEE5ccxlL6QOKWvZA6GLWaCjMng
kCkAmLI1PYF3nPZItgCgaejc9BI10OK5NZxiSQHOYz/NqpA3n0fbfQM/tJcKTygMggAAAABJRU5ErkJg
gg==
</value>
</data>
<data name="RibbonPageGroup2.Text" xml:space="preserve">
<value>Information</value>
</data>
<data name="RibbonPage2.Text" xml:space="preserve">
<value>RibbonPage2</value>
</data>

View File

@ -835,7 +835,6 @@ Public Class frmValidator
Try
PanelValidatorControl.Controls.Clear()
Dim oSQL = $"SELECT [dbo].[FNPM_LANGUAGE_CONTROL_TEXT] (NAME,'{USER_LANGUAGE}',CTRL_TYPE,CTRL_TEXT) CTRL_CAPTION_LANG, * FROM TBPM_PROFILE_CONTROLS WHERE CONTROL_ACTIVE = 1 AND PROFIL_ID = {CURRENT_ProfilGUID} ORDER BY Y_LOC, X_LOC"
'DT_CONTROLS = DataASorDB.GetDatatable("DD_ECM", oSQL, "TBPM_PROFILE_CONTROLS_LANGUAGE", $"LANGUAGE = '{USER_LANGUAGE}' AND PROFIL_ID = {CURRENT_ProfilGUID}", "Y_LOC, X_LOC")
DT_CONTROLS = DatabaseFallback.GetDatatable("TBPM_PROFILE_CONTROLS_LANGUAGE", New GetDatatableOptions(oSQL, DatabaseType.ECM) With {
.FilterExpression = $"LANGUAGE = '{USER_LANGUAGE}' AND PROFIL_ID = {CURRENT_ProfilGUID}",
.SortByColumn = "Y_LOC, X_LOC"
@ -946,12 +945,11 @@ Public Class frmValidator
Catch ex As Exception
oCommandSQL_UBPF = ""
End Try
'TBPM_PROFILE_CONTROLSTableAdapter.cmdGetSQL(ControlID)
LOGGER.Debug("ConID <> String.Empty")
If oCONID > 0 And oCommandSQL_UBPF <> String.Empty Then
LOGGER.Debug("ConID > 0 And commandsql <> String.Empty")
Try
oSQL = PreventNulletc(oControlRow.Item("SQL_UEBERPRUEFUNG"), "String") 'TBPM_PROFILE_CONTROLSTableAdapter.cmdGetSQL(ControlID)
oSQL = PreventNulletc(oControlRow.Item("SQL_UEBERPRUEFUNG"), "String")
If clsPatterns.HasOnlySimplePatterns(oSQL) Then
LOGGER.Debug("SQL HasOnlySimplePatterns!")
@ -1240,7 +1238,6 @@ Public Class frmValidator
Dim CONTROL_ID = DirectCast(oTextBox.Tag, ClassControlCreator.ControlMetadata).Guid
Dim oSql = String.Format("SELECT NAME, CONNECTION_ID, SQL_UEBERPRUEFUNG FROM TBPM_PROFILE_CONTROLS WHERE CONTROL_ACTIVE = 1 AND PROFIL_ID = {0} AND SQL_UEBERPRUEFUNG LIKE '%{1}%'", CURRENT_ProfilGUID, oTextBox.Name)
Dim DTCONTROLS_UEBP As DataTable
'DTCONTROLS_UEBP = DataASorDB.GetDatatable("DD_ECM", oSql, "TBPM_PROFILE_CONTROLS_SQL_UEP", $"PROFIL_ID = {CURRENT_ProfilGUID} AND SQL_UEBERPRUEFUNG LIKE '%{oTextBox.Name}%'")
DTCONTROLS_UEBP = DatabaseFallback.GetDatatable("TBPM_PROFILE_CONTROLS_SQL_UEP", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
.FilterExpression = $"PROFIL_ID = {CURRENT_ProfilGUID} AND SQL_UEBERPRUEFUNG LIKE '%{oTextBox.Name}%'"
})
@ -2508,9 +2505,7 @@ Public Class frmValidator
Private Function CreateWMObject() As String
LOGGER.Debug($"in GetWMDocFileString...'")
If WMSUFFIX.EndsWith("\") = False Then
WMSUFFIX = WMSUFFIX & "\"
End If
Dim oWMOwnPath As String
If WM_AHWF_docPath <> String.Empty Then
oWMOwnPath = WM_AHWF_docPath
@ -2764,9 +2759,7 @@ Public Class frmValidator
' DocumentViewerValidator.LoadFile(WMDocPathWindows)
Try
If DocumentViewerValidator.Visible = False Then
DocumentViewerValidator.Visible = True
End If
Dim oDocument As DocumentResultList.Document = Nothing
' Load DocumentInfo
oDocument = Documentloader.Load(CURRENT_DOC_ID, WMDocPathWindows)
@ -2778,13 +2771,16 @@ Public Class frmValidator
LOGGER.Error(ex)
Exit Sub
End Try
If ActiveWorkflowType = ConstAHWorkflow_BlindFile Then
If ActiveWorkflowType = ConstAHWorkflow_BlindFile Or PROFILE_SHOW_DOCUMENT = False Then
SplitContainer1.Panel2Collapsed = True
DocumentViewerValidator.Visible = False
RibbonPageFile.Visible = False
Exit Sub
Else
DocumentViewerValidator.Visible = True
End If
' Load Document in Document Viewer
Dim oFileName = $"{CURRENT_DOC_ID}.{Current_Document.Extension}"
DocumentViewerValidator.LoadFile(oFileName, New MemoryStream(Current_Document.Contents))
@ -4040,7 +4036,6 @@ Public Class frmValidator
Try
Dim oSQL = $"SELECT * FROM TBPM_PROFILE_FINAL_INDEXING WHERE PROFIL_ID = {CURRENT_ProfilGUID} AND ACTIVE = 1 ORDER BY SEQUENCE"
Dim oDTFinalIndexing As DataTable
'oDTFinalIndexing = DataASorDB.GetDatatable("DD_ECM", oSQL, "TBPM_PROFILE_FINAL_INDEXING", $"PROFIL_ID = {CURRENT_ProfilGUID}", "SEQUENCE")
oDTFinalIndexing = DatabaseFallback.GetDatatable("TBPM_PROFILE_FINAL_INDEXING", New GetDatatableOptions(oSQL, DatabaseType.ECM) With {
.FilterExpression = $"PROFIL_ID = {CURRENT_ProfilGUID}",
.SortByColumn = "PROFIL_ID,TAB_INDEX"
@ -6030,4 +6025,15 @@ Public Class frmValidator
CONFIG.Config.ADDITIONAL_SEARCHES_LOAD_ONCLICK = Attmnt_bbtnitm_LoadonClick.Checked
CONFIG.Save()
End Sub
Private Function TakeScreenShot(ByVal Control As Control) As Bitmap
Dim tmpImg As New Bitmap(Control.Width, Control.Height)
Using g As Graphics = Graphics.FromImage(tmpImg)
g.CopyFromScreen(PanelValidatorControl.PointToScreen(New Point(0, 0)), New Point(0, 0), New Size(PanelValidatorControl.Width, PanelValidatorControl.Height))
End Using
Return tmpImg
End Function
Private Sub BarButtonItem6_ItemClick_2(sender As Object, e As ItemClickEventArgs) Handles BarButtonItem6.ItemClick
TakeScreenShot(PanelValidatorControl).Save("D:\Screenshot.png", System.Drawing.Imaging.ImageFormat.Png)
End Sub
End Class

View File

@ -1,5 +1,5 @@
<?define ProgramName="DD_ProcessManager"?>
<?define ProductName="Process Manager"?>
<?define ProductName="TaskFlow"?>
<?define Manufacturer="Digital Data"?>
<?define Description="Beschreibung des Programms"?>
<?define Comments="Kommentar wie Copyright-Hinweis"?>
@ -125,6 +125,7 @@
<File Id="DDLanguage" Name="DigitalData.Modules.Language.dll" Source="DigitalData.Modules.Language.dll"/>
<File Id="DDFilesystem" Name="DigitalData.Modules.Filesystem.dll" Source="DigitalData.Modules.Filesystem.dll"/>
<File Id="DDEncryption" Name="DigitalData.Modules.Encryption.dll" Source="DigitalData.Modules.Encryption.dll"/>
<File Id="DDWindream" Name="DigitalData.Modules.Windream.dll" Source="DigitalData.Modules.Windream.dll"/>
<File Id="DDWindows" Name="DigitalData.Modules.Windows.dll" Source="DigitalData.Modules.Windows.dll"/>
<File Id="DDZooflow" Name="DigitalData.Modules.Zooflow.dll" Source="DigitalData.Modules.Zooflow.dll"/>
<File Id="DDDatabase" Name="DigitalData.Modules.Database.dll" Source="DigitalData.Modules.Database.dll"/>