MS

2020-04-20 14:36:46 +02:00
parent c6cb81c05b
commit 103619ebac
20 changed files with 1252 additions and 898 deletions
--- a/app/DD_PM_WINDREAM/frmControl_Detail.Designer.vb
+++ b/app/DD_PM_WINDREAM/frmControl_Detail.Designer.vb
@@ -34,7 +34,10 @@ Partial Class frmControl_Detail
        Dim ADDED_WHENLabel As System.Windows.Forms.Label
        Dim CHANGED_WHOLabel As System.Windows.Forms.Label
        Dim CHANGED_WHENLabel As System.Windows.Forms.Label
+        Dim SQL_COMMANDLabel As System.Windows.Forms.Label
        Me.SPALTENNAMETextBox = New System.Windows.Forms.TextBox()
+        Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
+        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
        Me.SPALTEN_HEADERTextBox = New System.Windows.Forms.TextBox()
        Me.SPALTENBREITETextBox = New System.Windows.Forms.TextBox()
        Me.GUIDTextBox = New System.Windows.Forms.TextBox()
@@ -46,8 +49,6 @@ Partial Class frmControl_Detail
        Me.btnDelete = New System.Windows.Forms.Button()
        Me.REGEX_MATCHTextBox = New System.Windows.Forms.TextBox()
        Me.Button1 = New System.Windows.Forms.Button()
-        Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
        Me.TBPM_CONTROL_TABLETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
        Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
        Me.REGEX_MESSAGE_DETextBox = New System.Windows.Forms.TextBox()
@@ -55,6 +56,9 @@ Partial Class frmControl_Detail
        Me.ADDED_WHENTextBox = New System.Windows.Forms.TextBox()
        Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox()
        Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox()
+        Me.SQL_COMMANDTextBox = New System.Windows.Forms.TextBox()
+        Me.CONNECTION_IDTextBox = New System.Windows.Forms.TextBox()
+        Me.btnSQLEdit = New System.Windows.Forms.Button()
        SPALTENNAMELabel = New System.Windows.Forms.Label()
        SPALTEN_HEADERLabel = New System.Windows.Forms.Label()
        SPALTENBREITELabel = New System.Windows.Forms.Label()
@@ -65,9 +69,10 @@ Partial Class frmControl_Detail
        ADDED_WHENLabel = New System.Windows.Forms.Label()
        CHANGED_WHOLabel = New System.Windows.Forms.Label()
        CHANGED_WHENLabel = New System.Windows.Forms.Label()
-        Me.StatusStrip1.SuspendLayout()
+        SQL_COMMANDLabel = New System.Windows.Forms.Label()
        CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.StatusStrip1.SuspendLayout()
        Me.SuspendLayout()
        '
        'SPALTENNAMELabel
@@ -90,12 +95,52 @@ Partial Class frmControl_Detail
        resources.ApplyResources(GUIDLabel, "GUIDLabel")
        GUIDLabel.Name = "GUIDLabel"
        '
+        'Label1
+        '
+        resources.ApplyResources(Label1, "Label1")
+        Label1.Name = "Label1"
+        '
+        'Label2
+        '
+        resources.ApplyResources(Label2, "Label2")
+        Label2.Name = "Label2"
+        '
+        'ADDED_WHOLabel
+        '
+        resources.ApplyResources(ADDED_WHOLabel, "ADDED_WHOLabel")
+        ADDED_WHOLabel.Name = "ADDED_WHOLabel"
+        '
+        'ADDED_WHENLabel
+        '
+        resources.ApplyResources(ADDED_WHENLabel, "ADDED_WHENLabel")
+        ADDED_WHENLabel.Name = "ADDED_WHENLabel"
+        '
+        'CHANGED_WHOLabel
+        '
+        resources.ApplyResources(CHANGED_WHOLabel, "CHANGED_WHOLabel")
+        CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
+        '
+        'CHANGED_WHENLabel
+        '
+        resources.ApplyResources(CHANGED_WHENLabel, "CHANGED_WHENLabel")
+        CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
+        '
        'SPALTENNAMETextBox
        '
        Me.SPALTENNAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "SPALTENNAME", True))
        resources.ApplyResources(Me.SPALTENNAMETextBox, "SPALTENNAMETextBox")
        Me.SPALTENNAMETextBox.Name = "SPALTENNAMETextBox"
        '
+        'TBPM_CONTROL_TABLEBindingSource
+        '
+        Me.TBPM_CONTROL_TABLEBindingSource.DataMember = "TBPM_CONTROL_TABLE"
+        Me.TBPM_CONTROL_TABLEBindingSource.DataSource = Me.DD_DMSLiteDataSet
+        '
+        'DD_DMSLiteDataSet
+        '
+        Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
+        Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
+        '
        'SPALTEN_HEADERTextBox
        '
        Me.SPALTEN_HEADERTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "SPALTEN_HEADER", True))
@@ -161,27 +206,12 @@ Partial Class frmControl_Detail
        resources.ApplyResources(Me.REGEX_MATCHTextBox, "REGEX_MATCHTextBox")
        Me.REGEX_MATCHTextBox.Name = "REGEX_MATCHTextBox"
        '
-        'Label1
-        '
-        resources.ApplyResources(Label1, "Label1")
-        Label1.Name = "Label1"
-        '
        'Button1
        '
        resources.ApplyResources(Me.Button1, "Button1")
        Me.Button1.Name = "Button1"
        Me.Button1.UseVisualStyleBackColor = True
        '
-        'TBPM_CONTROL_TABLEBindingSource
-        '
-        Me.TBPM_CONTROL_TABLEBindingSource.DataMember = "TBPM_CONTROL_TABLE"
-        Me.TBPM_CONTROL_TABLEBindingSource.DataSource = Me.DD_DMSLiteDataSet
-        '
-        'DD_DMSLiteDataSet
-        '
-        Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
-        Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
-        '
        'TBPM_CONTROL_TABLETableAdapter
        '
        Me.TBPM_CONTROL_TABLETableAdapter.ClearBeforeFill = True
@@ -190,6 +220,8 @@ Partial Class frmControl_Detail
        '
        Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
        Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
+        Me.TableAdapterManager.TBDD_EMAIL_TEMPLATETableAdapter = Nothing
+        Me.TableAdapterManager.TBDD_GUI_LANGUAGE_PHRASETableAdapter = Nothing
        Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
        Me.TableAdapterManager.TBPM_CONTROL_TABLETableAdapter = Me.TBPM_CONTROL_TABLETableAdapter
        Me.TableAdapterManager.TBPM_ERROR_LOGTableAdapter = Nothing
@@ -207,16 +239,6 @@ Partial Class frmControl_Detail
        resources.ApplyResources(Me.REGEX_MESSAGE_DETextBox, "REGEX_MESSAGE_DETextBox")
        Me.REGEX_MESSAGE_DETextBox.Name = "REGEX_MESSAGE_DETextBox"
        '
-        'Label2
-        '
-        resources.ApplyResources(Label2, "Label2")
-        Label2.Name = "Label2"
-        '
-        'ADDED_WHOLabel
-        '
-        resources.ApplyResources(ADDED_WHOLabel, "ADDED_WHOLabel")
-        ADDED_WHOLabel.Name = "ADDED_WHOLabel"
-        '
        'ADDED_WHOTextBox
        '
        Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "ADDED_WHO", True))
@@ -224,11 +246,6 @@ Partial Class frmControl_Detail
        Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
        Me.ADDED_WHOTextBox.ReadOnly = True
        '
-        'ADDED_WHENLabel
-        '
-        resources.ApplyResources(ADDED_WHENLabel, "ADDED_WHENLabel")
-        ADDED_WHENLabel.Name = "ADDED_WHENLabel"
-        '
        'ADDED_WHENTextBox
        '
        Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "ADDED_WHEN", True))
@@ -236,11 +253,6 @@ Partial Class frmControl_Detail
        Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
        Me.ADDED_WHENTextBox.ReadOnly = True
        '
-        'CHANGED_WHOLabel
-        '
-        resources.ApplyResources(CHANGED_WHOLabel, "CHANGED_WHOLabel")
-        CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
-        '
        'CHANGED_WHOTextBox
        '
        Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "CHANGED_WHO", True))
@@ -248,11 +260,6 @@ Partial Class frmControl_Detail
        Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
        Me.CHANGED_WHOTextBox.ReadOnly = True
        '
-        'CHANGED_WHENLabel
-        '
-        resources.ApplyResources(CHANGED_WHENLabel, "CHANGED_WHENLabel")
-        CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
-        '
        'CHANGED_WHENTextBox
        '
        Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "CHANGED_WHEN", True))
@@ -260,10 +267,41 @@ Partial Class frmControl_Detail
        Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
        Me.CHANGED_WHENTextBox.ReadOnly = True
        '
+        'SQL_COMMANDLabel
+        '
+        resources.ApplyResources(SQL_COMMANDLabel, "SQL_COMMANDLabel")
+        SQL_COMMANDLabel.Name = "SQL_COMMANDLabel"
+        '
+        'SQL_COMMANDTextBox
+        '
+        Me.SQL_COMMANDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "SQL_COMMAND", True))
+        resources.ApplyResources(Me.SQL_COMMANDTextBox, "SQL_COMMANDTextBox")
+        Me.SQL_COMMANDTextBox.Name = "SQL_COMMANDTextBox"
+        Me.SQL_COMMANDTextBox.ReadOnly = True
+        '
+        'CONNECTION_IDTextBox
+        '
+        Me.CONNECTION_IDTextBox.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.CONNECTION_IDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "CONNECTION_ID", True))
+        Me.CONNECTION_IDTextBox.ForeColor = System.Drawing.SystemColors.Control
+        resources.ApplyResources(Me.CONNECTION_IDTextBox, "CONNECTION_IDTextBox")
+        Me.CONNECTION_IDTextBox.Name = "CONNECTION_IDTextBox"
+        Me.CONNECTION_IDTextBox.ReadOnly = True
+        '
+        'btnSQLEdit
+        '
+        resources.ApplyResources(Me.btnSQLEdit, "btnSQLEdit")
+        Me.btnSQLEdit.Name = "btnSQLEdit"
+        Me.btnSQLEdit.UseVisualStyleBackColor = True
+        '
        'frmControl_Detail
        '
        resources.ApplyResources(Me, "$this")
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.Controls.Add(Me.btnSQLEdit)
+        Me.Controls.Add(Me.CONNECTION_IDTextBox)
+        Me.Controls.Add(SQL_COMMANDLabel)
+        Me.Controls.Add(Me.SQL_COMMANDTextBox)
        Me.Controls.Add(CHANGED_WHENLabel)
        Me.Controls.Add(Me.CHANGED_WHENTextBox)
        Me.Controls.Add(CHANGED_WHOLabel)
@@ -294,10 +332,10 @@ Partial Class frmControl_Detail
        Me.MinimizeBox = False
        Me.Name = "frmControl_Detail"
        Me.TopMost = True
-        Me.StatusStrip1.ResumeLayout(False)
-        Me.StatusStrip1.PerformLayout()
        CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.StatusStrip1.ResumeLayout(False)
+        Me.StatusStrip1.PerformLayout()
        Me.ResumeLayout(False)
        Me.PerformLayout

@@ -323,4 +361,7 @@ End Sub
    Friend WithEvents ADDED_WHENTextBox As TextBox
    Friend WithEvents CHANGED_WHOTextBox As TextBox
    Friend WithEvents CHANGED_WHENTextBox As TextBox
+    Friend WithEvents SQL_COMMANDTextBox As TextBox
+    Friend WithEvents CONNECTION_IDTextBox As TextBox
+    Friend WithEvents btnSQLEdit As Button
 End Class