MS .6 nach WISAG1

This commit is contained in:
SchreiberM 2020-01-24 10:23:26 +01:00
parent e0fae60798
commit 0ce34a3290
10 changed files with 1278 additions and 1236 deletions

View File

@ -12,7 +12,11 @@
Catch ex As Exception
WORKING_MODE = ""
End Try
Try
ADDITIONAL_TITLE = DT_CHECKUSER.Rows(0).Item("ADDITIONAL_TITLE")
Catch ex As Exception
ADDITIONAL_TITLE = ""
End Try
Dim oSplitWorkMode As String() = WORKING_MODE.Split("#")
@ -48,6 +52,9 @@
End If
ElseIf oMode = "PM.MONITORING" Then
MONITORING_ACTIVE = True
ElseIf oMode.StartsWith("PM.COLORSCHEME") Then
Dim oColorScheme = oMode.Replace("PM.COLORSCHEME=", "")
RIBBON_COLOR_SCHEME = oColorScheme.ToUpper
Else
LOGGER.Info($"Wrong oMode: {oMode}")
End If

View File

@ -47,6 +47,8 @@ Module ModuleRuntimeVariables
Public SHOW_MASS_VALIDATOR As Boolean = True
Public WORKING_MODE As String = ""
Public MONITORING_ACTIVE As Boolean = False
Public RIBBON_COLOR_SCHEME As String = "Blue"
Public ADDITIONAL_TITLE As String = ""
Public LICENSE_COUNT As Integer = 0
Public LICENSE_EXPIRED As Boolean = False

View File

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

View File

@ -85,8 +85,45 @@ Partial Class frmAdmin2
Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colTITLE = New DevExpress.XtraGrid.Columns.GridColumn()
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
Me.BindingNavigator2 = New System.Windows.Forms.BindingNavigator(Me.components)
Me.DataLayoutControl2 = New DevExpress.XtraDataLayout.DataLayoutControl()
Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.MODULETextEdit = New DevExpress.XtraEditors.TextEdit()
Me.TextEdit2 = New DevExpress.XtraEditors.TextEdit()
Me.LANGUAGEComboBoxEdit = New DevExpress.XtraEditors.ComboBoxEdit()
Me.CAPT_TYPETextEdit = New DevExpress.XtraEditors.TextEdit()
Me.STRING1TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.STRING2TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.STRING3TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.STRING4TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.STRING5TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.STRING6TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.TextEdit3 = New DevExpress.XtraEditors.TextEdit()
Me.ADDED_WHENTextEdit = New DevExpress.XtraEditors.TextEdit()
Me.TextEdit4 = New DevExpress.XtraEditors.TextEdit()
Me.CHANGED_WHENTextEdit = New DevExpress.XtraEditors.TextEdit()
Me.OBJ_NAMETextEdit = New DevExpress.XtraEditors.TextEdit()
Me.INTERNALCheckEdit = New DevExpress.XtraEditors.CheckEdit()
Me.LayoutControlGroup2 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlGroup3 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForSTRING1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForSTRING2 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForSTRING3 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForSTRING4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForSTRING5 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForSTRING6 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForINTERNAL = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForCAPT_TYPE = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForLANGUAGE = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForMODULE = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ItemForOBJ_NAME = New DevExpress.XtraLayout.LayoutControlItem()
Me.BindingNavigator2 = New System.Windows.Forms.BindingNavigator(Me.components)
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
@ -106,43 +143,6 @@ Partial Class frmAdmin2
Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.TBDD_GUI_LANGUAGE_PHRASETableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_GUI_LANGUAGE_PHRASETableAdapter()
Me.LayoutConverter1 = New DevExpress.XtraLayout.Converter.LayoutConverter(Me.components)
Me.DataLayoutControl2 = New DevExpress.XtraDataLayout.DataLayoutControl()
Me.LayoutControlGroup2 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlGroup3 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.MODULETextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForMODULE = New DevExpress.XtraLayout.LayoutControlItem()
Me.TextEdit2 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LANGUAGEComboBoxEdit = New DevExpress.XtraEditors.ComboBoxEdit()
Me.ItemForLANGUAGE = New DevExpress.XtraLayout.LayoutControlItem()
Me.CAPT_TYPETextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForCAPT_TYPE = New DevExpress.XtraLayout.LayoutControlItem()
Me.STRING1TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForSTRING1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.STRING2TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForSTRING2 = New DevExpress.XtraLayout.LayoutControlItem()
Me.STRING3TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForSTRING3 = New DevExpress.XtraLayout.LayoutControlItem()
Me.STRING4TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForSTRING4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.STRING5TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForSTRING5 = New DevExpress.XtraLayout.LayoutControlItem()
Me.STRING6TextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForSTRING6 = New DevExpress.XtraLayout.LayoutControlItem()
Me.TextEdit3 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
Me.ADDED_WHENTextEdit = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.TextEdit4 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
Me.CHANGED_WHENTextEdit = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
Me.OBJ_NAMETextEdit = New DevExpress.XtraEditors.TextEdit()
Me.ItemForOBJ_NAME = New DevExpress.XtraLayout.LayoutControlItem()
Me.INTERNALCheckEdit = New DevExpress.XtraEditors.CheckEdit()
Me.ItemForINTERNAL = New DevExpress.XtraLayout.LayoutControlItem()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl1.SuspendLayout()
@ -178,49 +178,49 @@ Partial Class frmAdmin2
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabPage2.SuspendLayout()
CType(Me.BindingNavigator2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.BindingNavigator2.SuspendLayout()
CType(Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DataLayoutControl2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DataLayoutControl2.SuspendLayout()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MODULETextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LANGUAGEComboBoxEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.CAPT_TYPETextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING1TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING2TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING3TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING4TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING5TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING6TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ADDED_WHENTextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit4.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.CHANGED_WHENTextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.OBJ_NAMETextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.INTERNALCheckEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MODULETextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForMODULE, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LANGUAGEComboBoxEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForLANGUAGE, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.CAPT_TYPETextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForCAPT_TYPE, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING1TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForSTRING1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING2TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForSTRING2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING3TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForSTRING3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING4TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForSTRING4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING5TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForSTRING5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.STRING6TextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForSTRING6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ADDED_WHENTextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit4.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.CHANGED_WHENTextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.OBJ_NAMETextEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForOBJ_NAME, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.INTERNALCheckEdit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForINTERNAL, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForCAPT_TYPE, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForLANGUAGE, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForMODULE, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ItemForOBJ_NAME, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.BindingNavigator2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.BindingNavigator2.SuspendLayout()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'RibbonControl1
@ -745,6 +745,368 @@ Partial Class frmAdmin2
Me.XtraTabPage2.Controls.Add(Me.GridControl2)
Me.XtraTabPage2.Name = "XtraTabPage2"
'
'DataLayoutControl2
'
Me.DataLayoutControl2.Controls.Add(Me.TextEdit1)
Me.DataLayoutControl2.Controls.Add(Me.MODULETextEdit)
Me.DataLayoutControl2.Controls.Add(Me.TextEdit2)
Me.DataLayoutControl2.Controls.Add(Me.LANGUAGEComboBoxEdit)
Me.DataLayoutControl2.Controls.Add(Me.CAPT_TYPETextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING1TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING2TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING3TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING4TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING5TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING6TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.TextEdit3)
Me.DataLayoutControl2.Controls.Add(Me.ADDED_WHENTextEdit)
Me.DataLayoutControl2.Controls.Add(Me.TextEdit4)
Me.DataLayoutControl2.Controls.Add(Me.CHANGED_WHENTextEdit)
Me.DataLayoutControl2.Controls.Add(Me.OBJ_NAMETextEdit)
Me.DataLayoutControl2.Controls.Add(Me.INTERNALCheckEdit)
Me.DataLayoutControl2.DataSource = Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource
resources.ApplyResources(Me.DataLayoutControl2, "DataLayoutControl2")
Me.DataLayoutControl2.Name = "DataLayoutControl2"
Me.DataLayoutControl2.Root = Me.LayoutControlGroup2
'
'TextEdit1
'
Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "GUID", True))
resources.ApplyResources(Me.TextEdit1, "TextEdit1")
Me.TextEdit1.MenuManager = Me.RibbonControl1
Me.TextEdit1.Name = "TextEdit1"
Me.TextEdit1.Properties.Appearance.Options.UseTextOptions = True
Me.TextEdit1.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Far
Me.TextEdit1.Properties.Mask.EditMask = resources.GetString("TextEdit1.Properties.Mask.EditMask")
Me.TextEdit1.Properties.Mask.MaskType = CType(resources.GetObject("TextEdit1.Properties.Mask.MaskType"), DevExpress.XtraEditors.Mask.MaskType)
Me.TextEdit1.Properties.Mask.UseMaskAsDisplayFormat = CType(resources.GetObject("TextEdit1.Properties.Mask.UseMaskAsDisplayFormat"), Boolean)
Me.TextEdit1.Properties.ReadOnly = True
Me.TextEdit1.StyleController = Me.DataLayoutControl2
'
'TBDD_GUI_LANGUAGE_PHRASEBindingSource
'
Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource.DataMember = "TBDD_GUI_LANGUAGE_PHRASE"
Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource.DataSource = Me.DD_DMSLiteDataSet
'
'MODULETextEdit
'
Me.MODULETextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "MODULE", True))
resources.ApplyResources(Me.MODULETextEdit, "MODULETextEdit")
Me.MODULETextEdit.MenuManager = Me.RibbonControl1
Me.MODULETextEdit.Name = "MODULETextEdit"
Me.MODULETextEdit.StyleController = Me.DataLayoutControl2
'
'TextEdit2
'
Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "TITLE", True))
resources.ApplyResources(Me.TextEdit2, "TextEdit2")
Me.TextEdit2.MenuManager = Me.RibbonControl1
Me.TextEdit2.Name = "TextEdit2"
Me.TextEdit2.StyleController = Me.DataLayoutControl2
'
'LANGUAGEComboBoxEdit
'
Me.LANGUAGEComboBoxEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "LANGUAGE", True))
resources.ApplyResources(Me.LANGUAGEComboBoxEdit, "LANGUAGEComboBoxEdit")
Me.LANGUAGEComboBoxEdit.MenuManager = Me.RibbonControl1
Me.LANGUAGEComboBoxEdit.Name = "LANGUAGEComboBoxEdit"
Me.LANGUAGEComboBoxEdit.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("LANGUAGEComboBoxEdit.Properties.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines))})
Me.LANGUAGEComboBoxEdit.StyleController = Me.DataLayoutControl2
'
'CAPT_TYPETextEdit
'
Me.CAPT_TYPETextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "CAPT_TYPE", True))
resources.ApplyResources(Me.CAPT_TYPETextEdit, "CAPT_TYPETextEdit")
Me.CAPT_TYPETextEdit.MenuManager = Me.RibbonControl1
Me.CAPT_TYPETextEdit.Name = "CAPT_TYPETextEdit"
Me.CAPT_TYPETextEdit.StyleController = Me.DataLayoutControl2
'
'STRING1TextEdit
'
Me.STRING1TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING1", True))
resources.ApplyResources(Me.STRING1TextEdit, "STRING1TextEdit")
Me.STRING1TextEdit.MenuManager = Me.RibbonControl1
Me.STRING1TextEdit.Name = "STRING1TextEdit"
Me.STRING1TextEdit.StyleController = Me.DataLayoutControl2
'
'STRING2TextEdit
'
Me.STRING2TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING2", True))
resources.ApplyResources(Me.STRING2TextEdit, "STRING2TextEdit")
Me.STRING2TextEdit.MenuManager = Me.RibbonControl1
Me.STRING2TextEdit.Name = "STRING2TextEdit"
Me.STRING2TextEdit.StyleController = Me.DataLayoutControl2
'
'STRING3TextEdit
'
Me.STRING3TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING3", True))
resources.ApplyResources(Me.STRING3TextEdit, "STRING3TextEdit")
Me.STRING3TextEdit.MenuManager = Me.RibbonControl1
Me.STRING3TextEdit.Name = "STRING3TextEdit"
Me.STRING3TextEdit.StyleController = Me.DataLayoutControl2
'
'STRING4TextEdit
'
Me.STRING4TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING4", True))
resources.ApplyResources(Me.STRING4TextEdit, "STRING4TextEdit")
Me.STRING4TextEdit.MenuManager = Me.RibbonControl1
Me.STRING4TextEdit.Name = "STRING4TextEdit"
Me.STRING4TextEdit.StyleController = Me.DataLayoutControl2
'
'STRING5TextEdit
'
Me.STRING5TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING5", True))
resources.ApplyResources(Me.STRING5TextEdit, "STRING5TextEdit")
Me.STRING5TextEdit.MenuManager = Me.RibbonControl1
Me.STRING5TextEdit.Name = "STRING5TextEdit"
Me.STRING5TextEdit.StyleController = Me.DataLayoutControl2
'
'STRING6TextEdit
'
Me.STRING6TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING6", True))
resources.ApplyResources(Me.STRING6TextEdit, "STRING6TextEdit")
Me.STRING6TextEdit.MenuManager = Me.RibbonControl1
Me.STRING6TextEdit.Name = "STRING6TextEdit"
Me.STRING6TextEdit.StyleController = Me.DataLayoutControl2
'
'TextEdit3
'
Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "ADDED_WHO", True))
resources.ApplyResources(Me.TextEdit3, "TextEdit3")
Me.TextEdit3.MenuManager = Me.RibbonControl1
Me.TextEdit3.Name = "TextEdit3"
Me.TextEdit3.Properties.ReadOnly = True
Me.TextEdit3.StyleController = Me.DataLayoutControl2
'
'ADDED_WHENTextEdit
'
Me.ADDED_WHENTextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "ADDED_WHEN", True))
resources.ApplyResources(Me.ADDED_WHENTextEdit, "ADDED_WHENTextEdit")
Me.ADDED_WHENTextEdit.MenuManager = Me.RibbonControl1
Me.ADDED_WHENTextEdit.Name = "ADDED_WHENTextEdit"
Me.ADDED_WHENTextEdit.Properties.DisplayFormat.FormatString = "d"
Me.ADDED_WHENTextEdit.Properties.DisplayFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.ADDED_WHENTextEdit.Properties.EditFormat.FormatString = "d"
Me.ADDED_WHENTextEdit.Properties.EditFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.ADDED_WHENTextEdit.Properties.Mask.EditMask = resources.GetString("ADDED_WHENTextEdit.Properties.Mask.EditMask")
Me.ADDED_WHENTextEdit.Properties.Mask.MaskType = CType(resources.GetObject("ADDED_WHENTextEdit.Properties.Mask.MaskType"), DevExpress.XtraEditors.Mask.MaskType)
Me.ADDED_WHENTextEdit.Properties.ReadOnly = True
Me.ADDED_WHENTextEdit.StyleController = Me.DataLayoutControl2
'
'TextEdit4
'
Me.TextEdit4.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "CHANGED_WHO", True))
resources.ApplyResources(Me.TextEdit4, "TextEdit4")
Me.TextEdit4.MenuManager = Me.RibbonControl1
Me.TextEdit4.Name = "TextEdit4"
Me.TextEdit4.Properties.ReadOnly = True
Me.TextEdit4.StyleController = Me.DataLayoutControl2
'
'CHANGED_WHENTextEdit
'
Me.CHANGED_WHENTextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "CHANGED_WHEN", True))
resources.ApplyResources(Me.CHANGED_WHENTextEdit, "CHANGED_WHENTextEdit")
Me.CHANGED_WHENTextEdit.MenuManager = Me.RibbonControl1
Me.CHANGED_WHENTextEdit.Name = "CHANGED_WHENTextEdit"
Me.CHANGED_WHENTextEdit.Properties.DisplayFormat.FormatString = "d"
Me.CHANGED_WHENTextEdit.Properties.DisplayFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.CHANGED_WHENTextEdit.Properties.EditFormat.FormatString = "d"
Me.CHANGED_WHENTextEdit.Properties.EditFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.CHANGED_WHENTextEdit.Properties.Mask.EditMask = resources.GetString("CHANGED_WHENTextEdit.Properties.Mask.EditMask")
Me.CHANGED_WHENTextEdit.Properties.Mask.MaskType = CType(resources.GetObject("CHANGED_WHENTextEdit.Properties.Mask.MaskType"), DevExpress.XtraEditors.Mask.MaskType)
Me.CHANGED_WHENTextEdit.Properties.ReadOnly = True
Me.CHANGED_WHENTextEdit.StyleController = Me.DataLayoutControl2
'
'OBJ_NAMETextEdit
'
Me.OBJ_NAMETextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "OBJ_NAME", True))
resources.ApplyResources(Me.OBJ_NAMETextEdit, "OBJ_NAMETextEdit")
Me.OBJ_NAMETextEdit.MenuManager = Me.RibbonControl1
Me.OBJ_NAMETextEdit.Name = "OBJ_NAMETextEdit"
Me.OBJ_NAMETextEdit.StyleController = Me.DataLayoutControl2
'
'INTERNALCheckEdit
'
Me.INTERNALCheckEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "INTERNAL", True))
resources.ApplyResources(Me.INTERNALCheckEdit, "INTERNALCheckEdit")
Me.INTERNALCheckEdit.MenuManager = Me.RibbonControl1
Me.INTERNALCheckEdit.Name = "INTERNALCheckEdit"
Me.INTERNALCheckEdit.Properties.Caption = resources.GetString("INTERNALCheckEdit.Properties.Caption")
Me.INTERNALCheckEdit.Properties.GlyphAlignment = CType(resources.GetObject("INTERNALCheckEdit.Properties.GlyphAlignment"), DevExpress.Utils.HorzAlignment)
Me.INTERNALCheckEdit.StyleController = Me.DataLayoutControl2
'
'LayoutControlGroup2
'
Me.LayoutControlGroup2.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.LayoutControlGroup2.GroupBordersVisible = False
Me.LayoutControlGroup2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlGroup3})
Me.LayoutControlGroup2.Name = "LayoutControlGroup2"
Me.LayoutControlGroup2.Size = New System.Drawing.Size(544, 479)
Me.LayoutControlGroup2.TextVisible = False
'
'LayoutControlGroup3
'
Me.LayoutControlGroup3.AllowDrawBackground = False
Me.LayoutControlGroup3.GroupBordersVisible = False
Me.LayoutControlGroup3.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.ItemForSTRING1, Me.ItemForSTRING2, Me.ItemForSTRING3, Me.ItemForSTRING4, Me.ItemForSTRING5, Me.ItemForSTRING6, Me.LayoutControlItem3, Me.LayoutControlItem5, Me.LayoutControlItem4, Me.LayoutControlItem6, Me.ItemForINTERNAL, Me.ItemForCAPT_TYPE, Me.ItemForLANGUAGE, Me.ItemForMODULE, Me.LayoutControlItem2, Me.ItemForOBJ_NAME})
Me.LayoutControlGroup3.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlGroup3.Name = "autoGeneratedGroup0"
Me.LayoutControlGroup3.Size = New System.Drawing.Size(524, 459)
'
'LayoutControlItem1
'
Me.LayoutControlItem1.Control = Me.TextEdit1
Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem1.Name = "ItemForGUID"
Me.LayoutControlItem1.Size = New System.Drawing.Size(262, 24)
resources.ApplyResources(Me.LayoutControlItem1, "LayoutControlItem1")
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForSTRING1
'
Me.ItemForSTRING1.Control = Me.STRING1TextEdit
Me.ItemForSTRING1.Location = New System.Drawing.Point(0, 120)
Me.ItemForSTRING1.Name = "ItemForSTRING1"
Me.ItemForSTRING1.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING1, "ItemForSTRING1")
Me.ItemForSTRING1.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForSTRING2
'
Me.ItemForSTRING2.Control = Me.STRING2TextEdit
Me.ItemForSTRING2.Location = New System.Drawing.Point(0, 144)
Me.ItemForSTRING2.Name = "ItemForSTRING2"
Me.ItemForSTRING2.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING2, "ItemForSTRING2")
Me.ItemForSTRING2.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForSTRING3
'
Me.ItemForSTRING3.Control = Me.STRING3TextEdit
Me.ItemForSTRING3.Location = New System.Drawing.Point(0, 168)
Me.ItemForSTRING3.Name = "ItemForSTRING3"
Me.ItemForSTRING3.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING3, "ItemForSTRING3")
Me.ItemForSTRING3.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForSTRING4
'
Me.ItemForSTRING4.Control = Me.STRING4TextEdit
Me.ItemForSTRING4.Location = New System.Drawing.Point(0, 192)
Me.ItemForSTRING4.Name = "ItemForSTRING4"
Me.ItemForSTRING4.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING4, "ItemForSTRING4")
Me.ItemForSTRING4.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForSTRING5
'
Me.ItemForSTRING5.Control = Me.STRING5TextEdit
Me.ItemForSTRING5.Location = New System.Drawing.Point(0, 216)
Me.ItemForSTRING5.Name = "ItemForSTRING5"
Me.ItemForSTRING5.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING5, "ItemForSTRING5")
Me.ItemForSTRING5.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForSTRING6
'
Me.ItemForSTRING6.Control = Me.STRING6TextEdit
Me.ItemForSTRING6.Location = New System.Drawing.Point(0, 240)
Me.ItemForSTRING6.Name = "ItemForSTRING6"
Me.ItemForSTRING6.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING6, "ItemForSTRING6")
Me.ItemForSTRING6.TextSize = New System.Drawing.Size(74, 13)
'
'LayoutControlItem3
'
Me.LayoutControlItem3.Control = Me.TextEdit3
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 264)
Me.LayoutControlItem3.Name = "ItemForADDED_WHO"
Me.LayoutControlItem3.Size = New System.Drawing.Size(262, 24)
resources.ApplyResources(Me.LayoutControlItem3, "LayoutControlItem3")
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(74, 13)
'
'LayoutControlItem5
'
Me.LayoutControlItem5.Control = Me.TextEdit4
Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 288)
Me.LayoutControlItem5.Name = "ItemForCHANGED_WHO"
Me.LayoutControlItem5.Size = New System.Drawing.Size(262, 171)
resources.ApplyResources(Me.LayoutControlItem5, "LayoutControlItem5")
Me.LayoutControlItem5.TextSize = New System.Drawing.Size(74, 13)
'
'LayoutControlItem4
'
Me.LayoutControlItem4.Control = Me.ADDED_WHENTextEdit
Me.LayoutControlItem4.Location = New System.Drawing.Point(262, 264)
Me.LayoutControlItem4.Name = "ItemForADDED_WHEN"
Me.LayoutControlItem4.Size = New System.Drawing.Size(262, 24)
resources.ApplyResources(Me.LayoutControlItem4, "LayoutControlItem4")
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(74, 13)
'
'LayoutControlItem6
'
Me.LayoutControlItem6.Control = Me.CHANGED_WHENTextEdit
Me.LayoutControlItem6.Location = New System.Drawing.Point(262, 288)
Me.LayoutControlItem6.Name = "ItemForCHANGED_WHEN"
Me.LayoutControlItem6.Size = New System.Drawing.Size(262, 171)
resources.ApplyResources(Me.LayoutControlItem6, "LayoutControlItem6")
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForINTERNAL
'
Me.ItemForINTERNAL.Control = Me.INTERNALCheckEdit
Me.ItemForINTERNAL.Location = New System.Drawing.Point(262, 0)
Me.ItemForINTERNAL.Name = "ItemForINTERNAL"
Me.ItemForINTERNAL.Size = New System.Drawing.Size(112, 24)
resources.ApplyResources(Me.ItemForINTERNAL, "ItemForINTERNAL")
Me.ItemForINTERNAL.TextSize = New System.Drawing.Size(0, 0)
Me.ItemForINTERNAL.TextVisible = False
'
'ItemForCAPT_TYPE
'
Me.ItemForCAPT_TYPE.Control = Me.CAPT_TYPETextEdit
Me.ItemForCAPT_TYPE.Location = New System.Drawing.Point(0, 96)
Me.ItemForCAPT_TYPE.Name = "ItemForCAPT_TYPE"
Me.ItemForCAPT_TYPE.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForCAPT_TYPE, "ItemForCAPT_TYPE")
Me.ItemForCAPT_TYPE.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForLANGUAGE
'
Me.ItemForLANGUAGE.Control = Me.LANGUAGEComboBoxEdit
Me.ItemForLANGUAGE.Location = New System.Drawing.Point(0, 24)
Me.ItemForLANGUAGE.Name = "ItemForLANGUAGE"
Me.ItemForLANGUAGE.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForLANGUAGE, "ItemForLANGUAGE")
Me.ItemForLANGUAGE.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForMODULE
'
Me.ItemForMODULE.Control = Me.MODULETextEdit
Me.ItemForMODULE.Location = New System.Drawing.Point(374, 0)
Me.ItemForMODULE.Name = "ItemForMODULE"
Me.ItemForMODULE.Size = New System.Drawing.Size(150, 24)
resources.ApplyResources(Me.ItemForMODULE, "ItemForMODULE")
Me.ItemForMODULE.TextSize = New System.Drawing.Size(74, 13)
'
'LayoutControlItem2
'
Me.LayoutControlItem2.Control = Me.TextEdit2
Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 72)
Me.LayoutControlItem2.Name = "ItemForTITLE"
Me.LayoutControlItem2.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.LayoutControlItem2, "LayoutControlItem2")
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(74, 13)
'
'ItemForOBJ_NAME
'
Me.ItemForOBJ_NAME.Control = Me.OBJ_NAMETextEdit
Me.ItemForOBJ_NAME.Location = New System.Drawing.Point(0, 48)
Me.ItemForOBJ_NAME.Name = "ItemForOBJ_NAME"
Me.ItemForOBJ_NAME.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForOBJ_NAME, "ItemForOBJ_NAME")
Me.ItemForOBJ_NAME.TextSize = New System.Drawing.Size(74, 13)
'
'BindingNavigator2
'
Me.BindingNavigator2.AddNewItem = Nothing
@ -761,11 +1123,6 @@ Partial Class frmAdmin2
Me.BindingNavigator2.Name = "BindingNavigator2"
Me.BindingNavigator2.PositionItem = Me.ToolStripTextBox1
'
'TBDD_GUI_LANGUAGE_PHRASEBindingSource
'
Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource.DataMember = "TBDD_GUI_LANGUAGE_PHRASE"
Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource.DataSource = Me.DD_DMSLiteDataSet
'
'ToolStripLabel1
'
Me.ToolStripLabel1.Name = "ToolStripLabel1"
@ -887,363 +1244,6 @@ Partial Class frmAdmin2
'
Me.TBDD_GUI_LANGUAGE_PHRASETableAdapter.ClearBeforeFill = True
'
'DataLayoutControl2
'
Me.DataLayoutControl2.Controls.Add(Me.TextEdit1)
Me.DataLayoutControl2.Controls.Add(Me.MODULETextEdit)
Me.DataLayoutControl2.Controls.Add(Me.TextEdit2)
Me.DataLayoutControl2.Controls.Add(Me.LANGUAGEComboBoxEdit)
Me.DataLayoutControl2.Controls.Add(Me.CAPT_TYPETextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING1TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING2TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING3TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING4TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING5TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.STRING6TextEdit)
Me.DataLayoutControl2.Controls.Add(Me.TextEdit3)
Me.DataLayoutControl2.Controls.Add(Me.ADDED_WHENTextEdit)
Me.DataLayoutControl2.Controls.Add(Me.TextEdit4)
Me.DataLayoutControl2.Controls.Add(Me.CHANGED_WHENTextEdit)
Me.DataLayoutControl2.Controls.Add(Me.OBJ_NAMETextEdit)
Me.DataLayoutControl2.Controls.Add(Me.INTERNALCheckEdit)
Me.DataLayoutControl2.DataSource = Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource
resources.ApplyResources(Me.DataLayoutControl2, "DataLayoutControl2")
Me.DataLayoutControl2.Name = "DataLayoutControl2"
Me.DataLayoutControl2.Root = Me.LayoutControlGroup2
'
'LayoutControlGroup2
'
Me.LayoutControlGroup2.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.LayoutControlGroup2.GroupBordersVisible = False
Me.LayoutControlGroup2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlGroup3})
Me.LayoutControlGroup2.Name = "LayoutControlGroup2"
Me.LayoutControlGroup2.Size = New System.Drawing.Size(544, 479)
Me.LayoutControlGroup2.TextVisible = False
'
'LayoutControlGroup3
'
Me.LayoutControlGroup3.AllowDrawBackground = False
Me.LayoutControlGroup3.GroupBordersVisible = False
Me.LayoutControlGroup3.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.ItemForSTRING1, Me.ItemForSTRING2, Me.ItemForSTRING3, Me.ItemForSTRING4, Me.ItemForSTRING5, Me.ItemForSTRING6, Me.LayoutControlItem3, Me.LayoutControlItem5, Me.LayoutControlItem4, Me.LayoutControlItem6, Me.ItemForINTERNAL, Me.ItemForCAPT_TYPE, Me.ItemForLANGUAGE, Me.ItemForMODULE, Me.LayoutControlItem2, Me.ItemForOBJ_NAME})
Me.LayoutControlGroup3.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlGroup3.Name = "autoGeneratedGroup0"
Me.LayoutControlGroup3.Size = New System.Drawing.Size(524, 459)
'
'TextEdit1
'
Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "GUID", True))
resources.ApplyResources(Me.TextEdit1, "TextEdit1")
Me.TextEdit1.MenuManager = Me.RibbonControl1
Me.TextEdit1.Name = "TextEdit1"
Me.TextEdit1.Properties.Appearance.Options.UseTextOptions = True
Me.TextEdit1.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Far
Me.TextEdit1.Properties.Mask.EditMask = resources.GetString("TextEdit1.Properties.Mask.EditMask")
Me.TextEdit1.Properties.Mask.MaskType = CType(resources.GetObject("TextEdit1.Properties.Mask.MaskType"), DevExpress.XtraEditors.Mask.MaskType)
Me.TextEdit1.Properties.Mask.UseMaskAsDisplayFormat = CType(resources.GetObject("TextEdit1.Properties.Mask.UseMaskAsDisplayFormat"), Boolean)
Me.TextEdit1.Properties.ReadOnly = True
Me.TextEdit1.StyleController = Me.DataLayoutControl2
'
'LayoutControlItem1
'
Me.LayoutControlItem1.Control = Me.TextEdit1
Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem1.Name = "ItemForGUID"
Me.LayoutControlItem1.Size = New System.Drawing.Size(262, 24)
resources.ApplyResources(Me.LayoutControlItem1, "LayoutControlItem1")
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(74, 13)
'
'MODULETextEdit
'
Me.MODULETextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "MODULE", True))
resources.ApplyResources(Me.MODULETextEdit, "MODULETextEdit")
Me.MODULETextEdit.MenuManager = Me.RibbonControl1
Me.MODULETextEdit.Name = "MODULETextEdit"
Me.MODULETextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForMODULE
'
Me.ItemForMODULE.Control = Me.MODULETextEdit
Me.ItemForMODULE.Location = New System.Drawing.Point(374, 0)
Me.ItemForMODULE.Name = "ItemForMODULE"
Me.ItemForMODULE.Size = New System.Drawing.Size(150, 24)
resources.ApplyResources(Me.ItemForMODULE, "ItemForMODULE")
Me.ItemForMODULE.TextSize = New System.Drawing.Size(74, 13)
'
'TextEdit2
'
Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "TITLE", True))
resources.ApplyResources(Me.TextEdit2, "TextEdit2")
Me.TextEdit2.MenuManager = Me.RibbonControl1
Me.TextEdit2.Name = "TextEdit2"
Me.TextEdit2.StyleController = Me.DataLayoutControl2
'
'LayoutControlItem2
'
Me.LayoutControlItem2.Control = Me.TextEdit2
Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 72)
Me.LayoutControlItem2.Name = "ItemForTITLE"
Me.LayoutControlItem2.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.LayoutControlItem2, "LayoutControlItem2")
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(74, 13)
'
'LANGUAGEComboBoxEdit
'
Me.LANGUAGEComboBoxEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "LANGUAGE", True))
resources.ApplyResources(Me.LANGUAGEComboBoxEdit, "LANGUAGEComboBoxEdit")
Me.LANGUAGEComboBoxEdit.MenuManager = Me.RibbonControl1
Me.LANGUAGEComboBoxEdit.Name = "LANGUAGEComboBoxEdit"
Me.LANGUAGEComboBoxEdit.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("LANGUAGEComboBoxEdit.Properties.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines))})
Me.LANGUAGEComboBoxEdit.StyleController = Me.DataLayoutControl2
'
'ItemForLANGUAGE
'
Me.ItemForLANGUAGE.Control = Me.LANGUAGEComboBoxEdit
Me.ItemForLANGUAGE.Location = New System.Drawing.Point(0, 24)
Me.ItemForLANGUAGE.Name = "ItemForLANGUAGE"
Me.ItemForLANGUAGE.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForLANGUAGE, "ItemForLANGUAGE")
Me.ItemForLANGUAGE.TextSize = New System.Drawing.Size(74, 13)
'
'CAPT_TYPETextEdit
'
Me.CAPT_TYPETextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "CAPT_TYPE", True))
resources.ApplyResources(Me.CAPT_TYPETextEdit, "CAPT_TYPETextEdit")
Me.CAPT_TYPETextEdit.MenuManager = Me.RibbonControl1
Me.CAPT_TYPETextEdit.Name = "CAPT_TYPETextEdit"
Me.CAPT_TYPETextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForCAPT_TYPE
'
Me.ItemForCAPT_TYPE.Control = Me.CAPT_TYPETextEdit
Me.ItemForCAPT_TYPE.Location = New System.Drawing.Point(0, 96)
Me.ItemForCAPT_TYPE.Name = "ItemForCAPT_TYPE"
Me.ItemForCAPT_TYPE.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForCAPT_TYPE, "ItemForCAPT_TYPE")
Me.ItemForCAPT_TYPE.TextSize = New System.Drawing.Size(74, 13)
'
'STRING1TextEdit
'
Me.STRING1TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING1", True))
resources.ApplyResources(Me.STRING1TextEdit, "STRING1TextEdit")
Me.STRING1TextEdit.MenuManager = Me.RibbonControl1
Me.STRING1TextEdit.Name = "STRING1TextEdit"
Me.STRING1TextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForSTRING1
'
Me.ItemForSTRING1.Control = Me.STRING1TextEdit
Me.ItemForSTRING1.Location = New System.Drawing.Point(0, 120)
Me.ItemForSTRING1.Name = "ItemForSTRING1"
Me.ItemForSTRING1.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING1, "ItemForSTRING1")
Me.ItemForSTRING1.TextSize = New System.Drawing.Size(74, 13)
'
'STRING2TextEdit
'
Me.STRING2TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING2", True))
resources.ApplyResources(Me.STRING2TextEdit, "STRING2TextEdit")
Me.STRING2TextEdit.MenuManager = Me.RibbonControl1
Me.STRING2TextEdit.Name = "STRING2TextEdit"
Me.STRING2TextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForSTRING2
'
Me.ItemForSTRING2.Control = Me.STRING2TextEdit
Me.ItemForSTRING2.Location = New System.Drawing.Point(0, 144)
Me.ItemForSTRING2.Name = "ItemForSTRING2"
Me.ItemForSTRING2.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING2, "ItemForSTRING2")
Me.ItemForSTRING2.TextSize = New System.Drawing.Size(74, 13)
'
'STRING3TextEdit
'
Me.STRING3TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING3", True))
resources.ApplyResources(Me.STRING3TextEdit, "STRING3TextEdit")
Me.STRING3TextEdit.MenuManager = Me.RibbonControl1
Me.STRING3TextEdit.Name = "STRING3TextEdit"
Me.STRING3TextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForSTRING3
'
Me.ItemForSTRING3.Control = Me.STRING3TextEdit
Me.ItemForSTRING3.Location = New System.Drawing.Point(0, 168)
Me.ItemForSTRING3.Name = "ItemForSTRING3"
Me.ItemForSTRING3.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING3, "ItemForSTRING3")
Me.ItemForSTRING3.TextSize = New System.Drawing.Size(74, 13)
'
'STRING4TextEdit
'
Me.STRING4TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING4", True))
resources.ApplyResources(Me.STRING4TextEdit, "STRING4TextEdit")
Me.STRING4TextEdit.MenuManager = Me.RibbonControl1
Me.STRING4TextEdit.Name = "STRING4TextEdit"
Me.STRING4TextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForSTRING4
'
Me.ItemForSTRING4.Control = Me.STRING4TextEdit
Me.ItemForSTRING4.Location = New System.Drawing.Point(0, 192)
Me.ItemForSTRING4.Name = "ItemForSTRING4"
Me.ItemForSTRING4.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING4, "ItemForSTRING4")
Me.ItemForSTRING4.TextSize = New System.Drawing.Size(74, 13)
'
'STRING5TextEdit
'
Me.STRING5TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING5", True))
resources.ApplyResources(Me.STRING5TextEdit, "STRING5TextEdit")
Me.STRING5TextEdit.MenuManager = Me.RibbonControl1
Me.STRING5TextEdit.Name = "STRING5TextEdit"
Me.STRING5TextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForSTRING5
'
Me.ItemForSTRING5.Control = Me.STRING5TextEdit
Me.ItemForSTRING5.Location = New System.Drawing.Point(0, 216)
Me.ItemForSTRING5.Name = "ItemForSTRING5"
Me.ItemForSTRING5.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING5, "ItemForSTRING5")
Me.ItemForSTRING5.TextSize = New System.Drawing.Size(74, 13)
'
'STRING6TextEdit
'
Me.STRING6TextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING6", True))
resources.ApplyResources(Me.STRING6TextEdit, "STRING6TextEdit")
Me.STRING6TextEdit.MenuManager = Me.RibbonControl1
Me.STRING6TextEdit.Name = "STRING6TextEdit"
Me.STRING6TextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForSTRING6
'
Me.ItemForSTRING6.Control = Me.STRING6TextEdit
Me.ItemForSTRING6.Location = New System.Drawing.Point(0, 240)
Me.ItemForSTRING6.Name = "ItemForSTRING6"
Me.ItemForSTRING6.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForSTRING6, "ItemForSTRING6")
Me.ItemForSTRING6.TextSize = New System.Drawing.Size(74, 13)
'
'TextEdit3
'
Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "ADDED_WHO", True))
resources.ApplyResources(Me.TextEdit3, "TextEdit3")
Me.TextEdit3.MenuManager = Me.RibbonControl1
Me.TextEdit3.Name = "TextEdit3"
Me.TextEdit3.Properties.ReadOnly = True
Me.TextEdit3.StyleController = Me.DataLayoutControl2
'
'LayoutControlItem3
'
Me.LayoutControlItem3.Control = Me.TextEdit3
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 264)
Me.LayoutControlItem3.Name = "ItemForADDED_WHO"
Me.LayoutControlItem3.Size = New System.Drawing.Size(262, 24)
resources.ApplyResources(Me.LayoutControlItem3, "LayoutControlItem3")
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(74, 13)
'
'ADDED_WHENTextEdit
'
Me.ADDED_WHENTextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "ADDED_WHEN", True))
resources.ApplyResources(Me.ADDED_WHENTextEdit, "ADDED_WHENTextEdit")
Me.ADDED_WHENTextEdit.MenuManager = Me.RibbonControl1
Me.ADDED_WHENTextEdit.Name = "ADDED_WHENTextEdit"
Me.ADDED_WHENTextEdit.Properties.DisplayFormat.FormatString = "d"
Me.ADDED_WHENTextEdit.Properties.DisplayFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.ADDED_WHENTextEdit.Properties.EditFormat.FormatString = "d"
Me.ADDED_WHENTextEdit.Properties.EditFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.ADDED_WHENTextEdit.Properties.Mask.EditMask = resources.GetString("ADDED_WHENTextEdit.Properties.Mask.EditMask")
Me.ADDED_WHENTextEdit.Properties.Mask.MaskType = CType(resources.GetObject("ADDED_WHENTextEdit.Properties.Mask.MaskType"), DevExpress.XtraEditors.Mask.MaskType)
Me.ADDED_WHENTextEdit.Properties.ReadOnly = True
Me.ADDED_WHENTextEdit.StyleController = Me.DataLayoutControl2
'
'LayoutControlItem4
'
Me.LayoutControlItem4.Control = Me.ADDED_WHENTextEdit
Me.LayoutControlItem4.Location = New System.Drawing.Point(262, 264)
Me.LayoutControlItem4.Name = "ItemForADDED_WHEN"
Me.LayoutControlItem4.Size = New System.Drawing.Size(262, 24)
resources.ApplyResources(Me.LayoutControlItem4, "LayoutControlItem4")
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(74, 13)
'
'TextEdit4
'
Me.TextEdit4.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "CHANGED_WHO", True))
resources.ApplyResources(Me.TextEdit4, "TextEdit4")
Me.TextEdit4.MenuManager = Me.RibbonControl1
Me.TextEdit4.Name = "TextEdit4"
Me.TextEdit4.Properties.ReadOnly = True
Me.TextEdit4.StyleController = Me.DataLayoutControl2
'
'LayoutControlItem5
'
Me.LayoutControlItem5.Control = Me.TextEdit4
Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 288)
Me.LayoutControlItem5.Name = "ItemForCHANGED_WHO"
Me.LayoutControlItem5.Size = New System.Drawing.Size(262, 171)
resources.ApplyResources(Me.LayoutControlItem5, "LayoutControlItem5")
Me.LayoutControlItem5.TextSize = New System.Drawing.Size(74, 13)
'
'CHANGED_WHENTextEdit
'
Me.CHANGED_WHENTextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "CHANGED_WHEN", True))
resources.ApplyResources(Me.CHANGED_WHENTextEdit, "CHANGED_WHENTextEdit")
Me.CHANGED_WHENTextEdit.MenuManager = Me.RibbonControl1
Me.CHANGED_WHENTextEdit.Name = "CHANGED_WHENTextEdit"
Me.CHANGED_WHENTextEdit.Properties.DisplayFormat.FormatString = "d"
Me.CHANGED_WHENTextEdit.Properties.DisplayFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.CHANGED_WHENTextEdit.Properties.EditFormat.FormatString = "d"
Me.CHANGED_WHENTextEdit.Properties.EditFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.CHANGED_WHENTextEdit.Properties.Mask.EditMask = resources.GetString("CHANGED_WHENTextEdit.Properties.Mask.EditMask")
Me.CHANGED_WHENTextEdit.Properties.Mask.MaskType = CType(resources.GetObject("CHANGED_WHENTextEdit.Properties.Mask.MaskType"), DevExpress.XtraEditors.Mask.MaskType)
Me.CHANGED_WHENTextEdit.Properties.ReadOnly = True
Me.CHANGED_WHENTextEdit.StyleController = Me.DataLayoutControl2
'
'LayoutControlItem6
'
Me.LayoutControlItem6.Control = Me.CHANGED_WHENTextEdit
Me.LayoutControlItem6.Location = New System.Drawing.Point(262, 288)
Me.LayoutControlItem6.Name = "ItemForCHANGED_WHEN"
Me.LayoutControlItem6.Size = New System.Drawing.Size(262, 171)
resources.ApplyResources(Me.LayoutControlItem6, "LayoutControlItem6")
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(74, 13)
'
'OBJ_NAMETextEdit
'
Me.OBJ_NAMETextEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "OBJ_NAME", True))
resources.ApplyResources(Me.OBJ_NAMETextEdit, "OBJ_NAMETextEdit")
Me.OBJ_NAMETextEdit.MenuManager = Me.RibbonControl1
Me.OBJ_NAMETextEdit.Name = "OBJ_NAMETextEdit"
Me.OBJ_NAMETextEdit.StyleController = Me.DataLayoutControl2
'
'ItemForOBJ_NAME
'
Me.ItemForOBJ_NAME.Control = Me.OBJ_NAMETextEdit
Me.ItemForOBJ_NAME.Location = New System.Drawing.Point(0, 48)
Me.ItemForOBJ_NAME.Name = "ItemForOBJ_NAME"
Me.ItemForOBJ_NAME.Size = New System.Drawing.Size(524, 24)
resources.ApplyResources(Me.ItemForOBJ_NAME, "ItemForOBJ_NAME")
Me.ItemForOBJ_NAME.TextSize = New System.Drawing.Size(74, 13)
'
'INTERNALCheckEdit
'
Me.INTERNALCheckEdit.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "INTERNAL", True))
resources.ApplyResources(Me.INTERNALCheckEdit, "INTERNALCheckEdit")
Me.INTERNALCheckEdit.MenuManager = Me.RibbonControl1
Me.INTERNALCheckEdit.Name = "INTERNALCheckEdit"
Me.INTERNALCheckEdit.Properties.Caption = resources.GetString("INTERNALCheckEdit.Properties.Caption")
Me.INTERNALCheckEdit.Properties.GlyphAlignment = CType(resources.GetObject("INTERNALCheckEdit.Properties.GlyphAlignment"), DevExpress.Utils.HorzAlignment)
Me.INTERNALCheckEdit.StyleController = Me.DataLayoutControl2
'
'ItemForINTERNAL
'
Me.ItemForINTERNAL.Control = Me.INTERNALCheckEdit
Me.ItemForINTERNAL.Location = New System.Drawing.Point(262, 0)
Me.ItemForINTERNAL.Name = "ItemForINTERNAL"
Me.ItemForINTERNAL.Size = New System.Drawing.Size(112, 24)
resources.ApplyResources(Me.ItemForINTERNAL, "ItemForINTERNAL")
Me.ItemForINTERNAL.TextSize = New System.Drawing.Size(0, 0)
Me.ItemForINTERNAL.TextVisible = False
'
'frmAdmin2
'
resources.ApplyResources(Me, "$this")
@ -1293,50 +1293,50 @@ Partial Class frmAdmin2
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabPage2.ResumeLayout(False)
Me.XtraTabPage2.PerformLayout()
CType(Me.DataLayoutControl2, System.ComponentModel.ISupportInitialize).EndInit()
Me.DataLayoutControl2.ResumeLayout(False)
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MODULETextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LANGUAGEComboBoxEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.CAPT_TYPETextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING1TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING2TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING3TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING4TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING5TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING6TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ADDED_WHENTextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit4.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.CHANGED_WHENTextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.OBJ_NAMETextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.INTERNALCheckEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForINTERNAL, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForCAPT_TYPE, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForLANGUAGE, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForMODULE, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForOBJ_NAME, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.BindingNavigator2, System.ComponentModel.ISupportInitialize).EndInit()
Me.BindingNavigator2.ResumeLayout(False)
Me.BindingNavigator2.PerformLayout()
CType(Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DataLayoutControl2, System.ComponentModel.ISupportInitialize).EndInit()
Me.DataLayoutControl2.ResumeLayout(False)
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MODULETextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForMODULE, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LANGUAGEComboBoxEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForLANGUAGE, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.CAPT_TYPETextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForCAPT_TYPE, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING1TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING2TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING3TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING4TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING5TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.STRING6TextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForSTRING6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ADDED_WHENTextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit4.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.CHANGED_WHENTextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.OBJ_NAMETextEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForOBJ_NAME, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.INTERNALCheckEdit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ItemForINTERNAL, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()

File diff suppressed because it is too large Load Diff

View File

@ -569,6 +569,7 @@ Partial Class frmMain
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.QuickToolbarItemLinks.Add(Me.bbtnitemInfo)
Me.RibbonControl1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonControlStyle.Office2013
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
'

View File

@ -488,7 +488,7 @@
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw
CAAAAk1TRnQBSQFMAgEBAgEAAWQBBQFkAQUBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
CAAAAk1TRnQBSQFMAgEBAgEAAWwBBQFsAQUBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@ -541,9 +541,105 @@
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>597, 17</value>
</metadata>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>500, 134</value>
</metadata>
<data name="&gt;&gt;GridControl_Docs.Name" xml:space="preserve">
<value>GridControl_Docs</value>
</data>
<data name="&gt;&gt;GridControl_Docs.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;GridControl_Docs.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;GridControl_Docs.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="&gt;&gt;BindingNavigator1.Name" xml:space="preserve">
<value>BindingNavigator1</value>
</data>
<data name="&gt;&gt;BindingNavigator1.Type" xml:space="preserve">
<value>System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;BindingNavigator1.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;BindingNavigator1.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="&gt;&gt;NavBarControl1.Name" xml:space="preserve">
<value>NavBarControl1</value>
</data>
<data name="&gt;&gt;NavBarControl1.Type" xml:space="preserve">
<value>DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;NavBarControl1.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;NavBarControl1.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="Panel1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value>
</data>
<data name="Panel1.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9pt</value>
</data>
<data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 158</value>
</data>
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>1023, 345</value>
</data>
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
<value>4</value>
</data>
<data name="&gt;&gt;Panel1.Name" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;Panel1.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;Panel1.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;Panel1.ZOrder" xml:space="preserve">
<value>3</value>
</data>
<metadata name="ContextMenuGrid.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>637, 95</value>
</metadata>
<data name="ContextMenuGrid.Size" type="System.Drawing.Size, System.Drawing">
<value>270, 198</value>
</data>
<data name="&gt;&gt;ContextMenuGrid.Name" xml:space="preserve">
<value>ContextMenuGrid</value>
</data>
<data name="&gt;&gt;ContextMenuGrid.Type" xml:space="preserve">
<value>System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="GridControl_Docs.Location" type="System.Drawing.Point, System.Drawing">
<value>256, 30</value>
</data>
<data name="GridControl_Docs.Size" type="System.Drawing.Size, System.Drawing">
<value>631, 241</value>
</data>
<data name="GridControl_Docs.TabIndex" type="System.Int32, mscorlib">
<value>8</value>
</data>
<data name="&gt;&gt;GridControl_Docs.Name" xml:space="preserve">
<value>GridControl_Docs</value>
</data>
<data name="&gt;&gt;GridControl_Docs.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;GridControl_Docs.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;GridControl_Docs.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="CMGroupStart.Size" type="System.Drawing.Size, System.Drawing">
<value>269, 26</value>
</data>
@ -624,36 +720,6 @@
<data name="LayoutSpeichernToolStripMenuItem.Text" xml:space="preserve">
<value>Layout speichern</value>
</data>
<data name="ContextMenuGrid.Size" type="System.Drawing.Size, System.Drawing">
<value>270, 198</value>
</data>
<data name="&gt;&gt;ContextMenuGrid.Name" xml:space="preserve">
<value>ContextMenuGrid</value>
</data>
<data name="&gt;&gt;ContextMenuGrid.Type" xml:space="preserve">
<value>System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="GridControl_Docs.Location" type="System.Drawing.Point, System.Drawing">
<value>256, 30</value>
</data>
<data name="GridControl_Docs.Size" type="System.Drawing.Size, System.Drawing">
<value>631, 241</value>
</data>
<data name="GridControl_Docs.TabIndex" type="System.Int32, mscorlib">
<value>8</value>
</data>
<data name="&gt;&gt;GridControl_Docs.Name" xml:space="preserve">
<value>GridControl_Docs</value>
</data>
<data name="&gt;&gt;GridControl_Docs.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;GridControl_Docs.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;GridControl_Docs.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>500, 134</value>
</metadata>
@ -857,12 +923,6 @@
<metadata name="cmsNavPane.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>786, 95</value>
</metadata>
<data name="tsmiValidationProfil.Size" type="System.Drawing.Size, System.Drawing">
<value>219, 26</value>
</data>
<data name="tsmiValidationProfil.Text" xml:space="preserve">
<value>Starte Validierung für Profil</value>
</data>
<data name="cmsNavPane.Size" type="System.Drawing.Size, System.Drawing">
<value>220, 30</value>
</data>
@ -1060,32 +1120,11 @@
<data name="&gt;&gt;NavBarControl1.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="Panel1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value>
<data name="tsmiValidationProfil.Size" type="System.Drawing.Size, System.Drawing">
<value>219, 26</value>
</data>
<data name="Panel1.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9pt</value>
</data>
<data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 158</value>
</data>
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>1023, 345</value>
</data>
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
<value>4</value>
</data>
<data name="&gt;&gt;Panel1.Name" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;Panel1.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;Panel1.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;Panel1.ZOrder" xml:space="preserve">
<value>3</value>
<data name="tsmiValidationProfil.Text" xml:space="preserve">
<value>Starte Validierung für Profil</value>
</data>
<metadata name="NotifyIcon1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>908, 17</value>
@ -1093,18 +1132,6 @@
<metadata name="ContextMenuNotifyIcon.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 173</value>
</metadata>
<data name="PopupErinnerungInaktivierenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>234, 22</value>
</data>
<data name="PopupErinnerungInaktivierenToolStripMenuItem.Text" xml:space="preserve">
<value>Popup Erinnerung inaktivieren</value>
</data>
<data name="AnzeigenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>234, 22</value>
</data>
<data name="AnzeigenToolStripMenuItem.Text" xml:space="preserve">
<value>Monitor anzeigen</value>
</data>
<data name="ContextMenuNotifyIcon.Size" type="System.Drawing.Size, System.Drawing">
<value>235, 48</value>
</data>
@ -1286,6 +1313,18 @@
<data name="NotifyIcon1.Visible" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="PopupErinnerungInaktivierenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>234, 22</value>
</data>
<data name="PopupErinnerungInaktivierenToolStripMenuItem.Text" xml:space="preserve">
<value>Popup Erinnerung inaktivieren</value>
</data>
<data name="AnzeigenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>234, 22</value>
</data>
<data name="AnzeigenToolStripMenuItem.Text" xml:space="preserve">
<value>Monitor anzeigen</value>
</data>
<metadata name="TimerRefresh.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
@ -1606,18 +1645,6 @@
<data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
</data>
<data name="RibbonPageGroup1.Text" xml:space="preserve">
<value>Allgemein</value>
</data>
<data name="RibbonPageGroup2.Text" xml:space="preserve">
<value>Funktionen</value>
</data>
<data name="RibbonPageGroup3.Text" xml:space="preserve">
<value>Verwaltung</value>
</data>
<data name="RibbonPageGroup4.Text" xml:space="preserve">
<value>Grundeinstellungen</value>
</data>
<data name="RibbonPage1.Text" xml:space="preserve">
<value>Funktionen</value>
</data>
@ -1654,6 +1681,18 @@
<data name="&gt;&gt;RibbonControl1.ZOrder" xml:space="preserve">
<value>5</value>
</data>
<data name="RibbonPageGroup1.Text" xml:space="preserve">
<value>Allgemein</value>
</data>
<data name="RibbonPageGroup2.Text" xml:space="preserve">
<value>Funktionen</value>
</data>
<data name="RibbonPageGroup3.Text" xml:space="preserve">
<value>Verwaltung</value>
</data>
<data name="RibbonPageGroup4.Text" xml:space="preserve">
<value>Grundeinstellungen</value>
</data>
<data name="RibbonPage2.Text" xml:space="preserve">
<value>RibbonPage2</value>
</data>

View File

@ -127,20 +127,23 @@ Public Class frmMain
End If
If USER_IS_ADMIN = True Then
RibbonPageGroup3.Visible = True
'Anzahl der eingeloggten User
bsiUserLoggedIn.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
If USER_LANGUAGE <> "de-DE" Then
bsiUserLoggedIn.Caption = "License Count: " & USERCOUNT_LOGGED_IN
Else
bsiUserLoggedIn.Caption = "Lizenz-Zähler: " & USERCOUNT_LOGGED_IN
End If
Else
RibbonPageGroup3.Visible = False
bsiUserLoggedIn.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
End If
If MONITORING_ACTIVE = False Then
RibbonPageGroup2.Visible = False
Else
RibbonPageGroup2.Visible = True
End If
'Anzahl der eingeloggten User
If USER_LANGUAGE <> "de-DE" Then
bsiUserLoggedIn.Caption = "License Count: " & USERCOUNT_LOGGED_IN
Else
bsiUserLoggedIn.Caption = "Lizenz-Zähler: " & USERCOUNT_LOGGED_IN
End If
@ -1346,7 +1349,12 @@ Public Class frmMain
LOGGER.Debug($"Datatable CURR_DT_OVERVIEW loaded: {CURR_DT_OVERVIEW.Rows.Count} rows")
NO_WORKFLOWITEMS = False
If CURR_DT_OVERVIEW.Rows.Count = 0 Then
ToolStripLabelViewTape.Text = "Aktuell keine Workflowdaten vorhanden!"
If USER_LANGUAGE = "de-DE" Then
ToolStripLabelViewTape.Text = "Aktuell keine Workflowdaten vorhanden!"
Else
ToolStripLabelViewTape.Text = "No workflowdata!"
End If
NO_WORKFLOWITEMS = True
@ -1637,13 +1645,37 @@ Public Class frmMain
Decide_Load()
Handling_DEBUG_USER()
If RIBBON_COLOR_SCHEME = "BLUE" Then
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Blue
ElseIf RIBBON_COLOR_SCHEME = "DarkBlue".ToUpper Then
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.DarkBlue
ElseIf RIBBON_COLOR_SCHEME = "Green".ToUpper Then
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Green
ElseIf RIBBON_COLOR_SCHEME = "Orange".ToUpper Then
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Orange
ElseIf RIBBON_COLOR_SCHEME = "Purple".ToUpper Then
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Purple
ElseIf RIBBON_COLOR_SCHEME = "Red".ToUpper Then
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Red
ElseIf RIBBON_COLOR_SCHEME = "Teal".ToUpper Then
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Teal
Else
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Default
End If
If ADDITIONAL_TITLE <> String.Empty Then
Me.Text = ADDITIONAL_TITLE
Else
Me.Text = "Process Manager"
End If
End Sub
Sub Handling_DEBUG_USER()
If USER_DEBUG_LOG = True Then
If USER_LANGUAGE = "de-DE" Then
bsiDebug.Caption = "ACHTUNG: UserDebugMode ist eingeschaltet!"
bsiDebug.Caption = "HINWEIS: UserDebugMode ist eingeschaltet!"
Else
bsiDebug.Caption = "ATTENTION: UserDebugMode activated!"
bsiDebug.Caption = "INFORMATION: UserDebugMode activated!"
End If
bsiDebug.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
Else
@ -1654,13 +1686,16 @@ Public Class frmMain
Dim sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','PM',{1})", USER_USERNAME, CLIENT_SELECTED)
Dim DT_CHECKUSER_MODULE As DataTable = ClassDatabase.Return_Datatable(sql)
ClassParamRefresh.Refresh_Params(DT_CHECKUSER_MODULE)
If USER_IS_ADMIN Then
If USER_LANGUAGE = "de-DE" Then
bsiUserLoggedIn.Caption = "License Count: " & USERCOUNT_LOGGED_IN
Else
bsiUserLoggedIn.Caption = "Lizenz-Zähler: " & USERCOUNT_LOGGED_IN
End If
If USER_LANGUAGE = "de-DE" Then
bsiUserLoggedIn.Caption = "License Count: " & USERCOUNT_LOGGED_IN
Else
bsiUserLoggedIn.Caption = "Lizenz-Zähler: " & USERCOUNT_LOGGED_IN
End If
If USER_DEBUG_LOG = True Then
' 'Jetzt de rinsert der Inhalte
If Not IsNothing(LOGCONFIG.Logs) Then

View File

@ -403,16 +403,16 @@ Public Class frmValidator
Sub LoadSQLData(control As Control, controlId As Integer)
Try
If TypeOf control Is Label Then Exit Sub
LOGGER.Debug($"in LoadSQLData for ControlID [{controlId}]...")
Dim oSql As String = $"SELECT GUID,NAME, CONNECTION_ID, SQL_UEBERPRUEFUNG FROM TBPM_PROFILE_CONTROLS WHERE GUID = {controlId} AND PROFIL_ID = {CURRENT_ProfilGUID} AND LEN(ISNULL(SQL_UEBERPRUEFUNG,'')) > 0 AND CTRL_TYPE <> 'BUTTON'"
' And SQL_UEBERPRUEFUNG Not Like '%#WMI#%' AND SQL_UEBERPRUEFUNG NOT LIKE '%#CTRL#%'
Dim dt As DataTable = ClassDatabase.Return_Datatable(oSql)
Dim oDTforControl As DataTable = ClassDatabase.Return_Datatable(oSql)
If IsNothing(dt) Then Exit Sub
If dt.Rows.Count = 0 Then Exit Sub
If IsNothing(oDTforControl) Then Exit Sub
If oDTforControl.Rows.Count = 0 Then Exit Sub
For Each row As DataRow In dt.Rows
For Each row As DataRow In oDTforControl.Rows
Dim name As String = row.Item("NAME")
Dim oGUID As String = row.Item("GUID")
'If clsPatterns.HasComplexPatterns(row.Item("SQL_UEBERPRUEFUNG")) Then
@ -425,37 +425,37 @@ Public Class frmValidator
End If
If IsDBNull(row.Item("SQL_UEBERPRUEFUNG")) Then Continue For
Dim sqlStatement As String = row.Item("SQL_UEBERPRUEFUNG")
Dim connectionId As Integer = row.Item("CONNECTION_ID")
Dim oSQLStatement As String = row.Item("SQL_UEBERPRUEFUNG")
Dim oConnectionId As Integer = row.Item("CONNECTION_ID")
'If clsPatterns.HasComplexPatterns(sqlStatement) Then
' Continue For
'End If
If IsNothing(sqlStatement) Then
If IsNothing(oSQLStatement) Then
Continue For
End If
'oSql = clsPatterns.ReplaceUserValues(sqlStatement, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID)
'oSql = clsPatterns.ReplaceInternalValues(oSql)
sqlStatement = clsPatterns.ReplaceAllValues(sqlStatement, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID)
If IsNothing(sqlStatement) Then
oSQLStatement = clsPatterns.ReplaceAllValues(oSQLStatement, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID)
If IsNothing(oSQLStatement) Then
Continue For
End If
If clsPatterns.HasComplexPatterns(sqlStatement) Then
If clsPatterns.HasComplexPatterns(oSQLStatement) Then
LOGGER.Warn($"Unexpected error LoadSQLData2 - sql Statement still has complex patterns! [{oSql}]")
Continue For
End If
'sql = ClassPatterns.ReplaceInternalValues(sqlStatement)
dt = ClassDatabase.Return_Datatable_ConId(oSql, connectionId)
Dim oDTContent As DataTable = ClassDatabase.Return_Datatable_ConId(oSQLStatement, oConnectionId)
If IsNothing(dt) Then
LOGGER.Warn($"SQL-Query [{oSql}] for control {control.Name} is invalid.")
If IsNothing(oDTContent) Then
LOGGER.Warn($"SQL-Query [{oSQLStatement}] for control {control.Name} is invalid.")
Exit Sub
End If
Dim oValue
If TypeOf control Is TextBox Then
Try
Dim firstRow As DataRow = dt.Rows(0)
Dim firstRow As DataRow = oDTContent.Rows(0)
Dim value = firstRow.Item(0)
@ -472,7 +472,7 @@ Public Class frmValidator
LOGGER.Debug($"oMyComboBox {oMyComboBox.Name} - Saving selected index {oselectedIndex}")
Dim list As New List(Of String)
For Each _row As DataRow In dt.Rows
For Each _row As DataRow In oDTContent.Rows
list.Add(_row.Item(0))
Next
@ -487,7 +487,7 @@ Public Class frmValidator
Try
Dim lookup As LookupControl2 = control
lookup.DataSource = dt
lookup.DataSource = oDTContent
Catch ex As Exception
LOGGER.Error(ex)
clsLogger.Add("Error in LoadSimpleData for LookupControl2: " & ex.Message)
@ -500,7 +500,7 @@ Public Class frmValidator
If oDataSource Is Nothing OrElse oDataSource.Rows.Count = 0 Then
'dataGridView.DataSource = dt
Dim oDatatable As DataTable = dt.Clone()
Dim oDatatable As DataTable = oDTContent.Clone()
For Each oColumn As DataColumn In oDatatable.Columns
If oDataSource.Columns(oColumn.ColumnName) Is Nothing Then
@ -509,7 +509,7 @@ Public Class frmValidator
End If
Next
For Each oRow As DataRow In dt.Rows
For Each oRow As DataRow In oDTContent.Rows
oDataSource.ImportRow(oRow)
Next
@ -530,16 +530,16 @@ Public Class frmValidator
Sub LoadSQLData2(control As Control, controlId As Integer)
Try
If TypeOf control Is Label Then Exit Sub
LOGGER.Debug($"in LoadSQLData2 for ControlID [{controlId}]...")
Dim oSql As String = $"SELECT GUID,NAME, CONNECTION_ID, SQL_UEBERPRUEFUNG FROM TBPM_PROFILE_CONTROLS WHERE GUID = {controlId} AND PROFIL_ID = {CURRENT_ProfilGUID} AND LEN(ISNULL(SQL_UEBERPRUEFUNG,'')) > 0 AND CTRL_TYPE <> 'BUTTON'"
' And SQL_UEBERPRUEFUNG Not Like '%#WMI#%' AND SQL_UEBERPRUEFUNG NOT LIKE '%#CTRL#%'
Dim dt As DataTable = ClassDatabase.Return_Datatable(oSql)
Dim oDTforControl As DataTable = ClassDatabase.Return_Datatable(oSql)
If IsNothing(dt) Then Exit Sub
If dt.Rows.Count = 0 Then Exit Sub
If IsNothing(oDTforControl) Then Exit Sub
If oDTforControl.Rows.Count = 0 Then Exit Sub
For Each row As DataRow In dt.Rows
For Each row As DataRow In oDTforControl.Rows
Dim oControlName As String = row.Item("NAME")
Dim oControlID As String = row.Item("GUID")
If IsDBNull(row.Item("CONNECTION_ID")) Then
@ -557,9 +557,9 @@ Public Class frmValidator
Continue For
End If
'sql = ClassPatterns.ReplaceInternalValues(sqlStatement)
dt = ClassDatabase.Return_Datatable_ConId(oSql, oConnectionId)
oDTforControl = ClassDatabase.Return_Datatable_ConId(oSql, oConnectionId)
If IsNothing(dt) Then
If IsNothing(oDTforControl) Then
MsgBox($"SQL-Query for control {control.Name} is invalid.")
Exit Sub
End If
@ -567,7 +567,7 @@ Public Class frmValidator
If TypeOf control Is TextBox Then
Try
Dim firstRow As DataRow = dt.Rows(0)
Dim firstRow As DataRow = oDTforControl.Rows(0)
Dim value = firstRow.Item(0)
@ -584,7 +584,7 @@ Public Class frmValidator
LOGGER.Debug($"oMyComboBox {oMyComboBox.Name} - Saving selected index {oselectedIndex}")
Dim list As New List(Of String)
For Each _row As DataRow In dt.Rows
For Each _row As DataRow In oDTforControl.Rows
list.Add(_row.Item(0))
Next
@ -599,7 +599,7 @@ Public Class frmValidator
Try
Dim lookup As LookupControl2 = control
lookup.DataSource = dt
lookup.DataSource = oDTforControl
Catch ex As Exception
LOGGER.Error(ex)
clsLogger.Add("Error in LoadSimpleData for LookupControl2: " & ex.Message)
@ -612,7 +612,7 @@ Public Class frmValidator
If oDataSource Is Nothing OrElse oDataSource.Rows.Count = 0 Then
'dataGridView.DataSource = dt
Dim oDatatable As DataTable = dt.Clone()
Dim oDatatable As DataTable = oDTforControl.Clone()
For Each oColumn As DataColumn In oDatatable.Columns
If oDataSource.Columns(oColumn.ColumnName) Is Nothing Then
@ -621,7 +621,7 @@ Public Class frmValidator
End If
Next
For Each oRow As DataRow In dt.Rows
For Each oRow As DataRow In oDTforControl.Rows
oDataSource.ImportRow(oRow)
Next