CBAM, VERAG Cust

2026-01-07 22:29:08 +01:00
parent 6b44360ed4
commit 355058cefd
8 changed files with 247 additions and 64 deletions
--- a/UID/usrctlProcedures.Designer.vb
+++ b/UID/usrctlProcedures.Designer.vb
@@ -108,14 +108,21 @@ Partial Class usrctlProcedures
        Me.Button52 = New System.Windows.Forms.Button()
        Me.TabPage8 = New System.Windows.Forms.TabPage()
        Me.btnImportTrStat = New System.Windows.Forms.Button()
+        Me.TabPage9 = New System.Windows.Forms.TabPage()
        Me.btnT1Data = New System.Windows.Forms.Button()
        Me.TabPage10 = New System.Windows.Forms.TabPage()
+        Me.btnDHF_UNISPEDtoVERAEZA_File = New System.Windows.Forms.Button()
+        Me.btnDHFtoVERAEZA_File = New System.Windows.Forms.Button()
+        Me.btnTCtoVERAEZA_File = New System.Windows.Forms.Button()
+        Me.btnDYtoVERAEZA_File = New System.Windows.Forms.Button()
+        Me.btnDHFUNItoVERAEZA = New System.Windows.Forms.Button()
+        Me.txtListDHFMrn = New System.Windows.Forms.TextBox()
+        Me.btnDHFtoVERAEZA = New System.Windows.Forms.Button()
        Me.txtListTCMrn = New System.Windows.Forms.TextBox()
        Me.btnTCtoVERAEZA = New System.Windows.Forms.Button()
        Me.btnCBAM_ATEZ = New System.Windows.Forms.Button()
        Me.txtListDYMrn = New System.Windows.Forms.TextBox()
        Me.btnDYtoVERAEZA = New System.Windows.Forms.Button()
-        Me.TabPage9 = New System.Windows.Forms.TabPage()
        Me.Button18 = New System.Windows.Forms.Button()
        Me.TextBox1 = New System.Windows.Forms.TextBox()
        Me.lblAnzahl = New System.Windows.Forms.Label()
@@ -169,9 +176,7 @@ Partial Class usrctlProcedures
        Me.Button99 = New System.Windows.Forms.Button()
        Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.txtListDHFMrn = New System.Windows.Forms.TextBox()
-        Me.btnDHFtoVERAEZA = New System.Windows.Forms.Button()
-        Me.btnDHFUNItoVERAEZA = New System.Windows.Forms.Button()
+        Me.cbxCD_Overwrite = New System.Windows.Forms.CheckBox()
        Me.tbTRStat.SuspendLayout()
        Me.TabPage3.SuspendLayout()
        Me.TabPage1.SuspendLayout()
@@ -1053,6 +1058,11 @@ Partial Class usrctlProcedures
        '
        'TabPage10
        '
+        Me.TabPage10.Controls.Add(Me.cbxCD_Overwrite)
+        Me.TabPage10.Controls.Add(Me.btnDHF_UNISPEDtoVERAEZA_File)
+        Me.TabPage10.Controls.Add(Me.btnDHFtoVERAEZA_File)
+        Me.TabPage10.Controls.Add(Me.btnTCtoVERAEZA_File)
+        Me.TabPage10.Controls.Add(Me.btnDYtoVERAEZA_File)
        Me.TabPage10.Controls.Add(Me.btnDHFUNItoVERAEZA)
        Me.TabPage10.Controls.Add(Me.txtListDHFMrn)
        Me.TabPage10.Controls.Add(Me.btnDHFtoVERAEZA)
@@ -1069,29 +1079,92 @@ Partial Class usrctlProcedures
        Me.TabPage10.Text = "TabPageDY"
        Me.TabPage10.UseVisualStyleBackColor = True
        '
+        'btnDHF_UNISPEDtoVERAEZA_File
+        '
+        Me.btnDHF_UNISPEDtoVERAEZA_File.Location = New System.Drawing.Point(448, 225)
+        Me.btnDHF_UNISPEDtoVERAEZA_File.Name = "btnDHF_UNISPEDtoVERAEZA_File"
+        Me.btnDHF_UNISPEDtoVERAEZA_File.Size = New System.Drawing.Size(63, 23)
+        Me.btnDHF_UNISPEDtoVERAEZA_File.TabIndex = 49
+        Me.btnDHF_UNISPEDtoVERAEZA_File.Text = "(FILE...)"
+        Me.btnDHF_UNISPEDtoVERAEZA_File.UseVisualStyleBackColor = True
+        '
+        'btnDHFtoVERAEZA_File
+        '
+        Me.btnDHFtoVERAEZA_File.Location = New System.Drawing.Point(448, 161)
+        Me.btnDHFtoVERAEZA_File.Name = "btnDHFtoVERAEZA_File"
+        Me.btnDHFtoVERAEZA_File.Size = New System.Drawing.Size(63, 23)
+        Me.btnDHFtoVERAEZA_File.TabIndex = 48
+        Me.btnDHFtoVERAEZA_File.Text = "(FILE...)"
+        Me.btnDHFtoVERAEZA_File.UseVisualStyleBackColor = True
+        '
+        'btnTCtoVERAEZA_File
+        '
+        Me.btnTCtoVERAEZA_File.Location = New System.Drawing.Point(279, 161)
+        Me.btnTCtoVERAEZA_File.Name = "btnTCtoVERAEZA_File"
+        Me.btnTCtoVERAEZA_File.Size = New System.Drawing.Size(63, 23)
+        Me.btnTCtoVERAEZA_File.TabIndex = 47
+        Me.btnTCtoVERAEZA_File.Text = "(FILE...)"
+        Me.btnTCtoVERAEZA_File.UseVisualStyleBackColor = True
+        '
+        'btnDYtoVERAEZA_File
+        '
+        Me.btnDYtoVERAEZA_File.Location = New System.Drawing.Point(115, 161)
+        Me.btnDYtoVERAEZA_File.Name = "btnDYtoVERAEZA_File"
+        Me.btnDYtoVERAEZA_File.Size = New System.Drawing.Size(63, 23)
+        Me.btnDYtoVERAEZA_File.TabIndex = 46
+        Me.btnDYtoVERAEZA_File.Text = "(FILE...)"
+        Me.btnDYtoVERAEZA_File.UseVisualStyleBackColor = True
+        '
+        'btnDHFUNItoVERAEZA
+        '
+        Me.btnDHFUNItoVERAEZA.Location = New System.Drawing.Point(348, 225)
+        Me.btnDHFUNItoVERAEZA.Name = "btnDHFUNItoVERAEZA"
+        Me.btnDHFUNItoVERAEZA.Size = New System.Drawing.Size(163, 58)
+        Me.btnDHFUNItoVERAEZA.TabIndex = 45
+        Me.btnDHFUNItoVERAEZA.Text = "DHF UNISPED ->VERAG ZA"
+        Me.btnDHFUNItoVERAEZA.UseVisualStyleBackColor = True
+        '
+        'txtListDHFMrn
+        '
+        Me.txtListDHFMrn.Location = New System.Drawing.Point(348, 14)
+        Me.txtListDHFMrn.Multiline = True
+        Me.txtListDHFMrn.Name = "txtListDHFMrn"
+        Me.txtListDHFMrn.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
+        Me.txtListDHFMrn.Size = New System.Drawing.Size(163, 133)
+        Me.txtListDHFMrn.TabIndex = 44
+        '
+        'btnDHFtoVERAEZA
+        '
+        Me.btnDHFtoVERAEZA.Location = New System.Drawing.Point(348, 161)
+        Me.btnDHFtoVERAEZA.Name = "btnDHFtoVERAEZA"
+        Me.btnDHFtoVERAEZA.Size = New System.Drawing.Size(163, 73)
+        Me.btnDHFtoVERAEZA.TabIndex = 43
+        Me.btnDHFtoVERAEZA.Text = "DHF VERAG->VERAG ZA"
+        Me.btnDHFtoVERAEZA.UseVisualStyleBackColor = True
+        '
        'txtListTCMrn
        '
        Me.txtListTCMrn.Location = New System.Drawing.Point(197, 14)
        Me.txtListTCMrn.Multiline = True
        Me.txtListTCMrn.Name = "txtListTCMrn"
        Me.txtListTCMrn.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
-        Me.txtListTCMrn.Size = New System.Drawing.Size(145, 155)
+        Me.txtListTCMrn.Size = New System.Drawing.Size(145, 133)
        Me.txtListTCMrn.TabIndex = 42
        '
        'btnTCtoVERAEZA
        '
-        Me.btnTCtoVERAEZA.Location = New System.Drawing.Point(197, 175)
+        Me.btnTCtoVERAEZA.Location = New System.Drawing.Point(197, 161)
        Me.btnTCtoVERAEZA.Name = "btnTCtoVERAEZA"
-        Me.btnTCtoVERAEZA.Size = New System.Drawing.Size(145, 49)
+        Me.btnTCtoVERAEZA.Size = New System.Drawing.Size(145, 73)
        Me.btnTCtoVERAEZA.TabIndex = 41
        Me.btnTCtoVERAEZA.Text = "TELOTEC->VERAG ZA"
        Me.btnTCtoVERAEZA.UseVisualStyleBackColor = True
        '
        'btnCBAM_ATEZ
        '
-        Me.btnCBAM_ATEZ.Location = New System.Drawing.Point(133, 239)
+        Me.btnCBAM_ATEZ.Location = New System.Drawing.Point(33, 249)
        Me.btnCBAM_ATEZ.Name = "btnCBAM_ATEZ"
-        Me.btnCBAM_ATEZ.Size = New System.Drawing.Size(145, 49)
+        Me.btnCBAM_ATEZ.Size = New System.Drawing.Size(309, 25)
        Me.btnCBAM_ATEZ.TabIndex = 40
        Me.btnCBAM_ATEZ.Text = "Überschreibe CBAM von ATEZ"
        Me.btnCBAM_ATEZ.UseVisualStyleBackColor = True
@@ -1102,14 +1175,14 @@ Partial Class usrctlProcedures
        Me.txtListDYMrn.Multiline = True
        Me.txtListDYMrn.Name = "txtListDYMrn"
        Me.txtListDYMrn.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
-        Me.txtListDYMrn.Size = New System.Drawing.Size(145, 155)
+        Me.txtListDYMrn.Size = New System.Drawing.Size(145, 133)
        Me.txtListDYMrn.TabIndex = 39
        '
        'btnDYtoVERAEZA
        '
-        Me.btnDYtoVERAEZA.Location = New System.Drawing.Point(33, 175)
+        Me.btnDYtoVERAEZA.Location = New System.Drawing.Point(33, 161)
        Me.btnDYtoVERAEZA.Name = "btnDYtoVERAEZA"
-        Me.btnDYtoVERAEZA.Size = New System.Drawing.Size(145, 49)
+        Me.btnDYtoVERAEZA.Size = New System.Drawing.Size(145, 73)
        Me.btnDYtoVERAEZA.TabIndex = 36
        Me.btnDYtoVERAEZA.Text = "DY->VERAG ZA"
        Me.btnDYtoVERAEZA.UseVisualStyleBackColor = True
@@ -1593,32 +1666,17 @@ Partial Class usrctlProcedures
        Me.DataGridViewTextBoxColumn2.HeaderText = "anz"
        Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
        '
-        'txtListDHFMrn
+        'cbxCD_Overwrite
        '
-        Me.txtListDHFMrn.Location = New System.Drawing.Point(348, 14)
-        Me.txtListDHFMrn.Multiline = True
-        Me.txtListDHFMrn.Name = "txtListDHFMrn"
-        Me.txtListDHFMrn.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
-        Me.txtListDHFMrn.Size = New System.Drawing.Size(163, 155)
-        Me.txtListDHFMrn.TabIndex = 44
-        '
-        'btnDHFtoVERAEZA
-        '
-        Me.btnDHFtoVERAEZA.Location = New System.Drawing.Point(348, 175)
-        Me.btnDHFtoVERAEZA.Name = "btnDHFtoVERAEZA"
-        Me.btnDHFtoVERAEZA.Size = New System.Drawing.Size(163, 49)
-        Me.btnDHFtoVERAEZA.TabIndex = 43
-        Me.btnDHFtoVERAEZA.Text = "DHF VERAG->VERAG ZA"
-        Me.btnDHFtoVERAEZA.UseVisualStyleBackColor = True
-        '
-        'btnDHFUNItoVERAEZA
-        '
-        Me.btnDHFUNItoVERAEZA.Location = New System.Drawing.Point(348, 230)
-        Me.btnDHFUNItoVERAEZA.Name = "btnDHFUNItoVERAEZA"
-        Me.btnDHFUNItoVERAEZA.Size = New System.Drawing.Size(163, 49)
-        Me.btnDHFUNItoVERAEZA.TabIndex = 45
-        Me.btnDHFUNItoVERAEZA.Text = "DHF UNISPED ->VERAG ZA"
-        Me.btnDHFUNItoVERAEZA.UseVisualStyleBackColor = True
+        Me.cbxCD_Overwrite.AutoSize = True
+        Me.cbxCD_Overwrite.Checked = True
+        Me.cbxCD_Overwrite.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.cbxCD_Overwrite.Location = New System.Drawing.Point(517, 16)
+        Me.cbxCD_Overwrite.Name = "cbxCD_Overwrite"
+        Me.cbxCD_Overwrite.Size = New System.Drawing.Size(69, 17)
+        Me.cbxCD_Overwrite.TabIndex = 50
+        Me.cbxCD_Overwrite.Text = "overwrite"
+        Me.cbxCD_Overwrite.UseVisualStyleBackColor = True
        '
        'usrctlProcedures
        '
@@ -1854,4 +1912,9 @@ Partial Class usrctlProcedures
    Friend WithEvents btnDHFUNItoVERAEZA As Button
    Friend WithEvents txtListDHFMrn As TextBox
    Friend WithEvents btnDHFtoVERAEZA As Button
+    Friend WithEvents btnDYtoVERAEZA_File As Button
+    Friend WithEvents btnDHF_UNISPEDtoVERAEZA_File As Button
+    Friend WithEvents btnDHFtoVERAEZA_File As Button
+    Friend WithEvents btnTCtoVERAEZA_File As Button
+    Friend WithEvents cbxCD_Overwrite As CheckBox
 End Class