Fiskaltrust, etc.

2026-04-23 16:00:32 +02:00
parent c790359533
commit 63b96fb490
18 changed files with 482 additions and 317 deletions
--- a/VERAG_PROG_ALLGEMEIN/AuditFlow/frminterneEmailbenachrichtigungen.Designer.vb
+++ b/VERAG_PROG_ALLGEMEIN/AuditFlow/frminterneEmailbenachrichtigungen.Designer.vb
@@ -29,24 +29,25 @@ Partial Class frminterneEmailBenachrichtigungen
        Me.cntxtOptionen = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.StornoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.Panel1 = New System.Windows.Forms.Panel()
-        Me.dgvBenachrichtigungen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.pnloptions = New System.Windows.Forms.Panel()
        Me.Label9 = New System.Windows.Forms.Label()
-        Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.Button2 = New System.Windows.Forms.Button()
        Me.Panel2 = New System.Windows.Forms.Panel()
-        Me.cboKategorie = New VERAG_PROG_ALLGEMEIN.MyComboBox()
-        Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.Label5 = New System.Windows.Forms.Label()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.pnlTop = New System.Windows.Forms.Panel()
        Me.Label4 = New System.Windows.Forms.Label()
+        Me.cboOhneEmpf = New System.Windows.Forms.CheckBox()
+        Me.dgvBenachrichtigungen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.cboKategorie = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.cntxtOptionen.SuspendLayout()
        Me.Panel1.SuspendLayout()
-        CType(Me.dgvBenachrichtigungen, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.pnloptions.SuspendLayout()
        Me.Panel2.SuspendLayout()
        Me.pnlTop.SuspendLayout()
+        CType(Me.dgvBenachrichtigungen, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'AbgeholtToolStripMenuItem
@@ -80,29 +81,6 @@ Partial Class frminterneEmailBenachrichtigungen
        Me.Panel1.Size = New System.Drawing.Size(1429, 779)
        Me.Panel1.TabIndex = 4
        '
-        'dgvBenachrichtigungen
-        '
-        Me.dgvBenachrichtigungen.AKTUALISIERUNGS_INTERVALL = -1
-        Me.dgvBenachrichtigungen.AllowUserToAddRows = False
-        Me.dgvBenachrichtigungen.AllowUserToDeleteRows = False
-        Me.dgvBenachrichtigungen.AllowUserToOrderColumns = True
-        Me.dgvBenachrichtigungen.AllowUserToResizeRows = False
-        Me.dgvBenachrichtigungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Window
-        DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.GradientInactiveCaption
-        DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.dgvBenachrichtigungen.DefaultCellStyle = DataGridViewCellStyle1
-        Me.dgvBenachrichtigungen.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.dgvBenachrichtigungen.Location = New System.Drawing.Point(0, 115)
-        Me.dgvBenachrichtigungen.Name = "dgvBenachrichtigungen"
-        Me.dgvBenachrichtigungen.RowHeadersVisible = False
-        Me.dgvBenachrichtigungen.Size = New System.Drawing.Size(1429, 604)
-        Me.dgvBenachrichtigungen.TabIndex = 10
-        '
        'pnloptions
        '
        Me.pnloptions.BackColor = System.Drawing.Color.WhiteSmoke
@@ -125,33 +103,6 @@ Partial Class frminterneEmailBenachrichtigungen
        Me.Label9.TabIndex = 7
        Me.Label9.Text = "Max:"
        '
-        'MyTextBox2
-        '
-        Me.MyTextBox2._DateTimeOnly = False
-        Me.MyTextBox2._numbersOnly = True
-        Me.MyTextBox2._numbersOnlyKommastellen = ""
-        Me.MyTextBox2._numbersOnlyTrennzeichen = True
-        Me.MyTextBox2._Prozent = False
-        Me.MyTextBox2._ShortDateNew = False
-        Me.MyTextBox2._ShortDateOnly = False
-        Me.MyTextBox2._TimeOnly = False
-        Me.MyTextBox2._TimeOnly_Seconds = False
-        Me.MyTextBox2._value = ""
-        Me.MyTextBox2._Waehrung = False
-        Me.MyTextBox2._WaehrungZeichen = True
-        Me.MyTextBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.MyTextBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.MyTextBox2.ForeColor = System.Drawing.Color.Black
-        Me.MyTextBox2.Location = New System.Drawing.Point(1369, 13)
-        Me.MyTextBox2.MaxLineLength = -1
-        Me.MyTextBox2.MaxLines_Warning = ""
-        Me.MyTextBox2.MaxLines_Warning_Label = Nothing
-        Me.MyTextBox2.Name = "MyTextBox2"
-        Me.MyTextBox2.Size = New System.Drawing.Size(48, 20)
-        Me.MyTextBox2.TabIndex = 8
-        Me.MyTextBox2.Text = "1000"
-        Me.MyTextBox2.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
-        '
        'Button2
        '
        Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
@@ -172,6 +123,7 @@ Partial Class frminterneEmailBenachrichtigungen
        '
        Me.Panel2.BackColor = System.Drawing.Color.WhiteSmoke
        Me.Panel2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.Panel2.Controls.Add(Me.cboOhneEmpf)
        Me.Panel2.Controls.Add(Me.cboKategorie)
        Me.Panel2.Controls.Add(Me.cboFirma)
        Me.Panel2.Controls.Add(Me.Label5)
@@ -182,36 +134,6 @@ Partial Class frminterneEmailBenachrichtigungen
        Me.Panel2.Size = New System.Drawing.Size(1429, 115)
        Me.Panel2.TabIndex = 11
        '
-        'cboKategorie
-        '
-        Me.cboKategorie._allowedValuesFreiText = Nothing
-        Me.cboKategorie._allowFreiText = False
-        Me.cboKategorie._value = ""
-        Me.cboKategorie.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
-        Me.cboKategorie.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
-        Me.cboKategorie.DropDownWidth = 250
-        Me.cboKategorie.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.cboKategorie.FormattingEnabled = True
-        Me.cboKategorie.Location = New System.Drawing.Point(95, 76)
-        Me.cboKategorie.Name = "cboKategorie"
-        Me.cboKategorie.Size = New System.Drawing.Size(143, 24)
-        Me.cboKategorie.TabIndex = 30
-        '
-        'cboFirma
-        '
-        Me.cboFirma._allowedValuesFreiText = Nothing
-        Me.cboFirma._allowFreiText = False
-        Me.cboFirma._value = ""
-        Me.cboFirma.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
-        Me.cboFirma.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
-        Me.cboFirma.DropDownWidth = 250
-        Me.cboFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.cboFirma.FormattingEnabled = True
-        Me.cboFirma.Location = New System.Drawing.Point(95, 49)
-        Me.cboFirma.Name = "cboFirma"
-        Me.cboFirma.Size = New System.Drawing.Size(143, 24)
-        Me.cboFirma.TabIndex = 26
-        '
        'Label5
        '
        Me.Label5.AutoSize = True
@@ -253,6 +175,97 @@ Partial Class frminterneEmailBenachrichtigungen
        Me.Label4.TabIndex = 0
        Me.Label4.Text = "interne E-Mail Benachrichtungen"
        '
+        'cboOhneEmpf
+        '
+        Me.cboOhneEmpf.AutoSize = True
+        Me.cboOhneEmpf.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboOhneEmpf.Location = New System.Drawing.Point(256, 50)
+        Me.cboOhneEmpf.Name = "cboOhneEmpf"
+        Me.cboOhneEmpf.Size = New System.Drawing.Size(118, 17)
+        Me.cboOhneEmpf.TabIndex = 32
+        Me.cboOhneEmpf.Text = "ohne Empfänger"
+        Me.cboOhneEmpf.UseVisualStyleBackColor = True
+        '
+        'dgvBenachrichtigungen
+        '
+        Me.dgvBenachrichtigungen.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvBenachrichtigungen.AllowUserToAddRows = False
+        Me.dgvBenachrichtigungen.AllowUserToDeleteRows = False
+        Me.dgvBenachrichtigungen.AllowUserToOrderColumns = True
+        Me.dgvBenachrichtigungen.AllowUserToResizeRows = False
+        Me.dgvBenachrichtigungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.GradientInactiveCaption
+        DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvBenachrichtigungen.DefaultCellStyle = DataGridViewCellStyle1
+        Me.dgvBenachrichtigungen.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvBenachrichtigungen.Location = New System.Drawing.Point(0, 115)
+        Me.dgvBenachrichtigungen.Name = "dgvBenachrichtigungen"
+        Me.dgvBenachrichtigungen.RowHeadersVisible = False
+        Me.dgvBenachrichtigungen.Size = New System.Drawing.Size(1429, 604)
+        Me.dgvBenachrichtigungen.TabIndex = 10
+        '
+        'MyTextBox2
+        '
+        Me.MyTextBox2._DateTimeOnly = False
+        Me.MyTextBox2._numbersOnly = True
+        Me.MyTextBox2._numbersOnlyKommastellen = ""
+        Me.MyTextBox2._numbersOnlyTrennzeichen = True
+        Me.MyTextBox2._Prozent = False
+        Me.MyTextBox2._ShortDateNew = False
+        Me.MyTextBox2._ShortDateOnly = False
+        Me.MyTextBox2._TimeOnly = False
+        Me.MyTextBox2._TimeOnly_Seconds = False
+        Me.MyTextBox2._value = ""
+        Me.MyTextBox2._Waehrung = False
+        Me.MyTextBox2._WaehrungZeichen = True
+        Me.MyTextBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.MyTextBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.MyTextBox2.ForeColor = System.Drawing.Color.Black
+        Me.MyTextBox2.Location = New System.Drawing.Point(1369, 13)
+        Me.MyTextBox2.MaxLineLength = -1
+        Me.MyTextBox2.MaxLines_Warning = ""
+        Me.MyTextBox2.MaxLines_Warning_Label = Nothing
+        Me.MyTextBox2.Name = "MyTextBox2"
+        Me.MyTextBox2.Size = New System.Drawing.Size(48, 20)
+        Me.MyTextBox2.TabIndex = 8
+        Me.MyTextBox2.Text = "1000"
+        Me.MyTextBox2.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'cboKategorie
+        '
+        Me.cboKategorie._allowedValuesFreiText = Nothing
+        Me.cboKategorie._allowFreiText = False
+        Me.cboKategorie._value = ""
+        Me.cboKategorie.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
+        Me.cboKategorie.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
+        Me.cboKategorie.DropDownWidth = 250
+        Me.cboKategorie.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboKategorie.FormattingEnabled = True
+        Me.cboKategorie.Location = New System.Drawing.Point(95, 76)
+        Me.cboKategorie.Name = "cboKategorie"
+        Me.cboKategorie.Size = New System.Drawing.Size(143, 24)
+        Me.cboKategorie.TabIndex = 30
+        '
+        'cboFirma
+        '
+        Me.cboFirma._allowedValuesFreiText = Nothing
+        Me.cboFirma._allowFreiText = False
+        Me.cboFirma._value = ""
+        Me.cboFirma.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
+        Me.cboFirma.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
+        Me.cboFirma.DropDownWidth = 250
+        Me.cboFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboFirma.FormattingEnabled = True
+        Me.cboFirma.Location = New System.Drawing.Point(95, 49)
+        Me.cboFirma.Name = "cboFirma"
+        Me.cboFirma.Size = New System.Drawing.Size(143, 24)
+        Me.cboFirma.TabIndex = 26
+        '
        'frminterneEmailBenachrichtigungen
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -267,13 +280,13 @@ Partial Class frminterneEmailBenachrichtigungen
        Me.Text = "interne E-Mail Benachrichtigungen"
        Me.cntxtOptionen.ResumeLayout(False)
        Me.Panel1.ResumeLayout(False)
-        CType(Me.dgvBenachrichtigungen, System.ComponentModel.ISupportInitialize).EndInit()
        Me.pnloptions.ResumeLayout(False)
        Me.pnloptions.PerformLayout()
        Me.Panel2.ResumeLayout(False)
        Me.Panel2.PerformLayout()
        Me.pnlTop.ResumeLayout(False)
        Me.pnlTop.PerformLayout()
+        CType(Me.dgvBenachrichtigungen, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)

    End Sub
@@ -294,4 +307,5 @@ Partial Class frminterneEmailBenachrichtigungen
    Friend WithEvents Label1 As Windows.Forms.Label
    Friend WithEvents cboFirma As MyComboBox
    Friend WithEvents Label5 As Windows.Forms.Label
+    Friend WithEvents cboOhneEmpf As Windows.Forms.CheckBox
 End Class