Fakturierung, Email senden.

2025-03-05 08:22:22 +01:00
parent 969e522efc
commit df950ab35e
6 changed files with 127 additions and 130 deletions
--- a/SDL/Fakturierung/frmAbrechnungsMaske.Designer.vb
+++ b/SDL/Fakturierung/frmAbrechnungsMaske.Designer.vb
@@ -51,14 +51,16 @@ Partial Class frmAbrechnungsMaske
        Me.Label2 = New System.Windows.Forms.Label()
        Me.Label10 = New System.Windows.Forms.Label()
        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.KdSearchBox1 = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
+        Me.lblKunde = New System.Windows.Forms.Label()
        Me.PictureBox5 = New System.Windows.Forms.PictureBox()
        Me.cbxGutschriftenAnVerag = New System.Windows.Forms.CheckBox()
-        Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cboRechnungsdruck = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.Label14 = New System.Windows.Forms.Label()
        Me.cbx = New System.Windows.Forms.CheckBox()
-        Me.MyComboBox3 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cboER_SR = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.Label5 = New System.Windows.Forms.Label()
-        Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cboSachbearbeiter = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.lblSachbearbeiter = New System.Windows.Forms.Label()
        Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
@@ -86,8 +88,6 @@ Partial Class frmAbrechnungsMaske
        Me.btnVonJahr = New System.Windows.Forms.Button()
        Me.UsrCntlFaktAbrechnung1 = New SDL.usrCntlFaktAbrechnung()
        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
-        Me.lblKunde = New System.Windows.Forms.Label()
-        Me.KdSearchBox1 = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
        Me.pnl.SuspendLayout()
        CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SplitContainer.Panel1.SuspendLayout()
@@ -446,12 +446,12 @@ Partial Class frmAbrechnungsMaske
        Me.Panel1.Controls.Add(Me.lblKunde)
        Me.Panel1.Controls.Add(Me.PictureBox5)
        Me.Panel1.Controls.Add(Me.cbxGutschriftenAnVerag)
-        Me.Panel1.Controls.Add(Me.MyComboBox1)
+        Me.Panel1.Controls.Add(Me.cboRechnungsdruck)
        Me.Panel1.Controls.Add(Me.Label14)
        Me.Panel1.Controls.Add(Me.cbx)
-        Me.Panel1.Controls.Add(Me.MyComboBox3)
+        Me.Panel1.Controls.Add(Me.cboER_SR)
        Me.Panel1.Controls.Add(Me.Label5)
-        Me.Panel1.Controls.Add(Me.MyComboBox2)
+        Me.Panel1.Controls.Add(Me.cboSachbearbeiter)
        Me.Panel1.Controls.Add(Me.Label1)
        Me.Panel1.Controls.Add(Me.lblSachbearbeiter)
        Me.Panel1.Controls.Add(Me.cboFirma)
@@ -463,6 +463,43 @@ Partial Class frmAbrechnungsMaske
        Me.Panel1.Size = New System.Drawing.Size(575, 170)
        Me.Panel1.TabIndex = 0
        '
+        'KdSearchBox1
+        '
+        Me.KdSearchBox1._AlleFirmenCLUSTER = False
+        Me.KdSearchBox1._AllowSetValue = False
+        Me.KdSearchBox1._autoSizeGross = False
+        Me.KdSearchBox1._display_Name1 = False
+        Me.KdSearchBox1._displayAVISO_Email = False
+        Me.KdSearchBox1._displayFullName = False
+        Me.KdSearchBox1._displayWoelflKd = False
+        Me.KdSearchBox1._hideIfListEmpty = True
+        Me.KdSearchBox1._loadKdData = False
+        Me.KdSearchBox1._searchName1 = True
+        Me.KdSearchBox1._UseFIRMA = ""
+        Me.KdSearchBox1._ValueKdAndName = True
+        Me.KdSearchBox1.dgvpos = "LEFT"
+        Me.KdSearchBox1.KdName = Nothing
+        Me.KdSearchBox1.KdNr = "-1"
+        Me.KdSearchBox1.kdNrField = Nothing
+        Me.KdSearchBox1.KdNrNullInt = Nothing
+        Me.KdSearchBox1.Location = New System.Drawing.Point(99, 58)
+        Me.KdSearchBox1.Name = "KdSearchBox1"
+        Me.KdSearchBox1.nurAktive = True
+        Me.KdSearchBox1.searchActive = True
+        Me.KdSearchBox1.Size = New System.Drawing.Size(154, 20)
+        Me.KdSearchBox1.TabIndex = 135
+        Me.KdSearchBox1.TIMER_SEARCH = True
+        Me.KdSearchBox1.usrcntl = Nothing
+        '
+        'lblKunde
+        '
+        Me.lblKunde.AutoSize = True
+        Me.lblKunde.Location = New System.Drawing.Point(12, 61)
+        Me.lblKunde.Name = "lblKunde"
+        Me.lblKunde.Size = New System.Drawing.Size(41, 13)
+        Me.lblKunde.TabIndex = 134
+        Me.lblKunde.Text = "Kunde:"
+        '
        'PictureBox5
        '
        Me.PictureBox5.BackgroundImage = Global.SDL.My.Resources.Resources.fragezeichen
@@ -483,17 +520,17 @@ Partial Class frmAbrechnungsMaske
        Me.cbxGutschriftenAnVerag.Text = "nicht an Verag abger."
        Me.cbxGutschriftenAnVerag.UseVisualStyleBackColor = True
        '
-        'MyComboBox1
+        'cboRechnungsdruck
        '
-        Me.MyComboBox1._allowedValuesFreiText = Nothing
-        Me.MyComboBox1._allowFreiText = False
-        Me.MyComboBox1._value = ""
-        Me.MyComboBox1.FormattingEnabled = True
-        Me.MyComboBox1.Location = New System.Drawing.Point(453, 23)
-        Me.MyComboBox1.Margin = New System.Windows.Forms.Padding(2)
-        Me.MyComboBox1.Name = "MyComboBox1"
-        Me.MyComboBox1.Size = New System.Drawing.Size(83, 21)
-        Me.MyComboBox1.TabIndex = 53
+        Me.cboRechnungsdruck._allowedValuesFreiText = Nothing
+        Me.cboRechnungsdruck._allowFreiText = False
+        Me.cboRechnungsdruck._value = ""
+        Me.cboRechnungsdruck.FormattingEnabled = True
+        Me.cboRechnungsdruck.Location = New System.Drawing.Point(453, 23)
+        Me.cboRechnungsdruck.Margin = New System.Windows.Forms.Padding(2)
+        Me.cboRechnungsdruck.Name = "cboRechnungsdruck"
+        Me.cboRechnungsdruck.Size = New System.Drawing.Size(83, 21)
+        Me.cboRechnungsdruck.TabIndex = 53
        '
        'Label14
        '
@@ -516,17 +553,17 @@ Partial Class frmAbrechnungsMaske
        Me.cbx.Text = "Gedruckte Rechnugen anzeigen"
        Me.cbx.UseVisualStyleBackColor = True
        '
-        'MyComboBox3
+        'cboER_SR
        '
-        Me.MyComboBox3._allowedValuesFreiText = Nothing
-        Me.MyComboBox3._allowFreiText = False
-        Me.MyComboBox3._value = ""
-        Me.MyComboBox3.FormattingEnabled = True
-        Me.MyComboBox3.Location = New System.Drawing.Point(453, 3)
-        Me.MyComboBox3.Margin = New System.Windows.Forms.Padding(2)
-        Me.MyComboBox3.Name = "MyComboBox3"
-        Me.MyComboBox3.Size = New System.Drawing.Size(83, 21)
-        Me.MyComboBox3.TabIndex = 33
+        Me.cboER_SR._allowedValuesFreiText = Nothing
+        Me.cboER_SR._allowFreiText = False
+        Me.cboER_SR._value = ""
+        Me.cboER_SR.FormattingEnabled = True
+        Me.cboER_SR.Location = New System.Drawing.Point(453, 3)
+        Me.cboER_SR.Margin = New System.Windows.Forms.Padding(2)
+        Me.cboER_SR.Name = "cboER_SR"
+        Me.cboER_SR.Size = New System.Drawing.Size(83, 21)
+        Me.cboER_SR.TabIndex = 33
        '
        'Label5
        '
@@ -537,17 +574,17 @@ Partial Class frmAbrechnungsMaske
        Me.Label5.TabIndex = 32
        Me.Label5.Text = "Sammel-/Einzel-Rg.:"
        '
-        'MyComboBox2
+        'cboSachbearbeiter
        '
-        Me.MyComboBox2._allowedValuesFreiText = Nothing
-        Me.MyComboBox2._allowFreiText = False
-        Me.MyComboBox2._value = ""
-        Me.MyComboBox2.FormattingEnabled = True
-        Me.MyComboBox2.Location = New System.Drawing.Point(99, 33)
-        Me.MyComboBox2.Margin = New System.Windows.Forms.Padding(2)
-        Me.MyComboBox2.Name = "MyComboBox2"
-        Me.MyComboBox2.Size = New System.Drawing.Size(154, 21)
-        Me.MyComboBox2.TabIndex = 31
+        Me.cboSachbearbeiter._allowedValuesFreiText = Nothing
+        Me.cboSachbearbeiter._allowFreiText = False
+        Me.cboSachbearbeiter._value = ""
+        Me.cboSachbearbeiter.FormattingEnabled = True
+        Me.cboSachbearbeiter.Location = New System.Drawing.Point(99, 33)
+        Me.cboSachbearbeiter.Margin = New System.Windows.Forms.Padding(2)
+        Me.cboSachbearbeiter.Name = "cboSachbearbeiter"
+        Me.cboSachbearbeiter.Size = New System.Drawing.Size(154, 21)
+        Me.cboSachbearbeiter.TabIndex = 31
        '
        'Label1
        '
@@ -937,43 +974,6 @@ Partial Class frmAbrechnungsMaske
        Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
        Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4)
        '
-        'lblKunde
-        '
-        Me.lblKunde.AutoSize = True
-        Me.lblKunde.Location = New System.Drawing.Point(12, 61)
-        Me.lblKunde.Name = "lblKunde"
-        Me.lblKunde.Size = New System.Drawing.Size(41, 13)
-        Me.lblKunde.TabIndex = 134
-        Me.lblKunde.Text = "Kunde:"
-        '
-        'KdSearchBox1
-        '
-        Me.KdSearchBox1._AlleFirmenCLUSTER = False
-        Me.KdSearchBox1._AllowSetValue = False
-        Me.KdSearchBox1._autoSizeGross = False
-        Me.KdSearchBox1._display_Name1 = False
-        Me.KdSearchBox1._displayAVISO_Email = False
-        Me.KdSearchBox1._displayFullName = False
-        Me.KdSearchBox1._displayWoelflKd = False
-        Me.KdSearchBox1._hideIfListEmpty = True
-        Me.KdSearchBox1._loadKdData = False
-        Me.KdSearchBox1._searchName1 = True
-        Me.KdSearchBox1._UseFIRMA = ""
-        Me.KdSearchBox1._ValueKdAndName = True
-        Me.KdSearchBox1.dgvpos = "LEFT"
-        Me.KdSearchBox1.KdName = Nothing
-        Me.KdSearchBox1.KdNr = "-1"
-        Me.KdSearchBox1.kdNrField = Nothing
-        Me.KdSearchBox1.KdNrNullInt = Nothing
-        Me.KdSearchBox1.Location = New System.Drawing.Point(99, 58)
-        Me.KdSearchBox1.Name = "KdSearchBox1"
-        Me.KdSearchBox1.nurAktive = True
-        Me.KdSearchBox1.searchActive = True
-        Me.KdSearchBox1.Size = New System.Drawing.Size(154, 20)
-        Me.KdSearchBox1.TabIndex = 135
-        Me.KdSearchBox1.TIMER_SEARCH = True
-        Me.KdSearchBox1.usrcntl = Nothing
-        '
        'frmAbrechnungsMaske
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -1011,14 +1011,14 @@ Partial Class frmAbrechnungsMaske
    Friend WithEvents dgvRechnungen As VERAG_PROG_ALLGEMEIN.MyDatagridview
    Friend WithEvents cboFirma As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents lblSachbearbeiter As System.Windows.Forms.Label
-    Friend WithEvents MyComboBox2 As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents cboSachbearbeiter As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents btn As System.Windows.Forms.Button
    Friend WithEvents Label2 As Label
    Friend WithEvents Button1 As Button
    Friend WithEvents Button3 As Button
    Friend WithEvents Label3 As Label
-    Friend WithEvents MyComboBox3 As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents cboER_SR As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents Label5 As Label
    Friend WithEvents Label6 As Label
    Friend WithEvents tbcntr As TabControl
@@ -1057,7 +1057,7 @@ Partial Class frmAbrechnungsMaske
    Friend WithEvents Label4 As Label
    Friend WithEvents Button4 As Button
    Friend WithEvents Label12 As Label
-    Friend WithEvents MyComboBox1 As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents cboRechnungsdruck As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents Label14 As Label
    Public WithEvents cboSort As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents cbxOriginalDrucken As CheckBox