This commit is contained in:
2026-01-15 10:49:28 +01:00
parent df324faddf
commit dff516b9df
12 changed files with 793 additions and 398 deletions

View File

@@ -22,9 +22,8 @@ Partial Class usrCntlCBAM
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Me.lblOffert = New System.Windows.Forms.TextBox()
Me.cntxtAddSdl = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.cntxtAddSdl = New System.Windows.Forms.ContextMenuStrip()
Me.DToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.Label1 = New System.Windows.Forms.Label()
Me.btnCBAMPruef_DAKOSY = New System.Windows.Forms.Button()
@@ -117,21 +116,9 @@ Partial Class usrCntlCBAM
Me.cbxIndirekt = New System.Windows.Forms.CheckBox()
Me.Button8 = New System.Windows.Forms.Button()
Me.Panel3 = New System.Windows.Forms.Panel()
Me.Label25 = New System.Windows.Forms.Label()
Me.Label24 = New System.Windows.Forms.Label()
Me.txtCBAM_KdSett_ApplNo = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label14 = New System.Windows.Forms.Label()
Me.txtCBAM_KdSett_Warn2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Button9 = New System.Windows.Forms.Button()
Me.txtCBAM_KdSett_CBAMNo = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label20 = New System.Windows.Forms.Label()
Me.Label21 = New System.Windows.Forms.Label()
Me.txtCBAM_KdSett_Warn1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label22 = New System.Windows.Forms.Label()
Me.Label23 = New System.Windows.Forms.Label()
Me.cboIndirekt = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cbo_VERAG_ImpLand = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components)
Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel()
Me.cbxUNISPED = New System.Windows.Forms.CheckBox()
Me.cbxIMEX = New System.Windows.Forms.CheckBox()
Me.cbxVERAG = New System.Windows.Forms.CheckBox()
@@ -140,7 +127,7 @@ Partial Class usrCntlCBAM
Me.txtVon = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtBis = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtEori = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.cboCBAM_KdSett_Status = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.UsCntlCBAM_Status1 = New SDL.usCntlCBAM_Status()
Me.cntxtAddSdl.SuspendLayout()
Me.Panel1.SuspendLayout()
Me.Panel2.SuspendLayout()
@@ -1405,200 +1392,12 @@ Partial Class usrCntlCBAM
'
Me.Panel3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Panel3.BackColor = System.Drawing.Color.FloralWhite
Me.Panel3.Controls.Add(Me.cboCBAM_KdSett_Status)
Me.Panel3.Controls.Add(Me.Label25)
Me.Panel3.Controls.Add(Me.Label24)
Me.Panel3.Controls.Add(Me.txtCBAM_KdSett_ApplNo)
Me.Panel3.Controls.Add(Me.Label14)
Me.Panel3.Controls.Add(Me.txtCBAM_KdSett_Warn2)
Me.Panel3.Controls.Add(Me.Button9)
Me.Panel3.Controls.Add(Me.txtCBAM_KdSett_CBAMNo)
Me.Panel3.Controls.Add(Me.Label20)
Me.Panel3.Controls.Add(Me.Label21)
Me.Panel3.Controls.Add(Me.txtCBAM_KdSett_Warn1)
Me.Panel3.Controls.Add(Me.Label22)
Me.Panel3.Controls.Add(Me.Label23)
Me.Panel3.Controls.Add(Me.UsCntlCBAM_Status1)
Me.Panel3.Location = New System.Drawing.Point(491, 511)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(382, 182)
Me.Panel3.Size = New System.Drawing.Size(380, 180)
Me.Panel3.TabIndex = 73
'
'Label25
'
Me.Label25.AutoSize = True
Me.Label25.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
Me.Label25.Location = New System.Drawing.Point(182, 52)
Me.Label25.Name = "Label25"
Me.Label25.Size = New System.Drawing.Size(40, 13)
Me.Label25.TabIndex = 80
Me.Label25.Text = "Warn 2"
'
'Label24
'
Me.Label24.AutoSize = True
Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
Me.Label24.Location = New System.Drawing.Point(118, 52)
Me.Label24.Name = "Label24"
Me.Label24.Size = New System.Drawing.Size(43, 13)
Me.Label24.TabIndex = 79
Me.Label24.Text = "Warn 1 "
'
'txtCBAM_KdSett_ApplNo
'
Me.txtCBAM_KdSett_ApplNo._DateTimeOnly = False
Me.txtCBAM_KdSett_ApplNo._numbersOnly = False
Me.txtCBAM_KdSett_ApplNo._numbersOnlyKommastellen = ""
Me.txtCBAM_KdSett_ApplNo._numbersOnlyTrennzeichen = False
Me.txtCBAM_KdSett_ApplNo._Prozent = False
Me.txtCBAM_KdSett_ApplNo._ShortDateNew = False
Me.txtCBAM_KdSett_ApplNo._ShortDateOnly = False
Me.txtCBAM_KdSett_ApplNo._TimeOnly = False
Me.txtCBAM_KdSett_ApplNo._TimeOnly_Seconds = False
Me.txtCBAM_KdSett_ApplNo._value = ""
Me.txtCBAM_KdSett_ApplNo._Waehrung = False
Me.txtCBAM_KdSett_ApplNo._WaehrungZeichen = True
Me.txtCBAM_KdSett_ApplNo.Enabled = False
Me.txtCBAM_KdSett_ApplNo.ForeColor = System.Drawing.Color.Red
Me.txtCBAM_KdSett_ApplNo.Location = New System.Drawing.Point(110, 95)
Me.txtCBAM_KdSett_ApplNo.MaxLength = 250
Me.txtCBAM_KdSett_ApplNo.MaxLineLength = -1
Me.txtCBAM_KdSett_ApplNo.MaxLines_Warning = ""
Me.txtCBAM_KdSett_ApplNo.MaxLines_Warning_Label = Nothing
Me.txtCBAM_KdSett_ApplNo.Name = "txtCBAM_KdSett_ApplNo"
Me.txtCBAM_KdSett_ApplNo.Size = New System.Drawing.Size(256, 20)
Me.txtCBAM_KdSett_ApplNo.TabIndex = 77
'
'Label14
'
Me.Label14.AutoSize = True
Me.Label14.Location = New System.Drawing.Point(3, 98)
Me.Label14.Name = "Label14"
Me.Label14.Size = New System.Drawing.Size(79, 13)
Me.Label14.TabIndex = 78
Me.Label14.Text = "Application-Nr.:"
'
'txtCBAM_KdSett_Warn2
'
Me.txtCBAM_KdSett_Warn2._DateTimeOnly = False
Me.txtCBAM_KdSett_Warn2._numbersOnly = True
Me.txtCBAM_KdSett_Warn2._numbersOnlyKommastellen = ""
Me.txtCBAM_KdSett_Warn2._numbersOnlyTrennzeichen = True
Me.txtCBAM_KdSett_Warn2._Prozent = False
Me.txtCBAM_KdSett_Warn2._ShortDateNew = False
Me.txtCBAM_KdSett_Warn2._ShortDateOnly = False
Me.txtCBAM_KdSett_Warn2._TimeOnly = False
Me.txtCBAM_KdSett_Warn2._TimeOnly_Seconds = False
Me.txtCBAM_KdSett_Warn2._value = "40"
Me.txtCBAM_KdSett_Warn2._Waehrung = False
Me.txtCBAM_KdSett_Warn2._WaehrungZeichen = True
Me.txtCBAM_KdSett_Warn2.ForeColor = System.Drawing.Color.Black
Me.txtCBAM_KdSett_Warn2.Location = New System.Drawing.Point(174, 66)
Me.txtCBAM_KdSett_Warn2.MaxLength = 10
Me.txtCBAM_KdSett_Warn2.MaxLineLength = -1
Me.txtCBAM_KdSett_Warn2.MaxLines_Warning = ""
Me.txtCBAM_KdSett_Warn2.MaxLines_Warning_Label = Nothing
Me.txtCBAM_KdSett_Warn2.Name = "txtCBAM_KdSett_Warn2"
Me.txtCBAM_KdSett_Warn2.Size = New System.Drawing.Size(58, 20)
Me.txtCBAM_KdSett_Warn2.TabIndex = 75
Me.txtCBAM_KdSett_Warn2.Text = "40"
'
'Button9
'
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button9.Location = New System.Drawing.Point(149, 147)
Me.Button9.Name = "Button9"
Me.Button9.Size = New System.Drawing.Size(217, 28)
Me.Button9.TabIndex = 53
Me.Button9.Text = "Speichern"
Me.Button9.UseVisualStyleBackColor = True
'
'txtCBAM_KdSett_CBAMNo
'
Me.txtCBAM_KdSett_CBAMNo._DateTimeOnly = False
Me.txtCBAM_KdSett_CBAMNo._numbersOnly = False
Me.txtCBAM_KdSett_CBAMNo._numbersOnlyKommastellen = ""
Me.txtCBAM_KdSett_CBAMNo._numbersOnlyTrennzeichen = False
Me.txtCBAM_KdSett_CBAMNo._Prozent = False
Me.txtCBAM_KdSett_CBAMNo._ShortDateNew = False
Me.txtCBAM_KdSett_CBAMNo._ShortDateOnly = False
Me.txtCBAM_KdSett_CBAMNo._TimeOnly = False
Me.txtCBAM_KdSett_CBAMNo._TimeOnly_Seconds = False
Me.txtCBAM_KdSett_CBAMNo._value = ""
Me.txtCBAM_KdSett_CBAMNo._Waehrung = False
Me.txtCBAM_KdSett_CBAMNo._WaehrungZeichen = True
Me.txtCBAM_KdSett_CBAMNo.Enabled = False
Me.txtCBAM_KdSett_CBAMNo.ForeColor = System.Drawing.Color.Red
Me.txtCBAM_KdSett_CBAMNo.Location = New System.Drawing.Point(110, 118)
Me.txtCBAM_KdSett_CBAMNo.MaxLength = 250
Me.txtCBAM_KdSett_CBAMNo.MaxLineLength = -1
Me.txtCBAM_KdSett_CBAMNo.MaxLines_Warning = ""
Me.txtCBAM_KdSett_CBAMNo.MaxLines_Warning_Label = Nothing
Me.txtCBAM_KdSett_CBAMNo.Name = "txtCBAM_KdSett_CBAMNo"
Me.txtCBAM_KdSett_CBAMNo.Size = New System.Drawing.Size(256, 20)
Me.txtCBAM_KdSett_CBAMNo.TabIndex = 58
'
'Label20
'
Me.Label20.AutoSize = True
Me.Label20.Location = New System.Drawing.Point(3, 121)
Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(88, 13)
Me.Label20.TabIndex = 59
Me.Label20.Text = "CBAM Konto-Nr.:"
'
'Label21
'
Me.Label21.AutoSize = True
Me.Label21.Location = New System.Drawing.Point(2, 69)
Me.Label21.Name = "Label21"
Me.Label21.Size = New System.Drawing.Size(102, 13)
Me.Label21.TabIndex = 57
Me.Label21.Text = "Warnschwelle/Jahr:"
'
'txtCBAM_KdSett_Warn1
'
Me.txtCBAM_KdSett_Warn1._DateTimeOnly = False
Me.txtCBAM_KdSett_Warn1._numbersOnly = True
Me.txtCBAM_KdSett_Warn1._numbersOnlyKommastellen = ""
Me.txtCBAM_KdSett_Warn1._numbersOnlyTrennzeichen = True
Me.txtCBAM_KdSett_Warn1._Prozent = False
Me.txtCBAM_KdSett_Warn1._ShortDateNew = False
Me.txtCBAM_KdSett_Warn1._ShortDateOnly = False
Me.txtCBAM_KdSett_Warn1._TimeOnly = False
Me.txtCBAM_KdSett_Warn1._TimeOnly_Seconds = False
Me.txtCBAM_KdSett_Warn1._value = "30"
Me.txtCBAM_KdSett_Warn1._Waehrung = False
Me.txtCBAM_KdSett_Warn1._WaehrungZeichen = True
Me.txtCBAM_KdSett_Warn1.ForeColor = System.Drawing.Color.Black
Me.txtCBAM_KdSett_Warn1.Location = New System.Drawing.Point(110, 66)
Me.txtCBAM_KdSett_Warn1.MaxLength = 10
Me.txtCBAM_KdSett_Warn1.MaxLineLength = -1
Me.txtCBAM_KdSett_Warn1.MaxLines_Warning = ""
Me.txtCBAM_KdSett_Warn1.MaxLines_Warning_Label = Nothing
Me.txtCBAM_KdSett_Warn1.Name = "txtCBAM_KdSett_Warn1"
Me.txtCBAM_KdSett_Warn1.Size = New System.Drawing.Size(58, 20)
Me.txtCBAM_KdSett_Warn1.TabIndex = 56
Me.txtCBAM_KdSett_Warn1.Text = "30"
'
'Label22
'
Me.Label22.AutoSize = True
Me.Label22.Location = New System.Drawing.Point(3, 25)
Me.Label22.Name = "Label22"
Me.Label22.Size = New System.Drawing.Size(73, 13)
Me.Label22.TabIndex = 55
Me.Label22.Text = "CBAM-Status:"
'
'Label23
'
Me.Label23.AutoSize = True
Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label23.Location = New System.Drawing.Point(3, 3)
Me.Label23.Name = "Label23"
Me.Label23.Size = New System.Drawing.Size(142, 13)
Me.Label23.TabIndex = 53
Me.Label23.Text = "CBAM-Kundeneinstellungen:"
'
'cboIndirekt
'
Me.cboIndirekt._allowedValuesFreiText = Nothing
@@ -1768,16 +1567,13 @@ Partial Class usrCntlCBAM
Me.txtEori.Size = New System.Drawing.Size(341, 20)
Me.txtEori.TabIndex = 1
'
'cboCBAM_KdSett_Status
'UsCntlCBAM_Status1
'
Me.cboCBAM_KdSett_Status._allowedValuesFreiText = Nothing
Me.cboCBAM_KdSett_Status._allowFreiText = False
Me.cboCBAM_KdSett_Status._value = ""
Me.cboCBAM_KdSett_Status.FormattingEnabled = True
Me.cboCBAM_KdSett_Status.Location = New System.Drawing.Point(110, 22)
Me.cboCBAM_KdSett_Status.Name = "cboCBAM_KdSett_Status"
Me.cboCBAM_KdSett_Status.Size = New System.Drawing.Size(256, 21)
Me.cboCBAM_KdSett_Status.TabIndex = 74
Me.UsCntlCBAM_Status1.Dock = System.Windows.Forms.DockStyle.Fill
Me.UsCntlCBAM_Status1.Location = New System.Drawing.Point(0, 0)
Me.UsCntlCBAM_Status1.Name = "UsCntlCBAM_Status1"
Me.UsCntlCBAM_Status1.Size = New System.Drawing.Size(380, 180)
Me.UsCntlCBAM_Status1.TabIndex = 0
'
'usrCntlCBAM
'
@@ -1867,7 +1663,6 @@ Partial Class usrCntlCBAM
Me.Panel2.ResumeLayout(False)
Me.Panel2.PerformLayout()
Me.Panel3.ResumeLayout(False)
Me.Panel3.PerformLayout()
Me.MyPanel1.ResumeLayout(False)
Me.MyPanel1.PerformLayout()
Me.ResumeLayout(False)
@@ -1979,17 +1774,5 @@ Partial Class usrCntlCBAM
Friend WithEvents cbxIndirekt As CheckBox
Friend WithEvents Button8 As Button
Friend WithEvents Panel3 As Panel
Friend WithEvents txtCBAM_KdSett_ApplNo As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label14 As Label
Friend WithEvents txtCBAM_KdSett_Warn2 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Button9 As Button
Friend WithEvents txtCBAM_KdSett_CBAMNo As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label20 As Label
Friend WithEvents Label21 As Label
Friend WithEvents txtCBAM_KdSett_Warn1 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label22 As Label
Friend WithEvents Label23 As Label
Friend WithEvents Label25 As Label
Friend WithEvents Label24 As Label
Friend WithEvents cboCBAM_KdSett_Status As VERAG_PROG_ALLGEMEIN.MyComboBox
Friend WithEvents UsCntlCBAM_Status1 As usCntlCBAM_Status
End Class