Merge branch 'master' of https://dev.azure.com/VeragAG/_git/AVISO

Aviso/AvisoStatusFunctions.vb

@@ -1,19 +1,7 @@
-
+Imports SDL
-Imports System.IO
 Imports VERAG_PROG_ALLGEMEIN
-Imports VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO
 Imports VERAG_PROG_ALLGEMEIN.cGlobal
-Imports com.esendex.sdk.messaging
+Imports VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO
-Imports Newtonsoft.Json
-Imports System.Reflection
-Imports System.Drawing.Drawing2D
-Imports SDL
-Imports Microsoft.Office.Interop
-Imports Spire.Pdf.Texts
-Imports System.Net
-Imports System.Text
-Imports System.IO.Pipes
-Imports System.Security.AccessControl
 
 Public Class AvisoStatusFunctions
     Dim Standorte As New cStandorteDAL

Aviso/frmSendungsdetailsNEU.Designer.vb

@@ -471,33 +471,6 @@ Partial Class frmSendungsdetailsNEU
         Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewTextBoxColumn()
         Me.DataGridViewTextBoxColumn4 = New System.Windows.Forms.DataGridViewTextBoxColumn()
         Me.DataGridViewTextBoxColumn5 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.RCntrlVermerke1 = New AVISO.rCntrlVermerke()
-        Me.cntlFrachtfuehrer_Sonst = New AVISO.usrcntlCheckBox()
-        Me.cntlAbsender_Sonst = New AVISO.usrcntlCheckBox()
-        Me.cntlEmpfaenger_Sonst = New AVISO.usrcntlCheckBox()
-        Me.cntlAuftraggeber_Sonst = New AVISO.usrcntlCheckBox()
-        Me.cntlAvisierer_Sonst = New AVISO.usrcntlCheckBox()
-        Me.cntlFrachtf_Clear = New AVISO.usrcntlCheckBox()
-        Me.cntlFrachtf_Abf = New AVISO.usrcntlCheckBox()
-        Me.cntlFrachtf_Eust = New AVISO.usrcntlCheckBox()
-        Me.cntlFrachtf_Zoll = New AVISO.usrcntlCheckBox()
-        Me.cntlAbsender_Clear = New AVISO.usrcntlCheckBox()
-        Me.cntlAbsender_Abf = New AVISO.usrcntlCheckBox()
-        Me.cntlAbsender_Eust = New AVISO.usrcntlCheckBox()
-        Me.cntlAbsender_Zoll = New AVISO.usrcntlCheckBox()
-        Me.cntlEmpf_Clear = New AVISO.usrcntlCheckBox()
-        Me.cntlEmpf_Abf = New AVISO.usrcntlCheckBox()
-        Me.cntlEmpf_Eust = New AVISO.usrcntlCheckBox()
-        Me.cntlEmpf_Zoll = New AVISO.usrcntlCheckBox()
-        Me.cntlAuftr_Clear = New AVISO.usrcntlCheckBox()
-        Me.cntlAuftr_Abf = New AVISO.usrcntlCheckBox()
-        Me.cntlAuftr_Eust = New AVISO.usrcntlCheckBox()
-        Me.cntlAuftr_Zoll = New AVISO.usrcntlCheckBox()
-        Me.cntlAvisierer_Clear = New AVISO.usrcntlCheckBox()
-        Me.cntlAvisierer_Abf = New AVISO.usrcntlCheckBox()
-        Me.cntlAvisierer_Eust = New AVISO.usrcntlCheckBox()
-        Me.cntlAvisierer_Zoll = New AVISO.usrcntlCheckBox()
-        Me.UsrCntlSND_NCTSGestellungsadresse1 = New AVISO.usrCntlSND_NCTSGestellungsadresse()
         Me.pnl.SuspendLayout()
         Me.Panel4.SuspendLayout()
         Me.TabControl1.SuspendLayout()
@@ -551,7 +524,6 @@ Partial Class frmSendungsdetailsNEU
         CType(Me.picWarnAuftraggeber, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.picWarnAvisierer, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.cntxt.SuspendLayout()
-        Me.pnlT1.SuspendLayout()
         Me.Panel5.SuspendLayout()
         Me.pnlValidation.SuspendLayout()
         CType(Me.picAVISOMessengerSNDChat, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -1019,7 +991,7 @@ Partial Class frmSendungsdetailsNEU
         Me.toolSendDyNCTS.Image = Global.AVISO.My.Resources.Resources.plus
         Me.toolSendDyNCTS.Name = "toolSendDyNCTS"
         Me.toolSendDyNCTS.Padding = New System.Windows.Forms.Padding(8, 0, 8, 0)
-        Me.toolSendDyNCTS.Size = New System.Drawing.Size(86, 28)
+        Me.toolSendDyNCTS.Size = New System.Drawing.Size(87, 28)
         Me.toolSendDyNCTS.Text = "  NCTS"
         Me.toolSendDyNCTS.ToolTipText = "Neue Zollanmeldung"
         '
@@ -1028,7 +1000,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem8.Font = New System.Drawing.Font("Segoe UI", 9.0!)
         Me.ToolStripMenuItem8.Image = Global.AVISO.My.Resources.Resources.plus
         Me.ToolStripMenuItem8.Name = "ToolStripMenuItem8"
-        Me.ToolStripMenuItem8.Size = New System.Drawing.Size(93, 22)
+        Me.ToolStripMenuItem8.Size = New System.Drawing.Size(102, 30)
         Me.ToolStripMenuItem8.Text = "T1"
         '
         'ToolStripMenuItem9
@@ -1036,7 +1008,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem9.Font = New System.Drawing.Font("Segoe UI", 9.0!)
         Me.ToolStripMenuItem9.Image = Global.AVISO.My.Resources.Resources.plus
         Me.ToolStripMenuItem9.Name = "ToolStripMenuItem9"
-        Me.ToolStripMenuItem9.Size = New System.Drawing.Size(93, 22)
+        Me.ToolStripMenuItem9.Size = New System.Drawing.Size(102, 30)
         Me.ToolStripMenuItem9.Text = "T2"
         '
         'ToolStripMenuItem10
@@ -1044,7 +1016,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem10.Enabled = False
         Me.ToolStripMenuItem10.Image = Global.AVISO.My.Resources.Resources.plus
         Me.ToolStripMenuItem10.Name = "ToolStripMenuItem10"
-        Me.ToolStripMenuItem10.Size = New System.Drawing.Size(93, 22)
+        Me.ToolStripMenuItem10.Size = New System.Drawing.Size(102, 30)
         Me.ToolStripMenuItem10.Text = "Ü-T"
         Me.ToolStripMenuItem10.Visible = False
         '
@@ -1081,7 +1053,7 @@ Partial Class frmSendungsdetailsNEU
         Me.toolSendTelotec.Image = Global.AVISO.My.Resources.Resources.plus
         Me.toolSendTelotec.Name = "toolSendTelotec"
         Me.toolSendTelotec.Padding = New System.Windows.Forms.Padding(8, 0, 8, 0)
-        Me.toolSendTelotec.Size = New System.Drawing.Size(103, 28)
+        Me.toolSendTelotec.Size = New System.Drawing.Size(105, 28)
         Me.toolSendTelotec.Text = "  TELOTEC"
         Me.toolSendTelotec.ToolTipText = "Neue Zollanmeldung"
         '
@@ -1089,7 +1061,7 @@ Partial Class frmSendungsdetailsNEU
         '
         Me.ToolStripMenuItem20.Image = Global.AVISO.My.Resources.Resources.plus
         Me.ToolStripMenuItem20.Name = "ToolStripMenuItem20"
-        Me.ToolStripMenuItem20.Size = New System.Drawing.Size(95, 22)
+        Me.ToolStripMenuItem20.Size = New System.Drawing.Size(103, 30)
         Me.ToolStripMenuItem20.Text = "EZA"
         '
         'ToolStripMenuItem18
@@ -1098,7 +1070,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(95, 22)
+        Me.ToolStripMenuItem18.Size = New System.Drawing.Size(103, 30)
         Me.ToolStripMenuItem18.Text = "T1"
         '
         'ToolStripMenuItem19
@@ -1107,7 +1079,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(95, 22)
+        Me.ToolStripMenuItem19.Size = New System.Drawing.Size(103, 30)
         Me.ToolStripMenuItem19.Text = "T2"
         '
         'toolSendMIC
@@ -1125,7 +1097,7 @@ Partial Class frmSendungsdetailsNEU
         '
         Me.ToolStripMenuItem22.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
         Me.ToolStripMenuItem22.Name = "ToolStripMenuItem22"
-        Me.ToolStripMenuItem22.Size = New System.Drawing.Size(176, 22)
+        Me.ToolStripMenuItem22.Size = New System.Drawing.Size(184, 30)
         Me.ToolStripMenuItem22.Text = "MIC Import senden"
         '
         'ToolStripMenuItem23
@@ -1133,7 +1105,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem23.Font = New System.Drawing.Font("Segoe UI", 9.0!)
         Me.ToolStripMenuItem23.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
         Me.ToolStripMenuItem23.Name = "ToolStripMenuItem23"
-        Me.ToolStripMenuItem23.Size = New System.Drawing.Size(176, 22)
+        Me.ToolStripMenuItem23.Size = New System.Drawing.Size(184, 30)
         Me.ToolStripMenuItem23.Text = "MIC Transit senden"
         '
         'ToolStripMenuItem24
@@ -1142,7 +1114,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem24.Font = New System.Drawing.Font("Segoe UI", 9.0!)
         Me.ToolStripMenuItem24.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
         Me.ToolStripMenuItem24.Name = "ToolStripMenuItem24"
-        Me.ToolStripMenuItem24.Size = New System.Drawing.Size(176, 22)
+        Me.ToolStripMenuItem24.Size = New System.Drawing.Size(184, 30)
         Me.ToolStripMenuItem24.Text = "MIC Export senden"
         '
         'toolSendDyModelTrans
@@ -1159,28 +1131,28 @@ Partial Class frmSendungsdetailsNEU
         '
         Me.toolModal_Import.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
         Me.toolModal_Import.Name = "toolModal_Import"
-        Me.toolModal_Import.Size = New System.Drawing.Size(142, 22)
+        Me.toolModal_Import.Size = New System.Drawing.Size(153, 30)
         Me.toolModal_Import.Text = "IMPORT"
         '
         'toolModal_Export
         '
         Me.toolModal_Export.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
         Me.toolModal_Export.Name = "toolModal_Export"
-        Me.toolModal_Export.Size = New System.Drawing.Size(142, 22)
+        Me.toolModal_Export.Size = New System.Drawing.Size(153, 30)
         Me.toolModal_Export.Text = "EXPORT"
         '
         'toolModal_Transit
         '
         Me.toolModal_Transit.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
         Me.toolModal_Transit.Name = "toolModal_Transit"
-        Me.toolModal_Transit.Size = New System.Drawing.Size(142, 22)
+        Me.toolModal_Transit.Size = New System.Drawing.Size(153, 30)
         Me.toolModal_Transit.Text = "TRANSIT (T1)"
         '
         'ToolStripMenuItem12
         '
         Me.ToolStripMenuItem12.Image = Global.AVISO.My.Resources.Resources.plus
         Me.ToolStripMenuItem12.Name = "ToolStripMenuItem12"
-        Me.ToolStripMenuItem12.Size = New System.Drawing.Size(75, 28)
+        Me.ToolStripMenuItem12.Size = New System.Drawing.Size(76, 28)
         Me.ToolStripMenuItem12.Text = "  ATEZ"
         Me.ToolStripMenuItem12.ToolTipText = "Logbuch"
         '
@@ -1611,7 +1583,6 @@ 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)
@@ -3110,35 +3081,10 @@ Partial Class frmSendungsdetailsNEU
         Me.Panel6.Controls.Add(Me.btnAvisierer)
         Me.Panel6.Controls.Add(Me.Button4)
         Me.Panel6.Controls.Add(Me.Button1)
-        Me.Panel6.Controls.Add(Me.cntlFrachtfuehrer_Sonst)
-        Me.Panel6.Controls.Add(Me.cntlAbsender_Sonst)
-        Me.Panel6.Controls.Add(Me.cntlEmpfaenger_Sonst)
-        Me.Panel6.Controls.Add(Me.cntlAuftraggeber_Sonst)
-        Me.Panel6.Controls.Add(Me.cntlAvisierer_Sonst)
         Me.Panel6.Controls.Add(Me.lblSonstigesKosten)
         Me.Panel6.Controls.Add(Me.btnAufschub_Atr)
         Me.Panel6.Controls.Add(Me.btnAufschub_Empf)
         Me.Panel6.Controls.Add(Me.btnAufschub_VERAG)
-        Me.Panel6.Controls.Add(Me.cntlFrachtf_Clear)
-        Me.Panel6.Controls.Add(Me.cntlFrachtf_Abf)
-        Me.Panel6.Controls.Add(Me.cntlFrachtf_Eust)
-        Me.Panel6.Controls.Add(Me.cntlFrachtf_Zoll)
-        Me.Panel6.Controls.Add(Me.cntlAbsender_Clear)
-        Me.Panel6.Controls.Add(Me.cntlAbsender_Abf)
-        Me.Panel6.Controls.Add(Me.cntlAbsender_Eust)
-        Me.Panel6.Controls.Add(Me.cntlAbsender_Zoll)
-        Me.Panel6.Controls.Add(Me.cntlEmpf_Clear)
-        Me.Panel6.Controls.Add(Me.cntlEmpf_Abf)
-        Me.Panel6.Controls.Add(Me.cntlEmpf_Eust)
-        Me.Panel6.Controls.Add(Me.cntlEmpf_Zoll)
-        Me.Panel6.Controls.Add(Me.cntlAuftr_Clear)
-        Me.Panel6.Controls.Add(Me.cntlAuftr_Abf)
-        Me.Panel6.Controls.Add(Me.cntlAuftr_Eust)
-        Me.Panel6.Controls.Add(Me.cntlAuftr_Zoll)
-        Me.Panel6.Controls.Add(Me.cntlAvisierer_Clear)
-        Me.Panel6.Controls.Add(Me.cntlAvisierer_Abf)
-        Me.Panel6.Controls.Add(Me.cntlAvisierer_Eust)
-        Me.Panel6.Controls.Add(Me.cntlAvisierer_Zoll)
         Me.Panel6.Controls.Add(Me.Panel15)
         Me.Panel6.Controls.Add(Me.txtAvisierer)
         Me.Panel6.Controls.Add(Me.txtAuftraggeber)
@@ -3942,7 +3888,6 @@ Partial Class frmSendungsdetailsNEU
         '
         'pnlT1
         '
-        Me.pnlT1.Controls.Add(Me.UsrCntlSND_NCTSGestellungsadresse1)
         Me.pnlT1.Location = New System.Drawing.Point(0, 193)
         Me.pnlT1.Name = "pnlT1"
         Me.pnlT1.Size = New System.Drawing.Size(549, 118)
@@ -4961,7 +4906,7 @@ Partial Class frmSendungsdetailsNEU
         Me.Panel2.Location = New System.Drawing.Point(0, 0)
         Me.Panel2.MaximumSize = New System.Drawing.Size(0, 510)
         Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(0, 55)
+        Me.Panel2.Size = New System.Drawing.Size(1214, 55)
         Me.Panel2.TabIndex = 0
         '
         'FlowLayoutPanel
@@ -4973,7 +4918,7 @@ Partial Class frmSendungsdetailsNEU
         Me.FlowLayoutPanel.MaximumSize = New System.Drawing.Size(0, 550)
         Me.FlowLayoutPanel.MinimumSize = New System.Drawing.Size(0, 53)
         Me.FlowLayoutPanel.Name = "FlowLayoutPanel"
-        Me.FlowLayoutPanel.Size = New System.Drawing.Size(0, 55)
+        Me.FlowLayoutPanel.Size = New System.Drawing.Size(1214, 55)
         Me.FlowLayoutPanel.TabIndex = 0
         '
         'FlatButton2
@@ -5433,7 +5378,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem4.Font = New System.Drawing.Font("Segoe UI", 9.0!)
         Me.ToolStripMenuItem4.Image = Global.AVISO.My.Resources.Resources.plus
         Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4"
-        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(93, 22)
+        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(94, 22)
         Me.ToolStripMenuItem4.Text = "T1"
         '
         'ToolStripMenuItem5
@@ -5441,7 +5386,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem5.Font = New System.Drawing.Font("Segoe UI", 9.0!)
         Me.ToolStripMenuItem5.Image = Global.AVISO.My.Resources.Resources.plus
         Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5"
-        Me.ToolStripMenuItem5.Size = New System.Drawing.Size(93, 22)
+        Me.ToolStripMenuItem5.Size = New System.Drawing.Size(94, 22)
         Me.ToolStripMenuItem5.Text = "T2"
         '
         'ÜTToolStripMenuItem
@@ -5449,7 +5394,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ÜTToolStripMenuItem.Enabled = False
         Me.ÜTToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.plus
         Me.ÜTToolStripMenuItem.Name = "ÜTToolStripMenuItem"
-        Me.ÜTToolStripMenuItem.Size = New System.Drawing.Size(93, 22)
+        Me.ÜTToolStripMenuItem.Size = New System.Drawing.Size(94, 22)
         Me.ÜTToolStripMenuItem.Text = "Ü-T"
         '
         'NeueZollanmeldungToolStripMenuItem
@@ -5526,6 +5471,7 @@ 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"
@@ -5715,13 +5661,13 @@ Partial Class frmSendungsdetailsNEU
         Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(24, 24)
         Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem15, Me.T1BestätigungToolStripMenuItem, Me.SpeditionSUBENToolStripMenuItem, Me.ToolStripMenuItem16, Me.AuftragATANAKToolStripMenuItem, Me.ToolStripMenuItem27, Me.ToolStripMenuItem26, Me.ToolStripMenuItem28, Me.ToolStripMenuItem25, Me.GVMSInfoToolStripMenuItem, Me.CMRBestätigungToolStripMenuItem, Me.AuftragMOTISToolStripMenuItem, Me.ToolStripSeparator1, Me.dynMailsToolStripMenuItem})
         Me.ContextMenuStrip1.Name = "cntxtAnh"
-        Me.ContextMenuStrip1.Size = New System.Drawing.Size(223, 400)
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(224, 400)
         '
         'ToolStripMenuItem15
         '
         Me.ToolStripMenuItem15.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.ToolStripMenuItem15.Name = "ToolStripMenuItem15"
-        Me.ToolStripMenuItem15.Size = New System.Drawing.Size(222, 30)
+        Me.ToolStripMenuItem15.Size = New System.Drawing.Size(223, 30)
         Me.ToolStripMenuItem15.Text = "Fremdspeditionen"
         Me.ToolStripMenuItem15.Visible = False
         '
@@ -5730,7 +5676,7 @@ Partial Class frmSendungsdetailsNEU
         Me.T1BestätigungToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MitGestellungsgarantieToolStripMenuItem, Me.OhneGestellungsgarantieToolStripMenuItem})
         Me.T1BestätigungToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.T1BestätigungToolStripMenuItem.Name = "T1BestätigungToolStripMenuItem"
-        Me.T1BestätigungToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
+        Me.T1BestätigungToolStripMenuItem.Size = New System.Drawing.Size(223, 30)
         Me.T1BestätigungToolStripMenuItem.Text = "T1 Bestätigung"
         '
         'MitGestellungsgarantieToolStripMenuItem
@@ -5748,7 +5694,7 @@ Partial Class frmSendungsdetailsNEU
         'SpeditionSUBENToolStripMenuItem
         '
         Me.SpeditionSUBENToolStripMenuItem.Name = "SpeditionSUBENToolStripMenuItem"
-        Me.SpeditionSUBENToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
+        Me.SpeditionSUBENToolStripMenuItem.Size = New System.Drawing.Size(223, 30)
         Me.SpeditionSUBENToolStripMenuItem.Text = "Spedition SUBEN"
         '
         'ToolStripMenuItem16
@@ -5756,7 +5702,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem16.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.IMEXToolStripMenuItem1, Me.UNISPEDToolStripMenuItem, Me.VERAGToolStripMenuItem})
         Me.ToolStripMenuItem16.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.ToolStripMenuItem16.Name = "ToolStripMenuItem16"
-        Me.ToolStripMenuItem16.Size = New System.Drawing.Size(222, 30)
+        Me.ToolStripMenuItem16.Size = New System.Drawing.Size(223, 30)
         Me.ToolStripMenuItem16.Text = "Neuer LKW"
         '
         'IMEXToolStripMenuItem1
@@ -5782,35 +5728,35 @@ Partial Class frmSendungsdetailsNEU
         Me.AuftragATANAKToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ATANAKTRFraechter, Me.ATANAKEUFraechter})
         Me.AuftragATANAKToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.AuftragATANAKToolStripMenuItem.Name = "AuftragATANAKToolStripMenuItem"
-        Me.AuftragATANAKToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
+        Me.AuftragATANAKToolStripMenuItem.Size = New System.Drawing.Size(223, 30)
         Me.AuftragATANAKToolStripMenuItem.Text = "Auftrag DSG/ATANAK (UK)"
         '
         'ATANAKTRFraechter
         '
         Me.ATANAKTRFraechter.Image = CType(resources.GetObject("ATANAKTRFraechter.Image"), System.Drawing.Image)
         Me.ATANAKTRFraechter.Name = "ATANAKTRFraechter"
-        Me.ATANAKTRFraechter.Size = New System.Drawing.Size(230, 22)
+        Me.ATANAKTRFraechter.Size = New System.Drawing.Size(231, 22)
         Me.ATANAKTRFraechter.Text = "ATANAK (TR Frächter)"
         '
         'ATANAKEUFraechter
         '
         Me.ATANAKEUFraechter.Image = CType(resources.GetObject("ATANAKEUFraechter.Image"), System.Drawing.Image)
         Me.ATANAKEUFraechter.Name = "ATANAKEUFraechter"
-        Me.ATANAKEUFraechter.Size = New System.Drawing.Size(230, 22)
+        Me.ATANAKEUFraechter.Size = New System.Drawing.Size(231, 22)
         Me.ATANAKEUFraechter.Text = "ATANAK (EU/andere Frächter)"
         '
         'ToolStripMenuItem27
         '
         Me.ToolStripMenuItem27.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.ToolStripMenuItem27.Name = "ToolStripMenuItem27"
-        Me.ToolStripMenuItem27.Size = New System.Drawing.Size(222, 30)
+        Me.ToolStripMenuItem27.Size = New System.Drawing.Size(223, 30)
         Me.ToolStripMenuItem27.Text = "Auftrag VIBSEA (BE)"
         '
         'ToolStripMenuItem26
         '
         Me.ToolStripMenuItem26.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.ToolStripMenuItem26.Name = "ToolStripMenuItem26"
-        Me.ToolStripMenuItem26.Size = New System.Drawing.Size(222, 30)
+        Me.ToolStripMenuItem26.Size = New System.Drawing.Size(223, 30)
         Me.ToolStripMenuItem26.Text = "Auftrag BBL (FR)"
         '
         'ToolStripMenuItem28
@@ -5818,7 +5764,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem28.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem29, Me.ToolStripMenuItem30})
         Me.ToolStripMenuItem28.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.ToolStripMenuItem28.Name = "ToolStripMenuItem28"
-        Me.ToolStripMenuItem28.Size = New System.Drawing.Size(222, 30)
+        Me.ToolStripMenuItem28.Size = New System.Drawing.Size(223, 30)
         Me.ToolStripMenuItem28.Text = "GEBR.WEISS (CH) Aviso"
         '
         'ToolStripMenuItem29
@@ -5840,7 +5786,7 @@ Partial Class frmSendungsdetailsNEU
         Me.ToolStripMenuItem25.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AktuelleSendungAnhängeWählenToolStripMenuItem, Me.AlleLEXSendungenLKWToolStripMenuItem})
         Me.ToolStripMenuItem25.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.ToolStripMenuItem25.Name = "ToolStripMenuItem25"
-        Me.ToolStripMenuItem25.Size = New System.Drawing.Size(222, 30)
+        Me.ToolStripMenuItem25.Size = New System.Drawing.Size(223, 30)
         Me.ToolStripMenuItem25.Text = "LEX Aviso"
         '
         'AktuelleSendungAnhängeWählenToolStripMenuItem
@@ -5862,7 +5808,7 @@ Partial Class frmSendungsdetailsNEU
         Me.GVMSInfoToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AlleEIDRSendungenToolStripMenuItem, Me.AktuelleSendungToolStripMenuItem})
         Me.GVMSInfoToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.GVMSInfoToolStripMenuItem.Name = "GVMSInfoToolStripMenuItem"
-        Me.GVMSInfoToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
+        Me.GVMSInfoToolStripMenuItem.Size = New System.Drawing.Size(223, 30)
         Me.GVMSInfoToolStripMenuItem.Text = "GVMS Info"
         '
         'AlleEIDRSendungenToolStripMenuItem
@@ -5883,26 +5829,26 @@ Partial Class frmSendungsdetailsNEU
         '
         Me.CMRBestätigungToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.CMRBestätigungToolStripMenuItem.Name = "CMRBestätigungToolStripMenuItem"
-        Me.CMRBestätigungToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
+        Me.CMRBestätigungToolStripMenuItem.Size = New System.Drawing.Size(223, 30)
         Me.CMRBestätigungToolStripMenuItem.Text = "CMR Bestätigung"
         '
         'AuftragMOTISToolStripMenuItem
         '
         Me.AuftragMOTISToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.AuftragMOTISToolStripMenuItem.Name = "AuftragMOTISToolStripMenuItem"
-        Me.AuftragMOTISToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
+        Me.AuftragMOTISToolStripMenuItem.Size = New System.Drawing.Size(223, 30)
         Me.AuftragMOTISToolStripMenuItem.Text = "Auftrag MOTIS"
         '
         'ToolStripSeparator1
         '
         Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
-        Me.ToolStripSeparator1.Size = New System.Drawing.Size(219, 6)
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(220, 6)
         '
         'dynMailsToolStripMenuItem
         '
         Me.dynMailsToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1
         Me.dynMailsToolStripMenuItem.Name = "dynMailsToolStripMenuItem"
-        Me.dynMailsToolStripMenuItem.Size = New System.Drawing.Size(222, 30)
+        Me.dynMailsToolStripMenuItem.Size = New System.Drawing.Size(223, 30)
         Me.dynMailsToolStripMenuItem.Text = "Dynamische Maillvorlagen"
         '
         'ContextMenuStrip2
@@ -5998,321 +5944,6 @@ Partial Class frmSendungsdetailsNEU
         Me.DataGridViewTextBoxColumn5.ReadOnly = True
         Me.DataGridViewTextBoxColumn5.Width = 200
         '
-        '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
-        '
-        'cntlFrachtfuehrer_Sonst
-        '
-        Me.cntlFrachtfuehrer_Sonst._abrArt = "SONST"
-        Me.cntlFrachtfuehrer_Sonst._beteiligter = "FRACHTF"
-        Me.cntlFrachtfuehrer_Sonst._readOnly = True
-        Me.cntlFrachtfuehrer_Sonst.Location = New System.Drawing.Point(632, 168)
-        Me.cntlFrachtfuehrer_Sonst.Name = "cntlFrachtfuehrer_Sonst"
-        Me.cntlFrachtfuehrer_Sonst.Size = New System.Drawing.Size(21, 20)
-        Me.cntlFrachtfuehrer_Sonst.TabIndex = 82
-        Me.cntlFrachtfuehrer_Sonst.TabStop = False
-        Me.cntlFrachtfuehrer_Sonst.value = ""
-        '
-        'cntlAbsender_Sonst
-        '
-        Me.cntlAbsender_Sonst._abrArt = "SONST"
-        Me.cntlAbsender_Sonst._beteiligter = "ABS"
-        Me.cntlAbsender_Sonst._readOnly = True
-        Me.cntlAbsender_Sonst.Location = New System.Drawing.Point(632, 133)
-        Me.cntlAbsender_Sonst.Name = "cntlAbsender_Sonst"
-        Me.cntlAbsender_Sonst.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAbsender_Sonst.TabIndex = 68
-        Me.cntlAbsender_Sonst.TabStop = False
-        Me.cntlAbsender_Sonst.value = ""
-        '
-        'cntlEmpfaenger_Sonst
-        '
-        Me.cntlEmpfaenger_Sonst._abrArt = "SONST"
-        Me.cntlEmpfaenger_Sonst._beteiligter = "EMPF"
-        Me.cntlEmpfaenger_Sonst._readOnly = True
-        Me.cntlEmpfaenger_Sonst.Location = New System.Drawing.Point(632, 94)
-        Me.cntlEmpfaenger_Sonst.Name = "cntlEmpfaenger_Sonst"
-        Me.cntlEmpfaenger_Sonst.Size = New System.Drawing.Size(21, 20)
-        Me.cntlEmpfaenger_Sonst.TabIndex = 53
-        Me.cntlEmpfaenger_Sonst.TabStop = False
-        Me.cntlEmpfaenger_Sonst.value = ""
-        '
-        'cntlAuftraggeber_Sonst
-        '
-        Me.cntlAuftraggeber_Sonst._abrArt = "SONST"
-        Me.cntlAuftraggeber_Sonst._beteiligter = "AUFTR"
-        Me.cntlAuftraggeber_Sonst._readOnly = True
-        Me.cntlAuftraggeber_Sonst.Location = New System.Drawing.Point(632, 57)
-        Me.cntlAuftraggeber_Sonst.Name = "cntlAuftraggeber_Sonst"
-        Me.cntlAuftraggeber_Sonst.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAuftraggeber_Sonst.TabIndex = 36
-        Me.cntlAuftraggeber_Sonst.TabStop = False
-        Me.cntlAuftraggeber_Sonst.value = ""
-        '
-        'cntlAvisierer_Sonst
-        '
-        Me.cntlAvisierer_Sonst._abrArt = "SONST"
-        Me.cntlAvisierer_Sonst._beteiligter = "AVISIERER"
-        Me.cntlAvisierer_Sonst._readOnly = True
-        Me.cntlAvisierer_Sonst.Location = New System.Drawing.Point(632, 20)
-        Me.cntlAvisierer_Sonst.Name = "cntlAvisierer_Sonst"
-        Me.cntlAvisierer_Sonst.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAvisierer_Sonst.TabIndex = 21
-        Me.cntlAvisierer_Sonst.TabStop = False
-        Me.cntlAvisierer_Sonst.value = ""
-        '
-        'cntlFrachtf_Clear
-        '
-        Me.cntlFrachtf_Clear._abrArt = "CLEARING"
-        Me.cntlFrachtf_Clear._beteiligter = "FRACHTF"
-        Me.cntlFrachtf_Clear._readOnly = False
-        Me.cntlFrachtf_Clear.Location = New System.Drawing.Point(600, 168)
-        Me.cntlFrachtf_Clear.Name = "cntlFrachtf_Clear"
-        Me.cntlFrachtf_Clear.Size = New System.Drawing.Size(21, 20)
-        Me.cntlFrachtf_Clear.TabIndex = 81
-        Me.cntlFrachtf_Clear.TabStop = False
-        Me.cntlFrachtf_Clear.value = ""
-        '
-        'cntlFrachtf_Abf
-        '
-        Me.cntlFrachtf_Abf._abrArt = "ABFKOST"
-        Me.cntlFrachtf_Abf._beteiligter = "FRACHTF"
-        Me.cntlFrachtf_Abf._readOnly = False
-        Me.cntlFrachtf_Abf.Location = New System.Drawing.Point(569, 168)
-        Me.cntlFrachtf_Abf.Name = "cntlFrachtf_Abf"
-        Me.cntlFrachtf_Abf.Size = New System.Drawing.Size(21, 20)
-        Me.cntlFrachtf_Abf.TabIndex = 80
-        Me.cntlFrachtf_Abf.TabStop = False
-        Me.cntlFrachtf_Abf.value = ""
-        '
-        'cntlFrachtf_Eust
-        '
-        Me.cntlFrachtf_Eust._abrArt = "EUST"
-        Me.cntlFrachtf_Eust._beteiligter = "FRACHTF"
-        Me.cntlFrachtf_Eust._readOnly = False
-        Me.cntlFrachtf_Eust.Location = New System.Drawing.Point(538, 168)
-        Me.cntlFrachtf_Eust.Name = "cntlFrachtf_Eust"
-        Me.cntlFrachtf_Eust.Size = New System.Drawing.Size(21, 20)
-        Me.cntlFrachtf_Eust.TabIndex = 79
-        Me.cntlFrachtf_Eust.TabStop = False
-        Me.cntlFrachtf_Eust.value = ""
-        '
-        'cntlFrachtf_Zoll
-        '
-        Me.cntlFrachtf_Zoll._abrArt = "ZOLL"
-        Me.cntlFrachtf_Zoll._beteiligter = "FRACHTF"
-        Me.cntlFrachtf_Zoll._readOnly = False
-        Me.cntlFrachtf_Zoll.Location = New System.Drawing.Point(507, 168)
-        Me.cntlFrachtf_Zoll.Name = "cntlFrachtf_Zoll"
-        Me.cntlFrachtf_Zoll.Size = New System.Drawing.Size(21, 20)
-        Me.cntlFrachtf_Zoll.TabIndex = 78
-        Me.cntlFrachtf_Zoll.TabStop = False
-        Me.cntlFrachtf_Zoll.value = ""
-        '
-        'cntlAbsender_Clear
-        '
-        Me.cntlAbsender_Clear._abrArt = "CLEARING"
-        Me.cntlAbsender_Clear._beteiligter = "ABS"
-        Me.cntlAbsender_Clear._readOnly = False
-        Me.cntlAbsender_Clear.Location = New System.Drawing.Point(600, 133)
-        Me.cntlAbsender_Clear.Name = "cntlAbsender_Clear"
-        Me.cntlAbsender_Clear.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAbsender_Clear.TabIndex = 67
-        Me.cntlAbsender_Clear.TabStop = False
-        Me.cntlAbsender_Clear.value = ""
-        '
-        'cntlAbsender_Abf
-        '
-        Me.cntlAbsender_Abf._abrArt = "ABFKOST"
-        Me.cntlAbsender_Abf._beteiligter = "ABS"
-        Me.cntlAbsender_Abf._readOnly = False
-        Me.cntlAbsender_Abf.Location = New System.Drawing.Point(569, 133)
-        Me.cntlAbsender_Abf.Name = "cntlAbsender_Abf"
-        Me.cntlAbsender_Abf.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAbsender_Abf.TabIndex = 66
-        Me.cntlAbsender_Abf.TabStop = False
-        Me.cntlAbsender_Abf.value = ""
-        '
-        'cntlAbsender_Eust
-        '
-        Me.cntlAbsender_Eust._abrArt = "EUST"
-        Me.cntlAbsender_Eust._beteiligter = "ABS"
-        Me.cntlAbsender_Eust._readOnly = False
-        Me.cntlAbsender_Eust.Location = New System.Drawing.Point(538, 133)
-        Me.cntlAbsender_Eust.Name = "cntlAbsender_Eust"
-        Me.cntlAbsender_Eust.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAbsender_Eust.TabIndex = 65
-        Me.cntlAbsender_Eust.TabStop = False
-        Me.cntlAbsender_Eust.value = ""
-        '
-        'cntlAbsender_Zoll
-        '
-        Me.cntlAbsender_Zoll._abrArt = "ZOLL"
-        Me.cntlAbsender_Zoll._beteiligter = "ABS"
-        Me.cntlAbsender_Zoll._readOnly = False
-        Me.cntlAbsender_Zoll.Location = New System.Drawing.Point(507, 133)
-        Me.cntlAbsender_Zoll.Name = "cntlAbsender_Zoll"
-        Me.cntlAbsender_Zoll.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAbsender_Zoll.TabIndex = 64
-        Me.cntlAbsender_Zoll.TabStop = False
-        Me.cntlAbsender_Zoll.value = ""
-        '
-        'cntlEmpf_Clear
-        '
-        Me.cntlEmpf_Clear._abrArt = "CLEARING"
-        Me.cntlEmpf_Clear._beteiligter = "EMPF"
-        Me.cntlEmpf_Clear._readOnly = False
-        Me.cntlEmpf_Clear.Location = New System.Drawing.Point(600, 94)
-        Me.cntlEmpf_Clear.Name = "cntlEmpf_Clear"
-        Me.cntlEmpf_Clear.Size = New System.Drawing.Size(21, 20)
-        Me.cntlEmpf_Clear.TabIndex = 52
-        Me.cntlEmpf_Clear.TabStop = False
-        Me.cntlEmpf_Clear.value = ""
-        '
-        'cntlEmpf_Abf
-        '
-        Me.cntlEmpf_Abf._abrArt = "ABFKOST"
-        Me.cntlEmpf_Abf._beteiligter = "EMPF"
-        Me.cntlEmpf_Abf._readOnly = False
-        Me.cntlEmpf_Abf.Location = New System.Drawing.Point(569, 94)
-        Me.cntlEmpf_Abf.Name = "cntlEmpf_Abf"
-        Me.cntlEmpf_Abf.Size = New System.Drawing.Size(21, 20)
-        Me.cntlEmpf_Abf.TabIndex = 51
-        Me.cntlEmpf_Abf.TabStop = False
-        Me.cntlEmpf_Abf.value = ""
-        '
-        'cntlEmpf_Eust
-        '
-        Me.cntlEmpf_Eust._abrArt = "EUST"
-        Me.cntlEmpf_Eust._beteiligter = "EMPF"
-        Me.cntlEmpf_Eust._readOnly = False
-        Me.cntlEmpf_Eust.Location = New System.Drawing.Point(538, 94)
-        Me.cntlEmpf_Eust.Name = "cntlEmpf_Eust"
-        Me.cntlEmpf_Eust.Size = New System.Drawing.Size(21, 20)
-        Me.cntlEmpf_Eust.TabIndex = 50
-        Me.cntlEmpf_Eust.TabStop = False
-        Me.cntlEmpf_Eust.value = ""
-        '
-        'cntlEmpf_Zoll
-        '
-        Me.cntlEmpf_Zoll._abrArt = "ZOLL"
-        Me.cntlEmpf_Zoll._beteiligter = "EMPF"
-        Me.cntlEmpf_Zoll._readOnly = False
-        Me.cntlEmpf_Zoll.Location = New System.Drawing.Point(507, 94)
-        Me.cntlEmpf_Zoll.Name = "cntlEmpf_Zoll"
-        Me.cntlEmpf_Zoll.Size = New System.Drawing.Size(21, 20)
-        Me.cntlEmpf_Zoll.TabIndex = 49
-        Me.cntlEmpf_Zoll.TabStop = False
-        Me.cntlEmpf_Zoll.value = ""
-        '
-        'cntlAuftr_Clear
-        '
-        Me.cntlAuftr_Clear._abrArt = "CLEARING"
-        Me.cntlAuftr_Clear._beteiligter = "AUFTR"
-        Me.cntlAuftr_Clear._readOnly = False
-        Me.cntlAuftr_Clear.Location = New System.Drawing.Point(600, 57)
-        Me.cntlAuftr_Clear.Name = "cntlAuftr_Clear"
-        Me.cntlAuftr_Clear.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAuftr_Clear.TabIndex = 35
-        Me.cntlAuftr_Clear.TabStop = False
-        Me.cntlAuftr_Clear.value = ""
-        '
-        'cntlAuftr_Abf
-        '
-        Me.cntlAuftr_Abf._abrArt = "ABFKOST"
-        Me.cntlAuftr_Abf._beteiligter = "AUFTR"
-        Me.cntlAuftr_Abf._readOnly = False
-        Me.cntlAuftr_Abf.Location = New System.Drawing.Point(569, 57)
-        Me.cntlAuftr_Abf.Name = "cntlAuftr_Abf"
-        Me.cntlAuftr_Abf.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAuftr_Abf.TabIndex = 34
-        Me.cntlAuftr_Abf.TabStop = False
-        Me.cntlAuftr_Abf.value = ""
-        '
-        'cntlAuftr_Eust
-        '
-        Me.cntlAuftr_Eust._abrArt = "EUST"
-        Me.cntlAuftr_Eust._beteiligter = "AUFTR"
-        Me.cntlAuftr_Eust._readOnly = False
-        Me.cntlAuftr_Eust.Location = New System.Drawing.Point(538, 57)
-        Me.cntlAuftr_Eust.Name = "cntlAuftr_Eust"
-        Me.cntlAuftr_Eust.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAuftr_Eust.TabIndex = 33
-        Me.cntlAuftr_Eust.TabStop = False
-        Me.cntlAuftr_Eust.value = ""
-        '
-        'cntlAuftr_Zoll
-        '
-        Me.cntlAuftr_Zoll._abrArt = "ZOLL"
-        Me.cntlAuftr_Zoll._beteiligter = "AUFTR"
-        Me.cntlAuftr_Zoll._readOnly = False
-        Me.cntlAuftr_Zoll.Location = New System.Drawing.Point(507, 57)
-        Me.cntlAuftr_Zoll.Name = "cntlAuftr_Zoll"
-        Me.cntlAuftr_Zoll.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAuftr_Zoll.TabIndex = 32
-        Me.cntlAuftr_Zoll.TabStop = False
-        Me.cntlAuftr_Zoll.value = ""
-        '
-        'cntlAvisierer_Clear
-        '
-        Me.cntlAvisierer_Clear._abrArt = "CLEARING"
-        Me.cntlAvisierer_Clear._beteiligter = "AVISIERER"
-        Me.cntlAvisierer_Clear._readOnly = False
-        Me.cntlAvisierer_Clear.Location = New System.Drawing.Point(600, 20)
-        Me.cntlAvisierer_Clear.Name = "cntlAvisierer_Clear"
-        Me.cntlAvisierer_Clear.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAvisierer_Clear.TabIndex = 20
-        Me.cntlAvisierer_Clear.TabStop = False
-        Me.cntlAvisierer_Clear.value = ""
-        '
-        'cntlAvisierer_Abf
-        '
-        Me.cntlAvisierer_Abf._abrArt = "ABFKOST"
-        Me.cntlAvisierer_Abf._beteiligter = "AVISIERER"
-        Me.cntlAvisierer_Abf._readOnly = False
-        Me.cntlAvisierer_Abf.Location = New System.Drawing.Point(569, 20)
-        Me.cntlAvisierer_Abf.Name = "cntlAvisierer_Abf"
-        Me.cntlAvisierer_Abf.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAvisierer_Abf.TabIndex = 19
-        Me.cntlAvisierer_Abf.TabStop = False
-        Me.cntlAvisierer_Abf.value = ""
-        '
-        'cntlAvisierer_Eust
-        '
-        Me.cntlAvisierer_Eust._abrArt = "EUST"
-        Me.cntlAvisierer_Eust._beteiligter = "AVISIERER"
-        Me.cntlAvisierer_Eust._readOnly = False
-        Me.cntlAvisierer_Eust.Location = New System.Drawing.Point(538, 20)
-        Me.cntlAvisierer_Eust.Name = "cntlAvisierer_Eust"
-        Me.cntlAvisierer_Eust.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAvisierer_Eust.TabIndex = 18
-        Me.cntlAvisierer_Eust.TabStop = False
-        Me.cntlAvisierer_Eust.value = ""
-        '
-        'cntlAvisierer_Zoll
-        '
-        Me.cntlAvisierer_Zoll._abrArt = "ZOLL"
-        Me.cntlAvisierer_Zoll._beteiligter = "AVISIERER"
-        Me.cntlAvisierer_Zoll._readOnly = False
-        Me.cntlAvisierer_Zoll.Location = New System.Drawing.Point(507, 20)
-        Me.cntlAvisierer_Zoll.Name = "cntlAvisierer_Zoll"
-        Me.cntlAvisierer_Zoll.Size = New System.Drawing.Size(21, 20)
-        Me.cntlAvisierer_Zoll.TabIndex = 17
-        Me.cntlAvisierer_Zoll.TabStop = False
-        Me.cntlAvisierer_Zoll.value = ""
-        '
-        'UsrCntlSND_NCTSGestellungsadresse1
-        '
-        Me.UsrCntlSND_NCTSGestellungsadresse1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.UsrCntlSND_NCTSGestellungsadresse1.Location = New System.Drawing.Point(0, 0)
-        Me.UsrCntlSND_NCTSGestellungsadresse1.Name = "UsrCntlSND_NCTSGestellungsadresse1"
-        Me.UsrCntlSND_NCTSGestellungsadresse1.Size = New System.Drawing.Size(549, 118)
-        Me.UsrCntlSND_NCTSGestellungsadresse1.TabIndex = 0
-        '
         'frmSendungsdetailsNEU
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
@@ -6395,7 +6026,6 @@ Partial Class frmSendungsdetailsNEU
         CType(Me.picWarnAuftraggeber, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.picWarnAvisierer, System.ComponentModel.ISupportInitialize).EndInit()
         Me.cntxt.ResumeLayout(False)
-        Me.pnlT1.ResumeLayout(False)
         Me.Panel5.ResumeLayout(False)
         Me.Panel5.PerformLayout()
         Me.pnlValidation.ResumeLayout(False)

Aviso/frmSendungsdetailsNEU.vb

@@ -100,11 +100,11 @@ Public Class frmSendungsdetailsNEU
     Sub LOAD_ABRECHUNG()
         SENDUNG_LIST(CURRENT_INDEX).LOAD_ABRECHNUNG()
 
-        cntlAvisierer_Sonst.special(False)
+        If cntlAvisierer_Sonst IsNot Nothing Then cntlAvisierer_Sonst.special(False)
-        cntlAbsender_Sonst.special(False)
+        If cntlAbsender_Sonst IsNot Nothing Then cntlAbsender_Sonst.special(False)
-        cntlEmpfaenger_Sonst.special(False)
+        If cntlEmpfaenger_Sonst IsNot Nothing Then cntlEmpfaenger_Sonst.special(False)
-        cntlAuftraggeber_Sonst.special(False)
+        If cntlAuftraggeber_Sonst IsNot Nothing Then cntlAuftraggeber_Sonst.special(False)
-        cntlFrachtfuehrer_Sonst.special(False)
+        If cntlFrachtfuehrer_Sonst IsNot Nothing Then cntlFrachtfuehrer_Sonst.special(False)
         Try
 
             For Each c In Panel6.Controls
@@ -1666,6 +1666,41 @@ Public Class frmSendungsdetailsNEU
             End If
             '-------------------------
 
+            'Fressnapf Spezial:)
+            '-------------------------
+            'If SENDUNG_LIST(CURRENT_INDEX).tblSnd_AvisiererKdNr = 757421 Then
+            '    If txtAuftraggeber.Text = "" Then txtAuftraggeber.KdNr = 757421
+            '    If txtEmpfaenger.Text = "" Then txtEmpfaenger.KdNr = 757421
+            '    If txtAuftraggeber.Text = "" Then txtAuftraggeber.KdNr = 757421
+            '    If SENDUNG_LIST(CURRENT_INDEX).ABRECHNUNG.Count = 0 Then
+            '        If cboAbfertigungsart._value = "" Then
+
+            '            For i As Integer = 0 To cboAbfertigungsart.Items.Count - 1
+            '                If cboAbfertigungsart.Items(i).ToString().Contains("38") Then
+            '                    cboAbfertigungsart.SelectedIndex = i
+            '                    Exit For
+            '                End If
+            '            Next
+
+            '        End If
+
+            '        If cboAbfertigungsLand._value = "" Then
+
+            '            For i As Integer = 0 To cboAbfertigungsLand.Items.Count - 1
+            '                If cboAbfertigungsLand.Items(i).ToString().Contains("AT") Then
+            '                    cboAbfertigungsLand.SelectedIndex = i
+            '                    Exit For
+            '                End If
+            '            Next
+
+
+            '        End If
+
+            '        If cntlAuftr_Abf IsNot Nothing Then cntlAuftr_Abf.lbl.Text = "X"
+            '    End If
+            'End If
+            '-------------------------
+
             Panel2.MinimumSize = New Size(0, FlowLayoutPanel.Height) '+ pnlheader.Height) ' damit das S***** Flowlayoutpanel nicht abgeschnitten wird...
 
 
@@ -2461,11 +2496,11 @@ Public Class frmSendungsdetailsNEU
         End If
         Button4.Enabled = btnLeihgeld.Enabled
 
-        cntlAvisierer_Eust.Visible = True
+        If cntlAvisierer_Eust IsNot Nothing Then cntlAvisierer_Eust.Visible = True
-        cntlAuftr_Eust.Visible = True
+        If cntlAuftr_Eust IsNot Nothing Then cntlAuftr_Eust.Visible = True
-        cntlEmpf_Eust.Visible = True
+        If cntlEmpf_Eust IsNot Nothing Then cntlEmpf_Eust.Visible = True
-        cntlAbsender_Eust.Visible = True
+        If cntlAbsender_Eust IsNot Nothing Then cntlAbsender_Eust.Visible = True
-        cntlFrachtf_Eust.Visible = True
+        If cntlFrachtf_Eust IsNot Nothing Then cntlFrachtf_Eust.Visible = True
 
         pnlT1.Controls.Clear()