Mailbenachrichtigung, etc.

2025-06-25 08:54:42 +02:00
parent 931154c931
commit f1698f8ee3
6 changed files with 71 additions and 55 deletions
--- a/SDL/USTV/frmMDM_USTVAntrag.Designer.vb
+++ b/SDL/USTV/frmMDM_USTVAntrag.Designer.vb
@@ -24,8 +24,8 @@ Partial Class frmMDM_USTVAntrag
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMDM_USTVAntrag))
-        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.pnlBottom = New System.Windows.Forms.Panel()
        Me.pb_Beleg = New System.Windows.Forms.PictureBox()
        Me.Button5 = New System.Windows.Forms.Button()
@@ -387,9 +387,9 @@ Partial Class frmMDM_USTVAntrag
        Me.lblGesamtUSteuer.Cursor = System.Windows.Forms.Cursors.Default
        Me.lblGesamtUSteuer.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold)
        Me.lblGesamtUSteuer.ForeColor = System.Drawing.Color.White
-        Me.lblGesamtUSteuer.Location = New System.Drawing.Point(840, 16)
+        Me.lblGesamtUSteuer.Location = New System.Drawing.Point(856, 16)
        Me.lblGesamtUSteuer.Name = "lblGesamtUSteuer"
-        Me.lblGesamtUSteuer.Size = New System.Drawing.Size(133, 17)
+        Me.lblGesamtUSteuer.Size = New System.Drawing.Size(117, 20)
        Me.lblGesamtUSteuer.TabIndex = 26
        Me.lblGesamtUSteuer.Text = "000.000,00"
        Me.lblGesamtUSteuer.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -401,9 +401,9 @@ Partial Class frmMDM_USTVAntrag
        Me.lblDiffernezbetrag.Cursor = System.Windows.Forms.Cursors.Default
        Me.lblDiffernezbetrag.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold)
        Me.lblDiffernezbetrag.ForeColor = System.Drawing.Color.White
-        Me.lblDiffernezbetrag.Location = New System.Drawing.Point(840, 59)
+        Me.lblDiffernezbetrag.Location = New System.Drawing.Point(859, 59)
        Me.lblDiffernezbetrag.Name = "lblDiffernezbetrag"
-        Me.lblDiffernezbetrag.Size = New System.Drawing.Size(133, 17)
+        Me.lblDiffernezbetrag.Size = New System.Drawing.Size(114, 15)
        Me.lblDiffernezbetrag.TabIndex = 25
        Me.lblDiffernezbetrag.Text = "000.000,00"
        Me.lblDiffernezbetrag.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -415,9 +415,9 @@ Partial Class frmMDM_USTVAntrag
        Me.lblGesamtErstattung.Cursor = System.Windows.Forms.Cursors.Default
        Me.lblGesamtErstattung.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold)
        Me.lblGesamtErstattung.ForeColor = System.Drawing.Color.White
-        Me.lblGesamtErstattung.Location = New System.Drawing.Point(840, 36)
+        Me.lblGesamtErstattung.Location = New System.Drawing.Point(859, 36)
        Me.lblGesamtErstattung.Name = "lblGesamtErstattung"
-        Me.lblGesamtErstattung.Size = New System.Drawing.Size(133, 17)
+        Me.lblGesamtErstattung.Size = New System.Drawing.Size(114, 17)
        Me.lblGesamtErstattung.TabIndex = 24
        Me.lblGesamtErstattung.Text = "000.000,00"
        Me.lblGesamtErstattung.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1119,9 +1119,9 @@ Partial Class frmMDM_USTVAntrag
        Me.lblGesamtUSteuerFW.Cursor = System.Windows.Forms.Cursors.Default
        Me.lblGesamtUSteuerFW.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold)
        Me.lblGesamtUSteuerFW.ForeColor = System.Drawing.Color.White
-        Me.lblGesamtUSteuerFW.Location = New System.Drawing.Point(721, 16)
+        Me.lblGesamtUSteuerFW.Location = New System.Drawing.Point(733, 14)
        Me.lblGesamtUSteuerFW.Name = "lblGesamtUSteuerFW"
-        Me.lblGesamtUSteuerFW.Size = New System.Drawing.Size(133, 17)
+        Me.lblGesamtUSteuerFW.Size = New System.Drawing.Size(117, 14)
        Me.lblGesamtUSteuerFW.TabIndex = 17
        Me.lblGesamtUSteuerFW.Text = "000.000,00 €"
        Me.lblGesamtUSteuerFW.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1147,9 +1147,9 @@ Partial Class frmMDM_USTVAntrag
        Me.lblDiffernezbetragFW.Cursor = System.Windows.Forms.Cursors.Default
        Me.lblDiffernezbetragFW.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold)
        Me.lblDiffernezbetragFW.ForeColor = System.Drawing.Color.White
-        Me.lblDiffernezbetragFW.Location = New System.Drawing.Point(721, 59)
+        Me.lblDiffernezbetragFW.Location = New System.Drawing.Point(733, 59)
        Me.lblDiffernezbetragFW.Name = "lblDiffernezbetragFW"
-        Me.lblDiffernezbetragFW.Size = New System.Drawing.Size(133, 17)
+        Me.lblDiffernezbetragFW.Size = New System.Drawing.Size(117, 15)
        Me.lblDiffernezbetragFW.TabIndex = 15
        Me.lblDiffernezbetragFW.Text = "000.000,00 €"
        Me.lblDiffernezbetragFW.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1175,9 +1175,9 @@ Partial Class frmMDM_USTVAntrag
        Me.lblGesamtErstattungFW.Cursor = System.Windows.Forms.Cursors.Default
        Me.lblGesamtErstattungFW.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold)
        Me.lblGesamtErstattungFW.ForeColor = System.Drawing.Color.White
-        Me.lblGesamtErstattungFW.Location = New System.Drawing.Point(721, 36)
+        Me.lblGesamtErstattungFW.Location = New System.Drawing.Point(736, 36)
        Me.lblGesamtErstattungFW.Name = "lblGesamtErstattungFW"
-        Me.lblGesamtErstattungFW.Size = New System.Drawing.Size(133, 17)
+        Me.lblGesamtErstattungFW.Size = New System.Drawing.Size(114, 15)
        Me.lblGesamtErstattungFW.TabIndex = 13
        Me.lblGesamtErstattungFW.Text = "000.000,00 €"
        Me.lblGesamtErstattungFW.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1478,8 +1478,8 @@ Partial Class frmMDM_USTVAntrag
        Me.dgvUSTVPositionen.AKTUALISIERUNGS_INTERVALL = 500
        Me.dgvUSTVPositionen.AllowUserToAddRows = False
        Me.dgvUSTVPositionen.AllowUserToDeleteRows = False
-        DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
-        Me.dgvUSTVPositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+        DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
+        Me.dgvUSTVPositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
        Me.dgvUSTVPositionen.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
            Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -1640,8 +1640,8 @@ Partial Class frmMDM_USTVAntrag
        Me.dgvErstattungspositionen.AKTUALISIERUNGS_INTERVALL = 500
        Me.dgvErstattungspositionen.AllowUserToAddRows = False
        Me.dgvErstattungspositionen.AllowUserToDeleteRows = False
-        DataGridViewCellStyle2.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
-        Me.dgvErstattungspositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
+        DataGridViewCellStyle4.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
+        Me.dgvErstattungspositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4
        Me.dgvErstattungspositionen.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
            Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)