Vermerke

2024-06-06 22:24:35 +02:00
parent 846f875a96
commit 325fabf993
10 changed files with 1063 additions and 169 deletions
--- a/Aviso/frmSendungsdetailsNEU.Designer.vb
+++ b/Aviso/frmSendungsdetailsNEU.Designer.vb
@@ -34,6 +34,15 @@ Partial Class frmSendungsdetailsNEU
        Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.pnl = New System.Windows.Forms.Panel()
        Me.Panel4 = New System.Windows.Forms.Panel()
        Me.TabControl1 = New System.Windows.Forms.TabControl()
@@ -127,6 +136,15 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvDigicust = New System.Windows.Forms.DataGridView()
        Me.Panel24 = New System.Windows.Forms.Panel()
        Me.Button19 = New System.Windows.Forms.Button()
+        Me.tbMail = New System.Windows.Forms.TabPage()
+        Me.dgvMail = New System.Windows.Forms.DataGridView()
+        Me.clmnSender = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.clmnRec = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.clmnSbj = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.clmnAtt = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.clmnUIDL = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.Panel25 = New System.Windows.Forms.Panel()
+        Me.Button23 = New System.Windows.Forms.Button()
        Me.Panel14 = New System.Windows.Forms.Panel()
        Me.pnlDetails = New System.Windows.Forms.Panel()
        Me.tbcntr = New System.Windows.Forms.TabControl()
@@ -445,6 +463,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ContextMenuStrip3 = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.XXXToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.timerValidation = New System.Windows.Forms.Timer(Me.components)
+        Me.RCntrlVermerke1 = New AVISO.rCntrlVermerke()
        Me.pnl.SuspendLayout()
        Me.Panel4.SuspendLayout()
        Me.TabControl1.SuspendLayout()
@@ -472,6 +491,9 @@ Partial Class frmSendungsdetailsNEU
        Me.tbDigicust.SuspendLayout()
        CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel24.SuspendLayout()
+        Me.tbMail.SuspendLayout()
+        CType(Me.dgvMail, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.Panel25.SuspendLayout()
        Me.pnlDetails.SuspendLayout()
        Me.tbcntr.SuspendLayout()
        Me.TabPage4.SuspendLayout()
@@ -549,6 +571,7 @@ Partial Class frmSendungsdetailsNEU
        Me.TabControl1.Controls.Add(Me.TabPage3)
        Me.TabControl1.Controls.Add(Me.tbATEZ)
        Me.TabControl1.Controls.Add(Me.tbDigicust)
+        Me.TabControl1.Controls.Add(Me.tbMail)
        Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.TabControl1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
        Me.TabControl1.Location = New System.Drawing.Point(0, 3)
@@ -598,7 +621,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbAnhang.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
        Me.tbAnhang.Location = New System.Drawing.Point(4, 29)
        Me.tbAnhang.Name = "tbAnhang"
-        Me.tbAnhang.Size = New System.Drawing.Size(1206, 288)
+        Me.tbAnhang.Size = New System.Drawing.Size(1206, 289)
        Me.tbAnhang.TabIndex = 4
        Me.tbAnhang.Text = "Anhang"
        Me.tbAnhang.UseVisualStyleBackColor = True
@@ -616,9 +639,10 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvAnhang.Name = "dgvAnhang"
        Me.dgvAnhang.ReadOnly = True
        Me.dgvAnhang.RowHeadersVisible = False
+        Me.dgvAnhang.RowHeadersWidth = 51
        Me.dgvAnhang.RowTemplate.Height = 40
        Me.dgvAnhang.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvAnhang.Size = New System.Drawing.Size(1206, 243)
+        Me.dgvAnhang.Size = New System.Drawing.Size(1206, 244)
        Me.dgvAnhang.TabIndex = 1
        '
        'btnDirektAnfuegen
@@ -862,7 +886,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbZollabfertigung.Controls.Add(Me.Panel16)
        Me.tbZollabfertigung.Location = New System.Drawing.Point(4, 29)
        Me.tbZollabfertigung.Name = "tbZollabfertigung"
-        Me.tbZollabfertigung.Size = New System.Drawing.Size(1206, 288)
+        Me.tbZollabfertigung.Size = New System.Drawing.Size(1206, 289)
        Me.tbZollabfertigung.TabIndex = 2
        Me.tbZollabfertigung.Text = "Zollabfertigung"
        Me.tbZollabfertigung.UseVisualStyleBackColor = True
@@ -876,7 +900,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
        Me.Panel16.Location = New System.Drawing.Point(0, 0)
        Me.Panel16.Name = "Panel16"
-        Me.Panel16.Size = New System.Drawing.Size(1206, 288)
+        Me.Panel16.Size = New System.Drawing.Size(1206, 289)
        Me.Panel16.TabIndex = 0
        '
        'dgvZollAnmeldungen
@@ -891,9 +915,10 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvZollAnmeldungen.Location = New System.Drawing.Point(0, 32)
        Me.dgvZollAnmeldungen.Name = "dgvZollAnmeldungen"
        Me.dgvZollAnmeldungen.ReadOnly = True
+        Me.dgvZollAnmeldungen.RowHeadersWidth = 51
        Me.dgvZollAnmeldungen.RowTemplate.Height = 30
        Me.dgvZollAnmeldungen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(1206, 218)
+        Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(1206, 219)
        Me.dgvZollAnmeldungen.TabIndex = 1
        '
        'Panel17
@@ -902,7 +927,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel17.Controls.Add(Me.Button6)
        Me.Panel17.Controls.Add(Me.Button5)
        Me.Panel17.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.Panel17.Location = New System.Drawing.Point(0, 250)
+        Me.Panel17.Location = New System.Drawing.Point(0, 251)
        Me.Panel17.Name = "Panel17"
        Me.Panel17.Size = New System.Drawing.Size(1206, 38)
        Me.Panel17.TabIndex = 2
@@ -939,6 +964,7 @@ Partial Class frmSendungsdetailsNEU
        Me.MenuStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem13, Me.ToolStripMenuItem7, Me.ToolStripMenuItem6, Me.ToolStripMenuItem11, Me.ToolStripMenuItem17, Me.ToolStripMenuItem21, Me.ToolStripMenuItem31, Me.ToolStripMenuItem12, Me.ToolStripMenuItem32})
        Me.MenuStrip.Location = New System.Drawing.Point(0, 0)
        Me.MenuStrip.Name = "MenuStrip"
+        Me.MenuStrip.Padding = New System.Windows.Forms.Padding(5, 2, 0, 2)
        Me.MenuStrip.Size = New System.Drawing.Size(1206, 32)
        Me.MenuStrip.TabIndex = 0
        '
@@ -1020,7 +1046,7 @@ Partial Class frmSendungsdetailsNEU
        '
        Me.ToolStripMenuItem20.Image = Global.AVISO.My.Resources.Resources.plus
        Me.ToolStripMenuItem20.Name = "ToolStripMenuItem20"
-        Me.ToolStripMenuItem20.Size = New System.Drawing.Size(188, 30)
+        Me.ToolStripMenuItem20.Size = New System.Drawing.Size(103, 30)
        Me.ToolStripMenuItem20.Text = "EZA"
        '
        'ToolStripMenuItem18
@@ -1029,7 +1055,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ToolStripMenuItem18.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.ToolStripMenuItem18.Image = Global.AVISO.My.Resources.Resources.plus
        Me.ToolStripMenuItem18.Name = "ToolStripMenuItem18"
-        Me.ToolStripMenuItem18.Size = New System.Drawing.Size(188, 30)
+        Me.ToolStripMenuItem18.Size = New System.Drawing.Size(103, 30)
        Me.ToolStripMenuItem18.Text = "T1"
        '
        'ToolStripMenuItem19
@@ -1038,7 +1064,7 @@ Partial Class frmSendungsdetailsNEU
        Me.ToolStripMenuItem19.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.ToolStripMenuItem19.Image = Global.AVISO.My.Resources.Resources.plus
        Me.ToolStripMenuItem19.Name = "ToolStripMenuItem19"
-        Me.ToolStripMenuItem19.Size = New System.Drawing.Size(188, 30)
+        Me.ToolStripMenuItem19.Size = New System.Drawing.Size(103, 30)
        Me.ToolStripMenuItem19.Text = "T2"
        '
        'ToolStripMenuItem21
@@ -1107,8 +1133,8 @@ Partial Class frmSendungsdetailsNEU
        Me.TabPage1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
        Me.TabPage1.Location = New System.Drawing.Point(4, 29)
        Me.TabPage1.Name = "TabPage1"
-        Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage1.Size = New System.Drawing.Size(1206, 288)
+        Me.TabPage1.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.TabPage1.Size = New System.Drawing.Size(1206, 289)
        Me.TabPage1.TabIndex = 0
        Me.TabPage1.Text = "Kunden - Zolltarif"
        Me.TabPage1.UseVisualStyleBackColor = True
@@ -1124,7 +1150,7 @@ Partial Class frmSendungsdetailsNEU
        Me.pnlKundenZolltarif.Location = New System.Drawing.Point(3, 36)
        Me.pnlKundenZolltarif.MinimumSize = New System.Drawing.Size(2, 103)
        Me.pnlKundenZolltarif.Name = "pnlKundenZolltarif"
-        Me.pnlKundenZolltarif.Size = New System.Drawing.Size(1200, 249)
+        Me.pnlKundenZolltarif.Size = New System.Drawing.Size(1200, 250)
        Me.pnlKundenZolltarif.TabIndex = 1
        Me.pnlKundenZolltarif.TabStop = True
        '
@@ -1133,7 +1159,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Label22.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label22.AutoSize = True
-        Me.Label22.Location = New System.Drawing.Point(4, 208)
+        Me.Label22.Location = New System.Drawing.Point(4, 209)
        Me.Label22.Name = "Label22"
        Me.Label22.Size = New System.Drawing.Size(209, 13)
        Me.Label22.TabIndex = 0
@@ -1145,7 +1171,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.AutoSize = True
-        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Location = New System.Drawing.Point(4, 222)
+        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Location = New System.Drawing.Point(4, 224)
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Name = "lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden"
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Size = New System.Drawing.Size(338, 13)
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.TabIndex = 1
@@ -1190,8 +1216,8 @@ Partial Class frmSendungsdetailsNEU
        Me.TabPage2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
        Me.TabPage2.Location = New System.Drawing.Point(4, 29)
        Me.TabPage2.Name = "TabPage2"
-        Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage2.Size = New System.Drawing.Size(1206, 288)
+        Me.TabPage2.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.TabPage2.Size = New System.Drawing.Size(1206, 289)
        Me.TabPage2.TabIndex = 1
        Me.TabPage2.Text = "Speditionsbuch"
        Me.TabPage2.UseVisualStyleBackColor = True
@@ -1208,7 +1234,8 @@ Partial Class frmSendungsdetailsNEU
        Me.DataGridView.Dock = System.Windows.Forms.DockStyle.Fill
        Me.DataGridView.Location = New System.Drawing.Point(3, 94)
        Me.DataGridView.Name = "DataGridView"
-        Me.DataGridView.Size = New System.Drawing.Size(1200, 191)
+        Me.DataGridView.RowHeadersWidth = 51
+        Me.DataGridView.Size = New System.Drawing.Size(1200, 192)
        Me.DataGridView.TabIndex = 1
        '
        'pnlSpedBuchNacherfassung
@@ -1518,6 +1545,7 @@ Partial Class frmSendungsdetailsNEU
        '
        'TabPage3
        '
+        Me.TabPage3.Controls.Add(Me.RCntrlVermerke1)
        Me.TabPage3.Controls.Add(Me.gridVermerke)
        Me.TabPage3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
        Me.TabPage3.Location = New System.Drawing.Point(4, 29)
@@ -1544,6 +1572,7 @@ Partial Class frmSendungsdetailsNEU
        DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
+        Me.gridVermerke.ColumnHeadersHeight = 29
        Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
        Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill
        Me.gridVermerke.Location = New System.Drawing.Point(0, 0)
@@ -1551,6 +1580,7 @@ Partial Class frmSendungsdetailsNEU
        Me.gridVermerke.Name = "gridVermerke"
        Me.gridVermerke.ReadOnly = True
        Me.gridVermerke.RowHeadersVisible = False
+        Me.gridVermerke.RowHeadersWidth = 51
        Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
        DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle3
@@ -1570,8 +1600,8 @@ Partial Class frmSendungsdetailsNEU
        Me.tbATEZ.Controls.Add(Me.Panel23)
        Me.tbATEZ.Location = New System.Drawing.Point(4, 29)
        Me.tbATEZ.Name = "tbATEZ"
-        Me.tbATEZ.Padding = New System.Windows.Forms.Padding(3)
-        Me.tbATEZ.Size = New System.Drawing.Size(1206, 288)
+        Me.tbATEZ.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tbATEZ.Size = New System.Drawing.Size(1206, 289)
        Me.tbATEZ.TabIndex = 6
        Me.tbATEZ.Text = "ATEZ"
        Me.tbATEZ.UseVisualStyleBackColor = True
@@ -1593,6 +1623,7 @@ Partial Class frmSendungsdetailsNEU
        DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
        DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
        Me.dgvATEZNCTS.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle5
+        Me.dgvATEZNCTS.ColumnHeadersHeight = 29
        Me.dgvATEZNCTS.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
        Me.dgvATEZNCTS.Dock = System.Windows.Forms.DockStyle.Fill
        Me.dgvATEZNCTS.Location = New System.Drawing.Point(3, 48)
@@ -1600,6 +1631,7 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvATEZNCTS.Name = "dgvATEZNCTS"
        Me.dgvATEZNCTS.ReadOnly = True
        Me.dgvATEZNCTS.RowHeadersVisible = False
+        Me.dgvATEZNCTS.RowHeadersWidth = 51
        Me.dgvATEZNCTS.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
        DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
        Me.dgvATEZNCTS.RowsDefaultCellStyle = DataGridViewCellStyle6
@@ -1609,7 +1641,7 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvATEZNCTS.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.dgvATEZNCTS.ShowCellErrors = False
        Me.dgvATEZNCTS.ShowRowErrors = False
-        Me.dgvATEZNCTS.Size = New System.Drawing.Size(1200, 237)
+        Me.dgvATEZNCTS.Size = New System.Drawing.Size(1200, 238)
        Me.dgvATEZNCTS.TabIndex = 105
        Me.dgvATEZNCTS.TabStop = False
        '
@@ -1643,7 +1675,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbDigicust.Controls.Add(Me.Panel24)
        Me.tbDigicust.Location = New System.Drawing.Point(4, 29)
        Me.tbDigicust.Name = "tbDigicust"
-        Me.tbDigicust.Size = New System.Drawing.Size(1206, 288)
+        Me.tbDigicust.Size = New System.Drawing.Size(1206, 289)
        Me.tbDigicust.TabIndex = 7
        Me.tbDigicust.Text = "Digicust"
        Me.tbDigicust.UseVisualStyleBackColor = True
@@ -1665,6 +1697,7 @@ Partial Class frmSendungsdetailsNEU
        DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
        DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
        Me.dgvDigicust.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle8
+        Me.dgvDigicust.ColumnHeadersHeight = 29
        Me.dgvDigicust.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
        Me.dgvDigicust.Dock = System.Windows.Forms.DockStyle.Fill
        Me.dgvDigicust.Location = New System.Drawing.Point(0, 45)
@@ -1672,6 +1705,7 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvDigicust.Name = "dgvDigicust"
        Me.dgvDigicust.ReadOnly = True
        Me.dgvDigicust.RowHeadersVisible = False
+        Me.dgvDigicust.RowHeadersWidth = 51
        Me.dgvDigicust.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
        DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
        Me.dgvDigicust.RowsDefaultCellStyle = DataGridViewCellStyle9
@@ -1681,7 +1715,7 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvDigicust.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.dgvDigicust.ShowCellErrors = False
        Me.dgvDigicust.ShowRowErrors = False
-        Me.dgvDigicust.Size = New System.Drawing.Size(1206, 243)
+        Me.dgvDigicust.Size = New System.Drawing.Size(1206, 244)
        Me.dgvDigicust.TabIndex = 107
        Me.dgvDigicust.TabStop = False
        '
@@ -1700,7 +1734,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button19.Image = Global.AVISO.My.Resources.Resources.plus
        Me.Button19.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button19.Location = New System.Drawing.Point(5, 8)
+        Me.Button19.Location = New System.Drawing.Point(4, 8)
        Me.Button19.Name = "Button19"
        Me.Button19.Size = New System.Drawing.Size(104, 34)
        Me.Button19.TabIndex = 9
@@ -1709,6 +1743,122 @@ Partial Class frmSendungsdetailsNEU
        Me.Button19.UseVisualStyleBackColor = True
        Me.Button19.Visible = False
        '
+        'tbMail
+        '
+        Me.tbMail.Controls.Add(Me.dgvMail)
+        Me.tbMail.Controls.Add(Me.Panel25)
+        Me.tbMail.Location = New System.Drawing.Point(4, 29)
+        Me.tbMail.Name = "tbMail"
+        Me.tbMail.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tbMail.Size = New System.Drawing.Size(1206, 289)
+        Me.tbMail.TabIndex = 8
+        Me.tbMail.Text = "Mail"
+        Me.tbMail.UseVisualStyleBackColor = True
+        '
+        'dgvMail
+        '
+        Me.dgvMail.AllowUserToAddRows = False
+        Me.dgvMail.AllowUserToDeleteRows = False
+        Me.dgvMail.AllowUserToResizeRows = False
+        DataGridViewCellStyle10.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvMail.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle10
+        Me.dgvMail.BackgroundColor = System.Drawing.Color.White
+        DataGridViewCellStyle11.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle11.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle11.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        DataGridViewCellStyle11.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle11.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvMail.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle11
+        Me.dgvMail.ColumnHeadersHeight = 29
+        Me.dgvMail.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        Me.dgvMail.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnSender, Me.clmnRec, Me.clmnSbj, Me.clmnAtt, Me.clmnUIDL})
+        Me.dgvMail.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.dgvMail.Location = New System.Drawing.Point(3, 48)
+        Me.dgvMail.MultiSelect = False
+        Me.dgvMail.Name = "dgvMail"
+        Me.dgvMail.ReadOnly = True
+        Me.dgvMail.RowHeadersVisible = False
+        Me.dgvMail.RowHeadersWidth = 51
+        Me.dgvMail.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
+        DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvMail.RowsDefaultCellStyle = DataGridViewCellStyle12
+        Me.dgvMail.RowTemplate.Height = 20
+        Me.dgvMail.RowTemplate.ReadOnly = True
+        Me.dgvMail.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvMail.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvMail.ShowCellErrors = False
+        Me.dgvMail.ShowRowErrors = False
+        Me.dgvMail.Size = New System.Drawing.Size(1200, 238)
+        Me.dgvMail.TabIndex = 109
+        Me.dgvMail.TabStop = False
+        '
+        'clmnSender
+        '
+        Me.clmnSender.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.clmnSender.HeaderText = "Absender"
+        Me.clmnSender.MinimumWidth = 6
+        Me.clmnSender.Name = "clmnSender"
+        Me.clmnSender.ReadOnly = True
+        '
+        'clmnRec
+        '
+        Me.clmnRec.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.clmnRec.HeaderText = "Empfänger"
+        Me.clmnRec.MinimumWidth = 6
+        Me.clmnRec.Name = "clmnRec"
+        Me.clmnRec.ReadOnly = True
+        '
+        'clmnSbj
+        '
+        Me.clmnSbj.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.clmnSbj.HeaderText = "Betreff"
+        Me.clmnSbj.MinimumWidth = 6
+        Me.clmnSbj.Name = "clmnSbj"
+        Me.clmnSbj.ReadOnly = True
+        '
+        'clmnAtt
+        '
+        Me.clmnAtt.HeaderText = "Anhänge"
+        Me.clmnAtt.MinimumWidth = 6
+        Me.clmnAtt.Name = "clmnAtt"
+        Me.clmnAtt.ReadOnly = True
+        Me.clmnAtt.Width = 70
+        '
+        'clmnUIDL
+        '
+        Me.clmnUIDL.HeaderText = "UIDL"
+        Me.clmnUIDL.MinimumWidth = 6
+        Me.clmnUIDL.Name = "clmnUIDL"
+        Me.clmnUIDL.ReadOnly = True
+        Me.clmnUIDL.Width = 200
+        '
+        'Panel25
+        '
+        Me.Panel25.Controls.Add(Me.Button23)
+        Me.Panel25.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel25.Location = New System.Drawing.Point(3, 3)
+        Me.Panel25.Name = "Panel25"
+        Me.Panel25.Size = New System.Drawing.Size(1200, 45)
+        Me.Panel25.TabIndex = 110
+        '
+        'Button23
+        '
+        Me.Button23.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button23.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button23.Image = Global.AVISO.My.Resources.Resources.plus
+        Me.Button23.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button23.Location = New System.Drawing.Point(1, 8)
+        Me.Button23.Name = "Button23"
+        Me.Button23.Size = New System.Drawing.Size(104, 34)
+        Me.Button23.TabIndex = 9
+        Me.Button23.Text = "Load"
+        Me.Button23.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button23.UseVisualStyleBackColor = True
+        Me.Button23.Visible = False
+        '
        'Panel14
        '
        Me.Panel14.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
@@ -1784,7 +1934,7 @@ Partial Class frmSendungsdetailsNEU
        Me.TabPage4.Controls.Add(Me.Button14)
        Me.TabPage4.Location = New System.Drawing.Point(4, 22)
        Me.TabPage4.Name = "TabPage4"
-        Me.TabPage4.Padding = New System.Windows.Forms.Padding(3)
+        Me.TabPage4.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
        Me.TabPage4.Size = New System.Drawing.Size(433, 299)
        Me.TabPage4.TabIndex = 0
        Me.TabPage4.Text = "Aktendeckel"
@@ -2405,13 +2555,38 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvVorkosten.AllowUserToResizeColumns = False
        Me.dgvVorkosten.AllowUserToResizeRows = False
        Me.dgvVorkosten.BackgroundColor = System.Drawing.Color.White
+        DataGridViewCellStyle13.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle13.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle13.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle13.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle13.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvVorkosten.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle13
        Me.dgvVorkosten.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.dgvVorkosten.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnVK_id, Me.clmnFirma, Me.clmnLeistung, Me.clmnPreis})
+        DataGridViewCellStyle15.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle15.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle15.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle15.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle15.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvVorkosten.DefaultCellStyle = DataGridViewCellStyle15
        Me.dgvVorkosten.Location = New System.Drawing.Point(3, 4)
        Me.dgvVorkosten.MultiSelect = False
        Me.dgvVorkosten.Name = "dgvVorkosten"
        Me.dgvVorkosten.ReadOnly = True
+        DataGridViewCellStyle16.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle16.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle16.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle16.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle16.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvVorkosten.RowHeadersDefaultCellStyle = DataGridViewCellStyle16
        Me.dgvVorkosten.RowHeadersVisible = False
+        Me.dgvVorkosten.RowHeadersWidth = 51
        Me.dgvVorkosten.RowTemplate.Height = 18
        Me.dgvVorkosten.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.dgvVorkosten.Size = New System.Drawing.Size(360, 194)
@@ -2420,14 +2595,17 @@ Partial Class frmSendungsdetailsNEU
        'clmnVK_id
        '
        Me.clmnVK_id.HeaderText = "ID"
+        Me.clmnVK_id.MinimumWidth = 6
        Me.clmnVK_id.Name = "clmnVK_id"
        Me.clmnVK_id.ReadOnly = True
        Me.clmnVK_id.Visible = False
+        Me.clmnVK_id.Width = 125
        '
        'clmnFirma
        '
        Me.clmnFirma.HeaderText = "Firma"
        Me.clmnFirma.MaxInputLength = 200
+        Me.clmnFirma.MinimumWidth = 6
        Me.clmnFirma.Name = "clmnFirma"
        Me.clmnFirma.ReadOnly = True
        Me.clmnFirma.Width = 127
@@ -2436,6 +2614,7 @@ Partial Class frmSendungsdetailsNEU
        '
        Me.clmnLeistung.HeaderText = "Leistung"
        Me.clmnLeistung.MaxInputLength = 30
+        Me.clmnLeistung.MinimumWidth = 6
        Me.clmnLeistung.Name = "clmnLeistung"
        Me.clmnLeistung.ReadOnly = True
        Me.clmnLeistung.Width = 129
@@ -2443,10 +2622,11 @@ Partial Class frmSendungsdetailsNEU
        'clmnPreis
        '
        Me.clmnPreis.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        DataGridViewCellStyle10.Format = "C2"
-        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle10
+        DataGridViewCellStyle14.Format = "C2"
+        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle14
        Me.clmnPreis.HeaderText = "Preis"
        Me.clmnPreis.MaxInputLength = 15
+        Me.clmnPreis.MinimumWidth = 6
        Me.clmnPreis.Name = "clmnPreis"
        Me.clmnPreis.ReadOnly = True
        '
@@ -2458,7 +2638,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbBAR.Controls.Add(Me.btnLeihgeld)
        Me.tbBAR.Location = New System.Drawing.Point(4, 22)
        Me.tbBAR.Name = "tbBAR"
-        Me.tbBAR.Padding = New System.Windows.Forms.Padding(3)
+        Me.tbBAR.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
        Me.tbBAR.Size = New System.Drawing.Size(433, 299)
        Me.tbBAR.TabIndex = 1
        Me.tbBAR.Text = "Abrechnung/BAR-Belege"
@@ -2472,12 +2652,37 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvBelege.AllowUserToResizeColumns = False
        Me.dgvBelege.AllowUserToResizeRows = False
        Me.dgvBelege.BackgroundColor = System.Drawing.Color.White
+        DataGridViewCellStyle17.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle17.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle17.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle17.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle17.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle17.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvBelege.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle17
        Me.dgvBelege.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        DataGridViewCellStyle18.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle18.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle18.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle18.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle18.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.dgvBelege.DefaultCellStyle = DataGridViewCellStyle18
        Me.dgvBelege.Location = New System.Drawing.Point(6, 40)
        Me.dgvBelege.MultiSelect = False
        Me.dgvBelege.Name = "dgvBelege"
        Me.dgvBelege.ReadOnly = True
+        DataGridViewCellStyle19.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle19.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle19.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle19.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle19.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.dgvBelege.RowHeadersDefaultCellStyle = DataGridViewCellStyle19
        Me.dgvBelege.RowHeadersVisible = False
+        Me.dgvBelege.RowHeadersWidth = 51
        Me.dgvBelege.RowTemplate.Height = 18
        Me.dgvBelege.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.dgvBelege.Size = New System.Drawing.Size(360, 165)
@@ -5253,7 +5458,6 @@ Partial Class frmSendungsdetailsNEU
        '
        Me.BindingNavigatorPositionItem.AccessibleName = "Position"
        Me.BindingNavigatorPositionItem.AutoSize = False
-        Me.BindingNavigatorPositionItem.Font = New System.Drawing.Font("Segoe UI", 9.0!)
        Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
        Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
        Me.BindingNavigatorPositionItem.Text = "0"
@@ -5656,6 +5860,7 @@ Partial Class frmSendungsdetailsNEU
        '
        'cntDigicust
        '
+        Me.cntDigicust.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.cntDigicust.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.StatusAbrufenToolStripMenuItem})
        Me.cntDigicust.Name = "cntDigicust"
        Me.cntDigicust.Size = New System.Drawing.Size(151, 26)
@@ -5668,6 +5873,7 @@ Partial Class frmSendungsdetailsNEU
        '
        'ContextMenuStrip3
        '
+        Me.ContextMenuStrip3.ImageScalingSize = New System.Drawing.Size(20, 20)
        Me.ContextMenuStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.XXXToolStripMenuItem})
        Me.ContextMenuStrip3.Name = "cntxt"
        Me.ContextMenuStrip3.Size = New System.Drawing.Size(96, 26)
@@ -5683,6 +5889,13 @@ Partial Class frmSendungsdetailsNEU
        Me.timerValidation.Enabled = True
        Me.timerValidation.Interval = 2000
        '
+        'RCntrlVermerke1
+        '
+        Me.RCntrlVermerke1.Location = New System.Drawing.Point(251, 18)
+        Me.RCntrlVermerke1.Name = "RCntrlVermerke1"
+        Me.RCntrlVermerke1.Size = New System.Drawing.Size(575, 208)
+        Me.RCntrlVermerke1.TabIndex = 1
+        '
        'frmSendungsdetailsNEU
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
@@ -5733,6 +5946,9 @@ Partial Class frmSendungsdetailsNEU
        Me.tbDigicust.ResumeLayout(False)
        CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).EndInit()
        Me.Panel24.ResumeLayout(False)
+        Me.tbMail.ResumeLayout(False)
+        CType(Me.dgvMail, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel25.ResumeLayout(False)
        Me.pnlDetails.ResumeLayout(False)
        Me.tbcntr.ResumeLayout(False)
        Me.TabPage4.ResumeLayout(False)
@@ -6201,4 +6417,14 @@ Partial Class frmSendungsdetailsNEU
    Friend WithEvents rtbValidierung As VERAG_PROG_ALLGEMEIN.MyRichTextBox
    Friend WithEvents Label15 As Label
    Friend WithEvents timerValidation As Timer
+    Friend WithEvents tbMail As TabPage
+    Friend WithEvents dgvMail As DataGridView
+    Friend WithEvents Panel25 As Panel
+    Friend WithEvents Button23 As Button
+    Friend WithEvents clmnSender As DataGridViewTextBoxColumn
+    Friend WithEvents clmnRec As DataGridViewTextBoxColumn
+    Friend WithEvents clmnSbj As DataGridViewTextBoxColumn
+    Friend WithEvents clmnAtt As DataGridViewTextBoxColumn
+    Friend WithEvents clmnUIDL As DataGridViewTextBoxColumn
+    Friend WithEvents RCntrlVermerke1 As rCntrlVermerke
 End Class