ustva, cbam, autofakt, etc.

2025-04-17 08:59:42 +02:00
parent 814133b95a
commit 98bd08ca60
18 changed files with 981 additions and 177 deletions
--- a/SDL/Fakturierung/frmFaktSammelRgDrucken.Designer.vb
+++ b/SDL/Fakturierung/frmFaktSammelRgDrucken.Designer.vb
@@ -60,8 +60,18 @@ Partial Class frmFaktSammelRgDrucken
        Me.cboAbfertigungsart = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.Button2 = New System.Windows.Forms.Button()
        Me.cbxMWST = New System.Windows.Forms.CheckBox()
+        Me.pnlAUTOMailversand = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components)
+        Me.Button6 = New System.Windows.Forms.Button()
+        Me.Button5 = New System.Windows.Forms.Button()
+        Me.Label7 = New System.Windows.Forms.Label()
+        Me.Button4 = New System.Windows.Forms.Button()
+        Me.Button3 = New System.Windows.Forms.Button()
+        Me.cbxAUTOMail = New System.Windows.Forms.CheckBox()
+        Me.Button7 = New System.Windows.Forms.Button()
+        Me.cbxMailoeffnen = New System.Windows.Forms.CheckBox()
        Me.pnl.SuspendLayout()
        CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnlAUTOMailversand.SuspendLayout()
        Me.SuspendLayout()
        '
        'pnl
@@ -222,7 +232,7 @@ Partial Class frmFaktSammelRgDrucken
        Me.cboPrinter.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.cboPrinter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboPrinter.FormattingEnabled = True
-        Me.cboPrinter.Location = New System.Drawing.Point(12, 364)
+        Me.cboPrinter.Location = New System.Drawing.Point(12, 425)
        Me.cboPrinter.Name = "cboPrinter"
        Me.cboPrinter.Size = New System.Drawing.Size(118, 21)
        Me.cboPrinter.TabIndex = 17
@@ -292,7 +302,7 @@ Partial Class frmFaktSammelRgDrucken
        Me.MyDatagridview1.ReadOnly = True
        Me.MyDatagridview1.RowHeadersVisible = False
        Me.MyDatagridview1.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.MyDatagridview1.Size = New System.Drawing.Size(547, 294)
+        Me.MyDatagridview1.Size = New System.Drawing.Size(547, 355)
        Me.MyDatagridview1.TabIndex = 18
        '
        'btn
@@ -301,7 +311,7 @@ Partial Class frmFaktSammelRgDrucken
        Me.btn.BackgroundImage = Global.SDL.My.Resources.Resources.printer2
        Me.btn.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btn.Location = New System.Drawing.Point(12, 262)
+        Me.btn.Location = New System.Drawing.Point(12, 323)
        Me.btn.Name = "btn"
        Me.btn.Size = New System.Drawing.Size(118, 60)
        Me.btn.TabIndex = 11
@@ -314,7 +324,7 @@ Partial Class frmFaktSammelRgDrucken
        Me.Button9.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
        Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button9.Location = New System.Drawing.Point(12, 321)
+        Me.Button9.Location = New System.Drawing.Point(12, 382)
        Me.Button9.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
        Me.Button9.Name = "Button9"
        Me.Button9.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
@@ -330,7 +340,7 @@ Partial Class frmFaktSammelRgDrucken
        Me.Button8.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
        Me.Button8.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button8.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button8.Location = New System.Drawing.Point(51, 321)
+        Me.Button8.Location = New System.Drawing.Point(51, 382)
        Me.Button8.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
        Me.Button8.Name = "Button8"
        Me.Button8.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
@@ -343,7 +353,7 @@ Partial Class frmFaktSammelRgDrucken
        '
        Me.cbxEinzelAnlagen.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.cbxEinzelAnlagen.AutoSize = True
-        Me.cbxEinzelAnlagen.Location = New System.Drawing.Point(150, 291)
+        Me.cbxEinzelAnlagen.Location = New System.Drawing.Point(150, 352)
        Me.cbxEinzelAnlagen.Name = "cbxEinzelAnlagen"
        Me.cbxEinzelAnlagen.Size = New System.Drawing.Size(96, 17)
        Me.cbxEinzelAnlagen.TabIndex = 14
@@ -356,7 +366,7 @@ Partial Class frmFaktSammelRgDrucken
        Me.cbxSammelbericht.AutoSize = True
        Me.cbxSammelbericht.Checked = True
        Me.cbxSammelbericht.CheckState = System.Windows.Forms.CheckState.Checked
-        Me.cbxSammelbericht.Location = New System.Drawing.Point(150, 311)
+        Me.cbxSammelbericht.Location = New System.Drawing.Point(150, 372)
        Me.cbxSammelbericht.Name = "cbxSammelbericht"
        Me.cbxSammelbericht.Size = New System.Drawing.Size(95, 17)
        Me.cbxSammelbericht.TabIndex = 16
@@ -379,7 +389,7 @@ Partial Class frmFaktSammelRgDrucken
        '
        Me.cbxZusammenfassen.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.cbxZusammenfassen.AutoSize = True
-        Me.cbxZusammenfassen.Location = New System.Drawing.Point(12, 347)
+        Me.cbxZusammenfassen.Location = New System.Drawing.Point(12, 408)
        Me.cbxZusammenfassen.Name = "cbxZusammenfassen"
        Me.cbxZusammenfassen.Size = New System.Drawing.Size(107, 17)
        Me.cbxZusammenfassen.TabIndex = 15
@@ -414,7 +424,7 @@ Partial Class frmFaktSammelRgDrucken
        '
        Me.cbxEVOLOG.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.cbxEVOLOG.AutoSize = True
-        Me.cbxEVOLOG.Location = New System.Drawing.Point(151, 349)
+        Me.cbxEVOLOG.Location = New System.Drawing.Point(151, 410)
        Me.cbxEVOLOG.Name = "cbxEVOLOG"
        Me.cbxEVOLOG.Size = New System.Drawing.Size(99, 17)
        Me.cbxEVOLOG.TabIndex = 19
@@ -425,7 +435,7 @@ Partial Class frmFaktSammelRgDrucken
        '
        Me.Label4.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.Label4.AutoSize = True
-        Me.Label4.Location = New System.Drawing.Point(148, 333)
+        Me.Label4.Location = New System.Drawing.Point(148, 394)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(41, 13)
        Me.Label4.TabIndex = 20
@@ -437,7 +447,7 @@ Partial Class frmFaktSammelRgDrucken
        Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button1.Location = New System.Drawing.Point(150, 262)
+        Me.Button1.Location = New System.Drawing.Point(150, 323)
        Me.Button1.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(91, 25)
@@ -449,7 +459,7 @@ Partial Class frmFaktSammelRgDrucken
        '
        Me.cbxTransFerry.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.cbxTransFerry.AutoSize = True
-        Me.cbxTransFerry.Location = New System.Drawing.Point(151, 367)
+        Me.cbxTransFerry.Location = New System.Drawing.Point(151, 428)
        Me.cbxTransFerry.Name = "cbxTransFerry"
        Me.cbxTransFerry.Size = New System.Drawing.Size(105, 17)
        Me.cbxTransFerry.TabIndex = 22
@@ -505,7 +515,7 @@ Partial Class frmFaktSammelRgDrucken
        Me.Button2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button2.Location = New System.Drawing.Point(90, 321)
+        Me.Button2.Location = New System.Drawing.Point(90, 382)
        Me.Button2.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
        Me.Button2.Name = "Button2"
        Me.Button2.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
@@ -528,12 +538,133 @@ Partial Class frmFaktSammelRgDrucken
        Me.cbxMWST.ThreeState = True
        Me.cbxMWST.UseVisualStyleBackColor = True
        '
+        'pnlAUTOMailversand
+        '
+        Me.pnlAUTOMailversand.Controls.Add(Me.cbxMailoeffnen)
+        Me.pnlAUTOMailversand.Controls.Add(Me.Button7)
+        Me.pnlAUTOMailversand.Controls.Add(Me.Button6)
+        Me.pnlAUTOMailversand.Controls.Add(Me.Button5)
+        Me.pnlAUTOMailversand.Controls.Add(Me.Label7)
+        Me.pnlAUTOMailversand.Controls.Add(Me.Button4)
+        Me.pnlAUTOMailversand.Controls.Add(Me.Button3)
+        Me.pnlAUTOMailversand.Location = New System.Drawing.Point(12, 185)
+        Me.pnlAUTOMailversand.Name = "pnlAUTOMailversand"
+        Me.pnlAUTOMailversand.Size = New System.Drawing.Size(229, 132)
+        Me.pnlAUTOMailversand.TabIndex = 29
+        Me.pnlAUTOMailversand.Visible = False
+        '
+        'Button6
+        '
+        Me.Button6.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button6.Image = Global.SDL.My.Resources.Resources.rechnung1
+        Me.Button6.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button6.Location = New System.Drawing.Point(114, 3)
+        Me.Button6.Name = "Button6"
+        Me.Button6.Size = New System.Drawing.Size(106, 40)
+        Me.Button6.TabIndex = 36
+        Me.Button6.Text = "Rechnung"
+        Me.Button6.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button6.UseVisualStyleBackColor = True
+        '
+        'Button5
+        '
+        Me.Button5.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button5.Image = Global.SDL.My.Resources.Resources.kunden
+        Me.Button5.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button5.Location = New System.Drawing.Point(11, 3)
+        Me.Button5.Name = "Button5"
+        Me.Button5.Size = New System.Drawing.Size(97, 40)
+        Me.Button5.TabIndex = 35
+        Me.Button5.Text = "Kunde"
+        Me.Button5.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button5.UseVisualStyleBackColor = True
+        '
+        'Label7
+        '
+        Me.Label7.AutoSize = True
+        Me.Label7.Location = New System.Drawing.Point(8, 78)
+        Me.Label7.Name = "Label7"
+        Me.Label7.Size = New System.Drawing.Size(135, 13)
+        Me.Label7.TabIndex = 34
+        Me.Label7.Text = "autom. Rechnungsversand"
+        '
+        'Button4
+        '
+        Me.Button4.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Button4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button4.Location = New System.Drawing.Point(111, 94)
+        Me.Button4.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
+        Me.Button4.Name = "Button4"
+        Me.Button4.Size = New System.Drawing.Size(91, 25)
+        Me.Button4.TabIndex = 31
+        Me.Button4.Text = "deaktivieren"
+        Me.Button4.UseVisualStyleBackColor = True
+        '
+        'Button3
+        '
+        Me.Button3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button3.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button3.Location = New System.Drawing.Point(10, 94)
+        Me.Button3.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
+        Me.Button3.Name = "Button3"
+        Me.Button3.Size = New System.Drawing.Size(91, 25)
+        Me.Button3.TabIndex = 30
+        Me.Button3.Text = "aktivieren"
+        Me.Button3.UseVisualStyleBackColor = True
+        '
+        'cbxAUTOMail
+        '
+        Me.cbxAUTOMail.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.cbxAUTOMail.AutoSize = True
+        Me.cbxAUTOMail.Location = New System.Drawing.Point(550, 44)
+        Me.cbxAUTOMail.Name = "cbxAUTOMail"
+        Me.cbxAUTOMail.Size = New System.Drawing.Size(116, 17)
+        Me.cbxAUTOMail.TabIndex = 30
+        Me.cbxAUTOMail.Text = "AUTO Mailversand"
+        Me.cbxAUTOMail.UseVisualStyleBackColor = True
+        Me.cbxAUTOMail.Visible = False
+        '
+        'Button7
+        '
+        Me.Button7.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Button7.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button7.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button7.Location = New System.Drawing.Point(12, 49)
+        Me.Button7.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
+        Me.Button7.Name = "Button7"
+        Me.Button7.Size = New System.Drawing.Size(106, 25)
+        Me.Button7.TabIndex = 37
+        Me.Button7.Text = "senden"
+        Me.Button7.UseVisualStyleBackColor = True
+        '
+        'cbxMailoeffnen
+        '
+        Me.cbxMailoeffnen.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.cbxMailoeffnen.AutoSize = True
+        Me.cbxMailoeffnen.Checked = True
+        Me.cbxMailoeffnen.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.cbxMailoeffnen.Location = New System.Drawing.Point(124, 54)
+        Me.cbxMailoeffnen.Name = "cbxMailoeffnen"
+        Me.cbxMailoeffnen.Size = New System.Drawing.Size(91, 17)
+        Me.cbxMailoeffnen.TabIndex = 31
+        Me.cbxMailoeffnen.Text = "Mail anzeigen"
+        Me.cbxMailoeffnen.UseVisualStyleBackColor = True
+        '
        'frmFaktSammelRgDrucken
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.Color.White
-        Me.ClientSize = New System.Drawing.Size(811, 393)
+        Me.ClientSize = New System.Drawing.Size(811, 454)
+        Me.Controls.Add(Me.cbxAUTOMail)
+        Me.Controls.Add(Me.pnlAUTOMailversand)
        Me.Controls.Add(Me.cbxMWST)
        Me.Controls.Add(Me.Button2)
        Me.Controls.Add(Me.Label6)
@@ -570,6 +701,8 @@ Partial Class frmFaktSammelRgDrucken
        Me.pnl.ResumeLayout(False)
        Me.pnl.PerformLayout()
        CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnlAUTOMailversand.ResumeLayout(False)
+        Me.pnlAUTOMailversand.PerformLayout()
        Me.ResumeLayout(False)
        Me.PerformLayout()

@@ -611,4 +744,13 @@ Partial Class frmFaktSammelRgDrucken
    Friend WithEvents Button2 As Button
    Friend WithEvents RadioButton5 As RadioButton
    Friend WithEvents cbxMWST As CheckBox
+    Friend WithEvents pnlAUTOMailversand As VERAG_PROG_ALLGEMEIN.MyPanel
+    Friend WithEvents Label7 As Label
+    Friend WithEvents Button4 As Button
+    Friend WithEvents Button3 As Button
+    Friend WithEvents cbxAUTOMail As CheckBox
+    Friend WithEvents Button6 As Button
+    Friend WithEvents Button5 As Button
+    Friend WithEvents Button7 As Button
+    Friend WithEvents cbxMailoeffnen As CheckBox
 End Class