MS

2022-05-17 17:08:14 +02:00
parent 11c7b4e5e9
commit 07b9bccd72
27 changed files with 2209 additions and 1241 deletions
--- a/GUIs.ZooFlow/Administration/Globix/frmAdmin_Globix.Designer.vb
+++ b/GUIs.ZooFlow/Administration/Globix/frmAdmin_Globix.Designer.vb
@@ -33,6 +33,7 @@ Partial Class frmAdmin_Globix
        Me.labelStatus = New DevExpress.XtraBars.BarStaticItem()
        Me.BarButtonNew = New DevExpress.XtraBars.BarButtonItem()
        Me.BarButtonItemDelete = New DevExpress.XtraBars.BarButtonItem()
+        Me.bsiStatus = 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()
@@ -106,7 +107,6 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem17 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem19 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem21 = New DevExpress.XtraLayout.LayoutControlItem()
-        Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem24 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem8 = New DevExpress.XtraLayout.LayoutControlItem()
@@ -122,6 +122,7 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem46 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem63 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem64 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.ListBoxAutoIndexe = New DevExpress.XtraEditors.ListBoxControl()
        Me.XtraTabPageRework = New DevExpress.XtraTab.XtraTabPage()
        Me.LayoutControlRework = New DevExpress.XtraLayout.LayoutControl()
@@ -154,15 +155,15 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem14 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem40 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem37 = New DevExpress.XtraLayout.LayoutControlItem()
-        Me.LayoutControlItem39 = New DevExpress.XtraLayout.LayoutControlItem()
-        Me.LayoutControlItem42 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.EmptySpaceItem4 = New DevExpress.XtraLayout.EmptySpaceItem()
        Me.ADDED_WHOAutoAttribut = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem41 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.CHANGED_WHOItemAutoAttribut = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem43 = New DevExpress.XtraLayout.LayoutControlItem()
-        Me.LayoutControlItem45 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.LayoutControlItem44 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem39 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem45 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem42 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.XtraTabPageDynamicFolder = New DevExpress.XtraTab.XtraTabPage()
        Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
        Me.cmbAllAttributes = New System.Windows.Forms.ComboBox()
@@ -242,7 +243,6 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem38 = New DevExpress.XtraLayout.LayoutControlItem()
        Me.TBGI_REGEX_DOCTYPETableAdapter = New DigitalData.GUIs.ZooFlow.GlobixDatasetTableAdapters.TBGI_REGEX_DOCTYPETableAdapter()
        Me.VWIDB_DOCTYPE_LANGUAGETableAdapter = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.VWIDB_DOCTYPE_LANGUAGETableAdapter()
-        Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
        SEQUENCELabel = New System.Windows.Forms.Label()
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TBDD_DOKUMENTARTBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -305,7 +305,6 @@ Partial Class frmAdmin_Globix
        CType(Me.LayoutControlItem17, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem19, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem21, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem24, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -321,6 +320,7 @@ Partial Class frmAdmin_Globix
        CType(Me.LayoutControlItem46, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem63, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem64, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.ListBoxAutoIndexe, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.XtraTabPageRework.SuspendLayout()
        CType(Me.LayoutControlRework, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -344,15 +344,15 @@ Partial Class frmAdmin_Globix
        CType(Me.LayoutControlItem14, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem40, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem37, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.LayoutControlItem39, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.LayoutControlItem42, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.EmptySpaceItem4, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.ADDED_WHOAutoAttribut, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem41, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.CHANGED_WHOItemAutoAttribut, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem43, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.LayoutControlItem45, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControlItem44, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem39, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem45, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem42, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.XtraTabPageDynamicFolder.SuspendLayout()
        CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.LayoutControl1.SuspendLayout()
@@ -426,9 +426,9 @@ Partial Class frmAdmin_Globix
        'RibbonControl1
        '
        Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonSaveExit, Me.BarButtonSave, Me.labelStatus, Me.BarButtonNew, Me.BarButtonItemDelete})
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonSaveExit, Me.BarButtonSave, Me.labelStatus, Me.BarButtonNew, Me.BarButtonItemDelete, Me.bsiStatus})
        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
-        Me.RibbonControl1.MaxItemId = 8
+        Me.RibbonControl1.MaxItemId = 9
        Me.RibbonControl1.Name = "RibbonControl1"
        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@@ -473,6 +473,21 @@ Partial Class frmAdmin_Globix
        Me.BarButtonItemDelete.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItemDelete.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
        Me.BarButtonItemDelete.Name = "BarButtonItemDelete"
        '
+        'bsiStatus
+        '
+        Me.bsiStatus.Caption = "ssdsdsdsdsdsdsd"
+        Me.bsiStatus.Id = 8
+        Me.bsiStatus.ImageOptions.SvgImage = CType(resources.GetObject("bsiStatus.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.bsiStatus.ItemAppearance.Normal.BackColor = System.Drawing.Color.Red
+        Me.bsiStatus.ItemAppearance.Normal.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.bsiStatus.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Black
+        Me.bsiStatus.ItemAppearance.Normal.Options.UseBackColor = True
+        Me.bsiStatus.ItemAppearance.Normal.Options.UseFont = True
+        Me.bsiStatus.ItemAppearance.Normal.Options.UseForeColor = True
+        Me.bsiStatus.Name = "bsiStatus"
+        Me.bsiStatus.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
+        Me.bsiStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
+        '
        'RibbonPage1
        '
        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
@@ -489,6 +504,8 @@ Partial Class frmAdmin_Globix
        '
        'RibbonStatusBar1
        '
+        Me.RibbonStatusBar1.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiStatus)
        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 752)
        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
@@ -618,7 +635,6 @@ Partial Class frmAdmin_Globix
        '
        'IDB_OBJECT_STORE_IDComboBox
        '
-        Me.IDB_OBJECT_STORE_IDComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "IDB_OBJECT_STORE_ID", True))
        Me.IDB_OBJECT_STORE_IDComboBox.DataBindings.Add(New System.Windows.Forms.Binding("SelectedValue", Me.TBDD_DOKUMENTARTBindingSource, "FOLDER_FOR_INDEX", True))
        Me.IDB_OBJECT_STORE_IDComboBox.DataSource = Me.VWIDB_OBJECT_STOREBindingSource
        Me.IDB_OBJECT_STORE_IDComboBox.DisplayMember = "Objectstore"
@@ -811,6 +827,7 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem4.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI Semibold", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.LayoutControlItem4.AppearanceItemCaption.Options.UseFont = True
        Me.LayoutControlItem4.Control = Me.TextEditDoctypeID
+        Me.LayoutControlItem4.Enabled = False
        Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 0)
        Me.LayoutControlItem4.Name = "LayoutControlItem4"
        Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
@@ -820,7 +837,7 @@ Partial Class frmAdmin_Globix
        '
        'LayoutControlItem25
        '
-        Me.LayoutControlItem25.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.LayoutControlItem25.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.LayoutControlItem25.AppearanceItemCaption.Options.UseFont = True
        Me.LayoutControlItem25.Control = Me.IDB_OBJECT_STORE_IDComboBox
        Me.LayoutControlItem25.Location = New System.Drawing.Point(0, 121)
@@ -1221,16 +1238,6 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem21.TextSize = New System.Drawing.Size(0, 0)
        Me.LayoutControlItem21.TextVisible = False
        '
-        'LayoutControlItem6
-        '
-        Me.LayoutControlItem6.Control = Me.btneditSQLmanIndex
-        Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 121)
-        Me.LayoutControlItem6.Name = "LayoutControlItem6"
-        Me.LayoutControlItem6.Size = New System.Drawing.Size(224, 36)
-        Me.LayoutControlItem6.Text = "SQL Abfrage bearbeiten"
-        Me.LayoutControlItem6.TextSize = New System.Drawing.Size(0, 0)
-        Me.LayoutControlItem6.TextVisible = False
-        '
        'LayoutControlItem24
        '
        Me.LayoutControlItem24.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -1249,6 +1256,7 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem2.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI Semibold", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.LayoutControlItem2.AppearanceItemCaption.Options.UseFont = True
        Me.LayoutControlItem2.Control = Me.GUIDTextBoxMANINDEX
+        Me.LayoutControlItem2.Enabled = False
        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)
@@ -1397,6 +1405,16 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem64.TextSize = New System.Drawing.Size(0, 0)
        Me.LayoutControlItem64.TextVisible = False
        '
+        'LayoutControlItem6
+        '
+        Me.LayoutControlItem6.Control = Me.btneditSQLmanIndex
+        Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 121)
+        Me.LayoutControlItem6.Name = "LayoutControlItem6"
+        Me.LayoutControlItem6.Size = New System.Drawing.Size(224, 36)
+        Me.LayoutControlItem6.Text = "SQL Abfrage bearbeiten"
+        Me.LayoutControlItem6.TextSize = New System.Drawing.Size(0, 0)
+        Me.LayoutControlItem6.TextVisible = False
+        '
        'ListBoxAutoIndexe
        '
        Me.ListBoxAutoIndexe.DataSource = Me.TBDD_INDEX_MANBindingSource
@@ -1493,7 +1511,6 @@ Partial Class frmAdmin_Globix
        Me.CONNECTION_IDTextBox1.Name = "CONNECTION_IDTextBox1"
        Me.CONNECTION_IDTextBox1.Size = New System.Drawing.Size(399, 20)
        Me.CONNECTION_IDTextBox1.TabIndex = 23
-        Me.CONNECTION_IDTextBox1.Visible = False
        '
        'SQL_RESULTTextBox1
        '
@@ -1504,14 +1521,13 @@ Partial Class frmAdmin_Globix
        Me.SQL_RESULTTextBox1.ReadOnly = True
        Me.SQL_RESULTTextBox1.Size = New System.Drawing.Size(423, 20)
        Me.SQL_RESULTTextBox1.TabIndex = 14
-        Me.SQL_RESULTTextBox1.Visible = False
        '
        'SQL_ACTIVECheckBox
        '
        Me.SQL_ACTIVECheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBDD_INDEX_AUTOMBindingSource, "SQL_ACTIVE", True))
        Me.SQL_ACTIVECheckBox.Location = New System.Drawing.Point(194, 116)
        Me.SQL_ACTIVECheckBox.Name = "SQL_ACTIVECheckBox"
-        Me.SQL_ACTIVECheckBox.Size = New System.Drawing.Size(98, 20)
+        Me.SQL_ACTIVECheckBox.Size = New System.Drawing.Size(163, 20)
        Me.SQL_ACTIVECheckBox.TabIndex = 12
        Me.SQL_ACTIVECheckBox.Text = "SQL Config?"
        Me.SQL_ACTIVECheckBox.UseVisualStyleBackColor = True
@@ -1593,9 +1609,9 @@ Partial Class frmAdmin_Globix
        Me.SimpleButton2.Appearance.Options.UseFont = True
        Me.SimpleButton2.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.editdatasource
        Me.SimpleButton2.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
-        Me.SimpleButton2.Location = New System.Drawing.Point(299, 113)
+        Me.SimpleButton2.Location = New System.Drawing.Point(364, 113)
        Me.SimpleButton2.Name = "SimpleButton2"
-        Me.SimpleButton2.Size = New System.Drawing.Size(800, 22)
+        Me.SimpleButton2.Size = New System.Drawing.Size(735, 22)
        Me.SimpleButton2.StyleController = Me.LayoutControlAutoIndexe
        Me.SimpleButton2.TabIndex = 13
        Me.SimpleButton2.Text = "SQL Designer"
@@ -1731,7 +1747,7 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem40.Location = New System.Drawing.Point(179, 101)
        Me.LayoutControlItem40.Name = "LayoutControlItem40"
        Me.LayoutControlItem40.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
-        Me.LayoutControlItem40.Size = New System.Drawing.Size(108, 30)
+        Me.LayoutControlItem40.Size = New System.Drawing.Size(173, 30)
        Me.LayoutControlItem40.Text = "SQL ACTIVE:"
        Me.LayoutControlItem40.TextSize = New System.Drawing.Size(0, 0)
        Me.LayoutControlItem40.TextVisible = False
@@ -1748,29 +1764,6 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem37.Text = "FILE-Parameter"
        Me.LayoutControlItem37.TextSize = New System.Drawing.Size(163, 13)
        '
-        'LayoutControlItem39
-        '
-        Me.LayoutControlItem39.Control = Me.SimpleButton2
-        Me.LayoutControlItem39.Location = New System.Drawing.Point(287, 101)
-        Me.LayoutControlItem39.Name = "LayoutControlItem39"
-        Me.LayoutControlItem39.Size = New System.Drawing.Size(804, 30)
-        Me.LayoutControlItem39.TextSize = New System.Drawing.Size(0, 0)
-        Me.LayoutControlItem39.TextVisible = False
-        '
-        'LayoutControlItem42
-        '
-        Me.LayoutControlItem42.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.LayoutControlItem42.AppearanceItemCaption.Options.UseFont = True
-        Me.LayoutControlItem42.Control = Me.SQL_RESULTTextBox1
-        Me.LayoutControlItem42.Location = New System.Drawing.Point(635, 191)
-        Me.LayoutControlItem42.Name = "LayoutControlItem42"
-        Me.LayoutControlItem42.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
-        Me.LayoutControlItem42.Size = New System.Drawing.Size(456, 56)
-        Me.LayoutControlItem42.Text = "SQL"
-        Me.LayoutControlItem42.TextAlignMode = DevExpress.XtraLayout.TextAlignModeItem.AutoSize
-        Me.LayoutControlItem42.TextSize = New System.Drawing.Size(18, 13)
-        Me.LayoutControlItem42.TextToControlDistance = 5
-        '
        'EmptySpaceItem4
        '
        Me.EmptySpaceItem4.AllowHotTrack = False
@@ -1831,6 +1824,26 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem43.Text = "Geändert wann"
        Me.LayoutControlItem43.TextSize = New System.Drawing.Size(163, 13)
        '
+        'LayoutControlItem44
+        '
+        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, 247)
+        Me.LayoutControlItem44.TextAlignMode = DevExpress.XtraLayout.TextAlignModeItem.AutoSize
+        Me.LayoutControlItem44.TextSize = New System.Drawing.Size(0, 0)
+        Me.LayoutControlItem44.TextToControlDistance = 0
+        Me.LayoutControlItem44.TextVisible = False
+        '
+        'LayoutControlItem39
+        '
+        Me.LayoutControlItem39.Control = Me.SimpleButton2
+        Me.LayoutControlItem39.Location = New System.Drawing.Point(352, 101)
+        Me.LayoutControlItem39.Name = "LayoutControlItem39"
+        Me.LayoutControlItem39.Size = New System.Drawing.Size(739, 30)
+        Me.LayoutControlItem39.TextSize = New System.Drawing.Size(0, 0)
+        Me.LayoutControlItem39.TextVisible = False
+        '
        'LayoutControlItem45
        '
        Me.LayoutControlItem45.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -1844,17 +1857,22 @@ Partial Class frmAdmin_Globix
        Me.LayoutControlItem45.TextAlignMode = DevExpress.XtraLayout.TextAlignModeItem.AutoSize
        Me.LayoutControlItem45.TextSize = New System.Drawing.Size(42, 13)
        Me.LayoutControlItem45.TextToControlDistance = 5
+        Me.LayoutControlItem45.Visibility = DevExpress.XtraLayout.Utils.LayoutVisibility.Never
        '
-        'LayoutControlItem44
+        'LayoutControlItem42
        '
-        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, 247)
-        Me.LayoutControlItem44.TextAlignMode = DevExpress.XtraLayout.TextAlignModeItem.AutoSize
-        Me.LayoutControlItem44.TextSize = New System.Drawing.Size(0, 0)
-        Me.LayoutControlItem44.TextToControlDistance = 0
-        Me.LayoutControlItem44.TextVisible = False
+        Me.LayoutControlItem42.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.LayoutControlItem42.AppearanceItemCaption.Options.UseFont = True
+        Me.LayoutControlItem42.Control = Me.SQL_RESULTTextBox1
+        Me.LayoutControlItem42.Location = New System.Drawing.Point(635, 191)
+        Me.LayoutControlItem42.Name = "LayoutControlItem42"
+        Me.LayoutControlItem42.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
+        Me.LayoutControlItem42.Size = New System.Drawing.Size(456, 56)
+        Me.LayoutControlItem42.Text = "SQL"
+        Me.LayoutControlItem42.TextAlignMode = DevExpress.XtraLayout.TextAlignModeItem.AutoSize
+        Me.LayoutControlItem42.TextSize = New System.Drawing.Size(18, 13)
+        Me.LayoutControlItem42.TextToControlDistance = 5
+        Me.LayoutControlItem42.Visibility = DevExpress.XtraLayout.Utils.LayoutVisibility.Never
        '
        'XtraTabPageDynamicFolder
        '
@@ -2676,11 +2694,6 @@ Partial Class frmAdmin_Globix
        '
        Me.VWIDB_DOCTYPE_LANGUAGETableAdapter.ClearBeforeFill = True
        '
-        'NotifyIcon1
-        '
-        Me.NotifyIcon1.Text = "NotifyIcon1"
-        Me.NotifyIcon1.Visible = True
-        '
        'frmAdmin_Globix
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -2755,7 +2768,6 @@ Partial Class frmAdmin_Globix
        CType(Me.LayoutControlItem17, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem19, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem21, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem24, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit()
@@ -2771,6 +2783,7 @@ Partial Class frmAdmin_Globix
        CType(Me.LayoutControlItem46, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem63, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem64, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.ListBoxAutoIndexe, System.ComponentModel.ISupportInitialize).EndInit()
        Me.XtraTabPageRework.ResumeLayout(False)
        CType(Me.LayoutControlRework, System.ComponentModel.ISupportInitialize).EndInit()
@@ -2794,15 +2807,15 @@ Partial Class frmAdmin_Globix
        CType(Me.LayoutControlItem14, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem40, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem37, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.LayoutControlItem39, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.LayoutControlItem42, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.EmptySpaceItem4, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.ADDED_WHOAutoAttribut, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem41, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.CHANGED_WHOItemAutoAttribut, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem43, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.LayoutControlItem45, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControlItem44, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem39, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem45, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem42, System.ComponentModel.ISupportInitialize).EndInit()
        Me.XtraTabPageDynamicFolder.ResumeLayout(False)
        CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.LayoutControl1.ResumeLayout(False)
@@ -3084,5 +3097,5 @@ Partial Class frmAdmin_Globix
    Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
    Friend WithEvents TextEditGeaendertWann As DevExpress.XtraEditors.TextEdit
    Friend WithEvents LayoutControlItem22 As DevExpress.XtraLayout.LayoutControlItem
-    Friend WithEvents NotifyIcon1 As NotifyIcon
+    Friend WithEvents bsiStatus As DevExpress.XtraBars.BarStaticItem
 End Class
--- a/GUIs.ZooFlow/Administration/Globix/frmAdmin_Globix.resx
+++ b/GUIs.ZooFlow/Administration/Globix/frmAdmin_Globix.resx
@@ -151,6 +151,27 @@
        YmFja2dyb3VuZD0ibmV3IDAgMCAzMiAzMiIgeG1sOnNwYWNlPSJwcmVzZXJ2ZSIgaWQ9IkxheWVyXzEi
        Pg0KICA8cG9seWdvbiBwb2ludHM9IjI1LDQgMTYsMTMgNyw0IDQsNyAxMywxNiA0LDI1IDcsMjggMTYs
        MTkgMjUsMjggMjgsMjUgMTksMTYgMjgsNyAiIGZpbGw9IiNEMjRDMkYiIC8+DQo8L3N2Zz4L
+</value>
+  </data>
+  <data name="bsiStatus.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABsDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
+        LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
+        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
+        MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
+        bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iQWJvdXQiPg0KICAgIDxwYXRoIGQ9
+        Ik0xNiwyQzguMywyLDIsOC4zLDIsMTZzNi4zLDE0LDE0LDE0czE0LTYuMywxNC0xNFMyMy43LDIsMTYs
+        MnogTTE2LDZjMS4xLDAsMiwwLjksMiwycy0wLjksMi0yLDJzLTItMC45LTItMiAgIFMxNC45LDYsMTYs
+        NnogTTIwLDI0aC04di0yaDJ2LThoLTJ2LTJoMmg0djEwaDJWMjR6IiBjbGFzcz0iQmx1ZSIgLz4NCiAg
+        PC9nPg0KPC9zdmc+Cw==
 </value>
  </data>
  <metadata name="TBDD_DOKUMENTARTBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
@@ -519,9 +540,6 @@
  <metadata name="VWIDB_DOCTYPE_LANGUAGETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>311, 134</value>
  </metadata>
-  <metadata name="NotifyIcon1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>599, 134</value>
-  </metadata>
  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>118</value>
  </metadata>
--- a/GUIs.ZooFlow/Administration/Globix/frmAdmin_Globix.vb
+++ b/GUIs.ZooFlow/Administration/Globix/frmAdmin_Globix.vb
@@ -140,7 +140,7 @@ Public Class frmAdmin_Globix
            TBDD_INDEX_AUTOMTableAdapter.Fill(GlobixDataset.TBDD_INDEX_AUTOM, PrimaryKey)

            AttributesAutomatic = GlobixDataset.TBDD_INDEX_AUTOM.Cast(Of DataRow).
-                ToDictionary(Of String, String)(Function(row) row.Item("NAME"), Function(row) row.Item("WD_INDEX"))
+                ToDictionary(Of String, String)(Function(row) row.Item("INDEXNAME"), Function(row) row.Item("INDEXNAME"))

        Catch ex As Exception
            MessageBox.Show(ex.Message)
@@ -162,11 +162,14 @@ Public Class frmAdmin_Globix
    End Sub
    Private Sub ResetMessages()
        labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+        bsiStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
    End Sub

-    Private Sub ShowStatus(Message As String)
+    Private Sub ShowStatus(Message As String, ocolor As Color)
        labelStatus.Caption = Message
-        labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
+        bsiStatus.Caption = $"{Message} - {Now.ToString}"
+        bsiStatus.ItemAppearance.Normal.BackColor = ocolor
+        bsiStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
    End Sub

    Public Function DeleteData() As Boolean Implements IAdminForm.DeleteData
@@ -207,9 +210,10 @@ Public Class frmAdmin_Globix

            oPage.IsInsert = False

-            ShowStatus($"{oPage.Name} saved!")
+            ShowStatus($"{oPage.Name} saved - {Now.ToString}", Color.DodgerBlue)
        Catch ex As Exception
            ShowErrorMessage(ex)
+            ShowStatus($"{ex.Message} saved - {Now.ToString}", Color.Red)
        End Try
        'Else
        '    ShowStatus("Keine Änderungen!")
@@ -227,9 +231,11 @@ Public Class frmAdmin_Globix
                TBDD_INDEX_MANBindingSource.EndEdit()
                TBDD_INDEX_MANTableAdapter.Update(Pages.Current.DataTable)
            End If
+
+            ShowStatus("Manual Attribut-Step saved", Color.DodgerBlue)
            Return True
        Catch ex As Exception
-            ShowBalloonTip(15000, "Error saving ManIndex", ex.Message, ToolTipIcon.Warning)
+            ShowStatus($"Error saving ManIndex {ex.Message} - {Now.ToString}", Color.Red)
            Return False
        End Try
    End Function
@@ -244,16 +250,16 @@ Public Class frmAdmin_Globix
                End If
                TBDD_INDEX_AUTOMBindingSource.EndEdit()
                TBDD_INDEX_AUTOMTableAdapter.Update(Pages.Current.DataTable)
+                ShowStatus($"Auto Attribut-Step saved", Color.DodgerBlue)
+
            End If
            Return True
        Catch ex As Exception
            Return False
-            ShowBalloonTip(15000, "Error saving AutoIndex", ex.Message, ToolTipIcon.Warning)
+            ShowStatus($"Error saving AutoIndex - {ex.Message}", Color.Red)
+
        End Try
    End Function
-    Sub ShowBalloonTip(pTime As Integer, tipTitle As String, tipText As String, tipIcon As ToolTipIcon)
-        NotifyIcon1.ShowBalloonTip(pTime, tipTitle, tipText, tipIcon)
-    End Sub
    Private Function Save_AutoSelect(oPage As ClassDetailPageManager.DetailPage) As Boolean
        Try
            TBGI_REGEX_DOCTYPEBindingSource.EndEdit()
@@ -265,9 +271,12 @@ Public Class frmAdmin_Globix
                End If
                TBGI_REGEX_DOCTYPEBindingSource.EndEdit()
                TBGI_REGEX_DOCTYPETableAdapter.Update(Pages.Current.DataTable)
+
+                ShowStatus($"Autoselect saved", Color.DodgerBlue)
            End If
            Return True
        Catch ex As Exception
+            ShowStatus($"Error saving autoselect - {ex.Message}", Color.Red)
            Return False
        End Try
    End Function
@@ -286,12 +295,15 @@ Public Class frmAdmin_Globix
                My.DatabaseECM.ExecuteNonQuery(oSQL)
                IsInsert = False
                TBDD_DOKUMENTARTTableAdapter.Fill(Me.GlobixDataset.TBDD_DOKUMENTART, PrimaryKey)
+                ShowStatus($"New FileFlow Profile {TextEditBezeichnung.Text} saved", Color.DodgerBlue)
                Return True
            Else
+                ShowStatus("Error Saving Fileflow Profile - Check the Log for further info", Color.Red)
                Return False
            End If
        Catch ex As Exception
            ShowErrorMessage(ex)
+            ShowStatus($"Error Saving Fileflow Profile {ex.Message}", Color.Red)
            Return False
        End Try

@@ -305,7 +317,12 @@ Public Class frmAdmin_Globix
                        ,[GEANDERTWER] = '{My.Application.User.UserName}',IDB_OBJECT_STORE_ID = {IDB_OBJECT_STORE_IDComboBox.SelectedValue} 
                        WHERE GUID = {TextEditDoctypeID.Text}"

-            Return My.DatabaseECM.ExecuteNonQuery(oUpd)
+            If My.DatabaseECM.ExecuteNonQuery(oUpd) = True Then
+                ShowStatus($"FileFlow Profile {TextEditBezeichnung.Text} saved", Color.DodgerBlue)
+                Return True
+            Else
+                Return False
+            End If

        Catch ex As Exception
            ShowErrorMessage(ex)
@@ -357,28 +374,26 @@ Public Class frmAdmin_Globix

    Private Sub btneditSQLmanIndex_Click(sender As Object, e As EventArgs) Handles btneditSQLmanIndex.Click
        If Save_manIndexe(Pages.Current) = True Then
-            Dim oSQLbefore = SQL_RESULTTextBox.Text
-            Dim oForm2 As New frmSQLEditor(My.LogConfig, My.DatabaseECM) With {
-                .SQLCommand = SQL_RESULTTextBox.Text,
-                .SQLConnection = CONNECTION_IDTextBox.Text,
-                .PlaceholdersManual = AttributesManual
-            }
-            oForm2.ShowDialog()
+            Try
+                Dim oSQLbefore = SQL_RESULTTextBox.Text
+                Dim oForm2 As New frmSQLEditor(My.LogConfig, My.DatabaseECM) With {
+                    .SQLCommand = SQL_RESULTTextBox.Text,
+                    .SQLConnection = IIf(CONNECTION_IDTextBox.Text = "", 1, CONNECTION_IDTextBox.Text),
+                    .PlaceholdersManual = AttributesManual
+                }
+                oForm2.ShowDialog()

-            'Dim oForm As New frmSQLDesigner() With {
-            '    .SQLCommand = SQL_RESULTTextBox.Text,
-            '    .DesignType = "GI_ATTRIBUTE_MAN",
-            '    .ConnectionID = CONNECTION_IDTextBox.Text
-            '}
-            'Dim oResult = oForm.ShowDialog()
+                If oForm2.DialogResult = DialogResult.OK And oSQLbefore <> oForm2.SQLCommand Then
+                    CONNECTION_IDTextBox.Text = oForm2.SQLConnection
+                    SQL_RESULTTextBox.Text = oForm2.SQLCommand
+                    'TBDD_INDEX_MANTableAdapter.Adapter.UpdateCommand.Parameters("@SQL_RESULT").Value = oForm.SQLCommand
+                    'TBDD_INDEX_MANTableAdapter.Adapter.UpdateCommand.Parameters("@CONNECTION_ID").Value = oForm.ConnectionID
+                    TextEditChangedWho_ManIndex.Text = My.Application.User.UserName
+                End If
+            Catch ex As Exception
+                System.Windows.Forms.MessageBox.Show(ex.Message)
+            End Try

-            If oSQLbefore <> oForm2.SQLCommand Then
-                CONNECTION_IDTextBox.Text = oForm2.SQLConnection
-                SQL_RESULTTextBox.Text = oForm2.SQLCommand
-                'TBDD_INDEX_MANTableAdapter.Adapter.UpdateCommand.Parameters("@SQL_RESULT").Value = oForm.SQLCommand
-                'TBDD_INDEX_MANTableAdapter.Adapter.UpdateCommand.Parameters("@CONNECTION_ID").Value = oForm.ConnectionID
-                TextEditChangedWho_ManIndex.Text = My.Application.User.UserName
-            End If

        End If
    End Sub
@@ -431,29 +446,21 @@ Public Class frmAdmin_Globix

    Private Sub SimpleButton2_Click_1(sender As Object, e As EventArgs) Handles SimpleButton2.Click
        If Save_AutoIndexe(Pages.Current) = True Then
-            Dim oSQLbefore = SQL_RESULTTextBox.Text
+            Dim oSQLbefore = SQL_RESULTTextBox1.Text
            Dim oForm2 As New frmSQLEditor(My.LogConfig, My.DatabaseECM) With {
-                .SQLCommand = SQL_RESULTTextBox.Text,
-                .SQLConnection = CONNECTION_IDTextBox.Text,
-                .PlaceholdersAutomatic = AttributesAutomatic
+                .SQLCommand = SQL_RESULTTextBox1.Text,
+                .SQLConnection = IIf(CONNECTION_IDTextBox1.Text = "", 1, CONNECTION_IDTextBox1.Text),
+                .PlaceholdersAutomatic = AttributesAutomatic,
+                .PlaceholdersManual = AttributesManual
            }
            oForm2.ShowDialog()

-            'Dim oForm As New frmSQLDesigner() With {
-            '        .SQLCommand = oSQLbefore, .DesignType = "GI_ATTRIBUTE_AUTO",
-            '        .ConnectionID = CONNECTION_IDTextBox1.Text,
-            '        .AutoAttributID = GUIDTextBoxAutoAttribute.Text
-            '    }
-            'Dim oResult = oForm.ShowDialog()
-            If oSQLbefore <> oForm2.SQLCommand Then
+            If oForm2.DialogResult = DialogResult.OK And oSQLbefore <> oForm2.SQLCommand Then
                CONNECTION_IDTextBox1.Text = oForm2.SQLConnection
                SQL_RESULTTextBox1.Text = oForm2.SQLCommand
-                'TBDD_INDEX_MANTableAdapter.Adapter.UpdateCommand.Parameters("@SQL_RESULT").Value = oForm.SQLCommand
-                'TBDD_INDEX_MANTableAdapter.Adapter.UpdateCommand.Parameters("@CONNECTION_ID").Value = oForm.ConnectionID
+                SQL_ACTIVECheckBox.Checked = 1
                CHANGED_WHOTextEditAutoAttribut.Text = My.Application.User.UserName
            End If
-        Else
-
        End If
    End Sub

@@ -655,7 +662,7 @@ Public Class frmAdmin_Globix

            oPage.IsInsert = False

-            ShowStatus($"{oPage.Name} deleted!")
+            ' ShowStatus($"{oPage.Name} deleted!")
        Catch ex As Exception
            ShowErrorMessage(ex)
        End Try