MS2
This commit is contained in:
SchreiberM
parent
9d03e60f4c
commit
71fdef8192
@ -2625,9 +2625,6 @@ Public Class frmConstructor_Main
|
||||
grvwGrid.Columns.Item("Record-ID").Visible = False
|
||||
grvwGrid.Columns.Item("Form-ID").Visible = False
|
||||
grvwGrid.Columns.Item("ROW_COLOR").Visible = False
|
||||
|
||||
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in HideColumns:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
@ -4921,9 +4918,7 @@ Public Class frmConstructor_Main
|
||||
End Sub
|
||||
|
||||
Private Sub DatenNeuLadenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DatenNeuLadenToolStripMenuItem.Click
|
||||
DisableEditMode()
|
||||
Load_Entity_Data(ACT_EBENE)
|
||||
RECORD_CHANGED = False
|
||||
Load_Tree_View_Data()
|
||||
End Sub
|
||||
|
||||
Private Sub AnwendungscacheFreigebenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AnwendungscacheFreigebenToolStripMenuItem.Click
|
||||
@ -5300,8 +5295,11 @@ Public Class frmConstructor_Main
|
||||
Next
|
||||
MASS_COLUMN_LIST = collist
|
||||
MASS_RECORD_CHANGE = list
|
||||
CURRENT_FORM_ID =
|
||||
Save_Grid_Layout()
|
||||
frmMass_Change.ShowDialog()
|
||||
If SUCCESSFULL = True Then
|
||||
Load_Tree_View_Data()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in MassChange Collector:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
@ -96,7 +96,7 @@ Partial Class frmMass_Change
|
||||
'btncancel
|
||||
'
|
||||
resources.ApplyResources(Me.btncancel, "btncancel")
|
||||
Me.btncancel.Image = Global.DD_Record_Organiser.My.Resources.Resources.cancel1
|
||||
Me.btncancel.Image = Global.DD_Record_Organiser.My.Resources.Resources.Close_16xLG
|
||||
Me.btncancel.Name = "btncancel"
|
||||
Me.btncancel.UseVisualStyleBackColor = True
|
||||
'
|
||||
@ -104,12 +104,13 @@ Partial Class frmMass_Change
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.btncancel)
|
||||
Me.Controls.Add(Me.btnRefresh)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frmMass_Change"
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
|
||||
@ -133,20 +133,20 @@
|
||||
<data name="GroupBox1.Text" xml:space="preserve">
|
||||
<value>1. Choose Column:</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Text" xml:space="preserve">
|
||||
<value>2. Value Input:</value>
|
||||
</data>
|
||||
<data name="Label5.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>71, 17</value>
|
||||
</data>
|
||||
<data name="Label5.Text" xml:space="preserve">
|
||||
<value>New value:</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Text" xml:space="preserve">
|
||||
<value>2. Value Input:</value>
|
||||
</data>
|
||||
<data name="btnRefresh.Text" xml:space="preserve">
|
||||
<value>Change values</value>
|
||||
</data>
|
||||
<data name="btncancel.Text" xml:space="preserve">
|
||||
<value>Cancel</value>
|
||||
<value>Close</value>
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
|
||||
@ -117,17 +117,23 @@
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name=">>btnRefresh.Name" xml:space="preserve">
|
||||
<value>btnRefresh</value>
|
||||
</data>
|
||||
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="lblCount.AutoSize" type="System.Boolean, mscorlib">
|
||||
<data name="Label5.AutoSize" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
|
||||
<value>625, 176</value>
|
||||
</data>
|
||||
<data name="lblCount.AutoSize" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="lblCount.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>406, 50</value>
|
||||
</data>
|
||||
<data name=">>cmbColumn.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="Label5.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 27</value>
|
||||
</data>
|
||||
@ -159,14 +165,17 @@
|
||||
<data name=">>cmbColumn.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name="btncancel.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.Name" xml:space="preserve">
|
||||
<value>GroupBox2</value>
|
||||
</data>
|
||||
<data name=">>Label1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
<data name=">>GroupBox2.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="lblHinweis.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
<data name=">>btncancel.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="lblHinweis.AutoSize" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
@ -192,9 +201,6 @@
|
||||
<data name="lblHinweis.Text" xml:space="preserve">
|
||||
<value>Bitte wählen Sie die Spalte, deren Werte Sie überschreiben wollen?</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Text" xml:space="preserve">
|
||||
<value>2. Werteingabe:</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.Name" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
@ -216,117 +222,12 @@
|
||||
<data name=">>btnRefresh.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
<data name="lblHinweis.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="Label5.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name=">>txtNewValue.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="btnRefresh.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>118, 136</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name="txtNewValue.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>364, 25</value>
|
||||
</data>
|
||||
<data name="btncancel.Text" xml:space="preserve">
|
||||
<value>Abbruch</value>
|
||||
</data>
|
||||
<data name="btncancel.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>15, 136</value>
|
||||
</data>
|
||||
<data name="cmbColumn.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>118, 43</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Top</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 9.75pt</value>
|
||||
</data>
|
||||
<data name=">>cmbColumn.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>lblCount.Name" xml:space="preserve">
|
||||
<value>lblCount</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name=">>cmbColumn.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name=">>lblCount.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>Label1.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btncancel.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt</value>
|
||||
</data>
|
||||
<data name="lblHinweis.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>395, 17</value>
|
||||
</data>
|
||||
<data name="Label1.Text" xml:space="preserve">
|
||||
<value>Spaltenauswahl:</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Label5.Name" xml:space="preserve">
|
||||
<value>Label5</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Text" xml:space="preserve">
|
||||
<value>1. Zusammenfassung und Auswahl Spalte:</value>
|
||||
</data>
|
||||
<data name="Label5.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>79, 17</value>
|
||||
</data>
|
||||
<data name=">>lblHinweis.Name" xml:space="preserve">
|
||||
<value>lblHinweis</value>
|
||||
</data>
|
||||
<data name="Label5.AutoSize" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="btncancel.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name=">>cmbColumn.Name" xml:space="preserve">
|
||||
<value>cmbColumn</value>
|
||||
</data>
|
||||
<data name=">>btncancel.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>lblCount.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>625, 73</value>
|
||||
</data>
|
||||
<data name="btnRefresh.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 9.75pt, style=Bold</value>
|
||||
</data>
|
||||
<data name=">>btnRefresh.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="Label1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 46</value>
|
||||
</data>
|
||||
<data name=">>txtNewValue.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>Label5.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAgAEBAAAAEACABoBQAAhgAAABAQAAABACAAaAQAAO4FAAAYGAAAAQAIAMgGAABWCgAAGBgAAAEA
|
||||
@ -776,15 +677,129 @@
|
||||
AAAAAQAAgAAAAAABAADAAAAAAAMAAP///////wAA////////AAD///////8AAP///////wAA
|
||||
</value>
|
||||
</data>
|
||||
<data name=">>txtNewValue.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Label1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="btnRefresh.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>118, 136</value>
|
||||
</data>
|
||||
<data name="cmbColumn.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="txtNewValue.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>364, 25</value>
|
||||
</data>
|
||||
<data name="btncancel.Text" xml:space="preserve">
|
||||
<value>Schliessen</value>
|
||||
</data>
|
||||
<data name="txtNewValue.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="cmbColumn.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>118, 43</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Top</value>
|
||||
</data>
|
||||
<data name=">>cmbColumn.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>lblCount.Name" xml:space="preserve">
|
||||
<value>lblCount</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="btnRefresh.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name=">>lblCount.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>Label1.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btncancel.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt</value>
|
||||
</data>
|
||||
<data name="lblHinweis.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>395, 17</value>
|
||||
</data>
|
||||
<data name="Label1.Text" xml:space="preserve">
|
||||
<value>Spaltenauswahl:</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Text" xml:space="preserve">
|
||||
<value>1. Zusammenfassung und Auswahl Spalte:</value>
|
||||
</data>
|
||||
<data name="Label5.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>79, 17</value>
|
||||
</data>
|
||||
<data name=">>lblHinweis.Name" xml:space="preserve">
|
||||
<value>lblHinweis</value>
|
||||
</data>
|
||||
<data name=">>Label5.Name" xml:space="preserve">
|
||||
<value>Label5</value>
|
||||
</data>
|
||||
<data name="btnRefresh.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 9.75pt, style=Bold</value>
|
||||
</data>
|
||||
<data name=">>cmbColumn.Name" xml:space="preserve">
|
||||
<value>cmbColumn</value>
|
||||
</data>
|
||||
<data name=">>btnRefresh.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name=">>lblCount.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>625, 73</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 9.75pt</value>
|
||||
</data>
|
||||
<data name=">>btnRefresh.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 73</value>
|
||||
</data>
|
||||
<data name=">>txtNewValue.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>Label5.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Text" xml:space="preserve">
|
||||
<value>2. Werteingabe:</value>
|
||||
</data>
|
||||
<data name="btncancel.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>15, 136</value>
|
||||
</data>
|
||||
<data name=">>$this.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="Label1.AutoSize" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="btncancel.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>$this.Name" xml:space="preserve">
|
||||
<value>frmMass_Change</value>
|
||||
</data>
|
||||
<data name=">>lblHinweis.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
@ -794,15 +809,6 @@
|
||||
<data name="$this.Text" xml:space="preserve">
|
||||
<value>Massen Änderung</value>
|
||||
</data>
|
||||
<data name="GroupBox1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="lblCount.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>38, 13</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 73</value>
|
||||
</data>
|
||||
<data name=">>txtNewValue.Name" xml:space="preserve">
|
||||
<value>txtNewValue</value>
|
||||
</data>
|
||||
@ -812,6 +818,9 @@
|
||||
<data name="GroupBox2.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>625, 57</value>
|
||||
</data>
|
||||
<data name=">>btnRefresh.Name" xml:space="preserve">
|
||||
<value>btnRefresh</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 9.75pt</value>
|
||||
</data>
|
||||
@ -830,38 +839,29 @@
|
||||
<data name="lblCount.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="cmbColumn.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name=">>Label5.Parent" xml:space="preserve">
|
||||
<value>GroupBox2</value>
|
||||
</data>
|
||||
<data name="btnRefresh.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>6</value>
|
||||
</data>
|
||||
<data name="txtNewValue.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
<data name="Label1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 46</value>
|
||||
</data>
|
||||
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
|
||||
<value>625, 176</value>
|
||||
<data name="GroupBox1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>btnRefresh.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name=">>$this.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
<data name=">>$this.Name" xml:space="preserve">
|
||||
<value>frmMass_Change</value>
|
||||
</data>
|
||||
<data name=">>Label5.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name=">>btncancel.Name" xml:space="preserve">
|
||||
<value>btncancel</value>
|
||||
</data>
|
||||
<data name="btnRefresh.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
<data name="lblCount.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>38, 13</value>
|
||||
</data>
|
||||
<data name="btnRefresh.Text" xml:space="preserve">
|
||||
<value>Werte ändern</value>
|
||||
|
||||
@ -10,7 +10,11 @@
|
||||
lblCount.Text = msg & MASS_RECORD_CHANGE.Count
|
||||
cmbColumn.Items.Clear()
|
||||
For Each Str As String In MASS_COLUMN_LIST
|
||||
cmbColumn.Items.Add(Str)
|
||||
If Str.ToLower = "addedwho" Or Str.ToLower = "changedwho" Or Str.ToLower = "addedwhen" Or Str.ToLower = "changedwhen" Then
|
||||
Continue For
|
||||
Else
|
||||
cmbColumn.Items.Add(Str)
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in load form:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
@ -18,7 +22,6 @@
|
||||
|
||||
End Sub
|
||||
Private Sub btncancel_Click(sender As Object, e As EventArgs) Handles btncancel.Click
|
||||
SUCCESSFULL = False
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
@ -29,15 +32,27 @@
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Are You sure You want to execute this mass change?"
|
||||
End If
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim result As MsgBoxResult
|
||||
result = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Dim val = txtNewValue.Text
|
||||
Dim SQL = String.Format("SELECT GUID FROM TBPMO_CONTROL WHERE COL_NAME = '{0}' AND FORM_ID = {1}", cmbColumn.Text, CURRENT_FORM_ID)
|
||||
Dim control_Id = ClassDatabase.Execute_Scalar(SQL)
|
||||
If Not IsNothing(control_Id) Then
|
||||
If control_Id > 0 Then
|
||||
SQL = String.Format("SELECT CONTROL_TYPE_ID FROM TBPMO_CONTROL WHERE GUID = {0}", control_Id)
|
||||
Dim control_type_ID = ClassDatabase.Execute_Scalar(SQL)
|
||||
If control_type_ID = 4 Then
|
||||
|
||||
Try
|
||||
val = CDate(val)
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Converting value '" & val & "' to date", MsgBoxStyle.Critical)
|
||||
Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End Try
|
||||
End If
|
||||
If control_type_ID = 7 Or control_type_ID = 12 Or control_type_ID = 14 Then
|
||||
msg = "Achtung: für diese Spalte existieren mehrere Werte. Diese Werte werden gelöscht." & vbNewLine & "Wollen Sie dennoch fortfahren?"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
@ -56,21 +71,25 @@
|
||||
End If
|
||||
End If
|
||||
Try
|
||||
Dim err As Boolean = False
|
||||
For Each Record As String In MASS_RECORD_CHANGE
|
||||
SQL = String.Format("SELECT GUID FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = {0} AND RECORD_ID = {1}", control_Id, CInt(Record))
|
||||
Dim ex_GUID = ClassDatabase.Execute_Scalar(SQL)
|
||||
|
||||
|
||||
If Not IsNothing(ex_GUID) Then
|
||||
SQL = String.Format("UPDATE TBPMO_CONTROL_VALUE SET VALUE = '{0}',CHANGED_WHO = '{1}' WHERE GUID = {2}", txtNewValue.Text, Environment.UserName, ex_GUID)
|
||||
SQL = String.Format("UPDATE TBPMO_CONTROL_VALUE SET VALUE = '{0}',CHANGED_WHO = '{1}' WHERE GUID = {2}", val, Environment.UserName, ex_GUID)
|
||||
If ClassDatabase.Execute_non_Query(SQL) = False Then
|
||||
MsgBox("Error in updating the value for Record: " & Record & vbNewLine & "Please check the logfile.", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
Else
|
||||
SQL = String.Format("INSERT INTO TBPMO_CONTROL_VALUE (CONTROL_ID, RECORD_ID, VALUE, ADDED_WHO) VALUES ({0},{1},'{2}','{3}')", control_Id, CInt(Record), txtNewValue.Text, Environment.UserName)
|
||||
SQL = String.Format("INSERT INTO TBPMO_CONTROL_VALUE (CONTROL_ID, RECORD_ID, VALUE, ADDED_WHO) VALUES ({0},{1},'{2}','{3}')", control_Id, CInt(Record), val, Environment.UserName)
|
||||
If ClassDatabase.Execute_non_Query(SQL) = False Then
|
||||
MsgBox("Error in inserting the value for Record: " & Record & vbNewLine & "Please check the logfile.", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
SUCCESSFULL = True
|
||||
msg = "Alle Änderungen wurden ausgeführt!"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "All changes were executed!"
|
||||
@ -79,8 +98,11 @@
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Getting record to be changed:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
Else
|
||||
MsgBox("No defined column found! (1)", MsgBoxStyle.Information)
|
||||
End If
|
||||
Else
|
||||
MsgBox("No defined column found! (2)", MsgBoxStyle.Information)
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
@ -88,5 +110,6 @@
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Execute mass change:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Cursor = Cursors.Default
|
||||
End Sub
|
||||
End Class
|
||||
Loading…
x
Reference in New Issue
Block a user