Mailversand, Abrechnung, Kundenblatt, MDMEinarbeitung, etc.

This commit is contained in:
2025-10-08 09:28:13 +02:00
parent 8d1829625e
commit 3a02ac894a
14 changed files with 242 additions and 108 deletions

View File

@@ -27,6 +27,7 @@ Partial Class 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()
Me.pnlBottom = New System.Windows.Forms.Panel()
Me.pbMail = New System.Windows.Forms.PictureBox()
Me.pb_Beleg = New System.Windows.Forms.PictureBox()
Me.Button5 = New System.Windows.Forms.Button()
Me.txtSumme = New VERAG_PROG_ALLGEMEIN.MyTextBox()
@@ -113,6 +114,7 @@ Partial Class frmMDM_USTVAntrag
Me.dgvUSTVPositionen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.pnlAntragsPosDetails = New System.Windows.Forms.Panel()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.UstCntlUSTV_AntragPosition1 = New SDL.ustCntlUSTV_AntragPosition()
Me.Panel4 = New System.Windows.Forms.Panel()
Me.cbxKIUploaddelete = New System.Windows.Forms.CheckBox()
Me.scanUSTVA = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan()
@@ -123,6 +125,7 @@ Partial Class frmMDM_USTVAntrag
Me.Panel3 = New System.Windows.Forms.Panel()
Me.dgvErstattungspositionen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.pnlErstattungsdetails = New System.Windows.Forms.Panel()
Me.UstCntlUSTV_AntragErstattungen1 = New SDL.ustCntlUSTV_ErstattungPosition()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Button2 = New System.Windows.Forms.Button()
Me.Button3 = New System.Windows.Forms.Button()
@@ -139,10 +142,8 @@ Partial Class frmMDM_USTVAntrag
Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem()
Me.FakturiertToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.UstCntlUSTV_AntragPosition1 = New SDL.ustCntlUSTV_AntragPosition()
Me.UstCntlUSTV_AntragErstattungen1 = New SDL.ustCntlUSTV_ErstattungPosition()
Me.pbMail = New System.Windows.Forms.PictureBox()
Me.pnlBottom.SuspendLayout()
CType(Me.pbMail, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.pb_Beleg, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.picExcel, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.picPDF, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -166,7 +167,6 @@ Partial Class frmMDM_USTVAntrag
Me.Panel1.SuspendLayout()
Me.cns_vorauszahlen.SuspendLayout()
Me.ncs_Belege.SuspendLayout()
CType(Me.pbMail, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'pnlBottom
@@ -189,9 +189,19 @@ Partial Class frmMDM_USTVAntrag
Me.pnlBottom.Dock = System.Windows.Forms.DockStyle.Bottom
Me.pnlBottom.Location = New System.Drawing.Point(0, 649)
Me.pnlBottom.Name = "pnlBottom"
Me.pnlBottom.Size = New System.Drawing.Size(1454, 100)
Me.pnlBottom.Size = New System.Drawing.Size(1444, 100)
Me.pnlBottom.TabIndex = 3
'
'pbMail
'
Me.pbMail.Image = CType(resources.GetObject("pbMail.Image"), System.Drawing.Image)
Me.pbMail.Location = New System.Drawing.Point(1110, 17)
Me.pbMail.Name = "pbMail"
Me.pbMail.Size = New System.Drawing.Size(35, 35)
Me.pbMail.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.pbMail.TabIndex = 52
Me.pbMail.TabStop = False
'
'pb_Beleg
'
Me.pb_Beleg.Image = CType(resources.GetObject("pb_Beleg.Image"), System.Drawing.Image)
@@ -327,7 +337,7 @@ Partial Class frmMDM_USTVAntrag
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
Me.Button1.ForeColor = System.Drawing.Color.Black
Me.Button1.Location = New System.Drawing.Point(1252, 13)
Me.Button1.Location = New System.Drawing.Point(1242, 13)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(189, 70)
Me.Button1.TabIndex = 2
@@ -370,7 +380,7 @@ Partial Class frmMDM_USTVAntrag
Me.pnlHeader.Dock = System.Windows.Forms.DockStyle.Top
Me.pnlHeader.Location = New System.Drawing.Point(0, 0)
Me.pnlHeader.Name = "pnlHeader"
Me.pnlHeader.Size = New System.Drawing.Size(1454, 201)
Me.pnlHeader.Size = New System.Drawing.Size(1444, 201)
Me.pnlHeader.TabIndex = 0
'
'cbxRGretour
@@ -392,7 +402,7 @@ 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(856, 16)
Me.lblGesamtUSteuer.Location = New System.Drawing.Point(846, 16)
Me.lblGesamtUSteuer.Name = "lblGesamtUSteuer"
Me.lblGesamtUSteuer.Size = New System.Drawing.Size(117, 20)
Me.lblGesamtUSteuer.TabIndex = 26
@@ -406,7 +416,7 @@ 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(859, 59)
Me.lblDiffernezbetrag.Location = New System.Drawing.Point(849, 59)
Me.lblDiffernezbetrag.Name = "lblDiffernezbetrag"
Me.lblDiffernezbetrag.Size = New System.Drawing.Size(114, 15)
Me.lblDiffernezbetrag.TabIndex = 25
@@ -420,7 +430,7 @@ 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(859, 36)
Me.lblGesamtErstattung.Location = New System.Drawing.Point(849, 36)
Me.lblGesamtErstattung.Name = "lblGesamtErstattung"
Me.lblGesamtErstattung.Size = New System.Drawing.Size(114, 17)
Me.lblGesamtErstattung.TabIndex = 24
@@ -479,7 +489,7 @@ Partial Class frmMDM_USTVAntrag
Me.lblKdNr.ForeColor = System.Drawing.Color.White
Me.lblKdNr.Location = New System.Drawing.Point(79, 65)
Me.lblKdNr.Name = "lblKdNr"
Me.lblKdNr.Size = New System.Drawing.Size(432, 18)
Me.lblKdNr.Size = New System.Drawing.Size(422, 18)
Me.lblKdNr.TabIndex = 21
Me.lblKdNr.Text = "0000000"
'
@@ -560,7 +570,7 @@ Partial Class frmMDM_USTVAntrag
Me.Panel8.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel8.Location = New System.Drawing.Point(0, 86)
Me.Panel8.Name = "Panel8"
Me.Panel8.Size = New System.Drawing.Size(973, 115)
Me.Panel8.Size = New System.Drawing.Size(963, 115)
Me.Panel8.TabIndex = 19
'
'cbxSicherheit
@@ -1112,7 +1122,7 @@ Partial Class frmMDM_USTVAntrag
Me.Panel6.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Panel6.BackColor = System.Drawing.Color.White
Me.Panel6.ForeColor = System.Drawing.Color.White
Me.Panel6.Location = New System.Drawing.Point(571, 56)
Me.Panel6.Location = New System.Drawing.Point(561, 56)
Me.Panel6.Name = "Panel6"
Me.Panel6.Size = New System.Drawing.Size(390, 1)
Me.Panel6.TabIndex = 18
@@ -1124,7 +1134,7 @@ 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(733, 14)
Me.lblGesamtUSteuerFW.Location = New System.Drawing.Point(723, 14)
Me.lblGesamtUSteuerFW.Name = "lblGesamtUSteuerFW"
Me.lblGesamtUSteuerFW.Size = New System.Drawing.Size(117, 14)
Me.lblGesamtUSteuerFW.TabIndex = 17
@@ -1139,7 +1149,7 @@ Partial Class frmMDM_USTVAntrag
Me.Label12.Cursor = System.Windows.Forms.Cursors.Default
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!)
Me.Label12.ForeColor = System.Drawing.Color.White
Me.Label12.Location = New System.Drawing.Point(579, 16)
Me.Label12.Location = New System.Drawing.Point(569, 16)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(136, 15)
Me.Label12.TabIndex = 16
@@ -1152,7 +1162,7 @@ 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(733, 59)
Me.lblDiffernezbetragFW.Location = New System.Drawing.Point(723, 59)
Me.lblDiffernezbetragFW.Name = "lblDiffernezbetragFW"
Me.lblDiffernezbetragFW.Size = New System.Drawing.Size(117, 15)
Me.lblDiffernezbetragFW.TabIndex = 15
@@ -1167,7 +1177,7 @@ Partial Class frmMDM_USTVAntrag
Me.Label10.Cursor = System.Windows.Forms.Cursors.Default
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!)
Me.Label10.ForeColor = System.Drawing.Color.White
Me.Label10.Location = New System.Drawing.Point(579, 59)
Me.Label10.Location = New System.Drawing.Point(569, 59)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(94, 15)
Me.Label10.TabIndex = 14
@@ -1180,7 +1190,7 @@ 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(736, 36)
Me.lblGesamtErstattungFW.Location = New System.Drawing.Point(726, 36)
Me.lblGesamtErstattungFW.Name = "lblGesamtErstattungFW"
Me.lblGesamtErstattungFW.Size = New System.Drawing.Size(114, 15)
Me.lblGesamtErstattungFW.TabIndex = 13
@@ -1195,7 +1205,7 @@ Partial Class frmMDM_USTVAntrag
Me.Label7.Cursor = System.Windows.Forms.Cursors.Default
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!)
Me.Label7.ForeColor = System.Drawing.Color.White
Me.Label7.Location = New System.Drawing.Point(579, 36)
Me.Label7.Location = New System.Drawing.Point(569, 36)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(146, 15)
Me.Label7.TabIndex = 12
@@ -1209,7 +1219,7 @@ Partial Class frmMDM_USTVAntrag
Me.Panel5.Controls.Add(Me.Label5)
Me.Panel5.Controls.Add(Me.cboStatus)
Me.Panel5.Dock = System.Windows.Forms.DockStyle.Right
Me.Panel5.Location = New System.Drawing.Point(973, 0)
Me.Panel5.Location = New System.Drawing.Point(963, 0)
Me.Panel5.Margin = New System.Windows.Forms.Padding(0)
Me.Panel5.Name = "Panel5"
Me.Panel5.Size = New System.Drawing.Size(481, 201)
@@ -1425,7 +1435,7 @@ Partial Class frmMDM_USTVAntrag
Me.lblFirma.ForeColor = System.Drawing.Color.White
Me.lblFirma.Location = New System.Drawing.Point(79, 42)
Me.lblFirma.Name = "lblFirma"
Me.lblFirma.Size = New System.Drawing.Size(432, 18)
Me.lblFirma.Size = New System.Drawing.Size(422, 18)
Me.lblFirma.TabIndex = 3
Me.lblFirma.Text = "VERAG Spedition AG"
'
@@ -1439,7 +1449,7 @@ Partial Class frmMDM_USTVAntrag
Me.lblWarnung.ForeColor = System.Drawing.Color.Red
Me.lblWarnung.Location = New System.Drawing.Point(475, 10)
Me.lblWarnung.Name = "lblWarnung"
Me.lblWarnung.Size = New System.Drawing.Size(183, 18)
Me.lblWarnung.Size = New System.Drawing.Size(173, 18)
Me.lblWarnung.TabIndex = 23
'
'pnlBody
@@ -1452,7 +1462,7 @@ Partial Class frmMDM_USTVAntrag
Me.pnlBody.Controls.Add(Me.TabControl1)
Me.pnlBody.Location = New System.Drawing.Point(0, 206)
Me.pnlBody.Name = "pnlBody"
Me.pnlBody.Size = New System.Drawing.Size(1454, 443)
Me.pnlBody.Size = New System.Drawing.Size(1444, 443)
Me.pnlBody.TabIndex = 1
'
'TabControl1
@@ -1463,7 +1473,7 @@ Partial Class frmMDM_USTVAntrag
Me.TabControl1.Location = New System.Drawing.Point(0, 0)
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
Me.TabControl1.Size = New System.Drawing.Size(1452, 441)
Me.TabControl1.Size = New System.Drawing.Size(1442, 441)
Me.TabControl1.TabIndex = 1
'
'TabPage1
@@ -1473,7 +1483,7 @@ Partial Class frmMDM_USTVAntrag
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage1.Size = New System.Drawing.Size(1444, 415)
Me.TabPage1.Size = New System.Drawing.Size(1434, 415)
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = "Antragspositionen"
Me.TabPage1.UseVisualStyleBackColor = True
@@ -1496,7 +1506,7 @@ Partial Class frmMDM_USTVAntrag
Me.dgvUSTVPositionen.RowHeadersVisible = False
Me.dgvUSTVPositionen.RowHeadersWidth = 62
Me.dgvUSTVPositionen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvUSTVPositionen.Size = New System.Drawing.Size(1438, 140)
Me.dgvUSTVPositionen.Size = New System.Drawing.Size(1428, 140)
Me.dgvUSTVPositionen.TabIndex = 0
'
'pnlAntragsPosDetails
@@ -1505,7 +1515,7 @@ Partial Class frmMDM_USTVAntrag
Me.pnlAntragsPosDetails.Dock = System.Windows.Forms.DockStyle.Bottom
Me.pnlAntragsPosDetails.Location = New System.Drawing.Point(3, 149)
Me.pnlAntragsPosDetails.Name = "pnlAntragsPosDetails"
Me.pnlAntragsPosDetails.Size = New System.Drawing.Size(1438, 263)
Me.pnlAntragsPosDetails.Size = New System.Drawing.Size(1428, 263)
Me.pnlAntragsPosDetails.TabIndex = 2
'
'Panel2
@@ -1517,9 +1527,17 @@ Partial Class frmMDM_USTVAntrag
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel2.Location = New System.Drawing.Point(0, 0)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(1438, 263)
Me.Panel2.Size = New System.Drawing.Size(1428, 263)
Me.Panel2.TabIndex = 1
'
'UstCntlUSTV_AntragPosition1
'
Me.UstCntlUSTV_AntragPosition1.Dock = System.Windows.Forms.DockStyle.Fill
Me.UstCntlUSTV_AntragPosition1.Location = New System.Drawing.Point(154, 0)
Me.UstCntlUSTV_AntragPosition1.Name = "UstCntlUSTV_AntragPosition1"
Me.UstCntlUSTV_AntragPosition1.Size = New System.Drawing.Size(1272, 261)
Me.UstCntlUSTV_AntragPosition1.TabIndex = 0
'
'Panel4
'
Me.Panel4.BackColor = System.Drawing.Color.WhiteSmoke
@@ -1665,6 +1683,14 @@ Partial Class frmMDM_USTVAntrag
Me.pnlErstattungsdetails.Size = New System.Drawing.Size(1436, 261)
Me.pnlErstattungsdetails.TabIndex = 0
'
'UstCntlUSTV_AntragErstattungen1
'
Me.UstCntlUSTV_AntragErstattungen1.Dock = System.Windows.Forms.DockStyle.Fill
Me.UstCntlUSTV_AntragErstattungen1.Location = New System.Drawing.Point(154, 0)
Me.UstCntlUSTV_AntragErstattungen1.Name = "UstCntlUSTV_AntragErstattungen1"
Me.UstCntlUSTV_AntragErstattungen1.Size = New System.Drawing.Size(1280, 259)
Me.UstCntlUSTV_AntragErstattungen1.TabIndex = 2
'
'Panel1
'
Me.Panel1.BackColor = System.Drawing.Color.WhiteSmoke
@@ -1783,37 +1809,11 @@ Partial Class frmMDM_USTVAntrag
Me.FakturiertToolStripMenuItem.Text = "Fakturiert zurücksetzen"
Me.FakturiertToolStripMenuItem.Visible = False
'
'UstCntlUSTV_AntragPosition1
'
Me.UstCntlUSTV_AntragPosition1.Dock = System.Windows.Forms.DockStyle.Fill
Me.UstCntlUSTV_AntragPosition1.Location = New System.Drawing.Point(154, 0)
Me.UstCntlUSTV_AntragPosition1.Name = "UstCntlUSTV_AntragPosition1"
Me.UstCntlUSTV_AntragPosition1.Size = New System.Drawing.Size(1282, 261)
Me.UstCntlUSTV_AntragPosition1.TabIndex = 0
'
'UstCntlUSTV_AntragErstattungen1
'
Me.UstCntlUSTV_AntragErstattungen1.Dock = System.Windows.Forms.DockStyle.Fill
Me.UstCntlUSTV_AntragErstattungen1.Location = New System.Drawing.Point(154, 0)
Me.UstCntlUSTV_AntragErstattungen1.Name = "UstCntlUSTV_AntragErstattungen1"
Me.UstCntlUSTV_AntragErstattungen1.Size = New System.Drawing.Size(1280, 259)
Me.UstCntlUSTV_AntragErstattungen1.TabIndex = 2
'
'pbMail
'
Me.pbMail.Image = Global.SDL.My.Resources.Resources.email_big1
Me.pbMail.Location = New System.Drawing.Point(1110, 17)
Me.pbMail.Name = "pbMail"
Me.pbMail.Size = New System.Drawing.Size(35, 35)
Me.pbMail.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.pbMail.TabIndex = 52
Me.pbMail.TabStop = False
'
'frmMDM_USTVAntrag
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1454, 749)
Me.ClientSize = New System.Drawing.Size(1444, 749)
Me.Controls.Add(Me.pnlHeader)
Me.Controls.Add(Me.pnlBody)
Me.Controls.Add(Me.pnlBottom)
@@ -1824,6 +1824,7 @@ Partial Class frmMDM_USTVAntrag
Me.Text = "USTV Antrag"
Me.pnlBottom.ResumeLayout(False)
Me.pnlBottom.PerformLayout()
CType(Me.pbMail, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.pb_Beleg, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.picExcel, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.picPDF, System.ComponentModel.ISupportInitialize).EndInit()
@@ -1853,7 +1854,6 @@ Partial Class frmMDM_USTVAntrag
Me.Panel1.ResumeLayout(False)
Me.cns_vorauszahlen.ResumeLayout(False)
Me.ncs_Belege.ResumeLayout(False)
CType(Me.pbMail, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub