diff --git a/GUIs.ZooFlow/Administration/ClassConstants.vb b/GUIs.ZooFlow/Administration/ClassConstants.vb index 0c01221d..9b15fd9b 100644 --- a/GUIs.ZooFlow/Administration/ClassConstants.vb +++ b/GUIs.ZooFlow/Administration/ClassConstants.vb @@ -6,6 +6,8 @@ Public Const PAGE_IDB_BUSINESS_ENTITIES = "IDB_BUSINESS_ENTITIES" Public Const PAGE_IDB_SOURCE_SQL = "IDB_SOURCE_SQL" Public Const PAGE_IDB_OBJECT_STORES = "IDB_OBJECT_STORES" + Public Const PAGE_IDB_DOCTYPE_CONFIG = "IDB_DOCTYPE_CONFIG" + Public Const MODULE_GI = "GLOBIX" Public Const PAGE_GI_PROFILES = "GI_PROFILES" diff --git a/GUIs.ZooFlow/Administration/ClassDetailForm.vb b/GUIs.ZooFlow/Administration/ClassDetailForm.vb index 4fd53f56..ea8e0c83 100644 --- a/GUIs.ZooFlow/Administration/ClassDetailForm.vb +++ b/GUIs.ZooFlow/Administration/ClassDetailForm.vb @@ -62,6 +62,13 @@ Public Class ClassDetailForm .NewRecordTitle = "", .[Module] = MODULE_GI, .Entity = PAGE_GI_RELATIONS + }}, + {PAGE_IDB_DOCTYPE_CONFIG, + New DetailSettings With { + .GridTitle = "Doctype Configuration", + .NewRecordTitle = "New Configuration", + .[Module] = MODULE_IDB, + .Entity = PAGE_IDB_DOCTYPE_CONFIG }} } @@ -103,6 +110,9 @@ Public Class ClassDetailForm Dim oForm As New frmAdmin_GlobixRelations oForm.ShowDialog() Return True + Case PAGE_IDB_DOCTYPE_CONFIG + Dim oForm As New frmAdmin_DoctypeConfig(PrimaryKey) With {.IsInsert = IsInsert} + oForm.ShowDialog() Case Else Return False End Select diff --git a/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.Designer.vb b/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.Designer.vb new file mode 100644 index 00000000..ec7ac33a --- /dev/null +++ b/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.Designer.vb @@ -0,0 +1,405 @@ + _ +Partial Class frmAdmin_DoctypeConfig + Inherits DevExpress.XtraBars.Ribbon.RibbonForm + + 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Wird vom Windows Form-Designer benötigt. + Private components As System.ComponentModel.IContainer + + 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. + 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. + 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdmin_DoctypeConfig)) + Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() + Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem() + Me.labelStatus = New DevExpress.XtraBars.BarStaticItem() + Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() + Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl() + Me.TextEdit5 = New DevExpress.XtraEditors.TextEdit() + Me.TBIDB_DOCTYPE_HANDLINGBindingSource = New System.Windows.Forms.BindingSource(Me.components) + Me.DSIDB_Stammdaten = New DigitalData.GUIs.ZooFlow.DSIDB_Stammdaten() + Me.TextEdit4 = New DevExpress.XtraEditors.TextEdit() + Me.TextEdit3 = New DevExpress.XtraEditors.TextEdit() + Me.TextEdit2 = New DevExpress.XtraEditors.TextEdit() + Me.CHANGED_ACTIONComboBox = New System.Windows.Forms.ComboBox() + Me.TBIDB_CATALOGBindingSource = New System.Windows.Forms.BindingSource(Me.components) + Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit() + Me.Root = New DevExpress.XtraLayout.LayoutControlGroup() + Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem() + Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem() + Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem() + Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem() + Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem() + Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem() + Me.TBIDB_DOCTYPE_HANDLINGTableAdapter = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.TBIDB_DOCTYPE_HANDLINGTableAdapter() + Me.TableAdapterManager = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.TableAdapterManager() + Me.TBIDB_CATALOGTableAdapter = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.TBIDB_CATALOGTableAdapter() + Me.DoctypeTextBox = New System.Windows.Forms.TextBox() + Me.LayoutControlItem8 = New DevExpress.XtraLayout.LayoutControlItem() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.LayoutControl1.SuspendLayout() + CType(Me.TextEdit5.Properties, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TBIDB_DOCTYPE_HANDLINGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.DSIDB_Stammdaten, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextEdit4.Properties, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TBIDB_CATALOGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'RibbonControl1 + ' + Me.RibbonControl1.ExpandCollapseItem.Id = 0 + Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.labelStatus}) + Me.RibbonControl1.Location = New System.Drawing.Point(0, 0) + Me.RibbonControl1.MaxItemId = 3 + Me.RibbonControl1.Name = "RibbonControl1" + Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) + Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] + Me.RibbonControl1.Size = New System.Drawing.Size(837, 160) + Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 + ' + 'BarButtonItem1 + ' + Me.BarButtonItem1.Caption = "Speichern" + Me.BarButtonItem1.Id = 1 + Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) + Me.BarButtonItem1.Name = "BarButtonItem1" + ' + 'labelStatus + ' + Me.labelStatus.Caption = "BarStaticItem1" + Me.labelStatus.Id = 2 + Me.labelStatus.ImageOptions.SvgImage = CType(resources.GetObject("labelStatus.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) + Me.labelStatus.Name = "labelStatus" + Me.labelStatus.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph + ' + 'RibbonPage1 + ' + Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1}) + Me.RibbonPage1.Name = "RibbonPage1" + Me.RibbonPage1.Text = "Start" + ' + 'RibbonPageGroup1 + ' + Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1) + Me.RibbonPageGroup1.Name = "RibbonPageGroup1" + Me.RibbonPageGroup1.Text = "Aktionen" + ' + 'RibbonStatusBar1 + ' + Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus) + Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 465) + Me.RibbonStatusBar1.Name = "RibbonStatusBar1" + Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 + Me.RibbonStatusBar1.Size = New System.Drawing.Size(837, 22) + ' + 'RibbonPage2 + ' + Me.RibbonPage2.Name = "RibbonPage2" + Me.RibbonPage2.Text = "RibbonPage2" + ' + 'LayoutControl1 + ' + Me.LayoutControl1.Controls.Add(Me.DoctypeTextBox) + Me.LayoutControl1.Controls.Add(Me.TextEdit5) + Me.LayoutControl1.Controls.Add(Me.TextEdit4) + Me.LayoutControl1.Controls.Add(Me.TextEdit3) + Me.LayoutControl1.Controls.Add(Me.TextEdit2) + Me.LayoutControl1.Controls.Add(Me.CHANGED_ACTIONComboBox) + Me.LayoutControl1.Controls.Add(Me.TextEdit1) + Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill + Me.LayoutControl1.Location = New System.Drawing.Point(0, 160) + Me.LayoutControl1.Name = "LayoutControl1" + Me.LayoutControl1.Root = Me.Root + Me.LayoutControl1.Size = New System.Drawing.Size(837, 305) + Me.LayoutControl1.TabIndex = 2 + Me.LayoutControl1.Text = "LayoutControl1" + ' + 'TextEdit5 + ' + Me.TextEdit5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "CHANGED_WHEN", True)) + Me.TextEdit5.Location = New System.Drawing.Point(568, 106) + Me.TextEdit5.MenuManager = Me.RibbonControl1 + Me.TextEdit5.Name = "TextEdit5" + Me.TextEdit5.Properties.ReadOnly = True + Me.TextEdit5.Size = New System.Drawing.Size(254, 20) + Me.TextEdit5.StyleController = Me.LayoutControl1 + Me.TextEdit5.TabIndex = 5 + ' + 'TBIDB_DOCTYPE_HANDLINGBindingSource + ' + Me.TBIDB_DOCTYPE_HANDLINGBindingSource.DataMember = "TBIDB_DOCTYPE_HANDLING" + Me.TBIDB_DOCTYPE_HANDLINGBindingSource.DataSource = Me.DSIDB_Stammdaten + ' + 'DSIDB_Stammdaten + ' + Me.DSIDB_Stammdaten.DataSetName = "DSIDB_Stammdaten" + Me.DSIDB_Stammdaten.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema + ' + 'TextEdit4 + ' + Me.TextEdit4.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "CHANGED_WHO", True)) + Me.TextEdit4.Location = New System.Drawing.Point(160, 106) + Me.TextEdit4.MenuManager = Me.RibbonControl1 + Me.TextEdit4.Name = "TextEdit4" + Me.TextEdit4.Properties.ReadOnly = True + Me.TextEdit4.Size = New System.Drawing.Size(253, 20) + Me.TextEdit4.StyleController = Me.LayoutControl1 + Me.TextEdit4.TabIndex = 10 + ' + 'TextEdit3 + ' + Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "ADDED_WHEN", True)) + Me.TextEdit3.Location = New System.Drawing.Point(568, 76) + Me.TextEdit3.MenuManager = Me.RibbonControl1 + Me.TextEdit3.Name = "TextEdit3" + Me.TextEdit3.Properties.ReadOnly = True + Me.TextEdit3.Size = New System.Drawing.Size(254, 20) + Me.TextEdit3.StyleController = Me.LayoutControl1 + Me.TextEdit3.TabIndex = 9 + ' + 'TextEdit2 + ' + Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "ADDED_WHO", True)) + Me.TextEdit2.Location = New System.Drawing.Point(160, 76) + Me.TextEdit2.MenuManager = Me.RibbonControl1 + Me.TextEdit2.Name = "TextEdit2" + Me.TextEdit2.Properties.ReadOnly = True + Me.TextEdit2.Size = New System.Drawing.Size(253, 20) + Me.TextEdit2.StyleController = Me.LayoutControl1 + Me.TextEdit2.TabIndex = 8 + ' + 'CHANGED_ACTIONComboBox + ' + Me.CHANGED_ACTIONComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "CHANGED_ACTION", True)) + Me.CHANGED_ACTIONComboBox.DataBindings.Add(New System.Windows.Forms.Binding("SelectedValue", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "CHANGED_ACTION", True)) + Me.CHANGED_ACTIONComboBox.DataSource = Me.TBIDB_CATALOGBindingSource + Me.CHANGED_ACTIONComboBox.DisplayMember = "CAT_STRING" + Me.CHANGED_ACTIONComboBox.FormattingEnabled = True + Me.CHANGED_ACTIONComboBox.Location = New System.Drawing.Point(160, 45) + Me.CHANGED_ACTIONComboBox.Name = "CHANGED_ACTIONComboBox" + Me.CHANGED_ACTIONComboBox.Size = New System.Drawing.Size(662, 21) + Me.CHANGED_ACTIONComboBox.TabIndex = 7 + Me.CHANGED_ACTIONComboBox.ValueMember = "GUID" + ' + 'TBIDB_CATALOGBindingSource + ' + Me.TBIDB_CATALOGBindingSource.DataMember = "TBIDB_CATALOG" + Me.TBIDB_CATALOGBindingSource.DataSource = Me.DSIDB_Stammdaten + ' + 'TextEdit1 + ' + Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "GUID", True)) + Me.TextEdit1.Location = New System.Drawing.Point(160, 15) + Me.TextEdit1.MenuManager = Me.RibbonControl1 + Me.TextEdit1.Name = "TextEdit1" + Me.TextEdit1.Properties.ReadOnly = True + Me.TextEdit1.Size = New System.Drawing.Size(99, 20) + Me.TextEdit1.StyleController = Me.LayoutControl1 + Me.TextEdit1.TabIndex = 4 + ' + 'Root + ' + Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True] + Me.Root.GroupBordersVisible = False + Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem4, Me.LayoutControlItem2, Me.LayoutControlItem5, Me.LayoutControlItem3, Me.LayoutControlItem6, Me.LayoutControlItem8}) + Me.Root.Name = "Root" + Me.Root.Size = New System.Drawing.Size(837, 305) + Me.Root.TextVisible = False + ' + 'LayoutControlItem1 + ' + Me.LayoutControlItem1.Control = Me.TextEdit1 + Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0) + Me.LayoutControlItem1.Name = "LayoutControlItem1" + Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) + Me.LayoutControlItem1.Size = New System.Drawing.Size(254, 30) + Me.LayoutControlItem1.Text = "ID" + Me.LayoutControlItem1.TextSize = New System.Drawing.Size(133, 13) + ' + 'LayoutControlItem4 + ' + Me.LayoutControlItem4.Control = Me.CHANGED_ACTIONComboBox + Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 30) + Me.LayoutControlItem4.Name = "LayoutControlItem4" + Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) + Me.LayoutControlItem4.Size = New System.Drawing.Size(817, 31) + Me.LayoutControlItem4.Text = "Verhalten Datei geändert:" + Me.LayoutControlItem4.TextSize = New System.Drawing.Size(133, 13) + ' + 'LayoutControlItem2 + ' + Me.LayoutControlItem2.Control = Me.TextEdit2 + Me.LayoutControlItem2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "ADDED_WHO", True)) + Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 61) + Me.LayoutControlItem2.Name = "LayoutControlItem2" + Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) + Me.LayoutControlItem2.Size = New System.Drawing.Size(408, 30) + Me.LayoutControlItem2.Text = "Erstellt wer" + Me.LayoutControlItem2.TextSize = New System.Drawing.Size(133, 13) + ' + 'LayoutControlItem5 + ' + Me.LayoutControlItem5.Control = Me.TextEdit4 + Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 91) + Me.LayoutControlItem5.Name = "LayoutControlItem5" + Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) + Me.LayoutControlItem5.Size = New System.Drawing.Size(408, 194) + Me.LayoutControlItem5.Text = "Geändert wer" + Me.LayoutControlItem5.TextSize = New System.Drawing.Size(133, 13) + ' + 'LayoutControlItem3 + ' + Me.LayoutControlItem3.Control = Me.TextEdit3 + Me.LayoutControlItem3.Location = New System.Drawing.Point(408, 61) + Me.LayoutControlItem3.Name = "LayoutControlItem3" + Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) + Me.LayoutControlItem3.Size = New System.Drawing.Size(409, 30) + Me.LayoutControlItem3.Text = "Erstellt wann" + Me.LayoutControlItem3.TextSize = New System.Drawing.Size(133, 13) + ' + 'LayoutControlItem6 + ' + Me.LayoutControlItem6.Control = Me.TextEdit5 + Me.LayoutControlItem6.Location = New System.Drawing.Point(408, 91) + Me.LayoutControlItem6.Name = "LayoutControlItem6" + Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) + Me.LayoutControlItem6.Size = New System.Drawing.Size(409, 194) + Me.LayoutControlItem6.Text = "Geändert wann" + Me.LayoutControlItem6.TextSize = New System.Drawing.Size(133, 13) + ' + 'TBIDB_DOCTYPE_HANDLINGTableAdapter + ' + Me.TBIDB_DOCTYPE_HANDLINGTableAdapter.ClearBeforeFill = True + ' + 'TableAdapterManager + ' + Me.TableAdapterManager.BackupDataSetBeforeUpdate = False + Me.TableAdapterManager.TBIDB_ATTRIBUTE_TYPETableAdapter = Nothing + Me.TableAdapterManager.TBIDB_ATTRIBUTETableAdapter = Nothing + Me.TableAdapterManager.TBIDB_BUSINESS_ENTITYTableAdapter = Nothing + Me.TableAdapterManager.TBIDB_CATALOGTableAdapter = Nothing + Me.TableAdapterManager.TBIDB_DOCTYPE_HANDLINGTableAdapter = Me.TBIDB_DOCTYPE_HANDLINGTableAdapter + Me.TableAdapterManager.TBIDB_OBJECT_STORETableAdapter = Nothing + Me.TableAdapterManager.TBZF_ADMIN_SOURCE_SQLTableAdapter = Nothing + Me.TableAdapterManager.UpdateOrder = DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete + Me.TableAdapterManager.VWIDB_BE_ATTRIBUTETableAdapter = Nothing + ' + 'TBIDB_CATALOGTableAdapter + ' + Me.TBIDB_CATALOGTableAdapter.ClearBeforeFill = True + ' + 'DoctypeTextBox + ' + Me.DoctypeTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_DOCTYPE_HANDLINGBindingSource, "Doctype", True)) + Me.DoctypeTextBox.Location = New System.Drawing.Point(414, 15) + Me.DoctypeTextBox.Name = "DoctypeTextBox" + Me.DoctypeTextBox.ReadOnly = True + Me.DoctypeTextBox.Size = New System.Drawing.Size(408, 20) + Me.DoctypeTextBox.TabIndex = 11 + ' + 'LayoutControlItem8 + ' + Me.LayoutControlItem8.Control = Me.DoctypeTextBox + Me.LayoutControlItem8.Location = New System.Drawing.Point(254, 0) + Me.LayoutControlItem8.Name = "LayoutControlItem8" + Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) + Me.LayoutControlItem8.Size = New System.Drawing.Size(563, 30) + Me.LayoutControlItem8.Text = "Doctype:" + Me.LayoutControlItem8.TextSize = New System.Drawing.Size(133, 13) + ' + 'frmAdmin_DoctypeConfig + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(837, 487) + Me.Controls.Add(Me.LayoutControl1) + Me.Controls.Add(Me.RibbonStatusBar1) + Me.Controls.Add(Me.RibbonControl1) + Me.IconOptions.SvgImage = CType(resources.GetObject("frmAdmin_DoctypeConfig.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) + Me.Name = "frmAdmin_DoctypeConfig" + Me.Ribbon = Me.RibbonControl1 + Me.StatusBar = Me.RibbonStatusBar1 + Me.Text = "Doctype Config" + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit() + Me.LayoutControl1.ResumeLayout(False) + CType(Me.TextEdit5.Properties, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TBIDB_DOCTYPE_HANDLINGBindingSource, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.DSIDB_Stammdaten, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextEdit4.Properties, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TBIDB_CATALOGBindingSource, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + + Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl + Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage + Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar + Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage + Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem + Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl + Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup + Friend WithEvents DSIDB_Stammdaten As DSIDB_Stammdaten + Friend WithEvents TBIDB_DOCTYPE_HANDLINGBindingSource As BindingSource + Friend WithEvents TBIDB_DOCTYPE_HANDLINGTableAdapter As DSIDB_StammdatenTableAdapters.TBIDB_DOCTYPE_HANDLINGTableAdapter + Friend WithEvents TableAdapterManager As DSIDB_StammdatenTableAdapters.TableAdapterManager + Friend WithEvents TextEdit2 As DevExpress.XtraEditors.TextEdit + Friend WithEvents CHANGED_ACTIONComboBox As ComboBox + Friend WithEvents TextEdit1 As DevExpress.XtraEditors.TextEdit + Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem + Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem + Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem + Friend WithEvents TBIDB_CATALOGBindingSource As BindingSource + Friend WithEvents TBIDB_CATALOGTableAdapter As DSIDB_StammdatenTableAdapters.TBIDB_CATALOGTableAdapter + Friend WithEvents labelStatus As DevExpress.XtraBars.BarStaticItem + Friend WithEvents TextEdit5 As DevExpress.XtraEditors.TextEdit + Friend WithEvents TextEdit4 As DevExpress.XtraEditors.TextEdit + Friend WithEvents TextEdit3 As DevExpress.XtraEditors.TextEdit + Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem + Friend WithEvents LayoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem + Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem + Friend WithEvents DoctypeTextBox As TextBox + Friend WithEvents LayoutControlItem8 As DevExpress.XtraLayout.LayoutControlItem +End Class diff --git a/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.resx b/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.resx new file mode 100644 index 00000000..fec29d34 --- /dev/null +++ b/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.resx @@ -0,0 +1,203 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 + LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl + dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAMICAAAC77u/ + PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi + IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv + MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh + Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg + MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzczNzM3NDt9Cgku + WWVsbG93e2ZpbGw6I0ZDQjAxQjt9CgkuR3JlZW57ZmlsbDojMTI5QzQ5O30KCS5CbHVle2ZpbGw6IzM4 + N0NCNzt9CgkuUmVke2ZpbGw6I0QwMjEyNzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh + Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tk + aXNwbGF5Om5vbmU7ZmlsbDojNzM3Mzc0O30KPC9zdHlsZT4NCiAgPHBhdGggZD0iTTI3LDRoLTN2MTBI + OFY0SDVDNC40LDQsNCw0LjQsNCw1djIyYzAsMC42LDAuNCwxLDEsMWgyMmMwLjYsMCwxLTAuNCwxLTFW + NUMyOCw0LjQsMjcuNiw0LDI3LDR6IE0yNCwyNEg4di02ICBoMTZWMjR6IE0xMCw0djhoMTBWNEgxMHog + TTE0LDEwaC0yVjZoMlYxMHoiIGNsYXNzPSJCbGFjayIgLz4NCjwvc3ZnPgs= + + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 + LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl + dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABsDAAAC77u/ + PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi + IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv + MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh + Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg + MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ + LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD + MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh + Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw + MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu + bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iQWJvdXQiPg0KICAgIDxwYXRoIGQ9 + Ik0xNiwyQzguMywyLDIsOC4zLDIsMTZzNi4zLDE0LDE0LDE0czE0LTYuMywxNC0xNFMyMy43LDIsMTYs + MnogTTE2LDZjMS4xLDAsMiwwLjksMiwycy0wLjksMi0yLDJzLTItMC45LTItMiAgIFMxNC45LDYsMTYs + NnogTTIwLDI0aC04di0yaDJ2LThoLTJ2LTJoMmg0djEwaDJWMjR6IiBjbGFzcz0iQmx1ZSIgLz4NCiAg + PC9nPg0KPC9zdmc+Cw== + + + + 177, 17 + + + 17, 17 + + + 918, 17 + + + 464, 17 + + + 745, 17 + + + 17, 56 + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 + LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl + dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANEDAAAC77u/ + PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi + IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv + MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh + Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg + MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z + ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5HcmVlbntmaWxsOiMwMzlD + MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh + Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntkaXNwbGF5Om5vbmU7fQoJLnN0M3tk + aXNwbGF5OmlubGluZTtmaWxsOiNGRkIxMTU7fQoJLnN0NHtkaXNwbGF5OmlubGluZTt9Cgkuc3Q1e2Rp + c3BsYXk6aW5saW5lO29wYWNpdHk6MC43NTt9Cgkuc3Q2e2Rpc3BsYXk6aW5saW5lO29wYWNpdHk6MC41 + O30KCS5zdDd7ZGlzcGxheTppbmxpbmU7ZmlsbDojMDM5QzIzO30KCS5zdDh7ZGlzcGxheTppbmxpbmU7 + ZmlsbDojRDExQzFDO30KCS5zdDl7ZGlzcGxheTppbmxpbmU7ZmlsbDojMTE3N0Q3O30KCS5zdDEwe2Rp + c3BsYXk6aW5saW5lO2ZpbGw6I0ZGRkZGRjt9Cjwvc3R5bGU+DQogIDxnIGlkPSJTdGF0ZSI+DQogICAg + PHBhdGggZD0iTTE2LDJDOC4zLDIsMiw4LjMsMiwxNnM2LjMsMTQsMTQsMTRzMTQtNi4zLDE0LTE0UzIz + LjcsMiwxNiwyeiBNMTksMjJsLTAuOS0zaC00LjJMMTMsMjJoLTNsNC42LTEzaDNMMjIsMjIgICBIMTl6 + IE0xNiwxMmwxLjUsNWgtMy4xQzE0LjQsMTcsMTYsMTIuNCwxNiwxMnoiIGNsYXNzPSJCbHVlIiAvPg0K + ICA8L2c+DQo8L3N2Zz4L + + + \ No newline at end of file diff --git a/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.vb b/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.vb new file mode 100644 index 00000000..1c50199f --- /dev/null +++ b/GUIs.ZooFlow/Administration/frmAdmin_DoctypeConfig.vb @@ -0,0 +1,72 @@ +Public Class frmAdmin_DoctypeConfig + Public Property IsInsert As Boolean = False + Public Property PrimaryKey As Integer + Public Sub New(PrimaryKey As Integer, Optional IsInsert As Boolean = False) + ' Dieser Aufruf ist für den Designer erforderlich. + InitializeComponent() + + + ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. + Me.PrimaryKey = PrimaryKey + Me.IsInsert = IsInsert + End Sub + + Private Sub TBIDB_DOCTYPE_HANDLINGBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) + Me.Validate() + Me.TBIDB_DOCTYPE_HANDLINGBindingSource.EndEdit() + Me.TableAdapterManager.UpdateAll(Me.DSIDB_Stammdaten) + + End Sub + + + + + + Private Sub frmAdmin_DoctypeConfig_HandleDestroyed(sender As Object, e As EventArgs) Handles Me.HandleDestroyed + Try + + Catch ex As Exception + + End Try + End Sub + + Private Sub frmAdmin_DoctypeConfig_Load(sender As Object, e As EventArgs) Handles Me.Load + Try + TBIDB_CATALOGTableAdapter.Connection.ConnectionString = My.DatabaseIDB.CurrentSQLConnectionString + TBIDB_DOCTYPE_HANDLINGTableAdapter.Connection.ConnectionString = My.DatabaseIDB.CurrentSQLConnectionString + Me.TBIDB_CATALOGTableAdapter.FillByDOCTYPE_CHANGED(Me.DSIDB_Stammdaten.TBIDB_CATALOG) + Me.TBIDB_DOCTYPE_HANDLINGTableAdapter.Fill(Me.DSIDB_Stammdaten.TBIDB_DOCTYPE_HANDLING, PrimaryKey) + Catch ex As Exception + + End Try + + End Sub + + Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick + ResetMessages() + + If SaveData() Then + ShowStatus("Action Handling saved!") + End If + End Sub + Public Function SaveData() As Boolean + Try + Me.TBIDB_DOCTYPE_HANDLINGBindingSource.EndEdit() + If Me.DSIDB_Stammdaten.TBIDB_DOCTYPE_HANDLING.GetChanges Is Nothing = False Then + TextEdit4.Text = My.Application.User.UserName + TBIDB_DOCTYPE_HANDLINGBindingSource.EndEdit() + TBIDB_DOCTYPE_HANDLINGTableAdapter.Update(DSIDB_Stammdaten.TBIDB_DOCTYPE_HANDLING) + Return True + End If + Catch ex As Exception + Return False + End Try + End Function + Private Sub ResetMessages() + labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Never + End Sub + Private Sub ShowStatus(Message As String) + labelStatus.Caption = Message + labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always + End Sub +End Class \ No newline at end of file diff --git a/GUIs.ZooFlow/Administration/frmAdmin_Globix.Designer.vb b/GUIs.ZooFlow/Administration/frmAdmin_Globix.Designer.vb index 6ba291a4..30ecd9de 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_Globix.Designer.vb +++ b/GUIs.ZooFlow/Administration/frmAdmin_Globix.Designer.vb @@ -387,6 +387,10 @@ Partial Class frmAdmin_Globix Me.XtraTabControl3.SuspendLayout() Me.XtraTabPage2.SuspendLayout() CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainerControl1.Panel1.SuspendLayout() + CType(Me.SplitContainerControl1.Panel2, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainerControl1.Panel2.SuspendLayout() Me.SplitContainerControl1.SuspendLayout() CType(Me.gridAssignedUsers, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.viewAssignedUsers, System.ComponentModel.ISupportInitialize).BeginInit() @@ -394,6 +398,10 @@ Partial Class frmAdmin_Globix CType(Me.viewAvailableUsers, System.ComponentModel.ISupportInitialize).BeginInit() Me.XtraTabPage3.SuspendLayout() CType(Me.SplitContainerControlGroup, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.SplitContainerControlGroup.Panel1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainerControlGroup.Panel1.SuspendLayout() + CType(Me.SplitContainerControlGroup.Panel2, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainerControlGroup.Panel2.SuspendLayout() Me.SplitContainerControlGroup.SuspendLayout() CType(Me.gridAssignedGroups, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.viewAssignedGroups, System.ComponentModel.ISupportInitialize).BeginInit() @@ -420,7 +428,7 @@ Partial Class frmAdmin_Globix Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide - Me.RibbonControl1.Size = New System.Drawing.Size(1140, 131) + Me.RibbonControl1.Size = New System.Drawing.Size(1140, 132) Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 ' 'BarButtonSaveExit @@ -510,6 +518,7 @@ Partial Class frmAdmin_Globix Me.TableAdapterManager.TBIDB_ATTRIBUTETableAdapter = Nothing Me.TableAdapterManager.TBIDB_BUSINESS_ENTITYTableAdapter = Nothing Me.TableAdapterManager.TBIDB_CATALOGTableAdapter = Nothing + Me.TableAdapterManager.TBIDB_DOCTYPE_HANDLINGTableAdapter = Nothing Me.TableAdapterManager.TBIDB_OBJECT_STORETableAdapter = Nothing Me.TableAdapterManager.TBZF_ADMIN_SOURCE_SQLTableAdapter = Nothing Me.TableAdapterManager.UpdateOrder = DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete @@ -531,10 +540,10 @@ Partial Class frmAdmin_Globix 'XtraTabControl1 ' Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill - Me.XtraTabControl1.Location = New System.Drawing.Point(0, 131) + Me.XtraTabControl1.Location = New System.Drawing.Point(0, 132) Me.XtraTabControl1.Name = "XtraTabControl1" Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPageProfile - Me.XtraTabControl1.Size = New System.Drawing.Size(1140, 623) + Me.XtraTabControl1.Size = New System.Drawing.Size(1140, 622) Me.XtraTabControl1.TabIndex = 5 Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageProfile, Me.XtraTabPage1}) ' @@ -546,7 +555,7 @@ Partial Class frmAdmin_Globix Me.XtraTabPageProfile.ImageOptions.SvgImage = CType(resources.GetObject("XtraTabPageProfile.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.XtraTabPageProfile.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16) Me.XtraTabPageProfile.Name = "XtraTabPageProfile" - Me.XtraTabPageProfile.Size = New System.Drawing.Size(1138, 597) + Me.XtraTabPageProfile.Size = New System.Drawing.Size(1138, 596) Me.XtraTabPageProfile.Text = "Profil" ' 'LayoutControlProfile @@ -576,10 +585,10 @@ Partial Class frmAdmin_Globix 'TextEdit1 ' Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "ERSTELLTWANN", True)) - Me.TextEdit1.Location = New System.Drawing.Point(157, 226) + Me.TextEdit1.Location = New System.Drawing.Point(166, 226) Me.TextEdit1.MenuManager = Me.RibbonControl1 Me.TextEdit1.Name = "TextEdit1" - Me.TextEdit1.Size = New System.Drawing.Size(396, 20) + Me.TextEdit1.Size = New System.Drawing.Size(387, 20) Me.TextEdit1.StyleController = Me.LayoutControlProfile Me.TextEdit1.TabIndex = 59 ' @@ -590,9 +599,9 @@ Partial Class frmAdmin_Globix Me.IDB_OBJECT_STORE_IDComboBox.DataSource = Me.VWIDB_OBJECT_STOREBindingSource Me.IDB_OBJECT_STORE_IDComboBox.DisplayMember = "Objectstore" Me.IDB_OBJECT_STORE_IDComboBox.FormattingEnabled = True - Me.IDB_OBJECT_STORE_IDComboBox.Location = New System.Drawing.Point(157, 135) + Me.IDB_OBJECT_STORE_IDComboBox.Location = New System.Drawing.Point(166, 135) Me.IDB_OBJECT_STORE_IDComboBox.Name = "IDB_OBJECT_STORE_IDComboBox" - Me.IDB_OBJECT_STORE_IDComboBox.Size = New System.Drawing.Size(397, 21) + Me.IDB_OBJECT_STORE_IDComboBox.Size = New System.Drawing.Size(388, 21) Me.IDB_OBJECT_STORE_IDComboBox.TabIndex = 57 Me.IDB_OBJECT_STORE_IDComboBox.ValueMember = "GUID" ' @@ -604,10 +613,10 @@ Partial Class frmAdmin_Globix 'SEQUENCENumericUpDown ' Me.SEQUENCENumericUpDown.DataBindings.Add(New System.Windows.Forms.Binding("Value", Me.TBDD_INDEX_MANBindingSource, "SEQUENCE", True)) - Me.SEQUENCENumericUpDown.Location = New System.Drawing.Point(390, 15) + Me.SEQUENCENumericUpDown.Location = New System.Drawing.Point(399, 15) Me.SEQUENCENumericUpDown.Minimum = New Decimal(New Integer() {1, 0, 0, 0}) Me.SEQUENCENumericUpDown.Name = "SEQUENCENumericUpDown" - Me.SEQUENCENumericUpDown.Size = New System.Drawing.Size(46, 22) + Me.SEQUENCENumericUpDown.Size = New System.Drawing.Size(37, 22) Me.SEQUENCENumericUpDown.TabIndex = 56 Me.SEQUENCENumericUpDown.Value = New Decimal(New Integer() {1, 0, 0, 0}) ' @@ -629,91 +638,91 @@ Partial Class frmAdmin_Globix 'GEAENDERTWANNTextBox ' Me.GEAENDERTWANNTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "GEAENDERTWANN", True)) - Me.GEAENDERTWANNTextBox.Location = New System.Drawing.Point(705, 226) + Me.GEAENDERTWANNTextBox.Location = New System.Drawing.Point(714, 226) Me.GEAENDERTWANNTextBox.Name = "GEAENDERTWANNTextBox" Me.GEAENDERTWANNTextBox.ReadOnly = True - Me.GEAENDERTWANNTextBox.Size = New System.Drawing.Size(399, 20) + Me.GEAENDERTWANNTextBox.Size = New System.Drawing.Size(390, 20) Me.GEAENDERTWANNTextBox.TabIndex = 39 ' 'TextEditErstelltWer ' Me.TextEditErstelltWer.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "ERSTELLTWER", True)) - Me.TextEditErstelltWer.Location = New System.Drawing.Point(157, 196) + Me.TextEditErstelltWer.Location = New System.Drawing.Point(166, 196) Me.TextEditErstelltWer.MenuManager = Me.RibbonControl1 Me.TextEditErstelltWer.Name = "TextEditErstelltWer" - Me.TextEditErstelltWer.Size = New System.Drawing.Size(396, 20) + Me.TextEditErstelltWer.Size = New System.Drawing.Size(387, 20) Me.TextEditErstelltWer.StyleController = Me.LayoutControlProfile Me.TextEditErstelltWer.TabIndex = 44 ' 'TextEditGeandertWer ' Me.TextEditGeandertWer.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "GEANDERTWER", True)) - Me.TextEditGeandertWer.Location = New System.Drawing.Point(705, 196) + Me.TextEditGeandertWer.Location = New System.Drawing.Point(714, 196) Me.TextEditGeandertWer.MenuManager = Me.RibbonControl1 Me.TextEditGeandertWer.Name = "TextEditGeandertWer" - Me.TextEditGeandertWer.Size = New System.Drawing.Size(399, 20) + Me.TextEditGeandertWer.Size = New System.Drawing.Size(390, 20) Me.TextEditGeandertWer.StyleController = Me.LayoutControlProfile Me.TextEditGeandertWer.TabIndex = 45 ' 'TextEditNamenkonvention ' Me.TextEditNamenkonvention.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "NAMENKONVENTION", True)) - Me.TextEditNamenkonvention.Location = New System.Drawing.Point(157, 105) + Me.TextEditNamenkonvention.Location = New System.Drawing.Point(166, 105) Me.TextEditNamenkonvention.MenuManager = Me.RibbonControl1 Me.TextEditNamenkonvention.Name = "TextEditNamenkonvention" - Me.TextEditNamenkonvention.Size = New System.Drawing.Size(684, 20) + Me.TextEditNamenkonvention.Size = New System.Drawing.Size(675, 20) Me.TextEditNamenkonvention.StyleController = Me.LayoutControlProfile Me.TextEditNamenkonvention.TabIndex = 46 ' 'TextEditBeschreibung ' Me.TextEditBeschreibung.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "BESCHREIBUNG", True)) - Me.TextEditBeschreibung.Location = New System.Drawing.Point(157, 166) + Me.TextEditBeschreibung.Location = New System.Drawing.Point(166, 166) Me.TextEditBeschreibung.MenuManager = Me.RibbonControl1 Me.TextEditBeschreibung.Name = "TextEditBeschreibung" - Me.TextEditBeschreibung.Size = New System.Drawing.Size(947, 20) + Me.TextEditBeschreibung.Size = New System.Drawing.Size(938, 20) Me.TextEditBeschreibung.StyleController = Me.LayoutControlProfile Me.TextEditBeschreibung.TabIndex = 48 ' 'TextEditKurzname ' Me.TextEditKurzname.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "KURZNAME", True)) - Me.TextEditKurzname.Location = New System.Drawing.Point(844, 45) + Me.TextEditKurzname.Location = New System.Drawing.Point(853, 45) Me.TextEditKurzname.MenuManager = Me.RibbonControl1 Me.TextEditKurzname.Name = "TextEditKurzname" - Me.TextEditKurzname.Size = New System.Drawing.Size(260, 20) + Me.TextEditKurzname.Size = New System.Drawing.Size(251, 20) Me.TextEditKurzname.StyleController = Me.LayoutControlProfile Me.TextEditKurzname.TabIndex = 50 ' 'TextEditBezeichnung ' Me.TextEditBezeichnung.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "BEZEICHNUNG", True)) - Me.TextEditBezeichnung.Location = New System.Drawing.Point(157, 45) + Me.TextEditBezeichnung.Location = New System.Drawing.Point(166, 45) Me.TextEditBezeichnung.MenuManager = Me.RibbonControl1 Me.TextEditBezeichnung.Name = "TextEditBezeichnung" - Me.TextEditBezeichnung.Size = New System.Drawing.Size(535, 20) + Me.TextEditBezeichnung.Size = New System.Drawing.Size(526, 20) Me.TextEditBezeichnung.StyleController = Me.LayoutControlProfile Me.TextEditBezeichnung.TabIndex = 51 ' 'TextEditDoctypeID ' Me.TextEditDoctypeID.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "GUID", True)) - Me.TextEditDoctypeID.Location = New System.Drawing.Point(157, 15) + Me.TextEditDoctypeID.Location = New System.Drawing.Point(166, 15) Me.TextEditDoctypeID.MenuManager = Me.RibbonControl1 Me.TextEditDoctypeID.Name = "TextEditDoctypeID" - Me.TextEditDoctypeID.Size = New System.Drawing.Size(81, 20) + Me.TextEditDoctypeID.Size = New System.Drawing.Size(72, 20) Me.TextEditDoctypeID.StyleController = Me.LayoutControlProfile Me.TextEditDoctypeID.TabIndex = 52 ' 'ComboBoxEditDupl_handling ' Me.ComboBoxEditDupl_handling.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_DOKUMENTARTBindingSource, "DUPLICATE_HANDLING", True)) - Me.ComboBoxEditDupl_handling.Location = New System.Drawing.Point(157, 75) + Me.ComboBoxEditDupl_handling.Location = New System.Drawing.Point(166, 75) Me.ComboBoxEditDupl_handling.MenuManager = Me.RibbonControl1 Me.ComboBoxEditDupl_handling.Name = "ComboBoxEditDupl_handling" Me.ComboBoxEditDupl_handling.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) Me.ComboBoxEditDupl_handling.Properties.Items.AddRange(New Object() {"New version", "Default", "Question"}) - Me.ComboBoxEditDupl_handling.Size = New System.Drawing.Size(947, 20) + Me.ComboBoxEditDupl_handling.Size = New System.Drawing.Size(938, 20) Me.ComboBoxEditDupl_handling.StyleController = Me.LayoutControlProfile Me.ComboBoxEditDupl_handling.TabIndex = 54 ' @@ -924,7 +933,7 @@ Partial Class frmAdmin_Globix Me.XtraTabControl2.Location = New System.Drawing.Point(3, 279) Me.XtraTabControl2.Name = "XtraTabControl2" Me.XtraTabControl2.SelectedTabPage = Me.XtraTabPageManIndexe - Me.XtraTabControl2.Size = New System.Drawing.Size(1113, 298) + Me.XtraTabControl2.Size = New System.Drawing.Size(1113, 297) Me.XtraTabControl2.TabIndex = 1 Me.XtraTabControl2.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageManIndexe, Me.XtraTabPageRework, Me.XtraTabPageAutoIndexe, Me.XtraTabPageDynamicFolder, Me.XtraTabPageAutoSelect}) ' @@ -936,7 +945,7 @@ Partial Class frmAdmin_Globix Me.XtraTabPageManIndexe.ImageOptions.SvgImage = CType(resources.GetObject("XtraTabPageManIndexe.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.XtraTabPageManIndexe.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16) Me.XtraTabPageManIndexe.Name = "XtraTabPageManIndexe" - Me.XtraTabPageManIndexe.Size = New System.Drawing.Size(1111, 272) + Me.XtraTabPageManIndexe.Size = New System.Drawing.Size(1111, 271) Me.XtraTabPageManIndexe.Text = "manuelle Attribute" ' 'LayoutControlManIndexe @@ -962,34 +971,34 @@ Partial Class frmAdmin_Globix Me.LayoutControlManIndexe.Location = New System.Drawing.Point(191, 0) Me.LayoutControlManIndexe.Name = "LayoutControlManIndexe" Me.LayoutControlManIndexe.Root = Me.LayoutControlGroupDoctype - Me.LayoutControlManIndexe.Size = New System.Drawing.Size(920, 272) + Me.LayoutControlManIndexe.Size = New System.Drawing.Size(920, 271) Me.LayoutControlManIndexe.TabIndex = 1 Me.LayoutControlManIndexe.Text = "LayoutControl1" ' 'TextEdit4 ' Me.TextEdit4.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "CHANGED_WHEN", True)) - Me.TextEdit4.Location = New System.Drawing.Point(495, 237) + Me.TextEdit4.Location = New System.Drawing.Point(504, 236) Me.TextEdit4.MenuManager = Me.RibbonControl1 Me.TextEdit4.Name = "TextEdit4" - Me.TextEdit4.Size = New System.Drawing.Size(410, 20) + Me.TextEdit4.Size = New System.Drawing.Size(401, 20) Me.TextEdit4.StyleController = Me.LayoutControlManIndexe Me.TextEdit4.TabIndex = 31 ' 'CONNECTION_IDTextBox ' Me.CONNECTION_IDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "CONNECTION_ID", True)) - Me.CONNECTION_IDTextBox.Location = New System.Drawing.Point(88, 168) + Me.CONNECTION_IDTextBox.Location = New System.Drawing.Point(97, 168) Me.CONNECTION_IDTextBox.Name = "CONNECTION_IDTextBox" - Me.CONNECTION_IDTextBox.Size = New System.Drawing.Size(21, 20) + Me.CONNECTION_IDTextBox.Size = New System.Drawing.Size(20, 20) Me.CONNECTION_IDTextBox.TabIndex = 30 ' 'SQL_RESULTTextBox ' Me.SQL_RESULTTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "SQL_RESULT", True)) - Me.SQL_RESULTTextBox.Location = New System.Drawing.Point(189, 168) + Me.SQL_RESULTTextBox.Location = New System.Drawing.Point(206, 168) Me.SQL_RESULTTextBox.Name = "SQL_RESULTTextBox" - Me.SQL_RESULTTextBox.Size = New System.Drawing.Size(719, 20) + Me.SQL_RESULTTextBox.Size = New System.Drawing.Size(702, 20) Me.SQL_RESULTTextBox.TabIndex = 29 ' 'WD_INDEXComboBox @@ -998,9 +1007,9 @@ Partial Class frmAdmin_Globix Me.WD_INDEXComboBox.DataSource = Me.VWIDB_BE_ATTRIBUTEBindingSource Me.WD_INDEXComboBox.DisplayMember = "ATTR_TITLE" Me.WD_INDEXComboBox.FormattingEnabled = True - Me.WD_INDEXComboBox.Location = New System.Drawing.Point(527, 42) + Me.WD_INDEXComboBox.Location = New System.Drawing.Point(536, 42) Me.WD_INDEXComboBox.Name = "WD_INDEXComboBox" - Me.WD_INDEXComboBox.Size = New System.Drawing.Size(381, 21) + Me.WD_INDEXComboBox.Size = New System.Drawing.Size(372, 21) Me.WD_INDEXComboBox.TabIndex = 28 Me.WD_INDEXComboBox.ValueMember = "ATTR_TITLE" ' @@ -1042,9 +1051,9 @@ Partial Class frmAdmin_Globix 'ACTIVECheckBox ' Me.ACTIVECheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBDD_INDEX_MANBindingSource, "ACTIVE", True)) - Me.ACTIVECheckBox.Location = New System.Drawing.Point(284, 12) + Me.ACTIVECheckBox.Location = New System.Drawing.Point(302, 12) Me.ACTIVECheckBox.Name = "ACTIVECheckBox" - Me.ACTIVECheckBox.Size = New System.Drawing.Size(90, 20) + Me.ACTIVECheckBox.Size = New System.Drawing.Size(87, 20) Me.ACTIVECheckBox.TabIndex = 5 Me.ACTIVECheckBox.Text = "Aktiv" Me.ACTIVECheckBox.UseVisualStyleBackColor = True @@ -1065,37 +1074,37 @@ Partial Class frmAdmin_Globix ' Me.TextEditAddedWho_ManIndex.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "ADDED_WHO", True)) Me.TextEditAddedWho_ManIndex.Enabled = False - Me.TextEditAddedWho_ManIndex.Location = New System.Drawing.Point(91, 207) + Me.TextEditAddedWho_ManIndex.Location = New System.Drawing.Point(100, 206) Me.TextEditAddedWho_ManIndex.MenuManager = Me.RibbonControl1 Me.TextEditAddedWho_ManIndex.Name = "TextEditAddedWho_ManIndex" - Me.TextEditAddedWho_ManIndex.Size = New System.Drawing.Size(318, 20) + Me.TextEditAddedWho_ManIndex.Size = New System.Drawing.Size(309, 20) Me.TextEditAddedWho_ManIndex.StyleController = Me.LayoutControlManIndexe Me.TextEditAddedWho_ManIndex.TabIndex = 18 ' 'TextEdit2 ' Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "ADDED_WHEN", True)) - Me.TextEdit2.Location = New System.Drawing.Point(91, 237) + Me.TextEdit2.Location = New System.Drawing.Point(100, 236) Me.TextEdit2.MenuManager = Me.RibbonControl1 Me.TextEdit2.Name = "TextEdit2" - Me.TextEdit2.Size = New System.Drawing.Size(318, 20) + Me.TextEdit2.Size = New System.Drawing.Size(309, 20) Me.TextEdit2.StyleController = Me.LayoutControlManIndexe Me.TextEdit2.TabIndex = 19 ' 'TextEditChangedWho_ManIndex ' Me.TextEditChangedWho_ManIndex.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "CHANGED_WHO", True)) - Me.TextEditChangedWho_ManIndex.Location = New System.Drawing.Point(495, 207) + Me.TextEditChangedWho_ManIndex.Location = New System.Drawing.Point(504, 206) Me.TextEditChangedWho_ManIndex.MenuManager = Me.RibbonControl1 Me.TextEditChangedWho_ManIndex.Name = "TextEditChangedWho_ManIndex" - Me.TextEditChangedWho_ManIndex.Size = New System.Drawing.Size(410, 20) + Me.TextEditChangedWho_ManIndex.Size = New System.Drawing.Size(401, 20) Me.TextEditChangedWho_ManIndex.StyleController = Me.LayoutControlManIndexe Me.TextEditChangedWho_ManIndex.TabIndex = 20 ' 'GUIDTextBoxMANINDEX ' Me.GUIDTextBoxMANINDEX.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "GUID", True)) - Me.GUIDTextBoxMANINDEX.Location = New System.Drawing.Point(91, 15) + Me.GUIDTextBoxMANINDEX.Location = New System.Drawing.Point(100, 15) Me.GUIDTextBoxMANINDEX.MenuManager = Me.RibbonControl1 Me.GUIDTextBoxMANINDEX.Name = "GUIDTextBoxMANINDEX" Me.GUIDTextBoxMANINDEX.Size = New System.Drawing.Size(50, 20) @@ -1105,20 +1114,20 @@ Partial Class frmAdmin_Globix 'TextEdit10 ' Me.TextEdit10.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "NAME", True)) - Me.TextEdit10.Location = New System.Drawing.Point(91, 45) + Me.TextEdit10.Location = New System.Drawing.Point(100, 45) Me.TextEdit10.MenuManager = Me.RibbonControl1 Me.TextEdit10.Name = "TextEdit10" - Me.TextEdit10.Size = New System.Drawing.Size(353, 20) + Me.TextEdit10.Size = New System.Drawing.Size(344, 20) Me.TextEdit10.StyleController = Me.LayoutControlManIndexe Me.TextEdit10.TabIndex = 22 ' 'TextEdit11 ' Me.TextEdit11.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_MANBindingSource, "COMMENT", True)) - Me.TextEdit11.Location = New System.Drawing.Point(91, 75) + Me.TextEdit11.Location = New System.Drawing.Point(100, 75) Me.TextEdit11.MenuManager = Me.RibbonControl1 Me.TextEdit11.Name = "TextEdit11" - Me.TextEdit11.Size = New System.Drawing.Size(814, 20) + Me.TextEdit11.Size = New System.Drawing.Size(805, 20) Me.TextEdit11.StyleController = Me.LayoutControlManIndexe Me.TextEdit11.TabIndex = 23 ' @@ -1126,7 +1135,7 @@ Partial Class frmAdmin_Globix ' Me.SpinEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_INDEX_MANBindingSource, "SEQUENCE", True)) Me.SpinEdit1.EditValue = New Decimal(New Integer() {0, 0, 0, 0}) - Me.SpinEdit1.Location = New System.Drawing.Point(227, 15) + Me.SpinEdit1.Location = New System.Drawing.Point(245, 15) Me.SpinEdit1.MenuManager = Me.RibbonControl1 Me.SpinEdit1.Name = "SpinEdit1" Me.SpinEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) @@ -1137,12 +1146,12 @@ Partial Class frmAdmin_Globix 'ComboBoxEdit4 ' Me.ComboBoxEdit4.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_INDEX_MANBindingSource, "DATATYPE", True)) - Me.ComboBoxEdit4.Location = New System.Drawing.Point(91, 105) + Me.ComboBoxEdit4.Location = New System.Drawing.Point(100, 105) Me.ComboBoxEdit4.MenuManager = Me.RibbonControl1 Me.ComboBoxEdit4.Name = "ComboBoxEdit4" Me.ComboBoxEdit4.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) Me.ComboBoxEdit4.Properties.Items.AddRange(New Object() {"VARCHAR", "INTEGER", "DATE", "BOOLEAN"}) - Me.ComboBoxEdit4.Size = New System.Drawing.Size(137, 20) + Me.ComboBoxEdit4.Size = New System.Drawing.Size(128, 20) Me.ComboBoxEdit4.StyleController = Me.LayoutControlManIndexe Me.ComboBoxEdit4.TabIndex = 27 ' @@ -1152,7 +1161,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlGroupDoctype.GroupBordersVisible = False Me.LayoutControlGroupDoctype.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem17, Me.LayoutControlItem19, Me.LayoutControlItem21, Me.LayoutControlItem6, Me.LayoutControlItem24, Me.LayoutControlItem2, Me.LayoutControlItem8, Me.LayoutControlItem11, Me.LayoutControlItem13, Me.LayoutControlItem9, Me.LayoutControlItem27, Me.LayoutControlItem29, Me.EmptySpaceItem2, Me.LayoutControlItem16, Me.LayoutControlItem7, Me.LayoutControlItem31, Me.LayoutControlItem18, Me.EmptySpaceItem6, Me.LayoutControlItem46}) Me.LayoutControlGroupDoctype.Name = "LayoutControlGroupDoctype" - Me.LayoutControlGroupDoctype.Size = New System.Drawing.Size(920, 272) + Me.LayoutControlGroupDoctype.Size = New System.Drawing.Size(920, 271) Me.LayoutControlGroupDoctype.TextVisible = False ' 'LayoutControlItem17 @@ -1200,7 +1209,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem24.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.LayoutControlItem24.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem24.Control = Me.TextEditAddedWho_ManIndex - Me.LayoutControlItem24.Location = New System.Drawing.Point(0, 192) + Me.LayoutControlItem24.Location = New System.Drawing.Point(0, 191) Me.LayoutControlItem24.Name = "LayoutControlItem24" Me.LayoutControlItem24.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem24.Size = New System.Drawing.Size(404, 30) @@ -1215,7 +1224,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 0) Me.LayoutControlItem2.Name = "LayoutControlItem2" Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) - Me.LayoutControlItem2.Size = New System.Drawing.Size(136, 30) + Me.LayoutControlItem2.Size = New System.Drawing.Size(145, 30) Me.LayoutControlItem2.Text = "ID" Me.LayoutControlItem2.TextSize = New System.Drawing.Size(73, 13) ' @@ -1252,10 +1261,10 @@ Partial Class frmAdmin_Globix 'LayoutControlItem9 ' Me.LayoutControlItem9.Control = Me.SpinEdit1 - Me.LayoutControlItem9.Location = New System.Drawing.Point(136, 0) + Me.LayoutControlItem9.Location = New System.Drawing.Point(145, 0) Me.LayoutControlItem9.Name = "LayoutControlItem9" Me.LayoutControlItem9.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) - Me.LayoutControlItem9.Size = New System.Drawing.Size(136, 30) + Me.LayoutControlItem9.Size = New System.Drawing.Size(145, 30) Me.LayoutControlItem9.Text = "Reihenfolge" Me.LayoutControlItem9.TextSize = New System.Drawing.Size(73, 13) ' @@ -1265,7 +1274,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem27.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem27.Control = Me.TextEdit2 Me.LayoutControlItem27.Enabled = False - Me.LayoutControlItem27.Location = New System.Drawing.Point(0, 222) + Me.LayoutControlItem27.Location = New System.Drawing.Point(0, 221) Me.LayoutControlItem27.Name = "LayoutControlItem27" Me.LayoutControlItem27.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem27.Size = New System.Drawing.Size(404, 30) @@ -1278,7 +1287,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem29.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem29.Control = Me.TextEditChangedWho_ManIndex Me.LayoutControlItem29.Enabled = False - Me.LayoutControlItem29.Location = New System.Drawing.Point(404, 192) + Me.LayoutControlItem29.Location = New System.Drawing.Point(404, 191) Me.LayoutControlItem29.Name = "LayoutControlItem29" Me.LayoutControlItem29.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem29.Size = New System.Drawing.Size(496, 30) @@ -1288,9 +1297,9 @@ Partial Class frmAdmin_Globix 'EmptySpaceItem2 ' Me.EmptySpaceItem2.AllowHotTrack = False - Me.EmptySpaceItem2.Location = New System.Drawing.Point(366, 0) + Me.EmptySpaceItem2.Location = New System.Drawing.Point(381, 0) Me.EmptySpaceItem2.Name = "EmptySpaceItem2" - Me.EmptySpaceItem2.Size = New System.Drawing.Size(534, 30) + Me.EmptySpaceItem2.Size = New System.Drawing.Size(519, 30) Me.EmptySpaceItem2.TextSize = New System.Drawing.Size(0, 0) ' 'LayoutControlItem16 @@ -1305,9 +1314,9 @@ Partial Class frmAdmin_Globix 'LayoutControlItem7 ' Me.LayoutControlItem7.Control = Me.ACTIVECheckBox - Me.LayoutControlItem7.Location = New System.Drawing.Point(272, 0) + Me.LayoutControlItem7.Location = New System.Drawing.Point(290, 0) Me.LayoutControlItem7.Name = "LayoutControlItem7" - Me.LayoutControlItem7.Size = New System.Drawing.Size(94, 30) + Me.LayoutControlItem7.Size = New System.Drawing.Size(91, 30) Me.LayoutControlItem7.Text = "ACTIVE:" Me.LayoutControlItem7.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem7.TextVisible = False @@ -1319,7 +1328,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem31.Control = Me.CONNECTION_IDTextBox Me.LayoutControlItem31.Location = New System.Drawing.Point(0, 156) Me.LayoutControlItem31.Name = "LayoutControlItem31" - Me.LayoutControlItem31.Size = New System.Drawing.Size(101, 24) + Me.LayoutControlItem31.Size = New System.Drawing.Size(109, 24) Me.LayoutControlItem31.Text = "ConnId:" Me.LayoutControlItem31.TextSize = New System.Drawing.Size(73, 13) ' @@ -1328,9 +1337,9 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem18.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.LayoutControlItem18.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem18.Control = Me.SQL_RESULTTextBox - Me.LayoutControlItem18.Location = New System.Drawing.Point(101, 156) + Me.LayoutControlItem18.Location = New System.Drawing.Point(109, 156) Me.LayoutControlItem18.Name = "LayoutControlItem18" - Me.LayoutControlItem18.Size = New System.Drawing.Size(799, 24) + Me.LayoutControlItem18.Size = New System.Drawing.Size(791, 24) Me.LayoutControlItem18.Text = "SQL:" Me.LayoutControlItem18.TextSize = New System.Drawing.Size(73, 13) ' @@ -1339,7 +1348,7 @@ Partial Class frmAdmin_Globix Me.EmptySpaceItem6.AllowHotTrack = False Me.EmptySpaceItem6.Location = New System.Drawing.Point(0, 180) Me.EmptySpaceItem6.Name = "EmptySpaceItem6" - Me.EmptySpaceItem6.Size = New System.Drawing.Size(900, 12) + Me.EmptySpaceItem6.Size = New System.Drawing.Size(900, 11) Me.EmptySpaceItem6.TextSize = New System.Drawing.Size(0, 0) ' 'LayoutControlItem46 @@ -1348,7 +1357,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem46.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem46.Control = Me.TextEdit4 Me.LayoutControlItem46.Enabled = False - Me.LayoutControlItem46.Location = New System.Drawing.Point(404, 222) + Me.LayoutControlItem46.Location = New System.Drawing.Point(404, 221) Me.LayoutControlItem46.Name = "LayoutControlItem46" Me.LayoutControlItem46.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem46.Size = New System.Drawing.Size(496, 30) @@ -1363,7 +1372,7 @@ Partial Class frmAdmin_Globix Me.ListBoxAutoIndexe.FormattingEnabled = True Me.ListBoxAutoIndexe.Location = New System.Drawing.Point(0, 0) Me.ListBoxAutoIndexe.Name = "ListBoxAutoIndexe" - Me.ListBoxAutoIndexe.Size = New System.Drawing.Size(191, 272) + Me.ListBoxAutoIndexe.Size = New System.Drawing.Size(191, 271) Me.ListBoxAutoIndexe.TabIndex = 0 Me.ListBoxAutoIndexe.ValueMember = "GUID" ' @@ -1399,7 +1408,7 @@ Partial Class frmAdmin_Globix Me.XtraTabPageAutoIndexe.ImageOptions.SvgImage = CType(resources.GetObject("XtraTabPageAutoIndexe.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.XtraTabPageAutoIndexe.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16) Me.XtraTabPageAutoIndexe.Name = "XtraTabPageAutoIndexe" - Me.XtraTabPageAutoIndexe.Size = New System.Drawing.Size(1111, 272) + Me.XtraTabPageAutoIndexe.Size = New System.Drawing.Size(1111, 271) Me.XtraTabPageAutoIndexe.Text = "automatische/Feste Attribute" ' 'LayoutControlAutoIndexe @@ -1424,7 +1433,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlAutoIndexe.Location = New System.Drawing.Point(0, 0) Me.LayoutControlAutoIndexe.Name = "LayoutControlAutoIndexe" Me.LayoutControlAutoIndexe.Root = Me.LayoutControlGroup2 - Me.LayoutControlAutoIndexe.Size = New System.Drawing.Size(1111, 272) + Me.LayoutControlAutoIndexe.Size = New System.Drawing.Size(1111, 271) Me.LayoutControlAutoIndexe.TabIndex = 0 Me.LayoutControlAutoIndexe.Text = "LayoutControl1" ' @@ -1476,9 +1485,9 @@ Partial Class frmAdmin_Globix 'VALUETextBox ' Me.VALUETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_AUTOMBindingSource, "VALUE", True)) - Me.VALUETextBox.Location = New System.Drawing.Point(360, 76) + Me.VALUETextBox.Location = New System.Drawing.Point(369, 76) Me.VALUETextBox.Name = "VALUETextBox" - Me.VALUETextBox.Size = New System.Drawing.Size(186, 20) + Me.VALUETextBox.Size = New System.Drawing.Size(177, 20) Me.VALUETextBox.TabIndex = 9 ' 'INDEXNAMEComboBox @@ -1487,9 +1496,9 @@ Partial Class frmAdmin_Globix Me.INDEXNAMEComboBox.DataSource = Me.VWIDB_BE_ATTRIBUTEBindingSource Me.INDEXNAMEComboBox.DisplayMember = "ATTR_TITLE" Me.INDEXNAMEComboBox.FormattingEnabled = True - Me.INDEXNAMEComboBox.Location = New System.Drawing.Point(360, 45) + Me.INDEXNAMEComboBox.Location = New System.Drawing.Point(369, 45) Me.INDEXNAMEComboBox.Name = "INDEXNAMEComboBox" - Me.INDEXNAMEComboBox.Size = New System.Drawing.Size(385, 21) + Me.INDEXNAMEComboBox.Size = New System.Drawing.Size(376, 21) Me.INDEXNAMEComboBox.TabIndex = 8 ' 'ACTIVECheckBox1 @@ -1514,10 +1523,10 @@ Partial Class frmAdmin_Globix ' Me.GUIDTextBoxAutoAttribute.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_AUTOMBindingSource, "GUID", True)) Me.GUIDTextBoxAutoAttribute.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.GUIDTextBoxAutoAttribute.Location = New System.Drawing.Point(360, 15) + Me.GUIDTextBoxAutoAttribute.Location = New System.Drawing.Point(369, 15) Me.GUIDTextBoxAutoAttribute.Name = "GUIDTextBoxAutoAttribute" Me.GUIDTextBoxAutoAttribute.ReadOnly = True - Me.GUIDTextBoxAutoAttribute.Size = New System.Drawing.Size(31, 20) + Me.GUIDTextBoxAutoAttribute.Size = New System.Drawing.Size(22, 20) Me.GUIDTextBoxAutoAttribute.TabIndex = 5 ' 'SimpleButton1 @@ -1534,12 +1543,12 @@ Partial Class frmAdmin_Globix ' 'ComboBoxEditAAttrFileParam ' - Me.ComboBoxEditAAttrFileParam.Location = New System.Drawing.Point(835, 76) + Me.ComboBoxEditAAttrFileParam.Location = New System.Drawing.Point(844, 76) Me.ComboBoxEditAAttrFileParam.MenuManager = Me.RibbonControl1 Me.ComboBoxEditAAttrFileParam.Name = "ComboBoxEditAAttrFileParam" Me.ComboBoxEditAAttrFileParam.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) Me.ComboBoxEditAAttrFileParam.Properties.Items.AddRange(New Object() {"FILENAME_EXT", "FILENAME", "EXTENSION", "DATE_CREATED", "DATE_MODIFIED"}) - Me.ComboBoxEditAAttrFileParam.Size = New System.Drawing.Size(261, 20) + Me.ComboBoxEditAAttrFileParam.Size = New System.Drawing.Size(252, 20) Me.ComboBoxEditAAttrFileParam.StyleController = Me.LayoutControlAutoIndexe Me.ComboBoxEditAAttrFileParam.TabIndex = 11 ' @@ -1558,12 +1567,12 @@ Partial Class frmAdmin_Globix ' Me.ADDED_WHOTextBoxAutoAttribut.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_AUTOMBindingSource, "ADDED_WHO", True)) Me.ADDED_WHOTextBoxAutoAttribut.Enabled = False - Me.ADDED_WHOTextBoxAutoAttribut.Location = New System.Drawing.Point(360, 207) + Me.ADDED_WHOTextBoxAutoAttribut.Location = New System.Drawing.Point(369, 206) Me.ADDED_WHOTextBoxAutoAttribut.MenuManager = Me.RibbonControl1 Me.ADDED_WHOTextBoxAutoAttribut.Name = "ADDED_WHOTextBoxAutoAttribut" Me.ADDED_WHOTextBoxAutoAttribut.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.ADDED_WHOTextBoxAutoAttribut.Properties.Appearance.Options.UseFont = True - Me.ADDED_WHOTextBoxAutoAttribut.Size = New System.Drawing.Size(280, 20) + Me.ADDED_WHOTextBoxAutoAttribut.Size = New System.Drawing.Size(271, 20) Me.ADDED_WHOTextBoxAutoAttribut.StyleController = Me.LayoutControlAutoIndexe Me.ADDED_WHOTextBoxAutoAttribut.TabIndex = 19 ' @@ -1571,12 +1580,12 @@ Partial Class frmAdmin_Globix ' Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_AUTOMBindingSource, "ADDED_WHEN", True)) Me.TextEdit3.Enabled = False - Me.TextEdit3.Location = New System.Drawing.Point(360, 237) + Me.TextEdit3.Location = New System.Drawing.Point(369, 236) Me.TextEdit3.MenuManager = Me.RibbonControl1 Me.TextEdit3.Name = "TextEdit3" Me.TextEdit3.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.TextEdit3.Properties.Appearance.Options.UseFont = True - Me.TextEdit3.Size = New System.Drawing.Size(280, 20) + Me.TextEdit3.Size = New System.Drawing.Size(271, 20) Me.TextEdit3.StyleController = Me.LayoutControlAutoIndexe Me.TextEdit3.TabIndex = 20 ' @@ -1584,24 +1593,24 @@ Partial Class frmAdmin_Globix ' Me.CHANGED_WHOTextEditAutoAttribut.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_AUTOMBindingSource, "CHANGED_WHO", True)) Me.CHANGED_WHOTextEditAutoAttribut.EditValue = "" - Me.CHANGED_WHOTextEditAutoAttribut.Location = New System.Drawing.Point(816, 207) + Me.CHANGED_WHOTextEditAutoAttribut.Location = New System.Drawing.Point(825, 206) Me.CHANGED_WHOTextEditAutoAttribut.MenuManager = Me.RibbonControl1 Me.CHANGED_WHOTextEditAutoAttribut.Name = "CHANGED_WHOTextEditAutoAttribut" Me.CHANGED_WHOTextEditAutoAttribut.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.CHANGED_WHOTextEditAutoAttribut.Properties.Appearance.Options.UseFont = True - Me.CHANGED_WHOTextEditAutoAttribut.Size = New System.Drawing.Size(280, 20) + Me.CHANGED_WHOTextEditAutoAttribut.Size = New System.Drawing.Size(271, 20) Me.CHANGED_WHOTextEditAutoAttribut.StyleController = Me.LayoutControlAutoIndexe Me.CHANGED_WHOTextEditAutoAttribut.TabIndex = 21 ' 'TextEdit5 ' Me.TextEdit5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_INDEX_AUTOMBindingSource, "CHANGED_WHEN", True)) - Me.TextEdit5.Location = New System.Drawing.Point(816, 237) + Me.TextEdit5.Location = New System.Drawing.Point(825, 236) Me.TextEdit5.MenuManager = Me.RibbonControl1 Me.TextEdit5.Name = "TextEdit5" Me.TextEdit5.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.TextEdit5.Properties.Appearance.Options.UseFont = True - Me.TextEdit5.Size = New System.Drawing.Size(280, 20) + Me.TextEdit5.Size = New System.Drawing.Size(271, 20) Me.TextEdit5.StyleController = Me.LayoutControlAutoIndexe Me.TextEdit5.TabIndex = 22 ' @@ -1611,7 +1620,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlGroup2.GroupBordersVisible = False Me.LayoutControlGroup2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem15, Me.LayoutControlItem23, Me.LayoutControlItem33, Me.LayoutControlItem34, Me.LayoutControlItem35, Me.LayoutControlItem14, Me.LayoutControlItem40, Me.LayoutControlItem37, Me.LayoutControlItem39, Me.LayoutControlItem42, Me.EmptySpaceItem4, Me.ADDED_WHOAutoAttribut, Me.LayoutControlItem41, Me.CHANGED_WHOItemAutoAttribut, Me.LayoutControlItem43, Me.LayoutControlItem45, Me.LayoutControlItem44, Me.EmptySpaceItem5}) Me.LayoutControlGroup2.Name = "LayoutControlGroup2" - Me.LayoutControlGroup2.Size = New System.Drawing.Size(1111, 272) + Me.LayoutControlGroup2.Size = New System.Drawing.Size(1111, 271) Me.LayoutControlGroup2.TextVisible = False ' 'LayoutControlItem15 @@ -1732,7 +1741,7 @@ Partial Class frmAdmin_Globix 'ADDED_WHOAutoAttribut ' Me.ADDED_WHOAutoAttribut.Control = Me.ADDED_WHOTextBoxAutoAttribut - Me.ADDED_WHOAutoAttribut.Location = New System.Drawing.Point(179, 192) + Me.ADDED_WHOAutoAttribut.Location = New System.Drawing.Point(179, 191) Me.ADDED_WHOAutoAttribut.Name = "ADDED_WHOAutoAttribut" Me.ADDED_WHOAutoAttribut.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.ADDED_WHOAutoAttribut.Size = New System.Drawing.Size(456, 30) @@ -1742,7 +1751,7 @@ Partial Class frmAdmin_Globix 'LayoutControlItem41 ' Me.LayoutControlItem41.Control = Me.TextEdit3 - Me.LayoutControlItem41.Location = New System.Drawing.Point(179, 222) + Me.LayoutControlItem41.Location = New System.Drawing.Point(179, 221) Me.LayoutControlItem41.Name = "LayoutControlItem41" Me.LayoutControlItem41.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem41.Size = New System.Drawing.Size(456, 30) @@ -1752,7 +1761,7 @@ Partial Class frmAdmin_Globix 'CHANGED_WHOItemAutoAttribut ' Me.CHANGED_WHOItemAutoAttribut.Control = Me.CHANGED_WHOTextEditAutoAttribut - Me.CHANGED_WHOItemAutoAttribut.Location = New System.Drawing.Point(635, 192) + Me.CHANGED_WHOItemAutoAttribut.Location = New System.Drawing.Point(635, 191) Me.CHANGED_WHOItemAutoAttribut.Name = "CHANGED_WHOItemAutoAttribut" Me.CHANGED_WHOItemAutoAttribut.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.CHANGED_WHOItemAutoAttribut.Size = New System.Drawing.Size(456, 30) @@ -1762,7 +1771,7 @@ Partial Class frmAdmin_Globix 'LayoutControlItem43 ' Me.LayoutControlItem43.Control = Me.TextEdit5 - Me.LayoutControlItem43.Location = New System.Drawing.Point(635, 222) + Me.LayoutControlItem43.Location = New System.Drawing.Point(635, 221) Me.LayoutControlItem43.Name = "LayoutControlItem43" Me.LayoutControlItem43.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem43.Size = New System.Drawing.Size(456, 30) @@ -1786,7 +1795,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem44.Control = Me.ListBox1 Me.LayoutControlItem44.Location = New System.Drawing.Point(0, 0) Me.LayoutControlItem44.Name = "LayoutControlItem44" - Me.LayoutControlItem44.Size = New System.Drawing.Size(179, 252) + Me.LayoutControlItem44.Size = New System.Drawing.Size(179, 251) Me.LayoutControlItem44.TextAlignMode = DevExpress.XtraLayout.TextAlignModeItem.AutoSize Me.LayoutControlItem44.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem44.TextToControlDistance = 0 @@ -1797,7 +1806,7 @@ Partial Class frmAdmin_Globix Me.EmptySpaceItem5.AllowHotTrack = False Me.EmptySpaceItem5.Location = New System.Drawing.Point(179, 157) Me.EmptySpaceItem5.Name = "EmptySpaceItem5" - Me.EmptySpaceItem5.Size = New System.Drawing.Size(912, 35) + Me.EmptySpaceItem5.Size = New System.Drawing.Size(912, 34) Me.EmptySpaceItem5.TextSize = New System.Drawing.Size(0, 0) ' 'XtraTabPageDynamicFolder @@ -1806,7 +1815,7 @@ Partial Class frmAdmin_Globix Me.XtraTabPageDynamicFolder.ImageOptions.SvgImage = CType(resources.GetObject("XtraTabPageDynamicFolder.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.XtraTabPageDynamicFolder.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16) Me.XtraTabPageDynamicFolder.Name = "XtraTabPageDynamicFolder" - Me.XtraTabPageDynamicFolder.Size = New System.Drawing.Size(1111, 272) + Me.XtraTabPageDynamicFolder.Size = New System.Drawing.Size(1111, 271) Me.XtraTabPageDynamicFolder.Text = "Dynamischer Ordnerpfad" ' 'LayoutControl1 @@ -1821,16 +1830,16 @@ Partial Class frmAdmin_Globix Me.LayoutControl1.Location = New System.Drawing.Point(0, 0) Me.LayoutControl1.Name = "LayoutControl1" Me.LayoutControl1.Root = Me.LayoutControlGroup4 - Me.LayoutControl1.Size = New System.Drawing.Size(1111, 272) + Me.LayoutControl1.Size = New System.Drawing.Size(1111, 271) Me.LayoutControl1.TabIndex = 15 Me.LayoutControl1.Text = "LayoutControl1" ' 'cmbAllAttributes ' Me.cmbAllAttributes.FormattingEnabled = True - Me.cmbAllAttributes.Location = New System.Drawing.Point(260, 95) + Me.cmbAllAttributes.Location = New System.Drawing.Point(269, 95) Me.cmbAllAttributes.Name = "cmbAllAttributes" - Me.cmbAllAttributes.Size = New System.Drawing.Size(836, 21) + Me.cmbAllAttributes.Size = New System.Drawing.Size(827, 21) Me.cmbAllAttributes.TabIndex = 10 ' 'SimpleButton3 @@ -1845,10 +1854,10 @@ Partial Class frmAdmin_Globix ' 'txtcrFoldermanuell ' - Me.txtcrFoldermanuell.Location = New System.Drawing.Point(260, 157) + Me.txtcrFoldermanuell.Location = New System.Drawing.Point(269, 157) Me.txtcrFoldermanuell.MenuManager = Me.RibbonControl1 Me.txtcrFoldermanuell.Name = "txtcrFoldermanuell" - Me.txtcrFoldermanuell.Size = New System.Drawing.Size(836, 20) + Me.txtcrFoldermanuell.Size = New System.Drawing.Size(827, 20) Me.txtcrFoldermanuell.StyleController = Me.LayoutControl1 Me.txtcrFoldermanuell.TabIndex = 8 ' @@ -1857,9 +1866,9 @@ Partial Class frmAdmin_Globix Me.cmbCrFolderDate.Font = New System.Drawing.Font("Segoe UI", 9.0!) Me.cmbCrFolderDate.FormattingEnabled = True Me.cmbCrFolderDate.Items.AddRange(New Object() {"YYYY/MM/DD", "YYYY/MM", "YYYY", "YYYY-MM", "YY_MM_DD", "YYYY_MM_DD", "DD_MM_YY", "DD_MM_YYYY", "YYMMDD", "YYYYMMDD", "DDMMYY", "DDMMYYYY"}) - Me.cmbCrFolderDate.Location = New System.Drawing.Point(260, 126) + Me.cmbCrFolderDate.Location = New System.Drawing.Point(269, 126) Me.cmbCrFolderDate.Name = "cmbCrFolderDate" - Me.cmbCrFolderDate.Size = New System.Drawing.Size(836, 23) + Me.cmbCrFolderDate.Size = New System.Drawing.Size(827, 23) Me.cmbCrFolderDate.TabIndex = 7 ' 'Label1 @@ -1874,10 +1883,10 @@ Partial Class frmAdmin_Globix 'FOLDER_FOR_INDEXTextEdit ' Me.FOLDER_FOR_INDEXTextEdit.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "FOLDER_FOR_INDEX", True)) - Me.FOLDER_FOR_INDEXTextEdit.Location = New System.Drawing.Point(101, 15) + Me.FOLDER_FOR_INDEXTextEdit.Location = New System.Drawing.Point(110, 15) Me.FOLDER_FOR_INDEXTextEdit.MenuManager = Me.RibbonControl1 Me.FOLDER_FOR_INDEXTextEdit.Name = "FOLDER_FOR_INDEXTextEdit" - Me.FOLDER_FOR_INDEXTextEdit.Size = New System.Drawing.Size(995, 20) + Me.FOLDER_FOR_INDEXTextEdit.Size = New System.Drawing.Size(986, 20) Me.FOLDER_FOR_INDEXTextEdit.StyleController = Me.LayoutControl1 Me.FOLDER_FOR_INDEXTextEdit.TabIndex = 4 ' @@ -1887,7 +1896,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlGroup4.GroupBordersVisible = False Me.LayoutControlGroup4.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem47, Me.EmptySpaceItem7, Me.LayoutControlItem48, Me.LayoutControlItem50, Me.LayoutControlItem51, Me.EmptySpaceItem8, Me.LayoutControlItem52, Me.LayoutControlItem49}) Me.LayoutControlGroup4.Name = "LayoutControlGroup4" - Me.LayoutControlGroup4.Size = New System.Drawing.Size(1111, 272) + Me.LayoutControlGroup4.Size = New System.Drawing.Size(1111, 271) Me.LayoutControlGroup4.TextVisible = False ' 'LayoutControlItem47 @@ -1907,7 +1916,7 @@ Partial Class frmAdmin_Globix Me.EmptySpaceItem7.AllowHotTrack = False Me.EmptySpaceItem7.Location = New System.Drawing.Point(0, 172) Me.EmptySpaceItem7.Name = "EmptySpaceItem7" - Me.EmptySpaceItem7.Size = New System.Drawing.Size(1091, 80) + Me.EmptySpaceItem7.Size = New System.Drawing.Size(1091, 79) Me.EmptySpaceItem7.TextSize = New System.Drawing.Size(0, 0) ' 'LayoutControlItem48 @@ -1979,7 +1988,7 @@ Partial Class frmAdmin_Globix Me.XtraTabPageAutoSelect.ImageOptions.SvgImage = CType(resources.GetObject("XtraTabPageAutoSelect.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.XtraTabPageAutoSelect.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16) Me.XtraTabPageAutoSelect.Name = "XtraTabPageAutoSelect" - Me.XtraTabPageAutoSelect.Size = New System.Drawing.Size(1111, 272) + Me.XtraTabPageAutoSelect.Size = New System.Drawing.Size(1111, 271) Me.XtraTabPageAutoSelect.Text = "Automatische Profilauswahl" ' 'LayoutControl2 @@ -1996,7 +2005,7 @@ Partial Class frmAdmin_Globix Me.LayoutControl2.Location = New System.Drawing.Point(193, 0) Me.LayoutControl2.Name = "LayoutControl2" Me.LayoutControl2.Root = Me.LayoutControlGroup5 - Me.LayoutControl2.Size = New System.Drawing.Size(918, 272) + Me.LayoutControl2.Size = New System.Drawing.Size(918, 271) Me.LayoutControl2.TabIndex = 1 Me.LayoutControl2.Text = "LayoutControl2" ' @@ -2004,10 +2013,10 @@ Partial Class frmAdmin_Globix ' Me.ChangedWhenAutoSelect.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBGI_REGEX_DOCTYPEBindingSource, "CHANGED_WHEN", True)) Me.ChangedWhenAutoSelect.Enabled = False - Me.ChangedWhenAutoSelect.Location = New System.Drawing.Point(502, 117) + Me.ChangedWhenAutoSelect.Location = New System.Drawing.Point(511, 117) Me.ChangedWhenAutoSelect.MenuManager = Me.RibbonControl1 Me.ChangedWhenAutoSelect.Name = "ChangedWhenAutoSelect" - Me.ChangedWhenAutoSelect.Size = New System.Drawing.Size(275, 20) + Me.ChangedWhenAutoSelect.Size = New System.Drawing.Size(266, 20) Me.ChangedWhenAutoSelect.StyleController = Me.LayoutControl2 Me.ChangedWhenAutoSelect.TabIndex = 16 ' @@ -2020,10 +2029,10 @@ Partial Class frmAdmin_Globix ' Me.TextEdit8.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBGI_REGEX_DOCTYPEBindingSource, "ADDED_WHEN", True)) Me.TextEdit8.Enabled = False - Me.TextEdit8.Location = New System.Drawing.Point(116, 117) + Me.TextEdit8.Location = New System.Drawing.Point(125, 117) Me.TextEdit8.MenuManager = Me.RibbonControl1 Me.TextEdit8.Name = "TextEdit8" - Me.TextEdit8.Size = New System.Drawing.Size(275, 20) + Me.TextEdit8.Size = New System.Drawing.Size(266, 20) Me.TextEdit8.StyleController = Me.LayoutControl2 Me.TextEdit8.TabIndex = 15 ' @@ -2031,10 +2040,10 @@ Partial Class frmAdmin_Globix ' Me.AddedWhoAutoSelect.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBGI_REGEX_DOCTYPEBindingSource, "ADDED_WHO", True)) Me.AddedWhoAutoSelect.Enabled = False - Me.AddedWhoAutoSelect.Location = New System.Drawing.Point(116, 87) + Me.AddedWhoAutoSelect.Location = New System.Drawing.Point(125, 87) Me.AddedWhoAutoSelect.MenuManager = Me.RibbonControl1 Me.AddedWhoAutoSelect.Name = "AddedWhoAutoSelect" - Me.AddedWhoAutoSelect.Size = New System.Drawing.Size(275, 20) + Me.AddedWhoAutoSelect.Size = New System.Drawing.Size(266, 20) Me.AddedWhoAutoSelect.StyleController = Me.LayoutControl2 Me.AddedWhoAutoSelect.TabIndex = 14 ' @@ -2042,18 +2051,18 @@ Partial Class frmAdmin_Globix ' Me.ChangedWhoAutoSelect.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBGI_REGEX_DOCTYPEBindingSource, "CHANGED_WHO", True)) Me.ChangedWhoAutoSelect.Enabled = False - Me.ChangedWhoAutoSelect.Location = New System.Drawing.Point(502, 87) + Me.ChangedWhoAutoSelect.Location = New System.Drawing.Point(511, 87) Me.ChangedWhoAutoSelect.MenuManager = Me.RibbonControl1 Me.ChangedWhoAutoSelect.Name = "ChangedWhoAutoSelect" - Me.ChangedWhoAutoSelect.Size = New System.Drawing.Size(275, 20) + Me.ChangedWhoAutoSelect.Size = New System.Drawing.Size(266, 20) Me.ChangedWhoAutoSelect.StyleController = Me.LayoutControl2 Me.ChangedWhoAutoSelect.TabIndex = 13 ' 'txtDateinameTest ' - Me.txtDateinameTest.Location = New System.Drawing.Point(113, 60) + Me.txtDateinameTest.Location = New System.Drawing.Point(122, 60) Me.txtDateinameTest.Name = "txtDateinameTest" - Me.txtDateinameTest.Size = New System.Drawing.Size(667, 20) + Me.txtDateinameTest.Size = New System.Drawing.Size(658, 20) Me.txtDateinameTest.TabIndex = 12 Me.txtDateinameTest.Text = "Example.pdf" ' @@ -2070,18 +2079,18 @@ Partial Class frmAdmin_Globix 'REGEXTextBox ' Me.REGEXTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBGI_REGEX_DOCTYPEBindingSource, "REGEX", True)) - Me.REGEXTextBox.Location = New System.Drawing.Point(113, 36) + Me.REGEXTextBox.Location = New System.Drawing.Point(122, 36) Me.REGEXTextBox.Name = "REGEXTextBox" - Me.REGEXTextBox.Size = New System.Drawing.Size(667, 20) + Me.REGEXTextBox.Size = New System.Drawing.Size(658, 20) Me.REGEXTextBox.TabIndex = 6 ' 'GUIDTextBoxAutoSelect ' Me.GUIDTextBoxAutoSelect.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBGI_REGEX_DOCTYPEBindingSource, "GUID", True)) - Me.GUIDTextBoxAutoSelect.Location = New System.Drawing.Point(113, 12) + Me.GUIDTextBoxAutoSelect.Location = New System.Drawing.Point(122, 12) Me.GUIDTextBoxAutoSelect.Name = "GUIDTextBoxAutoSelect" Me.GUIDTextBoxAutoSelect.ReadOnly = True - Me.GUIDTextBoxAutoSelect.Size = New System.Drawing.Size(51, 20) + Me.GUIDTextBoxAutoSelect.Size = New System.Drawing.Size(42, 20) Me.GUIDTextBoxAutoSelect.TabIndex = 5 ' 'LayoutControlGroup5 @@ -2090,7 +2099,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlGroup5.GroupBordersVisible = False Me.LayoutControlGroup5.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem55, Me.EmptySpaceItem9, Me.EmptySpaceItem10, Me.LayoutControlItem54, Me.LayoutControlItem53, Me.EmptySpaceItem11, Me.LayoutControlItem57, Me.LayoutControlItem59, Me.LayoutControlItem58, Me.LayoutControlItem56, Me.LayoutControlItem60}) Me.LayoutControlGroup5.Name = "LayoutControlGroup5" - Me.LayoutControlGroup5.Size = New System.Drawing.Size(918, 272) + Me.LayoutControlGroup5.Size = New System.Drawing.Size(918, 271) Me.LayoutControlGroup5.TextVisible = False ' 'LayoutControlItem55 @@ -2107,7 +2116,7 @@ Partial Class frmAdmin_Globix Me.EmptySpaceItem9.AllowHotTrack = False Me.EmptySpaceItem9.Location = New System.Drawing.Point(772, 64) Me.EmptySpaceItem9.Name = "EmptySpaceItem9" - Me.EmptySpaceItem9.Size = New System.Drawing.Size(126, 188) + Me.EmptySpaceItem9.Size = New System.Drawing.Size(126, 187) Me.EmptySpaceItem9.TextSize = New System.Drawing.Size(0, 0) ' 'EmptySpaceItem10 @@ -2167,7 +2176,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem59.Location = New System.Drawing.Point(386, 102) Me.LayoutControlItem59.Name = "LayoutControlItem59" Me.LayoutControlItem59.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) - Me.LayoutControlItem59.Size = New System.Drawing.Size(386, 150) + Me.LayoutControlItem59.Size = New System.Drawing.Size(386, 149) Me.LayoutControlItem59.Text = "Geändert wann" Me.LayoutControlItem59.TextSize = New System.Drawing.Size(98, 13) ' @@ -2179,7 +2188,7 @@ Partial Class frmAdmin_Globix Me.LayoutControlItem58.Location = New System.Drawing.Point(0, 102) Me.LayoutControlItem58.Name = "LayoutControlItem58" Me.LayoutControlItem58.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) - Me.LayoutControlItem58.Size = New System.Drawing.Size(386, 150) + Me.LayoutControlItem58.Size = New System.Drawing.Size(386, 149) Me.LayoutControlItem58.Text = "Erstellt wann" Me.LayoutControlItem58.TextSize = New System.Drawing.Size(98, 13) ' @@ -2210,7 +2219,7 @@ Partial Class frmAdmin_Globix Me.ListBox2.FormattingEnabled = True Me.ListBox2.Location = New System.Drawing.Point(0, 0) Me.ListBox2.Name = "ListBox2" - Me.ListBox2.Size = New System.Drawing.Size(193, 272) + Me.ListBox2.Size = New System.Drawing.Size(193, 271) Me.ListBox2.TabIndex = 0 ' 'XtraTabPage1 @@ -2248,9 +2257,15 @@ Partial Class frmAdmin_Globix Me.SplitContainerControl1.Horizontal = False Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 0) Me.SplitContainerControl1.Name = "SplitContainerControl1" + ' + 'SplitContainerControl1.Panel1 + ' Me.SplitContainerControl1.Panel1.Controls.Add(Me.gridAssignedUsers) Me.SplitContainerControl1.Panel1.Controls.Add(Me.Label2) Me.SplitContainerControl1.Panel1.Text = "Panel1" + ' + 'SplitContainerControl1.Panel2 + ' Me.SplitContainerControl1.Panel2.Controls.Add(Me.gridAvailableUsers) Me.SplitContainerControl1.Panel2.Controls.Add(Me.Label35) Me.SplitContainerControl1.Panel2.Text = "Panel2" @@ -2427,9 +2442,15 @@ Partial Class frmAdmin_Globix Me.SplitContainerControlGroup.Horizontal = False Me.SplitContainerControlGroup.Location = New System.Drawing.Point(0, 0) Me.SplitContainerControlGroup.Name = "SplitContainerControlGroup" + ' + 'SplitContainerControlGroup.Panel1 + ' Me.SplitContainerControlGroup.Panel1.Controls.Add(Me.gridAssignedGroups) Me.SplitContainerControlGroup.Panel1.Controls.Add(Me.Label13) Me.SplitContainerControlGroup.Panel1.Text = "Panel1" + ' + 'SplitContainerControlGroup.Panel2 + ' Me.SplitContainerControlGroup.Panel2.Controls.Add(Me.gridAvailableGroups) Me.SplitContainerControlGroup.Panel2.Controls.Add(Me.Label14) Me.SplitContainerControlGroup.Panel2.Text = "Panel2" @@ -2761,6 +2782,10 @@ Partial Class frmAdmin_Globix CType(Me.XtraTabControl3, System.ComponentModel.ISupportInitialize).EndInit() Me.XtraTabControl3.ResumeLayout(False) Me.XtraTabPage2.ResumeLayout(False) + CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainerControl1.Panel1.ResumeLayout(False) + CType(Me.SplitContainerControl1.Panel2, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainerControl1.Panel2.ResumeLayout(False) CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit() Me.SplitContainerControl1.ResumeLayout(False) CType(Me.gridAssignedUsers, System.ComponentModel.ISupportInitialize).EndInit() @@ -2768,6 +2793,10 @@ Partial Class frmAdmin_Globix CType(Me.gridAvailableUsers, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.viewAvailableUsers, System.ComponentModel.ISupportInitialize).EndInit() Me.XtraTabPage3.ResumeLayout(False) + CType(Me.SplitContainerControlGroup.Panel1, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainerControlGroup.Panel1.ResumeLayout(False) + CType(Me.SplitContainerControlGroup.Panel2, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainerControlGroup.Panel2.ResumeLayout(False) CType(Me.SplitContainerControlGroup, System.ComponentModel.ISupportInitialize).EndInit() Me.SplitContainerControlGroup.ResumeLayout(False) CType(Me.gridAssignedGroups, System.ComponentModel.ISupportInitialize).EndInit() diff --git a/GUIs.ZooFlow/Administration/frmAdmin_Globix.resx b/GUIs.ZooFlow/Administration/frmAdmin_Globix.resx index 6fe2d5e6..1b0a8d52 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_Globix.resx +++ b/GUIs.ZooFlow/Administration/frmAdmin_Globix.resx @@ -123,7 +123,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKcCAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -142,7 +142,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGQBAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -179,7 +179,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABwFAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -211,7 +211,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKEDAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -234,7 +234,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAEoIAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -280,7 +280,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAEACAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -297,7 +297,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALMDAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -320,7 +320,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOsCAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -340,7 +340,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAJQCAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -374,7 +374,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFQEAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -400,7 +400,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAJYEAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -427,7 +427,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKEDAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -450,7 +450,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALkEAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -478,7 +478,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAHcDAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi diff --git a/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.Designer.vb b/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.Designer.vb index 808ddbf3..db31d7e0 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.Designer.vb +++ b/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.Designer.vb @@ -25,7 +25,6 @@ Partial Class frmAdmin_IDBBERelations Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdmin_IDBBERelations)) Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage() - Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl() @@ -77,20 +76,14 @@ Partial Class frmAdmin_IDBBERelations Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] Me.RibbonControl1.ShowMoreCommandsButton = DevExpress.Utils.DefaultBoolean.[False] - Me.RibbonControl1.Size = New System.Drawing.Size(1169, 159) + Me.RibbonControl1.Size = New System.Drawing.Size(1169, 160) Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 ' 'RibbonPage1 ' - Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1}) Me.RibbonPage1.Name = "RibbonPage1" Me.RibbonPage1.Text = "Start" ' - 'RibbonPageGroup1 - ' - Me.RibbonPageGroup1.Name = "RibbonPageGroup1" - Me.RibbonPageGroup1.Text = "RibbonPageGroup1" - ' 'RibbonStatusBar1 ' Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 824) @@ -112,10 +105,10 @@ Partial Class frmAdmin_IDBBERelations Me.LayoutControl1.Controls.Add(Me.GridControlBusinessEntities) Me.LayoutControl1.Controls.Add(Me.GridControlFreeAttributes) Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill - Me.LayoutControl1.Location = New System.Drawing.Point(0, 159) + Me.LayoutControl1.Location = New System.Drawing.Point(0, 160) Me.LayoutControl1.Name = "LayoutControl1" Me.LayoutControl1.Root = Me.Root - Me.LayoutControl1.Size = New System.Drawing.Size(1169, 665) + Me.LayoutControl1.Size = New System.Drawing.Size(1169, 664) Me.LayoutControl1.TabIndex = 6 Me.LayoutControl1.Text = "LayoutControl1" ' @@ -125,7 +118,7 @@ Partial Class frmAdmin_IDBBERelations Me.SimpleButton2.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Near Me.SimpleButton2.ImageOptions.Location = DevExpress.XtraEditors.ImageLocation.MiddleRight Me.SimpleButton2.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) - Me.SimpleButton2.Location = New System.Drawing.Point(431, 617) + Me.SimpleButton2.Location = New System.Drawing.Point(431, 616) Me.SimpleButton2.Name = "SimpleButton2" Me.SimpleButton2.RightToLeft = System.Windows.Forms.RightToLeft.No Me.SimpleButton2.Size = New System.Drawing.Size(386, 36) @@ -138,7 +131,7 @@ Partial Class frmAdmin_IDBBERelations Me.SimpleButton1.Appearance.Options.UseTextOptions = True Me.SimpleButton1.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Far Me.SimpleButton1.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) - Me.SimpleButton1.Location = New System.Drawing.Point(431, 577) + Me.SimpleButton1.Location = New System.Drawing.Point(431, 576) Me.SimpleButton1.Name = "SimpleButton1" Me.SimpleButton1.Size = New System.Drawing.Size(386, 36) Me.SimpleButton1.StyleController = Me.LayoutControl1 @@ -153,7 +146,7 @@ Partial Class frmAdmin_IDBBERelations Me.GridControlAttributesRelated.MainView = Me.GridViewRelatedAttributes Me.GridControlAttributesRelated.MenuManager = Me.RibbonControl1 Me.GridControlAttributesRelated.Name = "GridControlAttributesRelated" - Me.GridControlAttributesRelated.Size = New System.Drawing.Size(336, 604) + Me.GridControlAttributesRelated.Size = New System.Drawing.Size(336, 603) Me.GridControlAttributesRelated.TabIndex = 7 Me.GridControlAttributesRelated.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewRelatedAttributes}) ' @@ -169,7 +162,7 @@ Partial Class frmAdmin_IDBBERelations Me.GridControlBusinessEntities.MainView = Me.GridViewBusinessEntities Me.GridControlBusinessEntities.MenuManager = Me.RibbonControl1 Me.GridControlBusinessEntities.Name = "GridControlBusinessEntities" - Me.GridControlBusinessEntities.Size = New System.Drawing.Size(386, 524) + Me.GridControlBusinessEntities.Size = New System.Drawing.Size(386, 523) Me.GridControlBusinessEntities.TabIndex = 6 Me.GridControlBusinessEntities.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewBusinessEntities}) ' @@ -191,7 +184,7 @@ Partial Class frmAdmin_IDBBERelations Me.GridControlFreeAttributes.MainView = Me.GridViewFreeAttributes Me.GridControlFreeAttributes.MenuManager = Me.RibbonControl1 Me.GridControlFreeAttributes.Name = "GridControlFreeAttributes" - Me.GridControlFreeAttributes.Size = New System.Drawing.Size(415, 604) + Me.GridControlFreeAttributes.Size = New System.Drawing.Size(415, 603) Me.GridControlFreeAttributes.TabIndex = 5 Me.GridControlFreeAttributes.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewFreeAttributes}) ' @@ -210,7 +203,7 @@ Partial Class frmAdmin_IDBBERelations Me.Root.GroupBordersVisible = False Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem2, Me.LayoutControlItem1, Me.SimpleLabelItem2, Me.SimpleLabelItem1, Me.LayoutControlItem3, Me.SimpleLabelItem3, Me.LayoutControlItem5, Me.LayoutControlItem4}) Me.Root.Name = "Root" - Me.Root.Size = New System.Drawing.Size(1169, 665) + Me.Root.Size = New System.Drawing.Size(1169, 664) Me.Root.TextVisible = False ' 'LayoutControlItem2 @@ -218,7 +211,7 @@ Partial Class frmAdmin_IDBBERelations Me.LayoutControlItem2.Control = Me.GridControlFreeAttributes Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 37) Me.LayoutControlItem2.Name = "LayoutControlItem2" - Me.LayoutControlItem2.Size = New System.Drawing.Size(419, 608) + Me.LayoutControlItem2.Size = New System.Drawing.Size(419, 607) Me.LayoutControlItem2.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem2.TextVisible = False ' @@ -227,7 +220,7 @@ Partial Class frmAdmin_IDBBERelations Me.LayoutControlItem1.Control = Me.GridControlBusinessEntities Me.LayoutControlItem1.Location = New System.Drawing.Point(419, 37) Me.LayoutControlItem1.Name = "LayoutControlItem1" - Me.LayoutControlItem1.Size = New System.Drawing.Size(390, 528) + Me.LayoutControlItem1.Size = New System.Drawing.Size(390, 527) Me.LayoutControlItem1.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem1.TextVisible = False ' @@ -264,7 +257,7 @@ Partial Class frmAdmin_IDBBERelations Me.LayoutControlItem3.Control = Me.GridControlAttributesRelated Me.LayoutControlItem3.Location = New System.Drawing.Point(809, 37) Me.LayoutControlItem3.Name = "LayoutControlItem3" - Me.LayoutControlItem3.Size = New System.Drawing.Size(340, 608) + Me.LayoutControlItem3.Size = New System.Drawing.Size(340, 607) Me.LayoutControlItem3.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem3.TextVisible = False ' @@ -285,7 +278,7 @@ Partial Class frmAdmin_IDBBERelations 'LayoutControlItem5 ' Me.LayoutControlItem5.Control = Me.SimpleButton2 - Me.LayoutControlItem5.Location = New System.Drawing.Point(419, 605) + Me.LayoutControlItem5.Location = New System.Drawing.Point(419, 604) Me.LayoutControlItem5.Name = "LayoutControlItem5" Me.LayoutControlItem5.Size = New System.Drawing.Size(390, 40) Me.LayoutControlItem5.TextSize = New System.Drawing.Size(0, 0) @@ -294,7 +287,7 @@ Partial Class frmAdmin_IDBBERelations 'LayoutControlItem4 ' Me.LayoutControlItem4.Control = Me.SimpleButton1 - Me.LayoutControlItem4.Location = New System.Drawing.Point(419, 565) + Me.LayoutControlItem4.Location = New System.Drawing.Point(419, 564) Me.LayoutControlItem4.Name = "LayoutControlItem4" Me.LayoutControlItem4.Size = New System.Drawing.Size(390, 40) Me.LayoutControlItem4.TextSize = New System.Drawing.Size(0, 0) @@ -342,7 +335,6 @@ Partial Class frmAdmin_IDBBERelations Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage - Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl diff --git a/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.resx b/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.resx index af1352f3..7c4beef5 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.resx +++ b/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.resx @@ -120,7 +120,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAF4CAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -138,7 +138,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFsCAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -156,7 +156,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAHcDAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi diff --git a/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.vb b/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.vb index ea0ee20a..4fd3223b 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.vb +++ b/GUIs.ZooFlow/Administration/frmAdmin_IDBBERelations.vb @@ -47,7 +47,8 @@ Public Class frmAdmin_IDBBERelations DragDropManager = New ClassDragDrop(My.LogConfig) DragDropManager.AddGridView(GridViewFreeAttributes) DragDropManager.AddGridView(GridViewRelatedAttributes) - + LoadFreeAttributes() + LoadRelatedAttributes() Catch ex As Exception ShowErrorMessage($"Error in FormLoad", ex) End Try diff --git a/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.Designer.vb b/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.Designer.vb index 0a7b4ae8..a3fcb20b 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.Designer.vb +++ b/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.Designer.vb @@ -92,7 +92,7 @@ Partial Class frmAdmin_IDBEntity Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide Me.RibbonControl1.ShowToolbarCustomizeItem = False - Me.RibbonControl1.Size = New System.Drawing.Size(837, 131) + Me.RibbonControl1.Size = New System.Drawing.Size(837, 132) Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 Me.RibbonControl1.Toolbar.ShowCustomizeItem = False ' @@ -162,21 +162,21 @@ Partial Class frmAdmin_IDBEntity Me.LayoutControl1.Controls.Add(Me.txtChangedWho) Me.LayoutControl1.Controls.Add(Me.TextEdit8) Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill - Me.LayoutControl1.Location = New System.Drawing.Point(0, 131) + Me.LayoutControl1.Location = New System.Drawing.Point(0, 132) Me.LayoutControl1.Name = "LayoutControl1" Me.LayoutControl1.Root = Me.Root - Me.LayoutControl1.Size = New System.Drawing.Size(837, 334) + Me.LayoutControl1.Size = New System.Drawing.Size(837, 333) Me.LayoutControl1.TabIndex = 2 Me.LayoutControl1.Text = "LayoutControl1" ' 'TextEdit1 ' Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_BUSINESS_ENTITYBindingSource, "GUID", True)) - Me.TextEdit1.Location = New System.Drawing.Point(105, 20) + Me.TextEdit1.Location = New System.Drawing.Point(114, 20) Me.TextEdit1.MenuManager = Me.RibbonControl1 Me.TextEdit1.Name = "TextEdit1" Me.TextEdit1.Properties.ReadOnly = True - Me.TextEdit1.Size = New System.Drawing.Size(712, 20) + Me.TextEdit1.Size = New System.Drawing.Size(703, 20) Me.TextEdit1.StyleController = Me.LayoutControl1 Me.TextEdit1.TabIndex = 4 ' @@ -193,10 +193,10 @@ Partial Class frmAdmin_IDBEntity 'TextEdit3 ' Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_BUSINESS_ENTITYBindingSource, "TITLE", True)) - Me.TextEdit3.Location = New System.Drawing.Point(105, 60) + Me.TextEdit3.Location = New System.Drawing.Point(114, 60) Me.TextEdit3.MenuManager = Me.RibbonControl1 Me.TextEdit3.Name = "TextEdit3" - Me.TextEdit3.Size = New System.Drawing.Size(712, 20) + Me.TextEdit3.Size = New System.Drawing.Size(703, 20) Me.TextEdit3.StyleController = Me.LayoutControl1 Me.TextEdit3.TabIndex = 6 ' @@ -214,50 +214,50 @@ Partial Class frmAdmin_IDBEntity 'TextEdit4 ' Me.TextEdit4.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_BUSINESS_ENTITYBindingSource, "COMMENT", True)) - Me.TextEdit4.Location = New System.Drawing.Point(105, 100) + Me.TextEdit4.Location = New System.Drawing.Point(114, 100) Me.TextEdit4.MenuManager = Me.RibbonControl1 Me.TextEdit4.Name = "TextEdit4" - Me.TextEdit4.Size = New System.Drawing.Size(712, 20) + Me.TextEdit4.Size = New System.Drawing.Size(703, 20) Me.TextEdit4.StyleController = Me.LayoutControl1 Me.TextEdit4.TabIndex = 8 ' 'txtAddedWho ' Me.txtAddedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_BUSINESS_ENTITYBindingSource, "ADDED_WHO", True)) - Me.txtAddedWho.Location = New System.Drawing.Point(105, 178) + Me.txtAddedWho.Location = New System.Drawing.Point(114, 178) Me.txtAddedWho.MenuManager = Me.RibbonControl1 Me.txtAddedWho.Name = "txtAddedWho" - Me.txtAddedWho.Size = New System.Drawing.Size(303, 20) + Me.txtAddedWho.Size = New System.Drawing.Size(294, 20) Me.txtAddedWho.StyleController = Me.LayoutControl1 Me.txtAddedWho.TabIndex = 9 ' 'TextEdit6 ' Me.TextEdit6.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_BUSINESS_ENTITYBindingSource, "ADDED_WHEN", True)) - Me.TextEdit6.Location = New System.Drawing.Point(513, 178) + Me.TextEdit6.Location = New System.Drawing.Point(522, 178) Me.TextEdit6.MenuManager = Me.RibbonControl1 Me.TextEdit6.Name = "TextEdit6" - Me.TextEdit6.Size = New System.Drawing.Size(304, 20) + Me.TextEdit6.Size = New System.Drawing.Size(295, 20) Me.TextEdit6.StyleController = Me.LayoutControl1 Me.TextEdit6.TabIndex = 10 ' 'txtChangedWho ' Me.txtChangedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_BUSINESS_ENTITYBindingSource, "CHANGED_WHO", True)) - Me.txtChangedWho.Location = New System.Drawing.Point(105, 218) + Me.txtChangedWho.Location = New System.Drawing.Point(114, 218) Me.txtChangedWho.MenuManager = Me.RibbonControl1 Me.txtChangedWho.Name = "txtChangedWho" - Me.txtChangedWho.Size = New System.Drawing.Size(303, 20) + Me.txtChangedWho.Size = New System.Drawing.Size(294, 20) Me.txtChangedWho.StyleController = Me.LayoutControl1 Me.txtChangedWho.TabIndex = 11 ' 'TextEdit8 ' Me.TextEdit8.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_BUSINESS_ENTITYBindingSource, "CHANGED_WHEN", True)) - Me.TextEdit8.Location = New System.Drawing.Point(513, 218) + Me.TextEdit8.Location = New System.Drawing.Point(522, 218) Me.TextEdit8.MenuManager = Me.RibbonControl1 Me.TextEdit8.Name = "TextEdit8" - Me.TextEdit8.Size = New System.Drawing.Size(304, 20) + Me.TextEdit8.Size = New System.Drawing.Size(295, 20) Me.TextEdit8.StyleController = Me.LayoutControl1 Me.TextEdit8.TabIndex = 12 ' @@ -267,7 +267,7 @@ Partial Class frmAdmin_IDBEntity Me.Root.GroupBordersVisible = False Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem3, Me.LayoutControlItem4, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem8, Me.LayoutControlItem7, Me.LayoutControlItem9}) Me.Root.Name = "Root" - Me.Root.Size = New System.Drawing.Size(837, 334) + Me.Root.Size = New System.Drawing.Size(837, 333) Me.Root.TextVisible = False ' 'LayoutControlItem1 @@ -326,7 +326,7 @@ Partial Class frmAdmin_IDBEntity Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 198) Me.LayoutControlItem8.Name = "LayoutControlItem8" Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) - Me.LayoutControlItem8.Size = New System.Drawing.Size(408, 116) + Me.LayoutControlItem8.Size = New System.Drawing.Size(408, 115) Me.LayoutControlItem8.Text = "Geändert Wer" Me.LayoutControlItem8.TextSize = New System.Drawing.Size(82, 13) ' @@ -346,7 +346,7 @@ Partial Class frmAdmin_IDBEntity Me.LayoutControlItem9.Location = New System.Drawing.Point(408, 198) Me.LayoutControlItem9.Name = "LayoutControlItem9" Me.LayoutControlItem9.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) - Me.LayoutControlItem9.Size = New System.Drawing.Size(409, 116) + Me.LayoutControlItem9.Size = New System.Drawing.Size(409, 115) Me.LayoutControlItem9.Text = "Geändert Wann" Me.LayoutControlItem9.TextSize = New System.Drawing.Size(82, 13) ' diff --git a/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.resx b/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.resx index 1ead0fb4..d0121402 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.resx +++ b/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.resx @@ -120,7 +120,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGkEAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi diff --git a/GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb b/GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb index ee629207..90ce1195 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb +++ b/GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb @@ -141,7 +141,7 @@ Partial Class frmAdmin_Start Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] Me.RibbonControl1.ShowToolbarCustomizeItem = False - Me.RibbonControl1.Size = New System.Drawing.Size(1077, 159) + Me.RibbonControl1.Size = New System.Drawing.Size(1077, 160) Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 Me.RibbonControl1.Toolbar.ShowCustomizeItem = False ' @@ -422,14 +422,15 @@ Partial Class frmAdmin_Start Me.TreeListMenu.AppendNode(New Object() {"Attribute"}, 0, 2, 2, -1, "IDB_ATTRIBUTES") Me.TreeListMenu.AppendNode(New Object() {"Attribute Relations"}, 1, 9, 9, -1, "ATTRIBUTE_RELATIONS") Me.TreeListMenu.AppendNode(New Object() {"Business Entities"}, 0, 1, 1, -1, "IDB_BUSINESS_ENTITIES") + Me.TreeListMenu.AppendNode(New Object() {"Doctype Config"}, 0, 10, 0, -1, "IDB_DOCTYPE_CONFIG") Me.TreeListMenu.AppendNode(New Object() {"Object Stores"}, 0, "IDB_OBJECT_STORES") Me.TreeListMenu.AppendNode(New Object() {"Global Indexer"}, -1, 6, 6, -1, "") - Me.TreeListMenu.AppendNode(New Object() {"Profiles"}, 5, 4, 4, -1, "GI_PROFILES") - Me.TreeListMenu.AppendNode(New Object() {"Profile Relations"}, 6, 9, 9, -1, "GI_RELATIONS") + Me.TreeListMenu.AppendNode(New Object() {"Profiles"}, 6, 4, 4, -1, "GI_PROFILES") + Me.TreeListMenu.AppendNode(New Object() {"Profile Relations"}, 7, 9, 9, -1, "GI_RELATIONS") Me.TreeListMenu.AppendNode(New Object() {"Clipboard Watcher"}, -1, 7, 7, -1, "") - Me.TreeListMenu.AppendNode(New Object() {"Profiles"}, 8, 4, 4, -1, "CW_PROFILES") + Me.TreeListMenu.AppendNode(New Object() {"Profiles"}, 9, 4, 4, -1, "CW_PROFILES") Me.TreeListMenu.AppendNode(New Object() {"Administration"}, -1) - Me.TreeListMenu.AppendNode(New Object() {"Source SQL"}, 10, 3, 3, -1, "META_SOURCE_SQL") + Me.TreeListMenu.AppendNode(New Object() {"Source SQL"}, 11, 3, 3, -1, "META_SOURCE_SQL") Me.TreeListMenu.EndUnboundLoad() Me.TreeListMenu.OptionsBehavior.Editable = False Me.TreeListMenu.OptionsView.ShowColumns = False @@ -437,7 +438,7 @@ Partial Class frmAdmin_Start Me.TreeListMenu.OptionsView.ShowIndicator = False Me.TreeListMenu.OptionsView.ShowVertLines = False Me.TreeListMenu.SelectImageList = Me.MainTreeImages - Me.TreeListMenu.Size = New System.Drawing.Size(193, 446) + Me.TreeListMenu.Size = New System.Drawing.Size(193, 445) Me.TreeListMenu.TabIndex = 8 ' 'TreeListColumn1 @@ -460,6 +461,7 @@ Partial Class frmAdmin_Start Me.MainTreeImages.Add("ZooFlow_CW_DevExpress", "ZooFlow_CW_DevExpress", GetType(DigitalData.GUIs.ZooFlow.My.Resources.Resources)) Me.MainTreeImages.Add("open", "image://svgimages/actions/open.svg") Me.MainTreeImages.Add("managerelations", "image://svgimages/spreadsheet/managerelations.svg") + Me.MainTreeImages.Add("bo_state", "image://svgimages/business objects/bo_state.svg") ' 'DockManager1 ' @@ -472,10 +474,10 @@ Partial Class frmAdmin_Start Me.DockPanel1.Controls.Add(Me.DockPanel1_Container) Me.DockPanel1.Dock = DevExpress.XtraBars.Docking.DockingStyle.Left Me.DockPanel1.ID = New System.Guid("ce81b5b5-eff5-4006-8018-548aa8413799") - Me.DockPanel1.Location = New System.Drawing.Point(0, 159) + Me.DockPanel1.Location = New System.Drawing.Point(0, 160) Me.DockPanel1.Name = "DockPanel1" Me.DockPanel1.OriginalSize = New System.Drawing.Size(200, 200) - Me.DockPanel1.Size = New System.Drawing.Size(200, 495) + Me.DockPanel1.Size = New System.Drawing.Size(200, 494) Me.DockPanel1.Text = "Übersicht" ' 'DockPanel1_Container @@ -483,7 +485,7 @@ Partial Class frmAdmin_Start Me.DockPanel1_Container.Controls.Add(Me.TreeListMenu) Me.DockPanel1_Container.Location = New System.Drawing.Point(3, 46) Me.DockPanel1_Container.Name = "DockPanel1_Container" - Me.DockPanel1_Container.Size = New System.Drawing.Size(193, 446) + Me.DockPanel1_Container.Size = New System.Drawing.Size(193, 445) Me.DockPanel1_Container.TabIndex = 0 ' 'TBIDB_ATTRIBUTEBindingSource @@ -536,7 +538,7 @@ Partial Class frmAdmin_Start ' Me.Panel1.Controls.Add(Me.labelTitle) Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top - Me.Panel1.Location = New System.Drawing.Point(200, 159) + Me.Panel1.Location = New System.Drawing.Point(200, 160) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(877, 40) Me.Panel1.TabIndex = 8 @@ -739,11 +741,11 @@ Partial Class frmAdmin_Start 'GridMain ' Me.GridMain.Dock = System.Windows.Forms.DockStyle.Fill - Me.GridMain.Location = New System.Drawing.Point(200, 199) + Me.GridMain.Location = New System.Drawing.Point(200, 200) Me.GridMain.MainView = Me.ViewMain Me.GridMain.MenuManager = Me.RibbonControl1 Me.GridMain.Name = "GridMain" - Me.GridMain.Size = New System.Drawing.Size(877, 455) + Me.GridMain.Size = New System.Drawing.Size(877, 454) Me.GridMain.TabIndex = 12 Me.GridMain.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewMain}) ' diff --git a/GUIs.ZooFlow/Administration/frmAdmin_Start.resx b/GUIs.ZooFlow/Administration/frmAdmin_Start.resx index 2f65b8f4..b3dc977c 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_Start.resx +++ b/GUIs.ZooFlow/Administration/frmAdmin_Start.resx @@ -120,7 +120,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGICAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -138,7 +138,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAC4DAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -159,7 +159,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALMCAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -178,7 +178,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAACcCAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -195,7 +195,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKMCAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -214,7 +214,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAF8CAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -232,7 +232,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAC4DAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -253,7 +253,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAHcDAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi @@ -279,6 +279,9 @@ 396, 17 + + 172 + 691, 17 @@ -302,7 +305,7 @@ - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAO4BAAAC77u/ PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi diff --git a/GUIs.ZooFlow/DSIDB_Stammdaten.Designer.vb b/GUIs.ZooFlow/DSIDB_Stammdaten.Designer.vb index f08c0059..8efc983d 100644 --- a/GUIs.ZooFlow/DSIDB_Stammdaten.Designer.vb +++ b/GUIs.ZooFlow/DSIDB_Stammdaten.Designer.vb @@ -43,10 +43,14 @@ Partial Public Class DSIDB_Stammdaten Private tableVWIDB_OBJECT_STORE As VWIDB_OBJECT_STOREDataTable + Private tableTBIDB_DOCTYPE_HANDLING As TBIDB_DOCTYPE_HANDLINGDataTable + Private relationFK_TYP_ID As Global.System.Data.DataRelation Private relationFK_OS_CAT_ID As Global.System.Data.DataRelation + Private relationFK_TBIDB_DOCTYPE_HANDLING_CHNGACT As Global.System.Data.DataRelation + Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema _ + Public ReadOnly Property TBIDB_DOCTYPE_HANDLING() As TBIDB_DOCTYPE_HANDLINGDataTable + Get + Return Me.tableTBIDB_DOCTYPE_HANDLING + End Get + End Property + _ + Private Function ShouldSerializeTBIDB_DOCTYPE_HANDLING() As Boolean + Return false + End Function + _ Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs) @@ -565,6 +602,9 @@ Partial Public Class DSIDB_Stammdaten _ Public Delegate Sub VWIDB_OBJECT_STORERowChangeEventHandler(ByVal sender As Object, ByVal e As VWIDB_OBJECT_STORERowChangeEvent) + _ + Public Delegate Sub TBIDB_DOCTYPE_HANDLINGRowChangeEventHandler(ByVal sender As Object, ByVal e As TBIDB_DOCTYPE_HANDLINGRowChangeEvent) + ''' '''Represents the strongly named DataTable class. ''' @@ -4108,6 +4148,399 @@ Partial Public Class DSIDB_Stammdaten End Function End Class + ''' + '''Represents the strongly named DataTable class. + ''' + _ + Partial Public Class TBIDB_DOCTYPE_HANDLINGDataTable + Inherits Global.System.Data.TypedTableBase(Of TBIDB_DOCTYPE_HANDLINGRow) + + Private columnGUID As Global.System.Data.DataColumn + + Private columnDOCTYPE_ID As Global.System.Data.DataColumn + + Private columnCHANGED_ACTION As Global.System.Data.DataColumn + + Private columnACTIVE As Global.System.Data.DataColumn + + Private columnCOMMENT As Global.System.Data.DataColumn + + Private columnADDED_WHO As Global.System.Data.DataColumn + + Private columnADDED_WHEN As Global.System.Data.DataColumn + + Private columnCHANGED_WHO As Global.System.Data.DataColumn + + Private columnCHANGED_WHEN As Global.System.Data.DataColumn + + Private columnDoctype As Global.System.Data.DataColumn + + _ + Public Sub New() + MyBase.New + Me.TableName = "TBIDB_DOCTYPE_HANDLING" + Me.BeginInit + Me.InitClass + Me.EndInit + End Sub + + _ + Friend Sub New(ByVal table As Global.System.Data.DataTable) + MyBase.New + Me.TableName = table.TableName + If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then + Me.CaseSensitive = table.CaseSensitive + End If + If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then + Me.Locale = table.Locale + End If + If (table.Namespace <> table.DataSet.Namespace) Then + Me.Namespace = table.Namespace + End If + Me.Prefix = table.Prefix + Me.MinimumCapacity = table.MinimumCapacity + End Sub + + _ + Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) + MyBase.New(info, context) + Me.InitVars + End Sub + + _ + Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn + Get + Return Me.columnGUID + End Get + End Property + + _ + Public ReadOnly Property DOCTYPE_IDColumn() As Global.System.Data.DataColumn + Get + Return Me.columnDOCTYPE_ID + End Get + End Property + + _ + Public ReadOnly Property CHANGED_ACTIONColumn() As Global.System.Data.DataColumn + Get + Return Me.columnCHANGED_ACTION + End Get + End Property + + _ + Public ReadOnly Property ACTIVEColumn() As Global.System.Data.DataColumn + Get + Return Me.columnACTIVE + End Get + End Property + + _ + Public ReadOnly Property COMMENTColumn() As Global.System.Data.DataColumn + Get + Return Me.columnCOMMENT + End Get + End Property + + _ + Public ReadOnly Property ADDED_WHOColumn() As Global.System.Data.DataColumn + Get + Return Me.columnADDED_WHO + End Get + End Property + + _ + Public ReadOnly Property ADDED_WHENColumn() As Global.System.Data.DataColumn + Get + Return Me.columnADDED_WHEN + End Get + End Property + + _ + Public ReadOnly Property CHANGED_WHOColumn() As Global.System.Data.DataColumn + Get + Return Me.columnCHANGED_WHO + End Get + End Property + + _ + Public ReadOnly Property CHANGED_WHENColumn() As Global.System.Data.DataColumn + Get + Return Me.columnCHANGED_WHEN + End Get + End Property + + _ + Public ReadOnly Property DoctypeColumn() As Global.System.Data.DataColumn + Get + Return Me.columnDoctype + End Get + End Property + + _ + Public ReadOnly Property Count() As Integer + Get + Return Me.Rows.Count + End Get + End Property + + _ + Public Default ReadOnly Property Item(ByVal index As Integer) As TBIDB_DOCTYPE_HANDLINGRow + Get + Return CType(Me.Rows(index),TBIDB_DOCTYPE_HANDLINGRow) + End Get + End Property + + _ + Public Event TBIDB_DOCTYPE_HANDLINGRowChanging As TBIDB_DOCTYPE_HANDLINGRowChangeEventHandler + + _ + Public Event TBIDB_DOCTYPE_HANDLINGRowChanged As TBIDB_DOCTYPE_HANDLINGRowChangeEventHandler + + _ + Public Event TBIDB_DOCTYPE_HANDLINGRowDeleting As TBIDB_DOCTYPE_HANDLINGRowChangeEventHandler + + _ + Public Event TBIDB_DOCTYPE_HANDLINGRowDeleted As TBIDB_DOCTYPE_HANDLINGRowChangeEventHandler + + _ + Public Overloads Sub AddTBIDB_DOCTYPE_HANDLINGRow(ByVal row As TBIDB_DOCTYPE_HANDLINGRow) + Me.Rows.Add(row) + End Sub + + _ + Public Overloads Function AddTBIDB_DOCTYPE_HANDLINGRow(ByVal DOCTYPE_ID As Integer, ByVal parentTBIDB_CATALOGRowByFK_TBIDB_DOCTYPE_HANDLING_CHNGACT As TBIDB_CATALOGRow, ByVal ACTIVE As Boolean, ByVal COMMENT As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal Doctype As String) As TBIDB_DOCTYPE_HANDLINGRow + Dim rowTBIDB_DOCTYPE_HANDLINGRow As TBIDB_DOCTYPE_HANDLINGRow = CType(Me.NewRow,TBIDB_DOCTYPE_HANDLINGRow) + Dim columnValuesArray() As Object = New Object() {Nothing, DOCTYPE_ID, Nothing, ACTIVE, COMMENT, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, Doctype} + If (Not (parentTBIDB_CATALOGRowByFK_TBIDB_DOCTYPE_HANDLING_CHNGACT) Is Nothing) Then + columnValuesArray(2) = parentTBIDB_CATALOGRowByFK_TBIDB_DOCTYPE_HANDLING_CHNGACT(0) + End If + rowTBIDB_DOCTYPE_HANDLINGRow.ItemArray = columnValuesArray + Me.Rows.Add(rowTBIDB_DOCTYPE_HANDLINGRow) + Return rowTBIDB_DOCTYPE_HANDLINGRow + End Function + + _ + Public Function FindByGUID(ByVal GUID As Integer) As TBIDB_DOCTYPE_HANDLINGRow + Return CType(Me.Rows.Find(New Object() {GUID}),TBIDB_DOCTYPE_HANDLINGRow) + End Function + + _ + Public Overrides Function Clone() As Global.System.Data.DataTable + Dim cln As TBIDB_DOCTYPE_HANDLINGDataTable = CType(MyBase.Clone,TBIDB_DOCTYPE_HANDLINGDataTable) + cln.InitVars + Return cln + End Function + + _ + Protected Overrides Function CreateInstance() As Global.System.Data.DataTable + Return New TBIDB_DOCTYPE_HANDLINGDataTable() + End Function + + _ + Friend Sub InitVars() + Me.columnGUID = MyBase.Columns("GUID") + Me.columnDOCTYPE_ID = MyBase.Columns("DOCTYPE_ID") + Me.columnCHANGED_ACTION = MyBase.Columns("CHANGED_ACTION") + Me.columnACTIVE = MyBase.Columns("ACTIVE") + Me.columnCOMMENT = MyBase.Columns("COMMENT") + Me.columnADDED_WHO = MyBase.Columns("ADDED_WHO") + Me.columnADDED_WHEN = MyBase.Columns("ADDED_WHEN") + Me.columnCHANGED_WHO = MyBase.Columns("CHANGED_WHO") + Me.columnCHANGED_WHEN = MyBase.Columns("CHANGED_WHEN") + Me.columnDoctype = MyBase.Columns("Doctype") + End Sub + + _ + Private Sub InitClass() + Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnGUID) + Me.columnDOCTYPE_ID = New Global.System.Data.DataColumn("DOCTYPE_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnDOCTYPE_ID) + Me.columnCHANGED_ACTION = New Global.System.Data.DataColumn("CHANGED_ACTION", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnCHANGED_ACTION) + Me.columnACTIVE = New Global.System.Data.DataColumn("ACTIVE", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnACTIVE) + Me.columnCOMMENT = New Global.System.Data.DataColumn("COMMENT", GetType(String), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnCOMMENT) + Me.columnADDED_WHO = New Global.System.Data.DataColumn("ADDED_WHO", GetType(String), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnADDED_WHO) + Me.columnADDED_WHEN = New Global.System.Data.DataColumn("ADDED_WHEN", GetType(Date), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnADDED_WHEN) + Me.columnCHANGED_WHO = New Global.System.Data.DataColumn("CHANGED_WHO", GetType(String), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnCHANGED_WHO) + Me.columnCHANGED_WHEN = New Global.System.Data.DataColumn("CHANGED_WHEN", GetType(Date), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnCHANGED_WHEN) + Me.columnDoctype = New Global.System.Data.DataColumn("Doctype", GetType(String), Nothing, Global.System.Data.MappingType.Element) + MyBase.Columns.Add(Me.columnDoctype) + Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true)) + Me.columnGUID.AutoIncrement = true + Me.columnGUID.AllowDBNull = false + Me.columnGUID.ReadOnly = true + Me.columnGUID.Unique = true + Me.columnDOCTYPE_ID.AllowDBNull = false + Me.columnCHANGED_ACTION.AllowDBNull = false + Me.columnACTIVE.AllowDBNull = false + Me.columnACTIVE.DefaultValue = CType(true,Boolean) + Me.columnCOMMENT.MaxLength = 1000 + Me.columnADDED_WHO.AllowDBNull = false + Me.columnADDED_WHO.MaxLength = 30 + Me.columnCHANGED_WHO.MaxLength = 30 + Me.columnDoctype.AllowDBNull = false + Me.columnDoctype.MaxLength = 50 + End Sub + + _ + Public Function NewTBIDB_DOCTYPE_HANDLINGRow() As TBIDB_DOCTYPE_HANDLINGRow + Return CType(Me.NewRow,TBIDB_DOCTYPE_HANDLINGRow) + End Function + + _ + Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow + Return New TBIDB_DOCTYPE_HANDLINGRow(builder) + End Function + + _ + Protected Overrides Function GetRowType() As Global.System.Type + Return GetType(TBIDB_DOCTYPE_HANDLINGRow) + End Function + + _ + Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) + MyBase.OnRowChanged(e) + If (Not (Me.TBIDB_DOCTYPE_HANDLINGRowChangedEvent) Is Nothing) Then + RaiseEvent TBIDB_DOCTYPE_HANDLINGRowChanged(Me, New TBIDB_DOCTYPE_HANDLINGRowChangeEvent(CType(e.Row,TBIDB_DOCTYPE_HANDLINGRow), e.Action)) + End If + End Sub + + _ + Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) + MyBase.OnRowChanging(e) + If (Not (Me.TBIDB_DOCTYPE_HANDLINGRowChangingEvent) Is Nothing) Then + RaiseEvent TBIDB_DOCTYPE_HANDLINGRowChanging(Me, New TBIDB_DOCTYPE_HANDLINGRowChangeEvent(CType(e.Row,TBIDB_DOCTYPE_HANDLINGRow), e.Action)) + End If + End Sub + + _ + Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) + MyBase.OnRowDeleted(e) + If (Not (Me.TBIDB_DOCTYPE_HANDLINGRowDeletedEvent) Is Nothing) Then + RaiseEvent TBIDB_DOCTYPE_HANDLINGRowDeleted(Me, New TBIDB_DOCTYPE_HANDLINGRowChangeEvent(CType(e.Row,TBIDB_DOCTYPE_HANDLINGRow), e.Action)) + End If + End Sub + + _ + Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) + MyBase.OnRowDeleting(e) + If (Not (Me.TBIDB_DOCTYPE_HANDLINGRowDeletingEvent) Is Nothing) Then + RaiseEvent TBIDB_DOCTYPE_HANDLINGRowDeleting(Me, New TBIDB_DOCTYPE_HANDLINGRowChangeEvent(CType(e.Row,TBIDB_DOCTYPE_HANDLINGRow), e.Action)) + End If + End Sub + + _ + Public Sub RemoveTBIDB_DOCTYPE_HANDLINGRow(ByVal row As TBIDB_DOCTYPE_HANDLINGRow) + Me.Rows.Remove(row) + End Sub + + _ + Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType + Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() + Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence() + Dim ds As DSIDB_Stammdaten = New DSIDB_Stammdaten() + Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny() + any1.Namespace = "http://www.w3.org/2001/XMLSchema" + any1.MinOccurs = New Decimal(0) + any1.MaxOccurs = Decimal.MaxValue + any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax + sequence.Items.Add(any1) + Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny() + any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1" + any2.MinOccurs = New Decimal(1) + any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax + sequence.Items.Add(any2) + Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute() + attribute1.Name = "namespace" + attribute1.FixedValue = ds.Namespace + type.Attributes.Add(attribute1) + Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute() + attribute2.Name = "tableTypeName" + attribute2.FixedValue = "TBIDB_DOCTYPE_HANDLINGDataTable" + type.Attributes.Add(attribute2) + type.Particle = sequence + Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable + If xs.Contains(dsSchema.TargetNamespace) Then + Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream() + Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream() + Try + Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing + dsSchema.Write(s1) + Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator + Do While schemas.MoveNext + schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema) + s2.SetLength(0) + schema.Write(s2) + If (s1.Length = s2.Length) Then + s1.Position = 0 + s2.Position = 0 + + Do While ((s1.Position <> s1.Length) _ + AndAlso (s1.ReadByte = s2.ReadByte)) + + + Loop + If (s1.Position = s1.Length) Then + Return type + End If + End If + + Loop + Finally + If (Not (s1) Is Nothing) Then + s1.Close + End If + If (Not (s2) Is Nothing) Then + s2.Close + End If + End Try + End If + xs.Add(dsSchema) + Return type + End Function + End Class + ''' '''Represents strongly named DataRow class. ''' @@ -5759,6 +6192,16 @@ Partial Public Class DSIDB_Stammdaten Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_OS_CAT_ID")),TBIDB_OBJECT_STORERow()) End If End Function + + _ + Public Function GetTBIDB_DOCTYPE_HANDLINGRows() As TBIDB_DOCTYPE_HANDLINGRow() + If (Me.Table.ChildRelations("FK_TBIDB_DOCTYPE_HANDLING_CHNGACT") Is Nothing) Then + Return New TBIDB_DOCTYPE_HANDLINGRow(-1) {} + Else + Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_TBIDB_DOCTYPE_HANDLING_CHNGACT")),TBIDB_DOCTYPE_HANDLINGRow()) + End If + End Function End Class ''' @@ -5935,6 +6378,207 @@ Partial Public Class DSIDB_Stammdaten End Sub End Class + ''' + '''Represents strongly named DataRow class. + ''' + Partial Public Class TBIDB_DOCTYPE_HANDLINGRow + Inherits Global.System.Data.DataRow + + Private tableTBIDB_DOCTYPE_HANDLING As TBIDB_DOCTYPE_HANDLINGDataTable + + _ + Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) + MyBase.New(rb) + Me.tableTBIDB_DOCTYPE_HANDLING = CType(Me.Table,TBIDB_DOCTYPE_HANDLINGDataTable) + End Sub + + _ + Public Property GUID() As Integer + Get + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.GUIDColumn),Integer) + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.GUIDColumn) = value + End Set + End Property + + _ + Public Property DOCTYPE_ID() As Integer + Get + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.DOCTYPE_IDColumn),Integer) + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.DOCTYPE_IDColumn) = value + End Set + End Property + + _ + Public Property CHANGED_ACTION() As Integer + Get + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_ACTIONColumn),Integer) + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_ACTIONColumn) = value + End Set + End Property + + _ + Public Property ACTIVE() As Boolean + Get + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.ACTIVEColumn),Boolean) + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.ACTIVEColumn) = value + End Set + End Property + + _ + Public Property COMMENT() As String + Get + Try + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.COMMENTColumn),String) + Catch e As Global.System.InvalidCastException + Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte COMMENT in Tabelle TBIDB_DOCTYPE_HANDLING ist DBNull.", e) + End Try + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.COMMENTColumn) = value + End Set + End Property + + _ + Public Property ADDED_WHO() As String + Get + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.ADDED_WHOColumn),String) + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.ADDED_WHOColumn) = value + End Set + End Property + + _ + Public Property ADDED_WHEN() As Date + Get + Try + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.ADDED_WHENColumn),Date) + Catch e As Global.System.InvalidCastException + Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ADDED_WHEN in Tabelle TBIDB_DOCTYPE_HANDLING ist DBNull.", e) + End Try + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.ADDED_WHENColumn) = value + End Set + End Property + + _ + Public Property CHANGED_WHO() As String + Get + Try + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_WHOColumn),String) + Catch e As Global.System.InvalidCastException + Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHO in Tabelle TBIDB_DOCTYPE_HANDLING ist DBNull.", e) + End Try + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_WHOColumn) = value + End Set + End Property + + _ + Public Property CHANGED_WHEN() As Date + Get + Try + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_WHENColumn),Date) + Catch e As Global.System.InvalidCastException + Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHEN in Tabelle TBIDB_DOCTYPE_HANDLING ist DBNull.", e) + End Try + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_WHENColumn) = value + End Set + End Property + + _ + Public Property Doctype() As String + Get + Return CType(Me(Me.tableTBIDB_DOCTYPE_HANDLING.DoctypeColumn),String) + End Get + Set + Me(Me.tableTBIDB_DOCTYPE_HANDLING.DoctypeColumn) = value + End Set + End Property + + _ + Public Property TBIDB_CATALOGRow() As TBIDB_CATALOGRow + Get + Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_TBIDB_DOCTYPE_HANDLING_CHNGACT")),TBIDB_CATALOGRow) + End Get + Set + Me.SetParentRow(value, Me.Table.ParentRelations("FK_TBIDB_DOCTYPE_HANDLING_CHNGACT")) + End Set + End Property + + _ + Public Function IsCOMMENTNull() As Boolean + Return Me.IsNull(Me.tableTBIDB_DOCTYPE_HANDLING.COMMENTColumn) + End Function + + _ + Public Sub SetCOMMENTNull() + Me(Me.tableTBIDB_DOCTYPE_HANDLING.COMMENTColumn) = Global.System.Convert.DBNull + End Sub + + _ + Public Function IsADDED_WHENNull() As Boolean + Return Me.IsNull(Me.tableTBIDB_DOCTYPE_HANDLING.ADDED_WHENColumn) + End Function + + _ + Public Sub SetADDED_WHENNull() + Me(Me.tableTBIDB_DOCTYPE_HANDLING.ADDED_WHENColumn) = Global.System.Convert.DBNull + End Sub + + _ + Public Function IsCHANGED_WHONull() As Boolean + Return Me.IsNull(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_WHOColumn) + End Function + + _ + Public Sub SetCHANGED_WHONull() + Me(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_WHOColumn) = Global.System.Convert.DBNull + End Sub + + _ + Public Function IsCHANGED_WHENNull() As Boolean + Return Me.IsNull(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_WHENColumn) + End Function + + _ + Public Sub SetCHANGED_WHENNull() + Me(Me.tableTBIDB_DOCTYPE_HANDLING.CHANGED_WHENColumn) = Global.System.Convert.DBNull + End Sub + End Class + ''' '''Row event argument class ''' @@ -6258,6 +6902,42 @@ Partial Public Class DSIDB_Stammdaten End Get End Property End Class + + ''' + '''Row event argument class + ''' + _ + Public Class TBIDB_DOCTYPE_HANDLINGRowChangeEvent + Inherits Global.System.EventArgs + + Private eventRow As TBIDB_DOCTYPE_HANDLINGRow + + Private eventAction As Global.System.Data.DataRowAction + + _ + Public Sub New(ByVal row As TBIDB_DOCTYPE_HANDLINGRow, ByVal action As Global.System.Data.DataRowAction) + MyBase.New + Me.eventRow = row + Me.eventAction = action + End Sub + + _ + Public ReadOnly Property Row() As TBIDB_DOCTYPE_HANDLINGRow + Get + Return Me.eventRow + End Get + End Property + + _ + Public ReadOnly Property Action() As Global.System.Data.DataRowAction + Get + Return Me.eventAction + End Get + End Property + End Class End Class Namespace DSIDB_StammdatenTableAdapters @@ -8843,13 +9523,19 @@ Namespace DSIDB_StammdatenTableAdapters _ Private Sub InitCommandCollection() - Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} + Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {} Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(0).Connection = Me.Connection Me._commandCollection(0).CommandText = "SELECT GUID, CAT_TITLE, CAT_STRING, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CH"& _ "ANGED_WHEN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBIDB_CATALOG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @ID)" Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand() + Me._commandCollection(1).Connection = Me.Connection + Me._commandCollection(1).CommandText = "SELECT GUID, CAT_TITLE, CAT_STRING, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CH"& _ + "ANGED_WHEN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBIDB_CATALOG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (CAT_TITLE like 'DOCTYPE"& _ + "_CHANGED%')" + Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text End Sub _ + Public Overloads Overridable Function FillByDOCTYPE_CHANGED(ByVal dataTable As DSIDB_Stammdaten.TBIDB_CATALOGDataTable) As Integer + Me.Adapter.SelectCommand = Me.CommandCollection(1) + If (Me.ClearBeforeFill = true) Then + dataTable.Clear + End If + Dim returnValue As Integer = Me.Adapter.Fill(dataTable) + Return returnValue + End Function + + _ + Public Overloads Overridable Function GetDataByDOCTYPE_CHANGED() As DSIDB_Stammdaten.TBIDB_CATALOGDataTable + Me.Adapter.SelectCommand = Me.CommandCollection(1) + Dim dataTable As DSIDB_Stammdaten.TBIDB_CATALOGDataTable = New DSIDB_Stammdaten.TBIDB_CATALOGDataTable() + Me.Adapter.Fill(dataTable) + Return dataTable + End Function + _ @@ -9384,6 +10094,349 @@ Namespace DSIDB_StammdatenTableAdapters End Function End Class + ''' + '''Represents the connection and commands used to retrieve and save data. + ''' + _ + Partial Public Class TBIDB_DOCTYPE_HANDLINGTableAdapter + Inherits Global.System.ComponentModel.Component + + Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter + + Private _connection As Global.System.Data.SqlClient.SqlConnection + + Private _transaction As Global.System.Data.SqlClient.SqlTransaction + + Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand + + Private _clearBeforeFill As Boolean + + _ + Public Sub New() + MyBase.New + Me.ClearBeforeFill = true + End Sub + + _ + Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter + Get + If (Me._adapter Is Nothing) Then + Me.InitAdapter + End If + Return Me._adapter + End Get + End Property + + _ + Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection + Get + If (Me._connection Is Nothing) Then + Me.InitConnection + End If + Return Me._connection + End Get + Set + Me._connection = value + If (Not (Me.Adapter.InsertCommand) Is Nothing) Then + Me.Adapter.InsertCommand.Connection = value + End If + If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then + Me.Adapter.DeleteCommand.Connection = value + End If + If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then + Me.Adapter.UpdateCommand.Connection = value + End If + Dim i As Integer = 0 + Do While (i < Me.CommandCollection.Length) + If (Not (Me.CommandCollection(i)) Is Nothing) Then + CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value + End If + i = (i + 1) + Loop + End Set + End Property + + _ + Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction + Get + Return Me._transaction + End Get + Set + Me._transaction = value + Dim i As Integer = 0 + Do While (i < Me.CommandCollection.Length) + Me.CommandCollection(i).Transaction = Me._transaction + i = (i + 1) + Loop + If ((Not (Me.Adapter) Is Nothing) _ + AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then + Me.Adapter.DeleteCommand.Transaction = Me._transaction + End If + If ((Not (Me.Adapter) Is Nothing) _ + AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then + Me.Adapter.InsertCommand.Transaction = Me._transaction + End If + If ((Not (Me.Adapter) Is Nothing) _ + AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then + Me.Adapter.UpdateCommand.Transaction = Me._transaction + End If + End Set + End Property + + _ + Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand() + Get + If (Me._commandCollection Is Nothing) Then + Me.InitCommandCollection + End If + Return Me._commandCollection + End Get + End Property + + _ + Public Property ClearBeforeFill() As Boolean + Get + Return Me._clearBeforeFill + End Get + Set + Me._clearBeforeFill = value + End Set + End Property + + _ + Private Sub InitAdapter() + Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() + Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() + tableMapping.SourceTable = "Table" + tableMapping.DataSetTable = "TBIDB_DOCTYPE_HANDLING" + tableMapping.ColumnMappings.Add("GUID", "GUID") + tableMapping.ColumnMappings.Add("DOCTYPE_ID", "DOCTYPE_ID") + tableMapping.ColumnMappings.Add("CHANGED_ACTION", "CHANGED_ACTION") + tableMapping.ColumnMappings.Add("ACTIVE", "ACTIVE") + tableMapping.ColumnMappings.Add("COMMENT", "COMMENT") + tableMapping.ColumnMappings.Add("ADDED_WHO", "ADDED_WHO") + tableMapping.ColumnMappings.Add("ADDED_WHEN", "ADDED_WHEN") + tableMapping.ColumnMappings.Add("CHANGED_WHO", "CHANGED_WHO") + tableMapping.ColumnMappings.Add("CHANGED_WHEN", "CHANGED_WHEN") + tableMapping.ColumnMappings.Add("Doctype", "Doctype") + Me._adapter.TableMappings.Add(tableMapping) + Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand() + Me._adapter.DeleteCommand.Connection = Me.Connection + Me._adapter.DeleteCommand.CommandText = "DELETE FROM TBIDB_DOCTYPE_HANDLING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)" + Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text + Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) + Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand() + Me._adapter.InsertCommand.Connection = Me.Connection + Me._adapter.InsertCommand.CommandText = "INSERT INTO TBIDB_DOCTYPE_HANDLING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (DOCTYPE_ID, CHANGED"& _ + "_ACTION, ACTIVE, COMMENT, ADDED_WHO)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@DOCTYPE_ID,@CHANGED_ACTION"& _ + ",@ACTIVE,@COMMENT,@ADDED_WHO); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, DOCTYPE_ID, CHANGED_ACTION, ACTIVE"& _ + ", COMMENT, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBIDB_DOCTYPE_H"& _ + "ANDLING WHERE (GUID = SCOPE_IDENTITY())" + Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text + Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DOCTYPE_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "DOCTYPE_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_ACTION", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_ACTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand() + Me._adapter.UpdateCommand.Connection = Me.Connection + Me._adapter.UpdateCommand.CommandText = "UPDATE TBIDB_DOCTYPE_HANDLING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET DOCTYPE_ID = @DOCTYPE_ID,"& _ + " CHANGED_ACTION = @CHANGED_ACTION, ACTIVE = @ACTIVE, COMMENT = @COMMENT, CHANGED"& _ + "_WHO = @CHANGED_WHO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, DOCTYP"& _ + "E_ID, CHANGED_ACTION, ACTIVE, COMMENT, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANG"& _ + "ED_WHEN FROM TBIDB_DOCTYPE_HANDLING WHERE (GUID = @GUID)" + Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DOCTYPE_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "DOCTYPE_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_ACTION", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_ACTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) + End Sub + + _ + Private Sub InitConnection() + Me._connection = New Global.System.Data.SqlClient.SqlConnection() + Me._connection.ConnectionString = Global.DigitalData.GUIs.ZooFlow.Settings.Default.IDBConnectionStringDEFAULT + End Sub + + _ + Private Sub InitCommandCollection() + Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} + Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() + Me._commandCollection(0).Connection = Me.Connection + Me._commandCollection(0).CommandText = "SELECT TBIDB_DOCTYPE_HANDLING.GUID, TBIDB_DOCTYPE_HANDLING.DOCTYPE_ID, TBI"& _ + "DB_DOCTYPE_HANDLING.CHANGED_ACTION, TBIDB_DOCTYPE_HANDLING.ACTIVE, TBIDB_DOCTYPE"& _ + "_HANDLING.COMMENT, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBIDB_DOCTYPE_HANDLING.ADDED_WHO, "& _ + "TBIDB_DOCTYPE_HANDLING.ADDED_WHEN, TBIDB_DOCTYPE_HANDLING.CHANGED_WHO, TBIDB_DOC"& _ + "TYPE_HANDLING.CHANGED_WHEN, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" DD_ECM.dbo.TBDD_DOKUMENTA"& _ + "RT.BEZEICHNUNG AS Doctype"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBIDB_DOCTYPE_HANDLING INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _ + " DD_ECM.dbo.TBDD_DOKUMENTART ON TBIDB_DOCTYPE_HANDLING.DOC"& _ + "TYPE_ID = DD_ECM.dbo.TBDD_DOKUMENTART.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBIDB_DOCTYPE_HANDLING"& _ + ".DOCTYPE_ID = @DOCTYPE_ID)" + Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text + Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DOCTYPE_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "DOCTYPE_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + End Sub + + _ + Public Overloads Overridable Function Fill(ByVal dataTable As DSIDB_Stammdaten.TBIDB_DOCTYPE_HANDLINGDataTable, ByVal DOCTYPE_ID As Integer) As Integer + Me.Adapter.SelectCommand = Me.CommandCollection(0) + Me.Adapter.SelectCommand.Parameters(0).Value = CType(DOCTYPE_ID,Integer) + If (Me.ClearBeforeFill = true) Then + dataTable.Clear + End If + Dim returnValue As Integer = Me.Adapter.Fill(dataTable) + Return returnValue + End Function + + _ + Public Overloads Overridable Function GetData(ByVal DOCTYPE_ID As Integer) As DSIDB_Stammdaten.TBIDB_DOCTYPE_HANDLINGDataTable + Me.Adapter.SelectCommand = Me.CommandCollection(0) + Me.Adapter.SelectCommand.Parameters(0).Value = CType(DOCTYPE_ID,Integer) + Dim dataTable As DSIDB_Stammdaten.TBIDB_DOCTYPE_HANDLINGDataTable = New DSIDB_Stammdaten.TBIDB_DOCTYPE_HANDLINGDataTable() + Me.Adapter.Fill(dataTable) + Return dataTable + End Function + + _ + Public Overloads Overridable Function Update(ByVal dataTable As DSIDB_Stammdaten.TBIDB_DOCTYPE_HANDLINGDataTable) As Integer + Return Me.Adapter.Update(dataTable) + End Function + + _ + Public Overloads Overridable Function Update(ByVal dataSet As DSIDB_Stammdaten) As Integer + Return Me.Adapter.Update(dataSet, "TBIDB_DOCTYPE_HANDLING") + End Function + + _ + Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer + Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) + End Function + + _ + Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer + Return Me.Adapter.Update(dataRows) + End Function + + _ + Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer) As Integer + Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_GUID,Integer) + Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State + If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ + <> Global.System.Data.ConnectionState.Open) Then + Me.Adapter.DeleteCommand.Connection.Open + End If + Try + Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery + Return returnValue + Finally + If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then + Me.Adapter.DeleteCommand.Connection.Close + End If + End Try + End Function + + _ + Public Overloads Overridable Function Insert(ByVal DOCTYPE_ID As Integer, ByVal CHANGED_ACTION As Integer, ByVal ACTIVE As Boolean, ByVal COMMENT As String, ByVal ADDED_WHO As String) As Integer + Me.Adapter.InsertCommand.Parameters(0).Value = CType(DOCTYPE_ID,Integer) + Me.Adapter.InsertCommand.Parameters(1).Value = CType(CHANGED_ACTION,Integer) + Me.Adapter.InsertCommand.Parameters(2).Value = CType(ACTIVE,Boolean) + If (COMMENT Is Nothing) Then + Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value + Else + Me.Adapter.InsertCommand.Parameters(3).Value = CType(COMMENT,String) + End If + If (ADDED_WHO Is Nothing) Then + Throw New Global.System.ArgumentNullException("ADDED_WHO") + Else + Me.Adapter.InsertCommand.Parameters(4).Value = CType(ADDED_WHO,String) + End If + Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State + If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ + <> Global.System.Data.ConnectionState.Open) Then + Me.Adapter.InsertCommand.Connection.Open + End If + Try + Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery + Return returnValue + Finally + If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then + Me.Adapter.InsertCommand.Connection.Close + End If + End Try + End Function + + _ + Public Overloads Overridable Function Update(ByVal DOCTYPE_ID As Integer, ByVal CHANGED_ACTION As Integer, ByVal ACTIVE As Boolean, ByVal COMMENT As String, ByVal CHANGED_WHO As String, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer + Me.Adapter.UpdateCommand.Parameters(0).Value = CType(DOCTYPE_ID,Integer) + Me.Adapter.UpdateCommand.Parameters(1).Value = CType(CHANGED_ACTION,Integer) + Me.Adapter.UpdateCommand.Parameters(2).Value = CType(ACTIVE,Boolean) + If (COMMENT Is Nothing) Then + Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value + Else + Me.Adapter.UpdateCommand.Parameters(3).Value = CType(COMMENT,String) + End If + If (CHANGED_WHO Is Nothing) Then + Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value + Else + Me.Adapter.UpdateCommand.Parameters(4).Value = CType(CHANGED_WHO,String) + End If + Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Original_GUID,Integer) + Me.Adapter.UpdateCommand.Parameters(6).Value = CType(GUID,Integer) + Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State + If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ + <> Global.System.Data.ConnectionState.Open) Then + Me.Adapter.UpdateCommand.Connection.Open + End If + Try + Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery + Return returnValue + Finally + If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then + Me.Adapter.UpdateCommand.Connection.Close + End If + End Try + End Function + End Class + ''' '''TableAdapterManager is used to coordinate TableAdapters in the dataset to enable Hierarchical Update scenarios ''' @@ -9411,6 +10464,8 @@ Namespace DSIDB_StammdatenTableAdapters Private _tBIDB_CATALOGTableAdapter As TBIDB_CATALOGTableAdapter + Private _tBIDB_DOCTYPE_HANDLINGTableAdapter As TBIDB_DOCTYPE_HANDLINGTableAdapter + Private _backupDataSetBeforeUpdate As Boolean Private _connection As Global.System.Data.IDbConnection @@ -9524,6 +10579,20 @@ Namespace DSIDB_StammdatenTableAdapters End Set End Property + _ + Public Property TBIDB_DOCTYPE_HANDLINGTableAdapter() As TBIDB_DOCTYPE_HANDLINGTableAdapter + Get + Return Me._tBIDB_DOCTYPE_HANDLINGTableAdapter + End Get + Set + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter = value + End Set + End Property + _ Public Property BackupDataSetBeforeUpdate() As Boolean @@ -9571,6 +10640,10 @@ Namespace DSIDB_StammdatenTableAdapters AndAlso (Not (Me._tBIDB_CATALOGTableAdapter.Connection) Is Nothing)) Then Return Me._tBIDB_CATALOGTableAdapter.Connection End If + If ((Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter) Is Nothing) _ + AndAlso (Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Connection) Is Nothing)) Then + Return Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Connection + End If Return Nothing End Get Set @@ -9605,6 +10678,9 @@ Namespace DSIDB_StammdatenTableAdapters If (Not (Me._tBIDB_CATALOGTableAdapter) Is Nothing) Then count = (count + 1) End If + If (Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter) Is Nothing) Then + count = (count + 1) + End If Return count End Get End Property @@ -9679,6 +10755,15 @@ Namespace DSIDB_StammdatenTableAdapters allChangedRows.AddRange(updatedRows) End If End If + If (Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter) Is Nothing) Then + Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBIDB_DOCTYPE_HANDLING.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent) + updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows) + If ((Not (updatedRows) Is Nothing) _ + AndAlso (0 < updatedRows.Length)) Then + result = (result + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Update(updatedRows)) + allChangedRows.AddRange(updatedRows) + End If + End If Return result End Function @@ -9745,6 +10830,14 @@ Namespace DSIDB_StammdatenTableAdapters allAddedRows.AddRange(addedRows) End If End If + If (Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter) Is Nothing) Then + Dim addedRows() As Global.System.Data.DataRow = dataSet.TBIDB_DOCTYPE_HANDLING.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added) + If ((Not (addedRows) Is Nothing) _ + AndAlso (0 < addedRows.Length)) Then + result = (result + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Update(addedRows)) + allAddedRows.AddRange(addedRows) + End If + End If Return result End Function @@ -9755,6 +10848,14 @@ Namespace DSIDB_StammdatenTableAdapters Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _ Private Function UpdateDeletedRows(ByVal dataSet As DSIDB_Stammdaten, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer Dim result As Integer = 0 + If (Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter) Is Nothing) Then + Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBIDB_DOCTYPE_HANDLING.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted) + If ((Not (deletedRows) Is Nothing) _ + AndAlso (0 < deletedRows.Length)) Then + result = (result + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Update(deletedRows)) + allChangedRows.AddRange(deletedRows) + End If + End If If (Not (Me._tBIDB_OBJECT_STORETableAdapter) Is Nothing) Then Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBIDB_OBJECT_STORE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted) If ((Not (deletedRows) Is Nothing) _ @@ -9887,6 +10988,11 @@ Namespace DSIDB_StammdatenTableAdapters Throw New Global.System.ArgumentException("Für alle von einem TableAdapterManager verwalteten Instanzen von TableAdapter mus"& _ "s die gleiche Verbindungszeichenfolge verwendet werden.") End If + If ((Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter) Is Nothing) _ + AndAlso (Me.MatchTableAdapterConnection(Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Connection) = false)) Then + Throw New Global.System.ArgumentException("Für alle von einem TableAdapterManager verwalteten Instanzen von TableAdapter mus"& _ + "s die gleiche Verbindungszeichenfolge verwendet werden.") + End If Dim workConnection As Global.System.Data.IDbConnection = Me.Connection If (workConnection Is Nothing) Then Throw New Global.System.ApplicationException("TableAdapterManager enthält keine Verbindungsinformationen. Legen Sie jede TableA"& _ @@ -9984,6 +11090,15 @@ Namespace DSIDB_StammdatenTableAdapters adaptersWithAcceptChangesDuringUpdate.Add(Me._tBIDB_CATALOGTableAdapter.Adapter) End If End If + If (Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter) Is Nothing) Then + revertConnections.Add(Me._tBIDB_DOCTYPE_HANDLINGTableAdapter, Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Connection) + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection) + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction) + If Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Adapter.AcceptChangesDuringUpdate Then + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Adapter.AcceptChangesDuringUpdate = false + adaptersWithAcceptChangesDuringUpdate.Add(Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Adapter) + End If + End If ' '---- Perform updates ----------- ' @@ -10072,6 +11187,10 @@ Namespace DSIDB_StammdatenTableAdapters Me._tBIDB_CATALOGTableAdapter.Connection = CType(revertConnections(Me._tBIDB_CATALOGTableAdapter),Global.System.Data.SqlClient.SqlConnection) Me._tBIDB_CATALOGTableAdapter.Transaction = Nothing End If + If (Not (Me._tBIDB_DOCTYPE_HANDLINGTableAdapter) Is Nothing) Then + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Connection = CType(revertConnections(Me._tBIDB_DOCTYPE_HANDLINGTableAdapter),Global.System.Data.SqlClient.SqlConnection) + Me._tBIDB_DOCTYPE_HANDLINGTableAdapter.Transaction = Nothing + End If If (0 < adaptersWithAcceptChangesDuringUpdate.Count) Then Dim adapters((adaptersWithAcceptChangesDuringUpdate.Count) - 1) As Global.System.Data.Common.DataAdapter adaptersWithAcceptChangesDuringUpdate.CopyTo(adapters) diff --git a/GUIs.ZooFlow/DSIDB_Stammdaten.xsc b/GUIs.ZooFlow/DSIDB_Stammdaten.xsc index a99687e5..aeada491 100644 --- a/GUIs.ZooFlow/DSIDB_Stammdaten.xsc +++ b/GUIs.ZooFlow/DSIDB_Stammdaten.xsc @@ -39,5 +39,29 @@ + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/GUIs.ZooFlow/DSIDB_Stammdaten.xsd b/GUIs.ZooFlow/DSIDB_Stammdaten.xsd index ae0af13d..4ed8309a 100644 --- a/GUIs.ZooFlow/DSIDB_Stammdaten.xsd +++ b/GUIs.ZooFlow/DSIDB_Stammdaten.xsd @@ -563,7 +563,18 @@ SELECT GUID, CAT_TITLE, CAT_STRING, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_ - + + + + + SELECT GUID, CAT_TITLE, CAT_STRING, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN +FROM TBIDB_CATALOG +WHERE (CAT_TITLE like 'DOCTYPE_CHANGED%') + + + + + @@ -606,6 +617,79 @@ FROM TBIDB_ATTRIBUTE_TYPE + + + + + + DELETE FROM TBIDB_DOCTYPE_HANDLING +WHERE (GUID = @Original_GUID) + + + + + + + + INSERT INTO TBIDB_DOCTYPE_HANDLING + (DOCTYPE_ID, CHANGED_ACTION, ACTIVE, COMMENT, ADDED_WHO) +VALUES (@DOCTYPE_ID,@CHANGED_ACTION,@ACTIVE,@COMMENT,@ADDED_WHO); +SELECT GUID, DOCTYPE_ID, CHANGED_ACTION, ACTIVE, COMMENT, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBIDB_DOCTYPE_HANDLING WHERE (GUID = SCOPE_IDENTITY()) + + + + + + + + + + + + SELECT TBIDB_DOCTYPE_HANDLING.GUID, TBIDB_DOCTYPE_HANDLING.DOCTYPE_ID, TBIDB_DOCTYPE_HANDLING.CHANGED_ACTION, TBIDB_DOCTYPE_HANDLING.ACTIVE, TBIDB_DOCTYPE_HANDLING.COMMENT, + TBIDB_DOCTYPE_HANDLING.ADDED_WHO, TBIDB_DOCTYPE_HANDLING.ADDED_WHEN, TBIDB_DOCTYPE_HANDLING.CHANGED_WHO, TBIDB_DOCTYPE_HANDLING.CHANGED_WHEN, + DD_ECM.dbo.TBDD_DOKUMENTART.BEZEICHNUNG AS Doctype +FROM TBIDB_DOCTYPE_HANDLING INNER JOIN + DD_ECM.dbo.TBDD_DOKUMENTART ON TBIDB_DOCTYPE_HANDLING.DOCTYPE_ID = DD_ECM.dbo.TBDD_DOKUMENTART.GUID +WHERE (TBIDB_DOCTYPE_HANDLING.DOCTYPE_ID = @DOCTYPE_ID) + + + + + + + + UPDATE TBIDB_DOCTYPE_HANDLING +SET DOCTYPE_ID = @DOCTYPE_ID, CHANGED_ACTION = @CHANGED_ACTION, ACTIVE = @ACTIVE, COMMENT = @COMMENT, CHANGED_WHO = @CHANGED_WHO +WHERE (GUID = @Original_GUID); +SELECT GUID, DOCTYPE_ID, CHANGED_ACTION, ACTIVE, COMMENT, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBIDB_DOCTYPE_HANDLING WHERE (GUID = @GUID) + + + + + + + + + + + + + + + + + + + + + + + + + + + @@ -614,7 +698,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -653,7 +737,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -711,7 +795,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -768,7 +852,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -809,7 +893,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -875,7 +959,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -928,7 +1012,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -965,7 +1049,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -979,7 +1063,7 @@ FROM TBIDB_ATTRIBUTE_TYPE - + @@ -1017,6 +1101,46 @@ FROM TBIDB_ATTRIBUTE_TYPE + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + @@ -1051,11 +1175,16 @@ FROM TBIDB_ATTRIBUTE_TYPE + + + + - - + + + \ No newline at end of file diff --git a/GUIs.ZooFlow/DSIDB_Stammdaten.xss b/GUIs.ZooFlow/DSIDB_Stammdaten.xss index fff0519a..36c207fc 100644 --- a/GUIs.ZooFlow/DSIDB_Stammdaten.xss +++ b/GUIs.ZooFlow/DSIDB_Stammdaten.xss @@ -4,19 +4,21 @@ Changes to this file may cause incorrect behavior and will be lost if the code is regenerated. --> - + - - - - - - - - + + + + + + + + + + - + 677 @@ -28,7 +30,7 @@ - + 896 @@ -40,5 +42,21 @@ + + + + 913 + 629 + + + 913 + 747 + + + 634 + 747 + + + \ No newline at end of file diff --git a/GUIs.ZooFlow/My Project/licenses.licx b/GUIs.ZooFlow/My Project/licenses.licx index a45044a4..1962e32a 100644 --- a/GUIs.ZooFlow/My Project/licenses.licx +++ b/GUIs.ZooFlow/My Project/licenses.licx @@ -1,7 +1,11 @@ -DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.ButtonEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraTreeList.TreeList, DevExpress.XtraTreeList.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a diff --git a/GUIs.ZooFlow/ZooFlow.vbproj b/GUIs.ZooFlow/ZooFlow.vbproj index 5affd08c..1fce6115 100644 --- a/GUIs.ZooFlow/ZooFlow.vbproj +++ b/GUIs.ZooFlow/ZooFlow.vbproj @@ -98,9 +98,6 @@ ..\Controls.SnapPanel\obj\Debug\DigitalData.Controls.SnapPanel.dll - - ..\Modules.Base\Base\bin\Debug\DigitalData.Modules.Base.dll - P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\22_11_19\Independentsoft.Msg.dll @@ -155,6 +152,12 @@ + + frmAdmin_DoctypeConfig.vb + + + Form + frmAdmin_GlobixRelations.vb @@ -412,6 +415,9 @@ frmAdmin_ClipboardWatcher.vb + + frmAdmin_DoctypeConfig.vb + frmAdmin_GlobixRelations.vb @@ -602,6 +608,10 @@ {40384b94-1f94-4249-9a5a-d02e0b346738} GlobalIndexer + + {6ea0c51f-c2b1-4462-8198-3de0b32b74f8} + Base + {44982F9B-6116-44E2-85D0-F39650B1EF99} Config