div. Änderungen (USTVA, Ausewrtung, etc.)

This commit is contained in:
2026-01-22 17:41:06 +01:00
parent a8c6f91f1d
commit 8896aa1def
5 changed files with 311 additions and 67 deletions

View File

@@ -127,6 +127,13 @@ Partial Class usrCntlMDMAuswertungen
Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label36 = New System.Windows.Forms.Label()
Me.TabPage3 = New System.Windows.Forms.TabPage()
Me.Label66 = New System.Windows.Forms.Label()
Me.GroupBox20 = New System.Windows.Forms.GroupBox()
Me.PictureBox7 = New System.Windows.Forms.PictureBox()
Me.Label45 = New System.Windows.Forms.Label()
Me.Label64 = New System.Windows.Forms.Label()
Me.Label65 = New System.Windows.Forms.Label()
Me.Button20 = New System.Windows.Forms.Button()
Me.UsrCntlWoelfl_IM_CSVRg1 = New SDL.usrCntlWoelfl_IM_CSVRg()
Me.tbIDS = New System.Windows.Forms.TabPage()
Me.Label62 = New System.Windows.Forms.Label()
@@ -168,6 +175,7 @@ Partial Class usrCntlMDMAuswertungen
Me.TabPage5 = New System.Windows.Forms.TabPage()
Me.Label56 = New System.Windows.Forms.Label()
Me.GroupBox17 = New System.Windows.Forms.GroupBox()
Me.cbxExcel = New System.Windows.Forms.CheckBox()
Me.Label55 = New System.Windows.Forms.Label()
Me.Button16 = New System.Windows.Forms.Button()
Me.Label53 = New System.Windows.Forms.Label()
@@ -189,7 +197,10 @@ Partial Class usrCntlMDMAuswertungen
Me.btnContractdaten = New System.Windows.Forms.Button()
Me.Button15 = New System.Windows.Forms.Button()
Me.pnl = New System.Windows.Forms.Panel()
Me.cbxExcel = New System.Windows.Forms.CheckBox()
Me.Label67 = New System.Windows.Forms.Label()
Me.txtJahr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtLeistungsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.cboQuartal = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -210,6 +221,8 @@ Partial Class usrCntlMDMAuswertungen
Me.GroupBox9.SuspendLayout()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPage3.SuspendLayout()
Me.GroupBox20.SuspendLayout()
CType(Me.PictureBox7, System.ComponentModel.ISupportInitialize).BeginInit()
Me.tbIDS.SuspendLayout()
Me.GroupBox13.SuspendLayout()
Me.GroupBox18.SuspendLayout()
@@ -1406,6 +1419,8 @@ Partial Class usrCntlMDMAuswertungen
'
'TabPage3
'
Me.TabPage3.Controls.Add(Me.Label66)
Me.TabPage3.Controls.Add(Me.GroupBox20)
Me.TabPage3.Controls.Add(Me.UsrCntlWoelfl_IM_CSVRg1)
Me.TabPage3.Controls.Add(Me.Label4)
Me.TabPage3.Controls.Add(Me.GroupBox2)
@@ -1416,10 +1431,86 @@ Partial Class usrCntlMDMAuswertungen
Me.TabPage3.Text = "WÖLFL"
Me.TabPage3.UseVisualStyleBackColor = True
'
'Label66
'
Me.Label66.AutoSize = True
Me.Label66.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label66.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label66.Location = New System.Drawing.Point(9, 136)
Me.Label66.Name = "Label66"
Me.Label66.Size = New System.Drawing.Size(347, 17)
Me.Label66.TabIndex = 15
Me.Label66.Text = "Wölfl Rechnungen Bearbeitungsbetrag Quartal"
'
'GroupBox20
'
Me.GroupBox20.Controls.Add(Me.cboQuartal)
Me.GroupBox20.Controls.Add(Me.txtLeistungsNr)
Me.GroupBox20.Controls.Add(Me.txtJahr)
Me.GroupBox20.Controls.Add(Me.Label67)
Me.GroupBox20.Controls.Add(Me.PictureBox7)
Me.GroupBox20.Controls.Add(Me.Label45)
Me.GroupBox20.Controls.Add(Me.Label64)
Me.GroupBox20.Controls.Add(Me.Label65)
Me.GroupBox20.Controls.Add(Me.Button20)
Me.GroupBox20.Location = New System.Drawing.Point(6, 153)
Me.GroupBox20.Name = "GroupBox20"
Me.GroupBox20.Size = New System.Drawing.Size(697, 111)
Me.GroupBox20.TabIndex = 14
Me.GroupBox20.TabStop = False
'
'PictureBox7
'
Me.PictureBox7.Image = Global.SDL.My.Resources.Resources.woelfl
Me.PictureBox7.Location = New System.Drawing.Point(640, 8)
Me.PictureBox7.Name = "PictureBox7"
Me.PictureBox7.Size = New System.Drawing.Size(51, 37)
Me.PictureBox7.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.PictureBox7.TabIndex = 11
Me.PictureBox7.TabStop = False
'
'Label45
'
Me.Label45.AutoSize = True
Me.Label45.Location = New System.Drawing.Point(249, 50)
Me.Label45.Name = "Label45"
Me.Label45.Size = New System.Drawing.Size(44, 13)
Me.Label45.TabIndex = 10
Me.Label45.Text = "Quartal:"
'
'Label64
'
Me.Label64.AutoSize = True
Me.Label64.Location = New System.Drawing.Point(153, 50)
Me.Label64.Name = "Label64"
Me.Label64.Size = New System.Drawing.Size(27, 13)
Me.Label64.TabIndex = 8
Me.Label64.Text = "Jahr"
'
'Label65
'
Me.Label65.AutoSize = True
Me.Label65.Location = New System.Drawing.Point(145, 19)
Me.Label65.Name = "Label65"
Me.Label65.Size = New System.Drawing.Size(373, 13)
Me.Label65.TabIndex = 5
Me.Label65.Text = "Alle Woelfl-Kunden, deren Bearbeitungsbetrag pro Quartal unter 50 EUR liegt."
'
'Button20
'
Me.Button20.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button20.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.Button20.Location = New System.Drawing.Point(6, 19)
Me.Button20.Name = "Button20"
Me.Button20.Size = New System.Drawing.Size(121, 49)
Me.Button20.TabIndex = 4
Me.Button20.Text = "CSV erstellen"
Me.Button20.UseVisualStyleBackColor = True
'
'UsrCntlWoelfl_IM_CSVRg1
'
Me.UsrCntlWoelfl_IM_CSVRg1.BackColor = System.Drawing.Color.White
Me.UsrCntlWoelfl_IM_CSVRg1.Location = New System.Drawing.Point(6, 167)
Me.UsrCntlWoelfl_IM_CSVRg1.Location = New System.Drawing.Point(12, 292)
Me.UsrCntlWoelfl_IM_CSVRg1.Name = "UsrCntlWoelfl_IM_CSVRg1"
Me.UsrCntlWoelfl_IM_CSVRg1.Size = New System.Drawing.Size(728, 97)
Me.UsrCntlWoelfl_IM_CSVRg1.TabIndex = 10
@@ -1849,6 +1940,18 @@ Partial Class usrCntlMDMAuswertungen
Me.GroupBox17.TabIndex = 13
Me.GroupBox17.TabStop = False
'
'cbxExcel
'
Me.cbxExcel.AutoSize = True
Me.cbxExcel.Checked = True
Me.cbxExcel.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxExcel.Location = New System.Drawing.Point(150, 36)
Me.cbxExcel.Name = "cbxExcel"
Me.cbxExcel.Size = New System.Drawing.Size(68, 17)
Me.cbxExcel.TabIndex = 56
Me.cbxExcel.Text = "als Excel"
Me.cbxExcel.UseVisualStyleBackColor = True
'
'Label55
'
Me.Label55.AutoSize = True
@@ -2070,17 +2173,72 @@ Partial Class usrCntlMDMAuswertungen
Me.pnl.Size = New System.Drawing.Size(1057, 54)
Me.pnl.TabIndex = 26
'
'cbxExcel
'Label67
'
Me.cbxExcel.AutoSize = True
Me.cbxExcel.Checked = True
Me.cbxExcel.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxExcel.Location = New System.Drawing.Point(150, 36)
Me.cbxExcel.Name = "cbxExcel"
Me.cbxExcel.Size = New System.Drawing.Size(68, 17)
Me.cbxExcel.TabIndex = 56
Me.cbxExcel.Text = "als Excel"
Me.cbxExcel.UseVisualStyleBackColor = True
Me.Label67.AutoSize = True
Me.Label67.Location = New System.Drawing.Point(145, 80)
Me.Label67.Name = "Label67"
Me.Label67.Size = New System.Drawing.Size(155, 13)
Me.Label67.TabIndex = 12
Me.Label67.Text = "LeistungsNr (Komma-getrennt).:"
'
'txtJahr
'
Me.txtJahr._DateTimeOnly = False
Me.txtJahr._numbersOnly = False
Me.txtJahr._numbersOnlyKommastellen = ""
Me.txtJahr._numbersOnlyTrennzeichen = True
Me.txtJahr._Prozent = False
Me.txtJahr._ShortDateNew = False
Me.txtJahr._ShortDateOnly = False
Me.txtJahr._TimeOnly = False
Me.txtJahr._TimeOnly_Seconds = False
Me.txtJahr._value = ""
Me.txtJahr._Waehrung = False
Me.txtJahr._WaehrungZeichen = True
Me.txtJahr.ForeColor = System.Drawing.Color.Black
Me.txtJahr.Location = New System.Drawing.Point(185, 47)
Me.txtJahr.MaxLineLength = -1
Me.txtJahr.MaxLines_Warning = ""
Me.txtJahr.MaxLines_Warning_Label = Nothing
Me.txtJahr.Name = "txtJahr"
Me.txtJahr.Size = New System.Drawing.Size(53, 20)
Me.txtJahr.TabIndex = 13
'
'txtLeistungsNr
'
Me.txtLeistungsNr._DateTimeOnly = False
Me.txtLeistungsNr._numbersOnly = False
Me.txtLeistungsNr._numbersOnlyKommastellen = ""
Me.txtLeistungsNr._numbersOnlyTrennzeichen = True
Me.txtLeistungsNr._Prozent = False
Me.txtLeistungsNr._ShortDateNew = False
Me.txtLeistungsNr._ShortDateOnly = False
Me.txtLeistungsNr._TimeOnly = False
Me.txtLeistungsNr._TimeOnly_Seconds = False
Me.txtLeistungsNr._value = "327"
Me.txtLeistungsNr._Waehrung = False
Me.txtLeistungsNr._WaehrungZeichen = True
Me.txtLeistungsNr.ForeColor = System.Drawing.Color.Black
Me.txtLeistungsNr.Location = New System.Drawing.Point(306, 73)
Me.txtLeistungsNr.MaxLineLength = -1
Me.txtLeistungsNr.MaxLines_Warning = ""
Me.txtLeistungsNr.MaxLines_Warning_Label = Nothing
Me.txtLeistungsNr.Name = "txtLeistungsNr"
Me.txtLeistungsNr.Size = New System.Drawing.Size(93, 20)
Me.txtLeistungsNr.TabIndex = 15
Me.txtLeistungsNr.Text = "327"
'
'cboQuartal
'
Me.cboQuartal._allowedValuesFreiText = Nothing
Me.cboQuartal._allowFreiText = False
Me.cboQuartal._value = ""
Me.cboQuartal.FormattingEnabled = True
Me.cboQuartal.Location = New System.Drawing.Point(306, 46)
Me.cboQuartal.Name = "cboQuartal"
Me.cboQuartal.Size = New System.Drawing.Size(59, 21)
Me.cboQuartal.TabIndex = 16
'
'usrCntlMDMAuswertungen
'
@@ -2123,6 +2281,9 @@ Partial Class usrCntlMDMAuswertungen
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPage3.ResumeLayout(False)
Me.TabPage3.PerformLayout()
Me.GroupBox20.ResumeLayout(False)
Me.GroupBox20.PerformLayout()
CType(Me.PictureBox7, System.ComponentModel.ISupportInitialize).EndInit()
Me.tbIDS.ResumeLayout(False)
Me.tbIDS.PerformLayout()
Me.GroupBox13.ResumeLayout(False)
@@ -2321,4 +2482,15 @@ Partial Class usrCntlMDMAuswertungen
Friend WithEvents Label63 As Label
Friend WithEvents Button19 As Button
Friend WithEvents cbxExcel As CheckBox
Friend WithEvents Label66 As Label
Friend WithEvents GroupBox20 As GroupBox
Friend WithEvents PictureBox7 As PictureBox
Friend WithEvents Label45 As Label
Friend WithEvents Label64 As Label
Friend WithEvents Label65 As Label
Friend WithEvents Button20 As Button
Friend WithEvents txtJahr As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label67 As Label
Friend WithEvents txtLeistungsNr As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents cboQuartal As VERAG_PROG_ALLGEMEIN.MyComboBox
End Class