Merge branch 'master' of https://git.it.verag.ag/edv/AVISO

Aviso/ATEZ/frmATEZ_EZA.vb

@@ -475,7 +475,7 @@ Public Class frmATEZ_EZA
         '    Case "AMBAR" : txtDyMandant.Text = "ATIL" : txtDyNiederlassung.Text = "AMBWO"
         'End Select 
         FIRMA_DY = cDakosyFunftions.getFirma_DY(FilialenNr.ToString, Me)
-        txtDyMandant.Text = cDakosyFunftions.getIOPartner(FIRMA_DY, "NCTS")
+        txtDyMandant.Text = cDakosyFunftions.getIOPartner(FIRMA_DY, "EZA")
         txtDyNiederlassung.Text = cDakosyFunftions.getDivision(FIRMA_DY, "EZA")
 
         Label4.Text = If(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_DAKOSY_SB, "-").ToString

Aviso/Aviso.vbproj

@@ -1271,6 +1271,12 @@
     <Compile Include="usrcntlFrachtkostenberechnung.vb">
       <SubType>UserControl</SubType>
     </Compile>
+    <Compile Include="usrCntlHauptfenster_Suche_SND.Designer.vb">
+      <DependentUpon>usrCntlHauptfenster_Suche_SND.vb</DependentUpon>
+    </Compile>
+    <Compile Include="usrCntlHauptfenster_Suche_SND.vb">
+      <SubType>UserControl</SubType>
+    </Compile>
     <Compile Include="usrCntlHauptfenster_Suche_AVISO.Designer.vb">
       <DependentUpon>usrCntlHauptfenster_Suche_AVISO.vb</DependentUpon>
     </Compile>
@@ -1673,6 +1679,9 @@
     <EmbeddedResource Include="usrcntlFrachtkostenberechnung.resx">
       <DependentUpon>usrcntlFrachtkostenberechnung.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="usrCntlHauptfenster_Suche_SND.resx">
+      <DependentUpon>usrCntlHauptfenster_Suche_SND.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="usrCntlHauptfenster_Suche_AVISO.resx">
       <DependentUpon>usrCntlHauptfenster_Suche_AVISO.vb</DependentUpon>
     </EmbeddedResource>

Aviso/Benachrichtigung/usrCntlBenachrichtigungen.Designer.vb

@@ -53,7 +53,7 @@ Partial Class usrCntlBenachrichtigungen
         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(284, 203)
+        Me.Panel2.Size = New System.Drawing.Size(284, 278)
         Me.Panel2.TabIndex = 2
         '
         'MyComboBox2
@@ -89,7 +89,7 @@ Partial Class usrCntlBenachrichtigungen
         Me.gridAvisoBenachrichtigungen.Name = "gridAvisoBenachrichtigungen"
         Me.gridAvisoBenachrichtigungen.ReadOnly = True
         Me.gridAvisoBenachrichtigungen.RowHeadersVisible = False
-        Me.gridAvisoBenachrichtigungen.Size = New System.Drawing.Size(284, 144)
+        Me.gridAvisoBenachrichtigungen.Size = New System.Drawing.Size(284, 209)
         Me.gridAvisoBenachrichtigungen.TabIndex = 2
         '
         'Panel4
@@ -101,16 +101,16 @@ Partial Class usrCntlBenachrichtigungen
         Me.Panel4.Controls.Add(Me.Button10)
         Me.Panel4.Controls.Add(Me.txtVermerk)
         Me.Panel4.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.Panel4.Location = New System.Drawing.Point(0, 165)
+        Me.Panel4.Location = New System.Drawing.Point(0, 230)
         Me.Panel4.Name = "Panel4"
-        Me.Panel4.Size = New System.Drawing.Size(284, 38)
+        Me.Panel4.Size = New System.Drawing.Size(284, 48)
         Me.Panel4.TabIndex = 5
         '
         'cbxTaskForce
         '
         Me.cbxTaskForce.AutoSize = True
         Me.cbxTaskForce.ForeColor = System.Drawing.Color.Black
-        Me.cbxTaskForce.Location = New System.Drawing.Point(174, 19)
+        Me.cbxTaskForce.Location = New System.Drawing.Point(174, 30)
         Me.cbxTaskForce.Name = "cbxTaskForce"
         Me.cbxTaskForce.Size = New System.Drawing.Size(77, 17)
         Me.cbxTaskForce.TabIndex = 33
@@ -122,7 +122,7 @@ Partial Class usrCntlBenachrichtigungen
         '
         Me.cbxVerwarung.AutoSize = True
         Me.cbxVerwarung.ForeColor = System.Drawing.Color.Black
-        Me.cbxVerwarung.Location = New System.Drawing.Point(85, 19)
+        Me.cbxVerwarung.Location = New System.Drawing.Point(85, 30)
         Me.cbxVerwarung.Name = "cbxVerwarung"
         Me.cbxVerwarung.Size = New System.Drawing.Size(83, 17)
         Me.cbxVerwarung.TabIndex = 32
@@ -134,7 +134,7 @@ Partial Class usrCntlBenachrichtigungen
         '
         Me.cbxNeukunden.AutoSize = True
         Me.cbxNeukunden.ForeColor = System.Drawing.Color.Black
-        Me.cbxNeukunden.Location = New System.Drawing.Point(7, 19)
+        Me.cbxNeukunden.Location = New System.Drawing.Point(7, 30)
         Me.cbxNeukunden.Name = "cbxNeukunden"
         Me.cbxNeukunden.Size = New System.Drawing.Size(82, 17)
         Me.cbxNeukunden.TabIndex = 30
@@ -146,11 +146,10 @@ Partial Class usrCntlBenachrichtigungen
         '
         Me.Button10.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Button10.Enabled = False
-        Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
         Me.Button10.ForeColor = System.Drawing.Color.Black
         Me.Button10.Image = Global.AVISO.My.Resources.Resources.ok
         Me.Button10.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button10.Location = New System.Drawing.Point(159, 3)
+        Me.Button10.Location = New System.Drawing.Point(159, 0)
         Me.Button10.Name = "Button10"
         Me.Button10.Size = New System.Drawing.Size(121, 30)
         Me.Button10.TabIndex = 3
@@ -163,7 +162,7 @@ Partial Class usrCntlBenachrichtigungen
         '
         Me.txtVermerk.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.txtVermerk.Location = New System.Drawing.Point(7, -1)
+        Me.txtVermerk.Location = New System.Drawing.Point(7, 3)
         Me.txtVermerk.Name = "txtVermerk"
         Me.txtVermerk.ReadOnly = True
         Me.txtVermerk.Size = New System.Drawing.Size(146, 20)
@@ -233,7 +232,7 @@ Partial Class usrCntlBenachrichtigungen
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.Controls.Add(Me.Panel2)
         Me.Name = "usrCntlBenachrichtigungen"
-        Me.Size = New System.Drawing.Size(284, 203)
+        Me.Size = New System.Drawing.Size(284, 278)
         Me.Panel2.ResumeLayout(False)
         CType(Me.gridAvisoBenachrichtigungen, System.ComponentModel.ISupportInitialize).EndInit()
         Me.Panel4.ResumeLayout(False)

Aviso/frmAddSendungsvermerkShort.Designer.vb

@@ -27,11 +27,21 @@ Partial Class frmAddSendungsvermerkShort
         Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
         Me.pnlMain = New System.Windows.Forms.Panel()
         Me.pnlSendungsVermker = New System.Windows.Forms.Panel()
-        Me.Label5 = New System.Windows.Forms.Label()
+        Me.optDraft = New System.Windows.Forms.CheckBox()
+        Me.optGewPackAngefordert = New System.Windows.Forms.CheckBox()
+        Me.optKostenbestaetigungAngefordert = New System.Windows.Forms.CheckBox()
+        Me.optZolltarifnummerAngefordert = New System.Windows.Forms.CheckBox()
         Me.txtSonstigesDokumentFehlt = New System.Windows.Forms.TextBox()
+        Me.cbxPackliste = New System.Windows.Forms.CheckBox()
         Me.Label4 = New System.Windows.Forms.Label()
         Me.optFremd_ATB = New System.Windows.Forms.CheckBox()
         Me.optFremd_SendungAvisiert = New System.Windows.Forms.CheckBox()
+        Me.optFahrerKeinATR = New System.Windows.Forms.CheckBox()
+        Me.optFrachtkostenAngefordert = New System.Windows.Forms.CheckBox()
+        Me.optKundeNichtErreichbar = New System.Windows.Forms.CheckBox()
+        Me.optAbsenderbestätigung = New System.Windows.Forms.CheckBox()
+        Me.cbxRgBest = New System.Windows.Forms.CheckBox()
+        Me.optUeberwachungsdok = New System.Windows.Forms.CheckBox()
         Me.lblErrSpedition = New System.Windows.Forms.Label()
         Me.Label2 = New System.Windows.Forms.Label()
         Me.lblErrGrund = New System.Windows.Forms.Label()
@@ -43,36 +53,32 @@ Partial Class frmAddSendungsvermerkShort
         Me.optSpeditionWeitergeleitet = New System.Windows.Forms.CheckBox()
         Me.optFreierText = New System.Windows.Forms.CheckBox()
         Me.optATAangefordert = New System.Windows.Forms.CheckBox()
+        Me.optVorkasseAngefordert = New System.Windows.Forms.CheckBox()
+        Me.optKontaktdatenAngefordert = New System.Windows.Forms.CheckBox()
         Me.Label3 = New System.Windows.Forms.Label()
         Me.lblErr240Zeichen = New System.Windows.Forms.Label()
         Me.txtDetail = New System.Windows.Forms.TextBox()
-        Me.btnCustomerUploadLink = New System.Windows.Forms.Button()
-        Me.btnCustomerUploadEmail = New System.Windows.Forms.Button()
-        Me.txtCustomerUploadEmail = New System.Windows.Forms.TextBox()
-        Me.lblCustomerUploadEmail = New System.Windows.Forms.Label()
-        Me.lblCustomerUploadValidityHours = New System.Windows.Forms.Label()
-        Me.nudCustomerUploadValidityHours = New System.Windows.Forms.NumericUpDown()
-        Me.cmbCustomerUploadLanguage = New System.Windows.Forms.ComboBox()
-        Me.lblCustomerUploadLanguage = New System.Windows.Forms.Label()
-        Me.txtCustomerUploadEmailText = New System.Windows.Forms.TextBox()
-        Me.lblCustomerUploadEmailText = New System.Windows.Forms.Label()
-        Me.pnlCustomerUploadSeparator = New System.Windows.Forms.Panel()
         Me.lblZustzlFreitext = New System.Windows.Forms.Label()
         Me.txtSendungSpedition = New System.Windows.Forms.TextBox()
         Me.cbxNichtLeserlich = New System.Windows.Forms.CheckBox()
         Me.btnOK = New System.Windows.Forms.Button()
         Me.cbxSonstDok = New System.Windows.Forms.CheckBox()
         Me.Label9 = New System.Windows.Forms.Label()
+        Me.cbxVollmacht = New System.Windows.Forms.CheckBox()
+        Me.cbxCMR = New System.Windows.Forms.CheckBox()
         Me.Label17 = New System.Windows.Forms.Label()
         Me.Label13 = New System.Windows.Forms.Label()
+        Me.cbxATR = New System.Windows.Forms.CheckBox()
+        Me.cbxLS = New System.Windows.Forms.CheckBox()
         Me.txtFreierText = New System.Windows.Forms.TextBox()
+        Me.cbxRechnung = New System.Windows.Forms.CheckBox()
         Me.Label20 = New System.Windows.Forms.Label()
+        Me.cbxAuftrag = New System.Windows.Forms.CheckBox()
         Me.PictureBox1 = New System.Windows.Forms.PictureBox()
         Me.PictureBox4 = New System.Windows.Forms.PictureBox()
         Me.Panel4 = New System.Windows.Forms.Panel()
         Me.pnlMain.SuspendLayout()
         Me.pnlSendungsVermker.SuspendLayout()
-        CType(Me.nudCustomerUploadValidityHours, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
@@ -89,18 +95,28 @@ Partial Class frmAddSendungsvermerkShort
         Me.pnlMain.Dock = System.Windows.Forms.DockStyle.Fill
         Me.pnlMain.Location = New System.Drawing.Point(0, 0)
         Me.pnlMain.Name = "pnlMain"
-        Me.pnlMain.Size = New System.Drawing.Size(474, 868)
+        Me.pnlMain.Size = New System.Drawing.Size(454, 605)
         Me.pnlMain.TabIndex = 0
         '
         'pnlSendungsVermker
         '
         Me.pnlSendungsVermker.BackColor = System.Drawing.Color.White
         Me.pnlSendungsVermker.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.pnlSendungsVermker.Controls.Add(Me.Label5)
+        Me.pnlSendungsVermker.Controls.Add(Me.optDraft)
+        Me.pnlSendungsVermker.Controls.Add(Me.optGewPackAngefordert)
+        Me.pnlSendungsVermker.Controls.Add(Me.optKostenbestaetigungAngefordert)
+        Me.pnlSendungsVermker.Controls.Add(Me.optZolltarifnummerAngefordert)
         Me.pnlSendungsVermker.Controls.Add(Me.txtSonstigesDokumentFehlt)
+        Me.pnlSendungsVermker.Controls.Add(Me.cbxPackliste)
         Me.pnlSendungsVermker.Controls.Add(Me.Label4)
         Me.pnlSendungsVermker.Controls.Add(Me.optFremd_ATB)
         Me.pnlSendungsVermker.Controls.Add(Me.optFremd_SendungAvisiert)
+        Me.pnlSendungsVermker.Controls.Add(Me.optFahrerKeinATR)
+        Me.pnlSendungsVermker.Controls.Add(Me.optFrachtkostenAngefordert)
+        Me.pnlSendungsVermker.Controls.Add(Me.optKundeNichtErreichbar)
+        Me.pnlSendungsVermker.Controls.Add(Me.optAbsenderbestätigung)
+        Me.pnlSendungsVermker.Controls.Add(Me.cbxRgBest)
+        Me.pnlSendungsVermker.Controls.Add(Me.optUeberwachungsdok)
         Me.pnlSendungsVermker.Controls.Add(Me.lblErrSpedition)
         Me.pnlSendungsVermker.Controls.Add(Me.Label2)
         Me.pnlSendungsVermker.Controls.Add(Me.lblErrGrund)
@@ -112,65 +128,102 @@ Partial Class frmAddSendungsvermerkShort
         Me.pnlSendungsVermker.Controls.Add(Me.optSpeditionWeitergeleitet)
         Me.pnlSendungsVermker.Controls.Add(Me.optFreierText)
         Me.pnlSendungsVermker.Controls.Add(Me.optATAangefordert)
+        Me.pnlSendungsVermker.Controls.Add(Me.optVorkasseAngefordert)
+        Me.pnlSendungsVermker.Controls.Add(Me.optKontaktdatenAngefordert)
         Me.pnlSendungsVermker.Controls.Add(Me.Label3)
         Me.pnlSendungsVermker.Controls.Add(Me.lblErr240Zeichen)
         Me.pnlSendungsVermker.Controls.Add(Me.txtDetail)
-        Me.pnlSendungsVermker.Controls.Add(Me.btnCustomerUploadLink)
-        Me.pnlSendungsVermker.Controls.Add(Me.btnCustomerUploadEmail)
-        Me.pnlSendungsVermker.Controls.Add(Me.txtCustomerUploadEmail)
-        Me.pnlSendungsVermker.Controls.Add(Me.lblCustomerUploadEmail)
-        Me.pnlSendungsVermker.Controls.Add(Me.lblCustomerUploadValidityHours)
-        Me.pnlSendungsVermker.Controls.Add(Me.nudCustomerUploadValidityHours)
-        Me.pnlSendungsVermker.Controls.Add(Me.cmbCustomerUploadLanguage)
-        Me.pnlSendungsVermker.Controls.Add(Me.lblCustomerUploadLanguage)
-        Me.pnlSendungsVermker.Controls.Add(Me.txtCustomerUploadEmailText)
-        Me.pnlSendungsVermker.Controls.Add(Me.lblCustomerUploadEmailText)
-        Me.pnlSendungsVermker.Controls.Add(Me.pnlCustomerUploadSeparator)
         Me.pnlSendungsVermker.Controls.Add(Me.lblZustzlFreitext)
         Me.pnlSendungsVermker.Controls.Add(Me.txtSendungSpedition)
         Me.pnlSendungsVermker.Controls.Add(Me.cbxNichtLeserlich)
         Me.pnlSendungsVermker.Controls.Add(Me.btnOK)
         Me.pnlSendungsVermker.Controls.Add(Me.cbxSonstDok)
         Me.pnlSendungsVermker.Controls.Add(Me.Label9)
+        Me.pnlSendungsVermker.Controls.Add(Me.cbxVollmacht)
+        Me.pnlSendungsVermker.Controls.Add(Me.cbxCMR)
         Me.pnlSendungsVermker.Controls.Add(Me.Label17)
         Me.pnlSendungsVermker.Controls.Add(Me.Label13)
+        Me.pnlSendungsVermker.Controls.Add(Me.cbxATR)
+        Me.pnlSendungsVermker.Controls.Add(Me.cbxLS)
         Me.pnlSendungsVermker.Controls.Add(Me.txtFreierText)
+        Me.pnlSendungsVermker.Controls.Add(Me.cbxRechnung)
         Me.pnlSendungsVermker.Controls.Add(Me.Label20)
+        Me.pnlSendungsVermker.Controls.Add(Me.cbxAuftrag)
         Me.pnlSendungsVermker.Controls.Add(Me.PictureBox1)
         Me.pnlSendungsVermker.Controls.Add(Me.PictureBox4)
         Me.pnlSendungsVermker.Dock = System.Windows.Forms.DockStyle.Fill
         Me.pnlSendungsVermker.Location = New System.Drawing.Point(0, 0)
         Me.pnlSendungsVermker.Name = "pnlSendungsVermker"
-        Me.pnlSendungsVermker.Size = New System.Drawing.Size(474, 868)
+        Me.pnlSendungsVermker.Size = New System.Drawing.Size(454, 605)
         Me.pnlSendungsVermker.TabIndex = 0
         '
-        'Label5
+        'optDraft
         '
-        Me.Label5.AutoSize = True
+        Me.optDraft.AutoSize = True
-        Me.Label5.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.optDraft.Location = New System.Drawing.Point(12, 262)
-        Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.optDraft.Name = "optDraft"
-        Me.Label5.Location = New System.Drawing.Point(2, 642)
+        Me.optDraft.Size = New System.Drawing.Size(174, 17)
-        Me.Label5.Name = "Label5"
+        Me.optDraft.TabIndex = 102
-        Me.Label5.Size = New System.Drawing.Size(202, 17)
+        Me.optDraft.Text = "T1/T2 ""Draft"" OK - angefordert"
-        Me.Label5.TabIndex = 118
+        Me.optDraft.UseVisualStyleBackColor = True
-        Me.Label5.Text = "Kundenportal Upload-Link:"
+        '
+        'optGewPackAngefordert
+        '
+        Me.optGewPackAngefordert.AutoSize = True
+        Me.optGewPackAngefordert.Location = New System.Drawing.Point(12, 236)
+        Me.optGewPackAngefordert.Name = "optGewPackAngefordert"
+        Me.optGewPackAngefordert.Size = New System.Drawing.Size(245, 17)
+        Me.optGewPackAngefordert.TabIndex = 101
+        Me.optGewPackAngefordert.Text = "Gewicht/Packstücke mangelhaft - angefordert"
+        Me.optGewPackAngefordert.UseVisualStyleBackColor = True
+        '
+        'optKostenbestaetigungAngefordert
+        '
+        Me.optKostenbestaetigungAngefordert.AutoSize = True
+        Me.optKostenbestaetigungAngefordert.Location = New System.Drawing.Point(270, 214)
+        Me.optKostenbestaetigungAngefordert.Name = "optKostenbestaetigungAngefordert"
+        Me.optKostenbestaetigungAngefordert.Size = New System.Drawing.Size(177, 17)
+        Me.optKostenbestaetigungAngefordert.TabIndex = 99
+        Me.optKostenbestaetigungAngefordert.Text = "Kostenbestätigung - angefordert"
+        Me.optKostenbestaetigungAngefordert.UseVisualStyleBackColor = True
+        '
+        'optZolltarifnummerAngefordert
+        '
+        Me.optZolltarifnummerAngefordert.AutoSize = True
+        Me.optZolltarifnummerAngefordert.Location = New System.Drawing.Point(12, 214)
+        Me.optZolltarifnummerAngefordert.Name = "optZolltarifnummerAngefordert"
+        Me.optZolltarifnummerAngefordert.Size = New System.Drawing.Size(154, 17)
+        Me.optZolltarifnummerAngefordert.TabIndex = 98
+        Me.optZolltarifnummerAngefordert.Text = "Zolltarifnummer angefordert"
+        Me.optZolltarifnummerAngefordert.UseVisualStyleBackColor = True
         '
         'txtSonstigesDokumentFehlt
         '
         Me.txtSonstigesDokumentFehlt.BackColor = System.Drawing.Color.White
         Me.txtSonstigesDokumentFehlt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtSonstigesDokumentFehlt.Location = New System.Drawing.Point(96, 214)
+        Me.txtSonstigesDokumentFehlt.Location = New System.Drawing.Point(94, 96)
         Me.txtSonstigesDokumentFehlt.MaxLength = 80
         Me.txtSonstigesDokumentFehlt.Name = "txtSonstigesDokumentFehlt"
         Me.txtSonstigesDokumentFehlt.Size = New System.Drawing.Size(198, 20)
         Me.txtSonstigesDokumentFehlt.TabIndex = 10
         '
+        'cbxPackliste
+        '
+        Me.cbxPackliste.AutoSize = True
+        Me.cbxPackliste.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cbxPackliste.Location = New System.Drawing.Point(308, 75)
+        Me.cbxPackliste.Name = "cbxPackliste"
+        Me.cbxPackliste.Size = New System.Drawing.Size(69, 17)
+        Me.cbxPackliste.TabIndex = 97
+        Me.cbxPackliste.Text = "Packliste"
+        Me.cbxPackliste.UseVisualStyleBackColor = False
+        '
         'Label4
         '
         Me.Label4.AutoSize = True
         Me.Label4.BackColor = System.Drawing.Color.WhiteSmoke
         Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label4.Location = New System.Drawing.Point(11, 563)
+        Me.Label4.Location = New System.Drawing.Point(11, 411)
         Me.Label4.Name = "Label4"
         Me.Label4.Size = New System.Drawing.Size(125, 17)
         Me.Label4.TabIndex = 96
@@ -180,7 +233,7 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.optFremd_ATB.AutoSize = True
         Me.optFremd_ATB.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.optFremd_ATB.Location = New System.Drawing.Point(12, 610)
+        Me.optFremd_ATB.Location = New System.Drawing.Point(12, 458)
         Me.optFremd_ATB.Name = "optFremd_ATB"
         Me.optFremd_ATB.Size = New System.Drawing.Size(130, 17)
         Me.optFremd_ATB.TabIndex = 94
@@ -191,19 +244,81 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.optFremd_SendungAvisiert.AutoSize = True
         Me.optFremd_SendungAvisiert.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.optFremd_SendungAvisiert.Location = New System.Drawing.Point(12, 587)
+        Me.optFremd_SendungAvisiert.Location = New System.Drawing.Point(12, 435)
         Me.optFremd_SendungAvisiert.Name = "optFremd_SendungAvisiert"
         Me.optFremd_SendungAvisiert.Size = New System.Drawing.Size(193, 17)
         Me.optFremd_SendungAvisiert.TabIndex = 93
         Me.optFremd_SendungAvisiert.Text = "Sendung an Fremdeinsteller avisiert"
         Me.optFremd_SendungAvisiert.UseVisualStyleBackColor = False
         '
+        'optFahrerKeinATR
+        '
+        Me.optFahrerKeinATR.AutoSize = True
+        Me.optFahrerKeinATR.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.optFahrerKeinATR.Location = New System.Drawing.Point(308, 52)
+        Me.optFahrerKeinATR.Name = "optFahrerKeinATR"
+        Me.optFahrerKeinATR.Size = New System.Drawing.Size(125, 17)
+        Me.optFahrerKeinATR.TabIndex = 92
+        Me.optFahrerKeinATR.Text = "Fahrer hat kein A.TR"
+        Me.optFahrerKeinATR.UseVisualStyleBackColor = False
+        '
+        'optFrachtkostenAngefordert
+        '
+        Me.optFrachtkostenAngefordert.AutoSize = True
+        Me.optFrachtkostenAngefordert.Location = New System.Drawing.Point(12, 162)
+        Me.optFrachtkostenAngefordert.Name = "optFrachtkostenAngefordert"
+        Me.optFrachtkostenAngefordert.Size = New System.Drawing.Size(145, 17)
+        Me.optFrachtkostenAngefordert.TabIndex = 91
+        Me.optFrachtkostenAngefordert.Text = "Frachtkosten angefordert"
+        Me.optFrachtkostenAngefordert.UseVisualStyleBackColor = True
+        '
+        'optKundeNichtErreichbar
+        '
+        Me.optKundeNichtErreichbar.AutoSize = True
+        Me.optKundeNichtErreichbar.Location = New System.Drawing.Point(270, 141)
+        Me.optKundeNichtErreichbar.Name = "optKundeNichtErreichbar"
+        Me.optKundeNichtErreichbar.Size = New System.Drawing.Size(133, 17)
+        Me.optKundeNichtErreichbar.TabIndex = 90
+        Me.optKundeNichtErreichbar.Text = "Kunde nicht erreichbar"
+        Me.optKundeNichtErreichbar.UseVisualStyleBackColor = True
+        '
+        'optAbsenderbestätigung
+        '
+        Me.optAbsenderbestätigung.AutoSize = True
+        Me.optAbsenderbestätigung.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.optAbsenderbestätigung.Location = New System.Drawing.Point(308, 32)
+        Me.optAbsenderbestätigung.Name = "optAbsenderbestätigung"
+        Me.optAbsenderbestätigung.Size = New System.Drawing.Size(136, 17)
+        Me.optAbsenderbestätigung.TabIndex = 89
+        Me.optAbsenderbestätigung.Text = "Absenderbestät. angef."
+        Me.optAbsenderbestätigung.UseVisualStyleBackColor = False
+        '
+        'cbxRgBest
+        '
+        Me.cbxRgBest.AutoSize = True
+        Me.cbxRgBest.Location = New System.Drawing.Point(270, 185)
+        Me.cbxRgBest.Name = "cbxRgBest"
+        Me.cbxRgBest.Size = New System.Drawing.Size(146, 17)
+        Me.cbxRgBest.TabIndex = 86
+        Me.cbxRgBest.Text = "Rechnungsbestät. angef."
+        Me.cbxRgBest.UseVisualStyleBackColor = True
+        '
+        'optUeberwachungsdok
+        '
+        Me.optUeberwachungsdok.AutoSize = True
+        Me.optUeberwachungsdok.Location = New System.Drawing.Point(270, 163)
+        Me.optUeberwachungsdok.Name = "optUeberwachungsdok"
+        Me.optUeberwachungsdok.Size = New System.Drawing.Size(114, 17)
+        Me.optUeberwachungsdok.TabIndex = 85
+        Me.optUeberwachungsdok.Text = "Ü-Dok. angefodert"
+        Me.optUeberwachungsdok.UseVisualStyleBackColor = True
+        '
         'lblErrSpedition
         '
         Me.lblErrSpedition.AutoSize = True
         Me.lblErrSpedition.BackColor = System.Drawing.Color.WhiteSmoke
         Me.lblErrSpedition.ForeColor = System.Drawing.Color.Red
-        Me.lblErrSpedition.Location = New System.Drawing.Point(175, 468)
+        Me.lblErrSpedition.Location = New System.Drawing.Point(175, 316)
         Me.lblErrSpedition.Name = "lblErrSpedition"
         Me.lblErrSpedition.Size = New System.Drawing.Size(158, 13)
         Me.lblErrSpedition.TabIndex = 17
@@ -215,7 +330,7 @@ Partial Class frmAddSendungsvermerkShort
         Me.Label2.AutoSize = True
         Me.Label2.BackColor = System.Drawing.Color.WhiteSmoke
         Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
-        Me.Label2.Location = New System.Drawing.Point(175, 468)
+        Me.Label2.Location = New System.Drawing.Point(175, 316)
         Me.Label2.Name = "Label2"
         Me.Label2.Size = New System.Drawing.Size(57, 13)
         Me.Label2.TabIndex = 84
@@ -226,7 +341,7 @@ Partial Class frmAddSendungsvermerkShort
         Me.lblErrGrund.AutoSize = True
         Me.lblErrGrund.BackColor = System.Drawing.Color.WhiteSmoke
         Me.lblErrGrund.ForeColor = System.Drawing.Color.Red
-        Me.lblErrGrund.Location = New System.Drawing.Point(147, 537)
+        Me.lblErrGrund.Location = New System.Drawing.Point(147, 385)
         Me.lblErrGrund.Name = "lblErrGrund"
         Me.lblErrGrund.Size = New System.Drawing.Size(149, 13)
         Me.lblErrGrund.TabIndex = 26
@@ -242,7 +357,7 @@ Partial Class frmAddSendungsvermerkShort
         Me.btnCLose.FlatStyle = System.Windows.Forms.FlatStyle.Flat
         Me.btnCLose.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.btnCLose.ForeColor = System.Drawing.Color.White
-        Me.btnCLose.Location = New System.Drawing.Point(419, -1)
+        Me.btnCLose.Location = New System.Drawing.Point(399, -1)
         Me.btnCLose.Name = "btnCLose"
         Me.btnCLose.RightToLeft = System.Windows.Forms.RightToLeft.Yes
         Me.btnCLose.Size = New System.Drawing.Size(54, 20)
@@ -255,7 +370,7 @@ Partial Class frmAddSendungsvermerkShort
         Me.lblErrDokument.AutoSize = True
         Me.lblErrDokument.BackColor = System.Drawing.Color.WhiteSmoke
         Me.lblErrDokument.ForeColor = System.Drawing.Color.Red
-        Me.lblErrDokument.Location = New System.Drawing.Point(93, 233)
+        Me.lblErrDokument.Location = New System.Drawing.Point(91, 115)
         Me.lblErrDokument.Name = "lblErrDokument"
         Me.lblErrDokument.Size = New System.Drawing.Size(157, 13)
         Me.lblErrDokument.TabIndex = 11
@@ -277,7 +392,7 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.txtSpedition.BackColor = System.Drawing.Color.WhiteSmoke
         Me.txtSpedition.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtSpedition.Location = New System.Drawing.Point(177, 484)
+        Me.txtSpedition.Location = New System.Drawing.Point(177, 332)
         Me.txtSpedition.MaxLength = 50
         Me.txtSpedition.Name = "txtSpedition"
         Me.txtSpedition.Size = New System.Drawing.Size(125, 20)
@@ -298,7 +413,7 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.optSpeditionWeitergeleitet.AutoSize = True
         Me.optSpeditionWeitergeleitet.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.optSpeditionWeitergeleitet.Location = New System.Drawing.Point(12, 486)
+        Me.optSpeditionWeitergeleitet.Location = New System.Drawing.Point(12, 334)
         Me.optSpeditionWeitergeleitet.Name = "optSpeditionWeitergeleitet"
         Me.optSpeditionWeitergeleitet.Size = New System.Drawing.Size(163, 17)
         Me.optSpeditionWeitergeleitet.TabIndex = 19
@@ -309,7 +424,7 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.optFreierText.AutoSize = True
         Me.optFreierText.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.optFreierText.Location = New System.Drawing.Point(12, 513)
+        Me.optFreierText.Location = New System.Drawing.Point(12, 361)
         Me.optFreierText.Name = "optFreierText"
         Me.optFreierText.Size = New System.Drawing.Size(105, 17)
         Me.optFreierText.TabIndex = 27
@@ -320,18 +435,38 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.optATAangefordert.AutoSize = True
         Me.optATAangefordert.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.optATAangefordert.Location = New System.Drawing.Point(164, 610)
+        Me.optATAangefordert.Location = New System.Drawing.Point(164, 458)
         Me.optATAangefordert.Name = "optATAangefordert"
         Me.optATAangefordert.Size = New System.Drawing.Size(208, 17)
         Me.optATAangefordert.TabIndex = 15
         Me.optATAangefordert.Text = "ATA/ATC-Nr. angefordert (Fremdanm.)"
         Me.optATAangefordert.UseVisualStyleBackColor = False
         '
+        'optVorkasseAngefordert
+        '
+        Me.optVorkasseAngefordert.AutoSize = True
+        Me.optVorkasseAngefordert.Location = New System.Drawing.Point(12, 184)
+        Me.optVorkasseAngefordert.Name = "optVorkasseAngefordert"
+        Me.optVorkasseAngefordert.Size = New System.Drawing.Size(144, 17)
+        Me.optVorkasseAngefordert.TabIndex = 14
+        Me.optVorkasseAngefordert.Text = "Vorauskasse angefordert"
+        Me.optVorkasseAngefordert.UseVisualStyleBackColor = True
+        '
+        'optKontaktdatenAngefordert
+        '
+        Me.optKontaktdatenAngefordert.AutoSize = True
+        Me.optKontaktdatenAngefordert.Location = New System.Drawing.Point(12, 141)
+        Me.optKontaktdatenAngefordert.Name = "optKontaktdatenAngefordert"
+        Me.optKontaktdatenAngefordert.Size = New System.Drawing.Size(212, 17)
+        Me.optKontaktdatenAngefordert.TabIndex = 12
+        Me.optKontaktdatenAngefordert.Text = "Kontaktdaten (z.B.Tel-Nr.) - angefordert"
+        Me.optKontaktdatenAngefordert.UseVisualStyleBackColor = True
+        '
         'Label3
         '
         Me.Label3.AutoSize = True
         Me.Label3.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.Label3.Location = New System.Drawing.Point(308, 487)
+        Me.Label3.Location = New System.Drawing.Point(308, 335)
         Me.Label3.Name = "Label3"
         Me.Label3.Size = New System.Drawing.Size(57, 13)
         Me.Label3.TabIndex = 22
@@ -341,7 +476,7 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.lblErr240Zeichen.AutoSize = True
         Me.lblErr240Zeichen.ForeColor = System.Drawing.Color.Red
-        Me.lblErr240Zeichen.Location = New System.Drawing.Point(212, 785)
+        Me.lblErr240Zeichen.Location = New System.Drawing.Point(219, 496)
         Me.lblErr240Zeichen.Name = "lblErr240Zeichen"
         Me.lblErr240Zeichen.Size = New System.Drawing.Size(95, 13)
         Me.lblErr240Zeichen.TabIndex = 32
@@ -353,7 +488,7 @@ Partial Class frmAddSendungsvermerkShort
         Me.txtDetail.AcceptsReturn = True
         Me.txtDetail.BackColor = System.Drawing.Color.White
         Me.txtDetail.ForeColor = System.Drawing.SystemColors.InfoText
-        Me.txtDetail.Location = New System.Drawing.Point(5, 801)
+        Me.txtDetail.Location = New System.Drawing.Point(12, 512)
         Me.txtDetail.MaxLength = 240
         Me.txtDetail.Multiline = True
         Me.txtDetail.Name = "txtDetail"
@@ -363,117 +498,10 @@ Partial Class frmAddSendungsvermerkShort
         Me.txtDetail.TabStop = False
         Me.txtDetail.WordWrap = False
         '
-        'btnCustomerUploadLink
-        '
-        Me.btnCustomerUploadLink.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnCustomerUploadLink.Location = New System.Drawing.Point(340, 668)
-        Me.btnCustomerUploadLink.Name = "btnCustomerUploadLink"
-        Me.btnCustomerUploadLink.Size = New System.Drawing.Size(124, 23)
-        Me.btnCustomerUploadLink.TabIndex = 108
-        Me.btnCustomerUploadLink.Text = "Link kopieren"
-        Me.btnCustomerUploadLink.UseVisualStyleBackColor = True
-        '
-        'btnCustomerUploadEmail
-        '
-        Me.btnCustomerUploadEmail.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnCustomerUploadEmail.Location = New System.Drawing.Point(340, 694)
-        Me.btnCustomerUploadEmail.Name = "btnCustomerUploadEmail"
-        Me.btnCustomerUploadEmail.Size = New System.Drawing.Size(124, 23)
-        Me.btnCustomerUploadEmail.TabIndex = 109
-        Me.btnCustomerUploadEmail.Text = "E-Mail senden"
-        Me.btnCustomerUploadEmail.UseVisualStyleBackColor = True
-        '
-        'txtCustomerUploadEmail
-        '
-        Me.txtCustomerUploadEmail.BackColor = System.Drawing.Color.White
-        Me.txtCustomerUploadEmail.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtCustomerUploadEmail.Location = New System.Drawing.Point(80, 696)
-        Me.txtCustomerUploadEmail.MaxLength = 255
-        Me.txtCustomerUploadEmail.Name = "txtCustomerUploadEmail"
-        Me.txtCustomerUploadEmail.Size = New System.Drawing.Size(254, 20)
-        Me.txtCustomerUploadEmail.TabIndex = 107
-        '
-        'lblCustomerUploadEmail
-        '
-        Me.lblCustomerUploadEmail.AutoSize = True
-        Me.lblCustomerUploadEmail.Location = New System.Drawing.Point(2, 699)
-        Me.lblCustomerUploadEmail.Name = "lblCustomerUploadEmail"
-        Me.lblCustomerUploadEmail.Size = New System.Drawing.Size(54, 13)
-        Me.lblCustomerUploadEmail.TabIndex = 110
-        Me.lblCustomerUploadEmail.Text = "E-Mail an:"
-        '
-        'lblCustomerUploadValidityHours
-        '
-        Me.lblCustomerUploadValidityHours.AutoSize = True
-        Me.lblCustomerUploadValidityHours.Location = New System.Drawing.Point(176, 672)
-        Me.lblCustomerUploadValidityHours.Name = "lblCustomerUploadValidityHours"
-        Me.lblCustomerUploadValidityHours.Size = New System.Drawing.Size(66, 13)
-        Me.lblCustomerUploadValidityHours.TabIndex = 111
-        Me.lblCustomerUploadValidityHours.Text = "Gültigkeit(h):"
-        '
-        'nudCustomerUploadValidityHours
-        '
-        Me.nudCustomerUploadValidityHours.Location = New System.Drawing.Point(260, 670)
-        Me.nudCustomerUploadValidityHours.Maximum = New Decimal(New Integer() {168, 0, 0, 0})
-        Me.nudCustomerUploadValidityHours.Minimum = New Decimal(New Integer() {1, 0, 0, 0})
-        Me.nudCustomerUploadValidityHours.Name = "nudCustomerUploadValidityHours"
-        Me.nudCustomerUploadValidityHours.Size = New System.Drawing.Size(74, 20)
-        Me.nudCustomerUploadValidityHours.TabIndex = 112
-        Me.nudCustomerUploadValidityHours.Value = New Decimal(New Integer() {168, 0, 0, 0})
-        '
-        'cmbCustomerUploadLanguage
-        '
-        Me.cmbCustomerUploadLanguage.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
-        Me.cmbCustomerUploadLanguage.FormattingEnabled = True
-        Me.cmbCustomerUploadLanguage.Items.AddRange(New Object() {"de", "en", "tr", "sr", "bg"})
-        Me.cmbCustomerUploadLanguage.Location = New System.Drawing.Point(80, 670)
-        Me.cmbCustomerUploadLanguage.Name = "cmbCustomerUploadLanguage"
-        Me.cmbCustomerUploadLanguage.Size = New System.Drawing.Size(80, 21)
-        Me.cmbCustomerUploadLanguage.TabIndex = 116
-        '
-        'lblCustomerUploadLanguage
-        '
-        Me.lblCustomerUploadLanguage.AutoSize = True
-        Me.lblCustomerUploadLanguage.Location = New System.Drawing.Point(2, 673)
-        Me.lblCustomerUploadLanguage.Name = "lblCustomerUploadLanguage"
-        Me.lblCustomerUploadLanguage.Size = New System.Drawing.Size(72, 13)
-        Me.lblCustomerUploadLanguage.TabIndex = 117
-        Me.lblCustomerUploadLanguage.Text = "Mail Sprache:"
-        '
-        'txtCustomerUploadEmailText
-        '
-        Me.txtCustomerUploadEmailText.BackColor = System.Drawing.Color.White
-        Me.txtCustomerUploadEmailText.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtCustomerUploadEmailText.Location = New System.Drawing.Point(80, 718)
-        Me.txtCustomerUploadEmailText.MaxLength = 500
-        Me.txtCustomerUploadEmailText.Multiline = True
-        Me.txtCustomerUploadEmailText.Name = "txtCustomerUploadEmailText"
-        Me.txtCustomerUploadEmailText.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
-        Me.txtCustomerUploadEmailText.Size = New System.Drawing.Size(254, 54)
-        Me.txtCustomerUploadEmailText.TabIndex = 113
-        Me.txtCustomerUploadEmailText.Text = "Bitte laden Sie die angeforderten Dokumente über den Link hoch."
-        '
-        'lblCustomerUploadEmailText
-        '
-        Me.lblCustomerUploadEmailText.AutoSize = True
-        Me.lblCustomerUploadEmailText.Location = New System.Drawing.Point(2, 721)
-        Me.lblCustomerUploadEmailText.Name = "lblCustomerUploadEmailText"
-        Me.lblCustomerUploadEmailText.Size = New System.Drawing.Size(63, 13)
-        Me.lblCustomerUploadEmailText.TabIndex = 114
-        Me.lblCustomerUploadEmailText.Text = "E-Mail Text:"
-        '
-        'pnlCustomerUploadSeparator
-        '
-        Me.pnlCustomerUploadSeparator.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.pnlCustomerUploadSeparator.Location = New System.Drawing.Point(-8, 779)
-        Me.pnlCustomerUploadSeparator.Name = "pnlCustomerUploadSeparator"
-        Me.pnlCustomerUploadSeparator.Size = New System.Drawing.Size(474, 1)
-        Me.pnlCustomerUploadSeparator.TabIndex = 115
-        '
         'lblZustzlFreitext
         '
         Me.lblZustzlFreitext.AutoSize = True
-        Me.lblZustzlFreitext.Location = New System.Drawing.Point(2, 785)
+        Me.lblZustzlFreitext.Location = New System.Drawing.Point(9, 496)
         Me.lblZustzlFreitext.Name = "lblZustzlFreitext"
         Me.lblZustzlFreitext.Size = New System.Drawing.Size(142, 13)
         Me.lblZustzlFreitext.TabIndex = 31
@@ -483,7 +511,7 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.txtSendungSpedition.BackColor = System.Drawing.Color.WhiteSmoke
         Me.txtSendungSpedition.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtSendungSpedition.Location = New System.Drawing.Point(144, 484)
+        Me.txtSendungSpedition.Location = New System.Drawing.Point(144, 332)
         Me.txtSendungSpedition.MaxLength = 50
         Me.txtSendungSpedition.Name = "txtSendungSpedition"
         Me.txtSendungSpedition.Size = New System.Drawing.Size(25, 20)
@@ -494,7 +522,7 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.cbxNichtLeserlich.AutoSize = True
         Me.cbxNichtLeserlich.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.cbxNichtLeserlich.Location = New System.Drawing.Point(310, 216)
+        Me.cbxNichtLeserlich.Location = New System.Drawing.Point(308, 98)
         Me.cbxNichtLeserlich.Name = "cbxNichtLeserlich"
         Me.cbxNichtLeserlich.Size = New System.Drawing.Size(90, 17)
         Me.cbxNichtLeserlich.TabIndex = 8
@@ -504,7 +532,7 @@ Partial Class frmAddSendungsvermerkShort
         'btnOK
         '
         Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnOK.Location = New System.Drawing.Point(313, 801)
+        Me.btnOK.Location = New System.Drawing.Point(320, 512)
         Me.btnOK.Name = "btnOK"
         Me.btnOK.Size = New System.Drawing.Size(124, 54)
         Me.btnOK.TabIndex = 34
@@ -515,7 +543,7 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.cbxSonstDok.AutoSize = True
         Me.cbxSonstDok.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.cbxSonstDok.Location = New System.Drawing.Point(14, 216)
+        Me.cbxSonstDok.Location = New System.Drawing.Point(12, 98)
         Me.cbxSonstDok.Name = "cbxSonstDok"
         Me.cbxSonstDok.Size = New System.Drawing.Size(83, 17)
         Me.cbxSonstDok.TabIndex = 9
@@ -527,18 +555,40 @@ Partial Class frmAddSendungsvermerkShort
         Me.Label9.AutoSize = True
         Me.Label9.BackColor = System.Drawing.Color.WhiteSmoke
         Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
-        Me.Label9.Location = New System.Drawing.Point(354, 537)
+        Me.Label9.Location = New System.Drawing.Point(354, 385)
         Me.Label9.Name = "Label9"
         Me.Label9.Size = New System.Drawing.Size(90, 13)
         Me.Label9.TabIndex = 30
         Me.Label9.Text = "(max. 80 Zeichen)"
         '
+        'cbxVollmacht
+        '
+        Me.cbxVollmacht.AutoSize = True
+        Me.cbxVollmacht.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cbxVollmacht.Location = New System.Drawing.Point(164, 75)
+        Me.cbxVollmacht.Name = "cbxVollmacht"
+        Me.cbxVollmacht.Size = New System.Drawing.Size(72, 17)
+        Me.cbxVollmacht.TabIndex = 7
+        Me.cbxVollmacht.Text = "Vollmacht"
+        Me.cbxVollmacht.UseVisualStyleBackColor = False
+        '
+        'cbxCMR
+        '
+        Me.cbxCMR.AutoSize = True
+        Me.cbxCMR.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cbxCMR.Location = New System.Drawing.Point(164, 32)
+        Me.cbxCMR.Name = "cbxCMR"
+        Me.cbxCMR.Size = New System.Drawing.Size(50, 17)
+        Me.cbxCMR.TabIndex = 3
+        Me.cbxCMR.Text = "CMR"
+        Me.cbxCMR.UseVisualStyleBackColor = False
+        '
         'Label17
         '
         Me.Label17.AutoSize = True
         Me.Label17.BackColor = System.Drawing.Color.WhiteSmoke
         Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Italic)
-        Me.Label17.Location = New System.Drawing.Point(144, 537)
+        Me.Label17.Location = New System.Drawing.Point(144, 385)
         Me.Label17.Name = "Label17"
         Me.Label17.Size = New System.Drawing.Size(182, 13)
         Me.Label17.TabIndex = 29
@@ -549,38 +599,82 @@ Partial Class frmAddSendungsvermerkShort
         Me.Label13.AutoSize = True
         Me.Label13.BackColor = System.Drawing.Color.WhiteSmoke
         Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label13.Location = New System.Drawing.Point(9, 459)
+        Me.Label13.Location = New System.Drawing.Point(9, 307)
         Me.Label13.Name = "Label13"
         Me.Label13.Size = New System.Drawing.Size(84, 17)
         Me.Label13.TabIndex = 16
         Me.Label13.Text = "Sonstiges:"
         '
+        'cbxATR
+        '
+        Me.cbxATR.AutoSize = True
+        Me.cbxATR.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cbxATR.Location = New System.Drawing.Point(164, 52)
+        Me.cbxATR.Name = "cbxATR"
+        Me.cbxATR.Size = New System.Drawing.Size(127, 17)
+        Me.cbxATR.TabIndex = 5
+        Me.cbxATR.Text = "A.TR (Original/Kopie)"
+        Me.cbxATR.UseVisualStyleBackColor = False
+        '
+        'cbxLS
+        '
+        Me.cbxLS.AutoSize = True
+        Me.cbxLS.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cbxLS.Location = New System.Drawing.Point(12, 75)
+        Me.cbxLS.Name = "cbxLS"
+        Me.cbxLS.Size = New System.Drawing.Size(83, 17)
+        Me.cbxLS.TabIndex = 6
+        Me.cbxLS.Text = "Lieferschein"
+        Me.cbxLS.UseVisualStyleBackColor = False
+        '
         'txtFreierText
         '
         Me.txtFreierText.BackColor = System.Drawing.Color.WhiteSmoke
         Me.txtFreierText.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
-        Me.txtFreierText.Location = New System.Drawing.Point(122, 511)
+        Me.txtFreierText.Location = New System.Drawing.Point(122, 359)
         Me.txtFreierText.MaxLength = 80
         Me.txtFreierText.Name = "txtFreierText"
         Me.txtFreierText.Size = New System.Drawing.Size(322, 23)
         Me.txtFreierText.TabIndex = 28
         '
+        'cbxRechnung
+        '
+        Me.cbxRechnung.AutoSize = True
+        Me.cbxRechnung.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cbxRechnung.Location = New System.Drawing.Point(12, 53)
+        Me.cbxRechnung.Name = "cbxRechnung"
+        Me.cbxRechnung.Size = New System.Drawing.Size(137, 17)
+        Me.cbxRechnung.TabIndex = 4
+        Me.cbxRechnung.Text = "Rechnung (mangelhaft)"
+        Me.cbxRechnung.UseVisualStyleBackColor = False
+        '
         'Label20
         '
         Me.Label20.AutoSize = True
         Me.Label20.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.Label20.Location = New System.Drawing.Point(267, 487)
+        Me.Label20.Location = New System.Drawing.Point(267, 335)
         Me.Label20.Name = "Label20"
         Me.Label20.Size = New System.Drawing.Size(0, 13)
         Me.Label20.TabIndex = 21
         '
+        'cbxAuftrag
+        '
+        Me.cbxAuftrag.AutoSize = True
+        Me.cbxAuftrag.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cbxAuftrag.Location = New System.Drawing.Point(12, 32)
+        Me.cbxAuftrag.Name = "cbxAuftrag"
+        Me.cbxAuftrag.Size = New System.Drawing.Size(60, 17)
+        Me.cbxAuftrag.TabIndex = 2
+        Me.cbxAuftrag.Text = "Auftrag"
+        Me.cbxAuftrag.UseVisualStyleBackColor = False
+        '
         'PictureBox1
         '
         Me.PictureBox1.BackColor = System.Drawing.Color.WhiteSmoke
         Me.PictureBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.PictureBox1.Location = New System.Drawing.Point(-1, -1)
         Me.PictureBox1.Name = "PictureBox1"
-        Me.PictureBox1.Size = New System.Drawing.Size(474, 250)
+        Me.PictureBox1.Size = New System.Drawing.Size(453, 130)
         Me.PictureBox1.TabIndex = 83
         Me.PictureBox1.TabStop = False
         '
@@ -588,9 +682,9 @@ Partial Class frmAddSendungsvermerkShort
         '
         Me.PictureBox4.BackColor = System.Drawing.Color.WhiteSmoke
         Me.PictureBox4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.PictureBox4.Location = New System.Drawing.Point(-1, 450)
+        Me.PictureBox4.Location = New System.Drawing.Point(-1, 297)
         Me.PictureBox4.Name = "PictureBox4"
-        Me.PictureBox4.Size = New System.Drawing.Size(481, 189)
+        Me.PictureBox4.Size = New System.Drawing.Size(453, 189)
         Me.PictureBox4.TabIndex = 78
         Me.PictureBox4.TabStop = False
         '
@@ -601,14 +695,14 @@ Partial Class frmAddSendungsvermerkShort
         Me.Panel4.Dock = System.Windows.Forms.DockStyle.Top
         Me.Panel4.Location = New System.Drawing.Point(0, 0)
         Me.Panel4.Name = "Panel4"
-        Me.Panel4.Size = New System.Drawing.Size(474, 0)
+        Me.Panel4.Size = New System.Drawing.Size(454, 0)
         Me.Panel4.TabIndex = 1
         '
         'frmAddSendungsvermerkShort
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ClientSize = New System.Drawing.Size(474, 868)
+        Me.ClientSize = New System.Drawing.Size(454, 605)
         Me.Controls.Add(Me.pnlMain)
         Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
         Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
@@ -620,7 +714,6 @@ Partial Class frmAddSendungsvermerkShort
         Me.pnlMain.ResumeLayout(False)
         Me.pnlSendungsVermker.ResumeLayout(False)
         Me.pnlSendungsVermker.PerformLayout()
-        CType(Me.nudCustomerUploadValidityHours, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
@@ -634,6 +727,8 @@ Partial Class frmAddSendungsvermerkShort
     Friend WithEvents optSpeditionWeitergeleitet As System.Windows.Forms.CheckBox
     Friend WithEvents optFreierText As System.Windows.Forms.CheckBox
     Friend WithEvents optATAangefordert As System.Windows.Forms.CheckBox
+    Friend WithEvents optVorkasseAngefordert As System.Windows.Forms.CheckBox
+    Friend WithEvents optKontaktdatenAngefordert As System.Windows.Forms.CheckBox
     Friend WithEvents Label3 As System.Windows.Forms.Label
     Friend WithEvents lblErr240Zeichen As System.Windows.Forms.Label
     Friend WithEvents lblZustzlFreitext As System.Windows.Forms.Label
@@ -642,13 +737,19 @@ Partial Class frmAddSendungsvermerkShort
     Friend WithEvents btnOK As System.Windows.Forms.Button
     Friend WithEvents cbxSonstDok As System.Windows.Forms.CheckBox
     Friend WithEvents Label9 As System.Windows.Forms.Label
+    Friend WithEvents cbxVollmacht As System.Windows.Forms.CheckBox
     Friend WithEvents lblErrSpedition As System.Windows.Forms.Label
+    Friend WithEvents cbxCMR As System.Windows.Forms.CheckBox
     Friend WithEvents lblErrGrund As System.Windows.Forms.Label
     Friend WithEvents Label17 As System.Windows.Forms.Label
     Friend WithEvents Label13 As System.Windows.Forms.Label
+    Friend WithEvents cbxATR As System.Windows.Forms.CheckBox
+    Friend WithEvents cbxLS As System.Windows.Forms.CheckBox
     Friend WithEvents txtFreierText As System.Windows.Forms.TextBox
     Friend WithEvents txtSpedition As System.Windows.Forms.TextBox
+    Friend WithEvents cbxRechnung As System.Windows.Forms.CheckBox
     Friend WithEvents Label20 As System.Windows.Forms.Label
+    Friend WithEvents cbxAuftrag As System.Windows.Forms.CheckBox
     Friend WithEvents PictureBox4 As System.Windows.Forms.PictureBox
     Friend WithEvents Label1 As System.Windows.Forms.Label
     Friend WithEvents optSendungInVorbereitung As System.Windows.Forms.CheckBox
@@ -656,20 +757,19 @@ Partial Class frmAddSendungsvermerkShort
     Friend WithEvents lblErrDokument As System.Windows.Forms.Label
     Friend WithEvents btnCLose As System.Windows.Forms.Button
     Friend WithEvents Label2 As System.Windows.Forms.Label
+    Friend WithEvents optUeberwachungsdok As System.Windows.Forms.CheckBox
+    Friend WithEvents cbxRgBest As CheckBox
     Friend WithEvents Label4 As Label
     Friend WithEvents optFremd_ATB As CheckBox
     Friend WithEvents optFremd_SendungAvisiert As CheckBox
+    Friend WithEvents optFahrerKeinATR As CheckBox
+    Friend WithEvents optFrachtkostenAngefordert As CheckBox
+    Friend WithEvents optKundeNichtErreichbar As CheckBox
+    Friend WithEvents optAbsenderbestätigung As CheckBox
+    Friend WithEvents cbxPackliste As CheckBox
+    Friend WithEvents optGewPackAngefordert As CheckBox
+    Friend WithEvents optKostenbestaetigungAngefordert As CheckBox
+    Friend WithEvents optZolltarifnummerAngefordert As CheckBox
+    Friend WithEvents optDraft As CheckBox
     Public WithEvents txtDetail As TextBox
-    Friend WithEvents btnCustomerUploadLink As Button
-    Friend WithEvents btnCustomerUploadEmail As Button
-    Friend WithEvents txtCustomerUploadEmail As TextBox
-    Friend WithEvents lblCustomerUploadEmail As Label
-    Friend WithEvents lblCustomerUploadValidityHours As Label
-    Friend WithEvents nudCustomerUploadValidityHours As NumericUpDown
-    Friend WithEvents cmbCustomerUploadLanguage As ComboBox
-    Friend WithEvents lblCustomerUploadLanguage As Label
-    Friend WithEvents txtCustomerUploadEmailText As TextBox
-    Friend WithEvents lblCustomerUploadEmailText As Label
-    Friend WithEvents pnlCustomerUploadSeparator As Panel
-    Friend WithEvents Label5 As Label
 End Class

Aviso/frmHauptfensterNew.resx

@@ -124,32 +124,6 @@
     <value>249, 17</value>
   </metadata>
   <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="btnFakturierung.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAG9JREFUSEvt
-        lTEOgDAMA52PV3wM9WmgMGSIAkNpaolg6ZamzQ0eCgAQkWMF6rriB1nwhQA6gG2A7pdHREJ9PJLml0fY
-        7TrCbAoKX3T4FOvXTmjCbAoKl3fIEOpv0Saz3wqz4QsZHX5cmM0vnA5FeAJTug01ZzKXygAAAABJRU5E
-        rkJggg==
-</value>
-  </data>
-  <data name="btnRg.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAG9JREFUSEvt
-        lTEOgDAMA52PV3wM9WmgMGSIAkNpaolg6ZamzQ0eCgAQkWMF6rriB1nwhQA6gG2A7pdHREJ9PJLml0fY
-        7TrCbAoKX3T4FOvXTmjCbAoKl3fIEOpv0Saz3wqz4QsZHX5cmM0vnA5FeAJTug01ZzKXygAAAABJRU5E
-        rkJggg==
-</value>
-  </data>
-  <data name="btnKunden.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAAAP1JREFUSEvt
-        k0sKwkAQRLsRL+BOj+XevQtdeAY9ozv1FgYEP0wYZXjpnoxJBBd5UGCqq6slEJGRkX9BVZ+WmBsMHvLE
-        vV6wvE3c7wyL28T9EmYsGUqhm8feLI3wjl6pRGRteCseNV+n55fI2+VdN0SvVN4u73qhLb1SiciGXvSb
-        h+kFVPXkzSzigTP9gNmjqg9zkLwN+iSXi7M7/RpVvRmvpv4MkucD90Rkj6NT9qjqFTvlGGX8k9/DEiqX
-        zc2oNJsNJ7FJ8tvjk2FPo5Nmoip2zI1Z0DGKfihexO6KsyTjw/C3Yl8R4VtkUQdd2NuKUdJJ7M3C5b5i
-        /8jIT3kBe5JJfQp6Jq0AAAAASUVORK5CYII=
-</value>
-  </data>
   <data name="btnZollwebseiten.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAgBJREFUSEvt
@@ -230,6 +204,32 @@
   <metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>560, 17</value>
   </metadata>
+  <data name="btnKunden.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAAAP1JREFUSEvt
+        k0sKwkAQRLsRL+BOj+XevQtdeAY9ozv1FgYEP0wYZXjpnoxJBBd5UGCqq6slEJGRkX9BVZ+WmBsMHvLE
+        vV6wvE3c7wyL28T9EmYsGUqhm8feLI3wjl6pRGRteCseNV+n55fI2+VdN0SvVN4u73qhLb1SiciGXvSb
+        h+kFVPXkzSzigTP9gNmjqg9zkLwN+iSXi7M7/RpVvRmvpv4MkucD90Rkj6NT9qjqFTvlGGX8k9/DEiqX
+        zc2oNJsNJ7FJ8tvjk2FPo5Nmoip2zI1Z0DGKfihexO6KsyTjw/C3Yl8R4VtkUQdd2NuKUdJJ7M3C5b5i
+        /8jIT3kBe5JJfQp6Jq0AAAAASUVORK5CYII=
+</value>
+  </data>
+  <data name="btnFakturierung.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAG9JREFUSEvt
+        lTEOgDAMA52PV3wM9WmgMGSIAkNpaolg6ZamzQ0eCgAQkWMF6rriB1nwhQA6gG2A7pdHREJ9PJLml0fY
+        7TrCbAoKX3T4FOvXTmjCbAoKl3fIEOpv0Saz3wqz4QsZHX5cmM0vnA5FeAJTug01ZzKXygAAAABJRU5E
+        rkJggg==
+</value>
+  </data>
+  <data name="btnRg.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAG9JREFUSEvt
+        lTEOgDAMA52PV3wM9WmgMGSIAkNpaolg6ZamzQ0eCgAQkWMF6rriB1nwhQA6gG2A7pdHREJ9PJLml0fY
+        7TrCbAoKX3T4FOvXTmjCbAoKl3fIEOpv0Saz3wqz4QsZHX5cmM0vnA5FeAJTug01ZzKXygAAAABJRU5E
+        rkJggg==
+</value>
+  </data>
   <data name="btnTV.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
@@ -246,9 +246,6 @@
         AAAAAElFTkSuQmCC
 </value>
   </data>
-  <metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>560, 17</value>
-  </metadata>
   <metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>659, 17</value>
   </metadata>

Aviso/frmHauptfensterNew.vb

@@ -65,6 +65,7 @@ Public Class frmHauptfensterNew
 
 
     Dim SEARCH_AVISO As usrCntlHauptfenster_Suche_AVISO = Nothing
+    Dim SEARCH_SND As usrCntlHauptfenster_Suche_SND = Nothing
     Dim SEARCH_AVISO_AKTIV As String = "AVISO"
 
     Public Sub New()
@@ -101,36 +102,95 @@ Public Class frmHauptfensterNew
     End Sub
     Sub SWITCH_SEARCH(switchTO)
         pnlMain.Controls.Clear()
+        pnlMain_Bottom.Controls.Clear()
         SEARCH_AVISO_AKTIV = switchTO
 
+
+        ' toggle_Buttons_Main(sender)
+        For Each button In FlowLayoutPanel1.Controls
+            With button
+                .BackColor = btnDEFAULT_UnSelected.BackColor
+                .ForeColor = btnDEFAULT_UnSelected.ForeColor
+                .Font = btnDEFAULT_UnSelected.Font
+            End With
+        Next
+
+        Dim SelectedBtn As Button = Nothing
         Select Case SEARCH_AVISO_AKTIV
             Case "SND"
-                Dim aaaaa As New usrCntlSND_Ausfuhr
+                splitMainWorkingView.Panel2Collapsed = True
-                pnlMain.Controls.Add(aaaaa)
+                SelectedBtn = btnVIEW_SND
-                initsearch("", False) ': Aviso_anzeigen("")
+                If SEARCH_SND Is Nothing Then SEARCH_SND = New usrCntlHauptfenster_Suche_SND
-
+                SEARCH_SND.PARENT_FRMHAUPTFENSTER = Me
+                pnlMain.Controls.Add(SEARCH_SND)
+                SEARCH_SND.Dock = DockStyle.Fill
+                pnlMain.PerformLayout()
+                SEARCH_SND.PerformLayout()
+                Application.DoEvents()
             Case "AVISO"
+                splitMainWorkingView.Panel2Collapsed = True
+                SelectedBtn = btnVIEW_LKW
                 If SEARCH_AVISO Is Nothing Then SEARCH_AVISO = New usrCntlHauptfenster_Suche_AVISO
-
-                pnlMain.Controls.Add(SEARCH_AVISO)
-
-                'SEARCH_AVISO.Dock = DockStyle.Fill
                 SEARCH_AVISO.PARENT_FRMHAUPTFENSTER = Me
-                SEARCH_AVISO.Visible = True
+                pnlMain.Controls.Add(SEARCH_AVISO)
-                SEARCH_AVISO.BringToFront()
+                SEARCH_AVISO.Dock = DockStyle.Fill
-                SEARCH_AVISO.Width = pnlMain.Width
-                SEARCH_AVISO.Height = pnlMain.Height
-
                 pnlMain.PerformLayout()
                 SEARCH_AVISO.PerformLayout()
                 Application.DoEvents()
 
+            Case "AVISO_SND_KOMBI"
+                splitMainWorkingView.Panel2Collapsed = False
+                SelectedBtn = btnVIEW_KOMBI
+                If SEARCH_AVISO Is Nothing Then SEARCH_AVISO = New usrCntlHauptfenster_Suche_AVISO
+                SEARCH_AVISO.PARENT_FRMHAUPTFENSTER = Me
+                pnlMain.Controls.Add(SEARCH_AVISO)
+                SEARCH_AVISO.Dock = DockStyle.Fill
+                pnlMain.PerformLayout()
+                SEARCH_AVISO.PerformLayout()
+                Application.DoEvents()
+                '--------------------------------------------------------------
+                If SEARCH_SND Is Nothing Then SEARCH_SND = New usrCntlHauptfenster_Suche_SND
+                SEARCH_SND.PARENT_FRMHAUPTFENSTER = Me
+                pnlMain_Bottom.Controls.Add(SEARCH_SND)
+                SEARCH_SND.Dock = DockStyle.Fill
+                pnlMain_Bottom.PerformLayout()
+                SEARCH_SND.PerformLayout()
+                Application.DoEvents()
 
+            Case "COMPLIANCE"
+                splitMainWorkingView.Panel2Collapsed = True
+                SelectedBtn = btnVIEW_Compliance
+                'If SEARCH_AVISO Is Nothing Then SEARCH_AVISO = New usrCntlHauptfenster_Suche_AVISO
+                'SEARCH_AVISO.PARENT_FRMHAUPTFENSTER = Me
+                'pnlMain.Controls.Add(SEARCH_AVISO)
+                'SEARCH_AVISO.Dock = DockStyle.Fill
+                pnlMain.PerformLayout()
+                SEARCH_AVISO.PerformLayout()
+                Application.DoEvents()
+
+            Case "CUSTOMS_CONTROLLING"
+                splitMainWorkingView.Panel2Collapsed = True
+                SelectedBtn = btnVIEW_CustControling
+                'If SEARCH_AVISO Is Nothing Then SEARCH_AVISO = New usrCntlHauptfenster_Suche_AVISO
+                'SEARCH_AVISO.PARENT_FRMHAUPTFENSTER = Me
+                'pnlMain.Controls.Add(SEARCH_AVISO)
+                'SEARCH_AVISO.Dock = DockStyle.Fill
+                pnlMain.PerformLayout()
+                SEARCH_AVISO.PerformLayout()
+                Application.DoEvents()
 
-                'MsgBox(pnlMain.Width & " / " & pnlMain.Height)
-                'MsgBox(SEARCH_AVISO.Width & " / " & SEARCH_AVISO.Height)
         End Select
+
         initsearch(SEARCH_AVISO_AKTIV, False) ': Aviso_anzeigen("")
+
+
+        With SelectedBtn
+            .BackColor = btnDEFAULT_Selected.BackColor
+            .ForeColor = btnDEFAULT_Selected.ForeColor
+            .Font = btnDEFAULT_Selected.Font
+        End With
+
+
     End Sub
 
     Sub initsearch(hSort As String, Optional showDetails As Boolean = True)
@@ -142,6 +202,20 @@ Public Class frmHauptfensterNew
         End If
     End Sub
 
+    Private Sub btnRefresh_Click(sender As System.Object, e As System.EventArgs) Handles btnRefresh.Click
+
+        Select Case SEARCH_AVISO_AKTIV
+            Case "SND"
+                If SEARCH_SND IsNot Nothing Then SEARCH_SND.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_SendungsID, True)
+            Case "AVISO"
+                If SEARCH_AVISO IsNot Nothing Then SEARCH_AVISO.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID, True)
+            Case "AVISO_SND_KOMBI"
+                If SEARCH_AVISO IsNot Nothing Then SEARCH_AVISO.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID, True)
+                If SEARCH_SND IsNot Nothing Then SEARCH_SND.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_SendungsID, True)
+        End Select
+        UsrCntlBenachrichtigungen2.initDgvAvisoBenachrichtigungen(Grid_aktiv, gridFont)
+    End Sub
+
     Private Sub frmMain_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
 
         If e.KeyCode = Keys.F2 Or e.KeyCode = Keys.F5 Then
@@ -510,7 +584,7 @@ Public Class frmHauptfensterNew
         'Grid jetzt aktivieren und befüllen - Standardanzeige ident mit Button Wichtig
         Grid_aktiv = True
         SucheStandort = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG.Trim
-        If SucheStandort <> "" Then btnWichtigeStandort.Text = "Wichtig " & SucheStandort.Trim.ToUpper
+        ' If SucheStandort <> "" Then btnWichtigeStandort.Text = "Wichtig " & SucheStandort.Trim.ToUpper
         initsearch(" ORDER BY Ankunft")
 
         UsrCntlBenachrichtigungen2.initDgvAvisoBenachrichtigungen(Grid_aktiv, gridFont)
@@ -1445,15 +1519,8 @@ ELSE_ATILLA:
         End If
     End Sub
 
-    Private Sub btnRefresh_Click(sender As System.Object, e As System.EventArgs) Handles btnRefresh.Click
-        If SEARCH_AVISO IsNot nohing Then
 
 
-            SEARCH_AVISO.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID, True)
-            UsrCntlBenachrichtigungen2.initDgvAvisoBenachrichtigungen(Grid_aktiv, gridFont)
-        End If
-    End Sub
-
 
     'Private Sub btnErfasst_MouseHover(sender As Object, e As EventArgs) Handles btnZollwebseiten.MouseEnter, btnUmrechnungskurse.MouseEnter, Button6.MouseEnter, Button5.MouseEnter, btnSpedBuch.MouseEnter, btnRg.MouseEnter, btnRefresh.MouseEnter, btnKunden.MouseEnter, btnKassenbuch.MouseEnter, btnDrucken.MouseEnter
     '    Try
@@ -1740,7 +1807,7 @@ ELSE_ATILLA:
             'btnGenerelleGestellungen.Visible = False
             Button6.Visible = False
 
-            btnWichtigeStandort.Visible = False
+            'btnWichtigeStandort.Visible = False
             Panel2.Visible = False
 
         ElseIf VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERIMEX" Then
@@ -3059,7 +3126,9 @@ ELSE_ATILLA:
                                 End If
                             End If
                         Next
+                        If cbxInfoChat.Checked Then '# 'Anzeicge Infobox Neuer Chat Ein/Aus
                             If Not isshown And Not isInFront Then newNotify(frmNotify.cNotify_ART.NEUER_CHAT, 0, "Neue Chat-Nachricht!", -1)
+                        End If
                     Else
                         Me.Icon = My.Resources.Aviso
                     End If
@@ -3823,7 +3892,7 @@ ELSE_ATILLA:
         detailForm.Show()
     End Sub
 
-    Private Sub btnWichtigeStandort_Click(sender As Object, e As EventArgs) Handles btnWichtigeStandort.Click
+    Private Sub btnWichtigeStandort_Click(sender As Object, e As EventArgs) Handles btnVIEW_LKW.Click
         Grid_aktiv = False
         SWITCH_SEARCH("AVISO")
 
@@ -3831,7 +3900,7 @@ ELSE_ATILLA:
         Grid_aktiv = True
     End Sub
 
-    Private Sub Button4_Click_1(sender As Object, e As EventArgs) Handles Button4.Click
+    Private Sub Button4_Click_1(sender As Object, e As EventArgs) Handles btnVIEW_SND.Click
         Grid_aktiv = False
         SWITCH_SEARCH("SND")
 
@@ -3858,4 +3927,24 @@ ELSE_ATILLA:
         End Try
     End Sub
 
+    Private Sub Button7_Click_2(sender As Object, e As EventArgs) Handles btnVIEW_KOMBI.Click
+        Grid_aktiv = False
+        SWITCH_SEARCH("AVISO_SND_KOMBI")
+        SEARCH_AVISO.RESET()
+        Grid_aktiv = True
+    End Sub
+
+    Private Sub Button9_Click_1(sender As Object, e As EventArgs) Handles btnVIEW_Compliance.Click
+        Grid_aktiv = False
+        SWITCH_SEARCH("COMPLIANCE")
+        SEARCH_AVISO.RESET()
+        Grid_aktiv = True
+    End Sub
+
+    Private Sub Button10_Click(sender As Object, e As EventArgs) Handles btnVIEW_CustControling.Click
+        Grid_aktiv = False
+        SWITCH_SEARCH("CUSTOMS_CONTROLLING")
+        SEARCH_AVISO.RESET()
+        Grid_aktiv = True
+    End Sub
 End Class

Aviso/frmNotify.Designer.vb

@@ -47,7 +47,7 @@ Partial Class frmNotify
         Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
         Me.pnl.Location = New System.Drawing.Point(0, 0)
         Me.pnl.Name = "pnl"
-        Me.pnl.Size = New System.Drawing.Size(300, 70)
+        Me.pnl.Size = New System.Drawing.Size(227, 70)
         Me.pnl.TabIndex = 1
         '
         'lblText
@@ -57,7 +57,7 @@ Partial Class frmNotify
         Me.lblText.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.lblText.Location = New System.Drawing.Point(0, 25)
         Me.lblText.Name = "lblText"
-        Me.lblText.Size = New System.Drawing.Size(298, 43)
+        Me.lblText.Size = New System.Drawing.Size(225, 43)
         Me.lblText.TabIndex = 0
         Me.lblText.Text = "Der LKW SD 13 AS steht bereits seit über 2 Stunden! "
         Me.lblText.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@@ -65,12 +65,12 @@ Partial Class frmNotify
         'Header
         '
         Me.Header.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.Header.Controls.Add(Me.lblTitle)
         Me.Header.Controls.Add(Me.btnClose)
+        Me.Header.Controls.Add(Me.lblTitle)
         Me.Header.Dock = System.Windows.Forms.DockStyle.Top
         Me.Header.Location = New System.Drawing.Point(0, 0)
         Me.Header.Name = "Header"
-        Me.Header.Size = New System.Drawing.Size(298, 25)
+        Me.Header.Size = New System.Drawing.Size(225, 25)
         Me.Header.TabIndex = 87
         '
         'lblTitle
@@ -79,7 +79,7 @@ Partial Class frmNotify
         Me.lblTitle.ForeColor = System.Drawing.Color.White
         Me.lblTitle.Location = New System.Drawing.Point(3, 0)
         Me.lblTitle.Name = "lblTitle"
-        Me.lblTitle.Size = New System.Drawing.Size(241, 24)
+        Me.lblTitle.Size = New System.Drawing.Size(194, 24)
         Me.lblTitle.TabIndex = 88
         Me.lblTitle.Text = "LKW Standzeit Benachrichtigung"
         Me.lblTitle.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@@ -93,7 +93,7 @@ Partial Class frmNotify
         Me.btnClose.FlatStyle = System.Windows.Forms.FlatStyle.Flat
         Me.btnClose.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.btnClose.ForeColor = System.Drawing.Color.White
-        Me.btnClose.Location = New System.Drawing.Point(264, -1)
+        Me.btnClose.Location = New System.Drawing.Point(191, -1)
         Me.btnClose.Name = "btnClose"
         Me.btnClose.RightToLeft = System.Windows.Forms.RightToLeft.Yes
         Me.btnClose.Size = New System.Drawing.Size(35, 25)
@@ -106,7 +106,7 @@ Partial Class frmNotify
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.AutoSize = True
-        Me.ClientSize = New System.Drawing.Size(300, 70)
+        Me.ClientSize = New System.Drawing.Size(227, 70)
         Me.Controls.Add(Me.pnl)
         Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
         Me.MaximumSize = New System.Drawing.Size(300, 300)

Aviso/usrCntlHauptfenster_Suche_AVISO.Designer.vb

@@ -1,9 +1,9 @@
-<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
 Partial Class usrCntlHauptfenster_Suche_AVISO
     Inherits System.Windows.Forms.UserControl
 
     'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-    <System.Diagnostics.DebuggerNonUserCode()> _
+    <System.Diagnostics.DebuggerNonUserCode()>
     Protected Overrides Sub Dispose(ByVal disposing As Boolean)
         Try
             If disposing AndAlso components IsNot Nothing Then
@@ -20,7 +20,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
     'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
     'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
     'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-    <System.Diagnostics.DebuggerStepThrough()> _
+    <System.Diagnostics.DebuggerStepThrough()>
     Private Sub InitializeComponent()
         Me.components = New System.ComponentModel.Container()
         Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrCntlHauptfenster_Suche_AVISO))
@@ -31,7 +31,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
         Me.Panel1 = New System.Windows.Forms.Panel()
         Me.btnDetailsuche = New System.Windows.Forms.Button()
-        Me.lblDauer = New System.Windows.Forms.Label()
         Me.pnlSearch = New System.Windows.Forms.Panel()
         Me.lblAbsender = New System.Windows.Forms.Label()
         Me.txtAbsender = New System.Windows.Forms.TextBox()
@@ -57,31 +56,21 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.lblErwFilialePos = New System.Windows.Forms.Label()
         Me.lblErwAuftraggeber = New System.Windows.Forms.Label()
         Me.cbxAlle = New System.Windows.Forms.CheckBox()
-        Me.lblEintraege = New System.Windows.Forms.Label()
         Me.Label22 = New System.Windows.Forms.Label()
         Me.Label10 = New System.Windows.Forms.Label()
         Me.btnE_Aviso = New System.Windows.Forms.Button()
-        Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
         Me.btnNeu = New System.Windows.Forms.Button()
         Me.txtBestimmungszollstelle = New VERAG_PROG_ALLGEMEIN.MySearchBox()
         Me.Label21 = New System.Windows.Forms.Label()
-        Me.btnHeute = New System.Windows.Forms.Button()
         Me.cboImEx = New VERAG_PROG_ALLGEMEIN.MyComboBox()
         Me.cboTeams = New VERAG_PROG_ALLGEMEIN.MyComboBox()
         Me.Label16 = New System.Windows.Forms.Label()
-        Me.btnGestern = New System.Windows.Forms.Button()
         Me.Label8 = New System.Windows.Forms.Label()
         Me.cbxCluster = New System.Windows.Forms.CheckBox()
         Me.cboGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
-        Me.btnWoche = New System.Windows.Forms.Button()
         Me.lblGrenze = New System.Windows.Forms.Label()
-        Me.Label5 = New System.Windows.Forms.Label()
-        Me.dtpBis = New System.Windows.Forms.DateTimePicker()
         Me.Label6 = New System.Windows.Forms.Label()
-        Me.dtpVon = New System.Windows.Forms.DateTimePicker()
         Me.txtSuche = New System.Windows.Forms.TextBox()
-        Me.Label2 = New System.Windows.Forms.Label()
-        Me.lblZeit_aktuell = New System.Windows.Forms.Label()
         Me.btnWichtige = New System.Windows.Forms.Button()
         Me.btnWichtigeStandort = New System.Windows.Forms.Button()
         Me.lblSuche = New System.Windows.Forms.Label()
@@ -97,23 +86,18 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.tabNichtEingetroffen = New System.Windows.Forms.TabPage()
         Me.pnlTime = New System.Windows.Forms.Panel()
         Me.lblHinweis = New System.Windows.Forms.Label()
+        Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.dtpVon = New System.Windows.Forms.DateTimePicker()
+        Me.dtpBis = New System.Windows.Forms.DateTimePicker()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.btnWoche = New System.Windows.Forms.Button()
+        Me.btnGestern = New System.Windows.Forms.Button()
+        Me.btnHeute = New System.Windows.Forms.Button()
         Me.lblAkte = New System.Windows.Forms.Label()
-        Me.pblSNDOptions = New System.Windows.Forms.Panel()
+        Me.lblZeit_aktuell = New System.Windows.Forms.Label()
-        Me.cbx_My_Brexit = New System.Windows.Forms.CheckBox()
+        Me.lblDauer = New System.Windows.Forms.Label()
-        Me.btnColor = New System.Windows.Forms.Button()
+        Me.lblEintraege = New System.Windows.Forms.Label()
-        Me.lblMySND_Anzeige = New System.Windows.Forms.Label()
-        Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox()
-        Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
-        Me.cboMy_QS = New System.Windows.Forms.CheckBox()
-        Me.cbx_My_LKW = New System.Windows.Forms.CheckBox()
-        Me.cboMy_VB = New System.Windows.Forms.CheckBox()
-        Me.lblMySnd_Grenzstelle = New System.Windows.Forms.Label()
-        Me.tbcntrAvisoSND = New System.Windows.Forms.TabControl()
-        Me.tbSndAlle = New System.Windows.Forms.TabPage()
-        Me.tbSndOffen = New System.Windows.Forms.TabPage()
-        Me.tbSndFreigegeben = New System.Windows.Forms.TabPage()
-        Me.CheckBox1 = New System.Windows.Forms.CheckBox()
-        Me.Button7 = New System.Windows.Forms.Button()
         Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
         Me.TimerAkte = New System.Windows.Forms.Timer(Me.components)
         Me.ctxtFarben = New System.Windows.Forms.ContextMenuStrip(Me.components)
@@ -125,8 +109,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.pnlSearch.SuspendLayout()
         Me.tbcntrAvisoLKW.SuspendLayout()
         Me.pnlTime.SuspendLayout()
-        Me.pblSNDOptions.SuspendLayout()
-        Me.tbcntrAvisoSND.SuspendLayout()
         CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.ctxtFarben.SuspendLayout()
         Me.SuspendLayout()
@@ -134,40 +116,33 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         'Panel1
         '
         Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Panel1.Controls.Add(Me.lblHinweis)
         Me.Panel1.Controls.Add(Me.btnDetailsuche)
-        Me.Panel1.Controls.Add(Me.lblDauer)
         Me.Panel1.Controls.Add(Me.pnlSearch)
-        Me.Panel1.Controls.Add(Me.lblEintraege)
         Me.Panel1.Controls.Add(Me.Label22)
         Me.Panel1.Controls.Add(Me.Label10)
         Me.Panel1.Controls.Add(Me.btnE_Aviso)
-        Me.Panel1.Controls.Add(Me.MyComboBox1)
         Me.Panel1.Controls.Add(Me.btnNeu)
         Me.Panel1.Controls.Add(Me.txtBestimmungszollstelle)
         Me.Panel1.Controls.Add(Me.Label21)
-        Me.Panel1.Controls.Add(Me.btnHeute)
         Me.Panel1.Controls.Add(Me.cboImEx)
         Me.Panel1.Controls.Add(Me.cboTeams)
         Me.Panel1.Controls.Add(Me.Label16)
-        Me.Panel1.Controls.Add(Me.btnGestern)
         Me.Panel1.Controls.Add(Me.Label8)
         Me.Panel1.Controls.Add(Me.cbxCluster)
         Me.Panel1.Controls.Add(Me.cboGrenzstelle)
-        Me.Panel1.Controls.Add(Me.btnWoche)
         Me.Panel1.Controls.Add(Me.lblGrenze)
-        Me.Panel1.Controls.Add(Me.Label5)
-        Me.Panel1.Controls.Add(Me.dtpBis)
         Me.Panel1.Controls.Add(Me.Label6)
-        Me.Panel1.Controls.Add(Me.dtpVon)
         Me.Panel1.Controls.Add(Me.txtSuche)
-        Me.Panel1.Controls.Add(Me.Label2)
-        Me.Panel1.Controls.Add(Me.lblZeit_aktuell)
         Me.Panel1.Controls.Add(Me.btnWichtige)
         Me.Panel1.Controls.Add(Me.btnWichtigeStandort)
         Me.Panel1.Controls.Add(Me.lblSuche)
         Me.Panel1.Controls.Add(Me.tbcntrAvisoLKW)
         Me.Panel1.Controls.Add(Me.pnlTime)
         Me.Panel1.Controls.Add(Me.lblAkte)
+        Me.Panel1.Controls.Add(Me.lblZeit_aktuell)
+        Me.Panel1.Controls.Add(Me.lblDauer)
+        Me.Panel1.Controls.Add(Me.lblEintraege)
         Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
         Me.Panel1.Font = New System.Drawing.Font("Segoe UI", 9.0!)
         Me.Panel1.Location = New System.Drawing.Point(0, 0)
@@ -192,18 +167,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.btnDetailsuche.Text = "Detailsuche"
         Me.btnDetailsuche.UseVisualStyleBackColor = False
         '
-        'lblDauer
-        '
-        Me.lblDauer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.lblDauer.BackColor = System.Drawing.Color.Transparent
-        Me.lblDauer.ForeColor = System.Drawing.Color.White
-        Me.lblDauer.Location = New System.Drawing.Point(1101, 15)
-        Me.lblDauer.Name = "lblDauer"
-        Me.lblDauer.Size = New System.Drawing.Size(136, 17)
-        Me.lblDauer.TabIndex = 27
-        Me.lblDauer.Text = "1111123 ms"
-        Me.lblDauer.TextAlign = System.Drawing.ContentAlignment.MiddleRight
-        '
         'pnlSearch
         '
         Me.pnlSearch.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(138, Byte), Integer))
@@ -487,18 +450,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.cbxAlle.Text = "Alle"
         Me.cbxAlle.UseVisualStyleBackColor = True
         '
-        'lblEintraege
-        '
-        Me.lblEintraege.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.lblEintraege.BackColor = System.Drawing.Color.Transparent
-        Me.lblEintraege.ForeColor = System.Drawing.Color.White
-        Me.lblEintraege.Location = New System.Drawing.Point(1098, 3)
-        Me.lblEintraege.Name = "lblEintraege"
-        Me.lblEintraege.Size = New System.Drawing.Size(139, 15)
-        Me.lblEintraege.TabIndex = 14
-        Me.lblEintraege.Text = "0 Einträge"
-        Me.lblEintraege.TextAlign = System.Drawing.ContentAlignment.TopRight
-        '
         'Label22
         '
         Me.Label22.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -525,12 +476,12 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         '
         'btnE_Aviso
         '
-        Me.btnE_Aviso.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnE_Aviso.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.btnE_Aviso.BackColor = System.Drawing.Color.White
         Me.btnE_Aviso.Font = New System.Drawing.Font("Segoe UI", 11.0!)
         Me.btnE_Aviso.ForeColor = System.Drawing.Color.Black
         Me.btnE_Aviso.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.btnE_Aviso.Location = New System.Drawing.Point(1119, 43)
+        Me.btnE_Aviso.Location = New System.Drawing.Point(1116, 45)
         Me.btnE_Aviso.MaximumSize = New System.Drawing.Size(121, 34)
         Me.btnE_Aviso.Name = "btnE_Aviso"
         Me.btnE_Aviso.Size = New System.Drawing.Size(121, 34)
@@ -540,31 +491,15 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.btnE_Aviso.UseVisualStyleBackColor = False
         Me.btnE_Aviso.Visible = False
         '
-        'MyComboBox1
-        '
-        Me.MyComboBox1._allowedValuesFreiText = Nothing
-        Me.MyComboBox1._allowFreiText = False
-        Me.MyComboBox1._value = ""
-        Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
-        Me.MyComboBox1.ForeColor = System.Drawing.Color.White
-        Me.MyComboBox1.FormattingEnabled = True
-        Me.MyComboBox1.Location = New System.Drawing.Point(823, 5)
-        Me.MyComboBox1.MaxLength = 4
-        Me.MyComboBox1.Name = "MyComboBox1"
-        Me.MyComboBox1.Size = New System.Drawing.Size(98, 21)
-        Me.MyComboBox1.TabIndex = 7
-        '
         'btnNeu
         '
-        Me.btnNeu.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnNeu.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.btnNeu.BackColor = System.Drawing.Color.White
         Me.btnNeu.Font = New System.Drawing.Font("Segoe UI", 11.0!)
         Me.btnNeu.ForeColor = System.Drawing.Color.Black
         Me.btnNeu.Image = CType(resources.GetObject("btnNeu.Image"), System.Drawing.Image)
         Me.btnNeu.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.btnNeu.Location = New System.Drawing.Point(1119, 83)
+        Me.btnNeu.Location = New System.Drawing.Point(1116, 6)
         Me.btnNeu.MaximumSize = New System.Drawing.Size(121, 34)
         Me.btnNeu.Name = "btnNeu"
         Me.btnNeu.Size = New System.Drawing.Size(121, 34)
@@ -609,18 +544,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.Label21.TabIndex = 23
         Me.Label21.Text = "IM/EX:"
         '
-        'btnHeute
-        '
-        Me.btnHeute.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnHeute.ForeColor = System.Drawing.Color.White
-        Me.btnHeute.Location = New System.Drawing.Point(922, 4)
-        Me.btnHeute.Name = "btnHeute"
-        Me.btnHeute.Size = New System.Drawing.Size(50, 22)
-        Me.btnHeute.TabIndex = 0
-        Me.btnHeute.TabStop = False
-        Me.btnHeute.Text = "Heute"
-        Me.btnHeute.UseVisualStyleBackColor = True
-        '
         'cboImEx
         '
         Me.cboImEx._allowedValuesFreiText = Nothing
@@ -663,18 +586,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.Label16.TabIndex = 18
         Me.Label16.Text = "Team:"
         '
-        'btnGestern
-        '
-        Me.btnGestern.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnGestern.ForeColor = System.Drawing.Color.White
-        Me.btnGestern.Location = New System.Drawing.Point(971, 4)
-        Me.btnGestern.Name = "btnGestern"
-        Me.btnGestern.Size = New System.Drawing.Size(58, 22)
-        Me.btnGestern.TabIndex = 1
-        Me.btnGestern.TabStop = False
-        Me.btnGestern.Text = "Gestern"
-        Me.btnGestern.UseVisualStyleBackColor = True
-        '
         'Label8
         '
         Me.Label8.AutoSize = True
@@ -717,18 +628,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.cboGrenzstelle.Size = New System.Drawing.Size(107, 24)
         Me.cboGrenzstelle.TabIndex = 13
         '
-        'btnWoche
-        '
-        Me.btnWoche.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnWoche.ForeColor = System.Drawing.Color.White
-        Me.btnWoche.Location = New System.Drawing.Point(1028, 4)
-        Me.btnWoche.Name = "btnWoche"
-        Me.btnWoche.Size = New System.Drawing.Size(64, 22)
-        Me.btnWoche.TabIndex = 2
-        Me.btnWoche.TabStop = False
-        Me.btnWoche.Text = "1 Woche"
-        Me.btnWoche.UseVisualStyleBackColor = True
-        '
         'lblGrenze
         '
         Me.lblGrenze.AutoSize = True
@@ -739,24 +638,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.lblGrenze.TabIndex = 9
         Me.lblGrenze.Text = "Grenzstelle:"
         '
-        'Label5
-        '
-        Me.Label5.AutoSize = True
-        Me.Label5.ForeColor = System.Drawing.Color.White
-        Me.Label5.Location = New System.Drawing.Point(852, 36)
-        Me.Label5.Name = "Label5"
-        Me.Label5.Size = New System.Drawing.Size(27, 15)
-        Me.Label5.TabIndex = 6
-        Me.Label5.Text = "von"
-        '
-        'dtpBis
-        '
-        Me.dtpBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
-        Me.dtpBis.Location = New System.Drawing.Point(1007, 32)
-        Me.dtpBis.Name = "dtpBis"
-        Me.dtpBis.Size = New System.Drawing.Size(85, 23)
-        Me.dtpBis.TabIndex = 4
-        '
         'Label6
         '
         Me.Label6.AutoSize = True
@@ -768,14 +649,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.Label6.TabIndex = 11
         Me.Label6.Text = "mind. 2 Zeichen"
         '
-        'dtpVon
-        '
-        Me.dtpVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
-        Me.dtpVon.Location = New System.Drawing.Point(887, 32)
-        Me.dtpVon.Name = "dtpVon"
-        Me.dtpVon.Size = New System.Drawing.Size(85, 23)
-        Me.dtpVon.TabIndex = 3
-        '
         'txtSuche
         '
         Me.txtSuche.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -785,26 +658,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.txtSuche.Size = New System.Drawing.Size(306, 26)
         Me.txtSuche.TabIndex = 0
         '
-        'Label2
-        '
-        Me.Label2.AutoSize = True
-        Me.Label2.ForeColor = System.Drawing.Color.White
-        Me.Label2.Location = New System.Drawing.Point(976, 36)
-        Me.Label2.Name = "Label2"
-        Me.Label2.Size = New System.Drawing.Size(22, 15)
-        Me.Label2.TabIndex = 5
-        Me.Label2.Text = "bis"
-        '
-        'lblZeit_aktuell
-        '
-        Me.lblZeit_aktuell.AutoSize = True
-        Me.lblZeit_aktuell.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblZeit_aktuell.Location = New System.Drawing.Point(6, 39)
-        Me.lblZeit_aktuell.Name = "lblZeit_aktuell"
-        Me.lblZeit_aktuell.Size = New System.Drawing.Size(169, 15)
-        Me.lblZeit_aktuell.TabIndex = 6
-        Me.lblZeit_aktuell.Text = "letzte Aktualisierung: 11:22 Uhr"
-        '
         'btnWichtige
         '
         Me.btnWichtige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -854,7 +707,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.tbcntrAvisoLKW.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.tbcntrAvisoLKW.ImeMode = System.Windows.Forms.ImeMode.NoControl
         Me.tbcntrAvisoLKW.ItemSize = New System.Drawing.Size(60, 30)
-        Me.tbcntrAvisoLKW.Location = New System.Drawing.Point(-1, 86)
+        Me.tbcntrAvisoLKW.Location = New System.Drawing.Point(3, 86)
         Me.tbcntrAvisoLKW.Name = "tbcntrAvisoLKW"
         Me.tbcntrAvisoLKW.Padding = New System.Drawing.Point(12, 3)
         Me.tbcntrAvisoLKW.SelectedIndex = 0
@@ -961,10 +814,17 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         '
         Me.pnlTime.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.pnlTime.Controls.Add(Me.lblHinweis)
+        Me.pnlTime.Controls.Add(Me.MyComboBox1)
+        Me.pnlTime.Controls.Add(Me.Label2)
+        Me.pnlTime.Controls.Add(Me.dtpVon)
+        Me.pnlTime.Controls.Add(Me.dtpBis)
+        Me.pnlTime.Controls.Add(Me.Label5)
+        Me.pnlTime.Controls.Add(Me.btnWoche)
+        Me.pnlTime.Controls.Add(Me.btnGestern)
+        Me.pnlTime.Controls.Add(Me.btnHeute)
         Me.pnlTime.Location = New System.Drawing.Point(794, 1)
         Me.pnlTime.Name = "pnlTime"
-        Me.pnlTime.Size = New System.Drawing.Size(330, 57)
+        Me.pnlTime.Size = New System.Drawing.Size(307, 57)
         Me.pnlTime.TabIndex = 12
         '
         'lblHinweis
@@ -972,241 +832,146 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.lblHinweis.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.lblHinweis.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.lblHinweis.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblHinweis.Location = New System.Drawing.Point(192, 56)
+        Me.lblHinweis.Location = New System.Drawing.Point(954, 93)
         Me.lblHinweis.Name = "lblHinweis"
         Me.lblHinweis.Size = New System.Drawing.Size(129, 16)
         Me.lblHinweis.TabIndex = 38
         Me.lblHinweis.Text = "Hinweis eingetragen"
         Me.lblHinweis.Visible = False
         '
+        'MyComboBox1
+        '
+        Me.MyComboBox1._allowedValuesFreiText = Nothing
+        Me.MyComboBox1._allowFreiText = False
+        Me.MyComboBox1._value = ""
+        Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.MyComboBox1.ForeColor = System.Drawing.Color.White
+        Me.MyComboBox1.FormattingEnabled = True
+        Me.MyComboBox1.Location = New System.Drawing.Point(20, 4)
+        Me.MyComboBox1.MaxLength = 4
+        Me.MyComboBox1.Name = "MyComboBox1"
+        Me.MyComboBox1.Size = New System.Drawing.Size(98, 21)
+        Me.MyComboBox1.TabIndex = 7
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.ForeColor = System.Drawing.Color.White
+        Me.Label2.Location = New System.Drawing.Point(173, 35)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(22, 15)
+        Me.Label2.TabIndex = 5
+        Me.Label2.Text = "bis"
+        '
+        'dtpVon
+        '
+        Me.dtpVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
+        Me.dtpVon.Location = New System.Drawing.Point(84, 31)
+        Me.dtpVon.Name = "dtpVon"
+        Me.dtpVon.Size = New System.Drawing.Size(85, 23)
+        Me.dtpVon.TabIndex = 3
+        '
+        'dtpBis
+        '
+        Me.dtpBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
+        Me.dtpBis.Location = New System.Drawing.Point(204, 31)
+        Me.dtpBis.Name = "dtpBis"
+        Me.dtpBis.Size = New System.Drawing.Size(85, 23)
+        Me.dtpBis.TabIndex = 4
+        '
+        'Label5
+        '
+        Me.Label5.AutoSize = True
+        Me.Label5.ForeColor = System.Drawing.Color.White
+        Me.Label5.Location = New System.Drawing.Point(49, 35)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(27, 15)
+        Me.Label5.TabIndex = 6
+        Me.Label5.Text = "von"
+        '
+        'btnWoche
+        '
+        Me.btnWoche.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnWoche.ForeColor = System.Drawing.Color.White
+        Me.btnWoche.Location = New System.Drawing.Point(225, 3)
+        Me.btnWoche.Name = "btnWoche"
+        Me.btnWoche.Size = New System.Drawing.Size(64, 22)
+        Me.btnWoche.TabIndex = 2
+        Me.btnWoche.TabStop = False
+        Me.btnWoche.Text = "1 Woche"
+        Me.btnWoche.UseVisualStyleBackColor = True
+        '
+        'btnGestern
+        '
+        Me.btnGestern.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnGestern.ForeColor = System.Drawing.Color.White
+        Me.btnGestern.Location = New System.Drawing.Point(168, 3)
+        Me.btnGestern.Name = "btnGestern"
+        Me.btnGestern.Size = New System.Drawing.Size(58, 22)
+        Me.btnGestern.TabIndex = 1
+        Me.btnGestern.TabStop = False
+        Me.btnGestern.Text = "Gestern"
+        Me.btnGestern.UseVisualStyleBackColor = True
+        '
+        'btnHeute
+        '
+        Me.btnHeute.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnHeute.ForeColor = System.Drawing.Color.White
+        Me.btnHeute.Location = New System.Drawing.Point(119, 3)
+        Me.btnHeute.Name = "btnHeute"
+        Me.btnHeute.Size = New System.Drawing.Size(50, 22)
+        Me.btnHeute.TabIndex = 0
+        Me.btnHeute.TabStop = False
+        Me.btnHeute.Text = "Heute"
+        Me.btnHeute.UseVisualStyleBackColor = True
+        '
         'lblAkte
         '
-        Me.lblAkte.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblAkte.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.lblAkte.ForeColor = System.Drawing.Color.White
-        Me.lblAkte.Location = New System.Drawing.Point(1107, 5)
+        Me.lblAkte.Location = New System.Drawing.Point(1016, 85)
         Me.lblAkte.Name = "lblAkte"
-        Me.lblAkte.Size = New System.Drawing.Size(130, 34)
+        Me.lblAkte.Size = New System.Drawing.Size(221, 30)
         Me.lblAkte.TabIndex = 29
         Me.lblAkte.Text = "0 Akte vom " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Arbeitsplatz übernommen"
         Me.lblAkte.TextAlign = System.Drawing.ContentAlignment.TopRight
         '
-        'pblSNDOptions
+        'lblZeit_aktuell
         '
-        Me.pblSNDOptions.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.lblZeit_aktuell.AutoSize = True
-        Me.pblSNDOptions.Controls.Add(Me.cbx_My_Brexit)
+        Me.lblZeit_aktuell.ForeColor = System.Drawing.Color.White
-        Me.pblSNDOptions.Controls.Add(Me.btnColor)
+        Me.lblZeit_aktuell.Location = New System.Drawing.Point(1012, 31)
-        Me.pblSNDOptions.Controls.Add(Me.lblMySND_Anzeige)
+        Me.lblZeit_aktuell.Name = "lblZeit_aktuell"
-        Me.pblSNDOptions.Controls.Add(Me.cboMyAvisoAnzeige)
+        Me.lblZeit_aktuell.Size = New System.Drawing.Size(101, 15)
-        Me.pblSNDOptions.Controls.Add(Me.cboMy_Grenzstelle)
+        Me.lblZeit_aktuell.TabIndex = 6
-        Me.pblSNDOptions.Controls.Add(Me.cboMy_QS)
+        Me.lblZeit_aktuell.Text = "Refresh: 11:22 Uhr"
-        Me.pblSNDOptions.Controls.Add(Me.cbx_My_LKW)
+        Me.lblZeit_aktuell.Visible = False
-        Me.pblSNDOptions.Controls.Add(Me.cboMy_VB)
-        Me.pblSNDOptions.Controls.Add(Me.lblMySnd_Grenzstelle)
-        Me.pblSNDOptions.Location = New System.Drawing.Point(314, 259)
-        Me.pblSNDOptions.Name = "pblSNDOptions"
-        Me.pblSNDOptions.Size = New System.Drawing.Size(568, 25)
-        Me.pblSNDOptions.TabIndex = 29
-        Me.pblSNDOptions.Visible = False
         '
-        'cbx_My_Brexit
+        'lblDauer
         '
-        Me.cbx_My_Brexit.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblDauer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.cbx_My_Brexit.AutoSize = True
+        Me.lblDauer.BackColor = System.Drawing.Color.Transparent
-        Me.cbx_My_Brexit.ForeColor = System.Drawing.Color.White
+        Me.lblDauer.ForeColor = System.Drawing.Color.White
-        Me.cbx_My_Brexit.Location = New System.Drawing.Point(3, 3)
+        Me.lblDauer.Location = New System.Drawing.Point(978, 15)
-        Me.cbx_My_Brexit.Name = "cbx_My_Brexit"
+        Me.lblDauer.Name = "lblDauer"
-        Me.cbx_My_Brexit.Size = New System.Drawing.Size(65, 17)
+        Me.lblDauer.Size = New System.Drawing.Size(136, 17)
-        Me.cbx_My_Brexit.TabIndex = 28
+        Me.lblDauer.TabIndex = 27
-        Me.cbx_My_Brexit.Text = "BREXIT"
+        Me.lblDauer.Text = "1111123 ms"
-        Me.cbx_My_Brexit.UseVisualStyleBackColor = True
+        Me.lblDauer.TextAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.cbx_My_Brexit.Visible = False
         '
-        'btnColor
+        'lblEintraege
         '
-        Me.btnColor.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblEintraege.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.btnColor.BackColor = System.Drawing.Color.White
+        Me.lblEintraege.BackColor = System.Drawing.Color.Transparent
-        Me.btnColor.Location = New System.Drawing.Point(471, 1)
+        Me.lblEintraege.ForeColor = System.Drawing.Color.White
-        Me.btnColor.Name = "btnColor"
+        Me.lblEintraege.Location = New System.Drawing.Point(975, 3)
-        Me.btnColor.Size = New System.Drawing.Size(36, 23)
+        Me.lblEintraege.Name = "lblEintraege"
-        Me.btnColor.TabIndex = 37
+        Me.lblEintraege.Size = New System.Drawing.Size(139, 15)
-        Me.btnColor.UseVisualStyleBackColor = False
+        Me.lblEintraege.TabIndex = 14
-        Me.btnColor.Visible = False
+        Me.lblEintraege.Text = "0 Einträge"
-        '
+        Me.lblEintraege.TextAlign = System.Drawing.ContentAlignment.TopRight
-        'lblMySND_Anzeige
-        '
-        Me.lblMySND_Anzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.lblMySND_Anzeige.AutoSize = True
-        Me.lblMySND_Anzeige.ForeColor = System.Drawing.Color.White
-        Me.lblMySND_Anzeige.Location = New System.Drawing.Point(277, 3)
-        Me.lblMySND_Anzeige.Name = "lblMySND_Anzeige"
-        Me.lblMySND_Anzeige.Size = New System.Drawing.Size(48, 13)
-        Me.lblMySND_Anzeige.TabIndex = 20
-        Me.lblMySND_Anzeige.Text = "Anzeige:"
-        '
-        'cboMyAvisoAnzeige
-        '
-        Me.cboMyAvisoAnzeige._allowedValuesFreiText = Nothing
-        Me.cboMyAvisoAnzeige._allowFreiText = False
-        Me.cboMyAvisoAnzeige._value = ""
-        Me.cboMyAvisoAnzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.cboMyAvisoAnzeige.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.cboMyAvisoAnzeige.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
-        Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
-        Me.cboMyAvisoAnzeige.FormattingEnabled = True
-        Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(335, 1)
-        Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige"
-        Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(118, 21)
-        Me.cboMyAvisoAnzeige.TabIndex = 21
-        '
-        'cboMy_Grenzstelle
-        '
-        Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing
-        Me.cboMy_Grenzstelle._allowFreiText = False
-        Me.cboMy_Grenzstelle._value = ""
-        Me.cboMy_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
-        Me.cboMy_Grenzstelle.DropDownWidth = 120
-        Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
-        Me.cboMy_Grenzstelle.FormattingEnabled = True
-        Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(207, 1)
-        Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle"
-        Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21)
-        Me.cboMy_Grenzstelle.TabIndex = 26
-        '
-        'cboMy_QS
-        '
-        Me.cboMy_QS.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.cboMy_QS.AutoSize = True
-        Me.cboMy_QS.Checked = True
-        Me.cboMy_QS.CheckState = System.Windows.Forms.CheckState.Indeterminate
-        Me.cboMy_QS.ForeColor = System.Drawing.Color.White
-        Me.cboMy_QS.Location = New System.Drawing.Point(519, 5)
-        Me.cboMy_QS.Name = "cboMy_QS"
-        Me.cboMy_QS.Size = New System.Drawing.Size(15, 14)
-        Me.cboMy_QS.TabIndex = 33
-        Me.cboMy_QS.ThreeState = True
-        Me.cboMy_QS.UseVisualStyleBackColor = True
-        '
-        'cbx_My_LKW
-        '
-        Me.cbx_My_LKW.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.cbx_My_LKW.AutoSize = True
-        Me.cbx_My_LKW.ForeColor = System.Drawing.Color.White
-        Me.cbx_My_LKW.Location = New System.Drawing.Point(83, 3)
-        Me.cbx_My_LKW.Name = "cbx_My_LKW"
-        Me.cbx_My_LKW.Size = New System.Drawing.Size(50, 17)
-        Me.cbx_My_LKW.TabIndex = 24
-        Me.cbx_My_LKW.Text = "LKW"
-        Me.cbx_My_LKW.UseVisualStyleBackColor = True
-        '
-        'cboMy_VB
-        '
-        Me.cboMy_VB.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.cboMy_VB.AutoSize = True
-        Me.cboMy_VB.Checked = True
-        Me.cboMy_VB.CheckState = System.Windows.Forms.CheckState.Indeterminate
-        Me.cboMy_VB.ForeColor = System.Drawing.Color.White
-        Me.cboMy_VB.Location = New System.Drawing.Point(538, 5)
-        Me.cboMy_VB.Name = "cboMy_VB"
-        Me.cboMy_VB.Size = New System.Drawing.Size(15, 14)
-        Me.cboMy_VB.TabIndex = 32
-        Me.cboMy_VB.ThreeState = True
-        Me.cboMy_VB.UseVisualStyleBackColor = True
-        '
-        'lblMySnd_Grenzstelle
-        '
-        Me.lblMySnd_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.lblMySnd_Grenzstelle.AutoSize = True
-        Me.lblMySnd_Grenzstelle.ForeColor = System.Drawing.Color.White
-        Me.lblMySnd_Grenzstelle.Location = New System.Drawing.Point(139, 4)
-        Me.lblMySnd_Grenzstelle.Name = "lblMySnd_Grenzstelle"
-        Me.lblMySnd_Grenzstelle.Size = New System.Drawing.Size(62, 13)
-        Me.lblMySnd_Grenzstelle.TabIndex = 25
-        Me.lblMySnd_Grenzstelle.Text = "Grenzstelle:"
-        '
-        'tbcntrAvisoSND
-        '
-        Me.tbcntrAvisoSND.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.tbcntrAvisoSND.Controls.Add(Me.tbSndAlle)
-        Me.tbcntrAvisoSND.Controls.Add(Me.tbSndOffen)
-        Me.tbcntrAvisoSND.Controls.Add(Me.tbSndFreigegeben)
-        Me.tbcntrAvisoSND.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.tbcntrAvisoSND.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.tbcntrAvisoSND.ItemSize = New System.Drawing.Size(60, 30)
-        Me.tbcntrAvisoSND.Location = New System.Drawing.Point(235, 222)
-        Me.tbcntrAvisoSND.Name = "tbcntrAvisoSND"
-        Me.tbcntrAvisoSND.Padding = New System.Drawing.Point(12, 3)
-        Me.tbcntrAvisoSND.SelectedIndex = 0
-        Me.tbcntrAvisoSND.Size = New System.Drawing.Size(129, 11)
-        Me.tbcntrAvisoSND.TabIndex = 27
-        Me.tbcntrAvisoSND.Visible = False
-        '
-        'tbSndAlle
-        '
-        Me.tbSndAlle.BackColor = System.Drawing.SystemColors.ActiveBorder
-        Me.tbSndAlle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.tbSndAlle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.tbSndAlle.Location = New System.Drawing.Point(4, 34)
-        Me.tbSndAlle.Name = "tbSndAlle"
-        Me.tbSndAlle.Padding = New System.Windows.Forms.Padding(3)
-        Me.tbSndAlle.Size = New System.Drawing.Size(121, 0)
-        Me.tbSndAlle.TabIndex = 0
-        Me.tbSndAlle.Text = "Alle Sendungen"
-        '
-        'tbSndOffen
-        '
-        Me.tbSndOffen.BackColor = System.Drawing.SystemColors.ActiveBorder
-        Me.tbSndOffen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.tbSndOffen.Location = New System.Drawing.Point(4, 34)
-        Me.tbSndOffen.Name = "tbSndOffen"
-        Me.tbSndOffen.Padding = New System.Windows.Forms.Padding(3)
-        Me.tbSndOffen.Size = New System.Drawing.Size(121, 0)
-        Me.tbSndOffen.TabIndex = 1
-        Me.tbSndOffen.Text = "Offen"
-        '
-        'tbSndFreigegeben
-        '
-        Me.tbSndFreigegeben.Location = New System.Drawing.Point(4, 34)
-        Me.tbSndFreigegeben.Name = "tbSndFreigegeben"
-        Me.tbSndFreigegeben.Size = New System.Drawing.Size(121, 0)
-        Me.tbSndFreigegeben.TabIndex = 2
-        Me.tbSndFreigegeben.Text = "Freigegeben"
-        Me.tbSndFreigegeben.UseVisualStyleBackColor = True
-        '
-        'CheckBox1
-        '
-        Me.CheckBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.CheckBox1.AutoSize = True
-        Me.CheckBox1.Checked = True
-        Me.CheckBox1.CheckState = System.Windows.Forms.CheckState.Checked
-        Me.CheckBox1.ForeColor = System.Drawing.Color.White
-        Me.CheckBox1.Location = New System.Drawing.Point(244, 260)
-        Me.CheckBox1.Name = "CheckBox1"
-        Me.CheckBox1.Size = New System.Drawing.Size(50, 17)
-        Me.CheckBox1.TabIndex = 28
-        Me.CheckBox1.Text = "LKW"
-        Me.CheckBox1.UseVisualStyleBackColor = True
-        Me.CheckBox1.Visible = False
-        '
-        'Button7
-        '
-        Me.Button7.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.Button7.Font = New System.Drawing.Font("Segoe UI", 11.0!)
-        Me.Button7.ForeColor = System.Drawing.Color.Black
-        Me.Button7.Image = CType(resources.GetObject("Button7.Image"), System.Drawing.Image)
-        Me.Button7.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.Button7.Location = New System.Drawing.Point(917, 259)
-        Me.Button7.MaximumSize = New System.Drawing.Size(121, 35)
-        Me.Button7.Name = "Button7"
-        Me.Button7.Size = New System.Drawing.Size(121, 35)
-        Me.Button7.TabIndex = 32
-        Me.Button7.Text = "Sendung"
-        Me.Button7.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button7.UseVisualStyleBackColor = True
-        Me.Button7.Visible = False
         '
         'gridAviso
         '
@@ -1304,10 +1069,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.Controls.Add(Me.tbcntrAvisoSND)
-        Me.Controls.Add(Me.CheckBox1)
-        Me.Controls.Add(Me.Button7)
-        Me.Controls.Add(Me.pblSNDOptions)
         Me.Controls.Add(Me.gridAviso)
         Me.Controls.Add(Me.Panel1)
         Me.Name = "usrCntlHauptfenster_Suche_AVISO"
@@ -1318,32 +1079,14 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
         Me.pnlSearch.PerformLayout()
         Me.tbcntrAvisoLKW.ResumeLayout(False)
         Me.pnlTime.ResumeLayout(False)
-        Me.pblSNDOptions.ResumeLayout(False)
+        Me.pnlTime.PerformLayout()
-        Me.pblSNDOptions.PerformLayout()
-        Me.tbcntrAvisoSND.ResumeLayout(False)
         CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ctxtFarben.ResumeLayout(False)
         Me.ResumeLayout(False)
-        Me.PerformLayout()
 
     End Sub
 
     Friend WithEvents Panel1 As Panel
-    Friend WithEvents pblSNDOptions As Panel
-    Friend WithEvents cbx_My_Brexit As CheckBox
-    Friend WithEvents btnColor As Button
-    Friend WithEvents lblMySND_Anzeige As Label
-    Friend WithEvents cboMyAvisoAnzeige As VERAG_PROG_ALLGEMEIN.MyComboBox
-    Friend WithEvents cboMy_Grenzstelle As VERAG_PROG_ALLGEMEIN.MyComboBox
-    Friend WithEvents cboMy_QS As CheckBox
-    Friend WithEvents cbx_My_LKW As CheckBox
-    Friend WithEvents cboMy_VB As CheckBox
-    Friend WithEvents lblMySnd_Grenzstelle As Label
-    Friend WithEvents CheckBox1 As CheckBox
-    Friend WithEvents tbcntrAvisoSND As TabControl
-    Friend WithEvents tbSndAlle As TabPage
-    Friend WithEvents tbSndOffen As TabPage
-    Friend WithEvents tbSndFreigegeben As TabPage
     Friend WithEvents txtBestimmungszollstelle As VERAG_PROG_ALLGEMEIN.MySearchBox
     Friend WithEvents Label10 As Label
     Friend WithEvents cboImEx As VERAG_PROG_ALLGEMEIN.MyComboBox
@@ -1416,7 +1159,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO
     Friend WithEvents lblDauer As Label
     Friend WithEvents btnE_Aviso As Button
     Friend WithEvents btnNeu As Button
-    Friend WithEvents Button7 As Button
     Friend WithEvents Label22 As Label
     Friend WithEvents lblHinweis As Label
     Friend WithEvents btnDetailsuche As Button

Aviso/usrCntlHauptfenster_Suche_AVISO.resx

@@ -124,14 +124,6 @@
         dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAABVSURBVEhL7c0xDgAgCENR738Ar4uDi7bEECMsdngO
         BPzNzFolGmSbTw+zA9wlCnowouBGQQ9GroN4nELB5/4KRtEnC9wlCnowouBGQQ9G7oKVaJBtAF0U0pEO
         zULyAAAAAElFTkSuQmCC
-</value>
-  </data>
-  <data name="Button7.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
-        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAABVSURBVEhL7c0xDgAgCENR738Ar4uDi7bEECMsdngO
-        BPzNzFolGmSbTw+zA9wlCnowouBGQQ9GroN4nELB5/4KRtEnC9wlCnowouBGQQ9G7oKVaJBtAF0U0pEO
-        zULyAAAAAElFTkSuQmCC
 </value>
   </data>
   <metadata name="TimerAkte.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">

Aviso/usrCntlHauptfenster_Suche_AVISO.vb

@@ -72,62 +72,7 @@ Public Class usrCntlHauptfenster_Suche_AVISO
             gridAviso.Rows(0).Selected = True
         End If
 
-        If VERAG_PROG_ALLGEMEIN.cAllgemein.WARENORT_ZUGANG Then
-            cboMy_Grenzstelle.Items.Clear()
-            cboMy_Grenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where grz_Grenzstelle='" & VERAG_PROG_ALLGEMEIN.cAllgemein.WARENORT & "'  AND  grz_Firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'   AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", False)
-            cboMy_Grenzstelle.changeItem("")
-        Else
-            cboMy_Grenzstelle.Items.Clear()
-            ''''If Not VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA Then ' Nicht, wenn Front-Office
-            ''''    cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE (BACKOFFICE)", "ALLE_BACK"))
-            ''''End If
 
-            cboMy_Grenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where ([grz_Firma]='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "') AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", True, False, "ALLE")
-            '   cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SBG+AMB", "SBG+AMB"))
-            cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE WARENORTE", "ALLE_WO"))
-            cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("??? - Andere", "???"))
-            cboMy_Grenzstelle.changeItem("")
-            ''''cboMy_Grenzstelle.changeItem("ALLE_BACK") 'greift nur wenn verfügbar..
-        End If
-
-
-
-        cboMyAvisoAnzeige.Items.Clear()
-        cboMyAvisoAnzeige.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", "ALLE"))
-        cboMyAvisoAnzeige.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Benutzer", "Benutzer"))
-        cboMyAvisoAnzeige.fillWithSQL("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'", False, "ADMIN", True, False)
-        cboMyAvisoAnzeige.changeItem("Benutzer")
-
-
-        If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERIMEX" Then
-            cboMyAvisoAnzeige.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("T1-Sendungen", "T1"))
-            cboMy_QS.CheckState = CheckState.Checked
-            cboMy_VB.CheckState = CheckState.Unchecked
-            cboMyAvisoAnzeige.changeItem("T1")
-        Else
-
-            If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_abteilung = "QS" Then
-                cboMy_QS.CheckState = CheckState.Unchecked
-                cboMy_VB.CheckState = CheckState.Indeterminate
-            Else
-                cboMy_QS.CheckState = CheckState.Checked
-                cboMy_VB.CheckState = CheckState.Unchecked
-            End If
-
-            Dim myLKW As Boolean = False
-            If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId Is Nothing Then
-                myLKW = True
-            End If
-
-            If myLKW Then
-                cbx_My_LKW.Checked = True
-                cboMy_QS.CheckState = CheckState.Indeterminate
-                cboMy_VB.CheckState = CheckState.Indeterminate
-            ElseIf IsNumeric(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId) Then
-                cboMyAvisoAnzeige.changeItem(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId)
-
-            End If
-        End If
 
         MyComboBox1.Items.Clear()
         MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("<keine Einschr.>", UStatus_none))
@@ -201,18 +146,9 @@ Public Class usrCntlHauptfenster_Suche_AVISO
 
         End Select
 
-        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("BREXIT", "AVISO") Then
-            cbx_My_Brexit.Checked = True
-        End If
-
 
         tbcntrAvisoLKW.Width = Panel1.Width
 
-        'tbcntrAvisoSND.Location = New Point(tbcntrAvisoLKW.Location.X + getTbControlWidth(tbcntrAvisoLKW) + 80, tbcntrAvisoSND.Location.Y)
-        tbcntrAvisoSND.Location = New Point(tbcntrAvisoLKW.Location.X, tbcntrAvisoLKW.Location.Y)
-        tbcntrAvisoSND.SelectedIndex = 1
-        tbcntrAvisoSND.Width = tbcntrAvisoLKW.Width
-        tbcntrAvisoSND.Height = tbcntrAvisoLKW.Height
 
         If cboTeams.Items.Count = 0 Then cboTeams.Visible = False
         dtpVon.Value = Now.AddMonths(-1) 'Now.AddDays(-15)
@@ -563,40 +499,40 @@ Public Class usrCntlHauptfenster_Suche_AVISO
                 'Dauer berechnen:
                 For Each r As DataGridViewRow In .Rows
                     r.DefaultCellStyle.Font = nfont
-                    If Not cbx_My_LKW.Checked Then
+                    'If False Then
-                        If r.Cells("tblSnd_Fremdspedition").Value Then 'FREMDANMELDER
+                    '    If r.Cells("tblSnd_Fremdspedition").Value Then 'FREMDANMELDER
-                            r.Cells("Abfertigungsart").Style.BackColor = Color.FromArgb(230, 230, 230)
+                    '        r.Cells("Abfertigungsart").Style.BackColor = Color.FromArgb(230, 230, 230)
-                            ' r.Cells("tblSnd_PosUnterNr").Style.BackColor = Color.FromArgb(230, 230, 230)
+                    '        ' r.Cells("tblSnd_PosUnterNr").Style.BackColor = Color.FromArgb(230, 230, 230)
-                            ' r.Cells("Abfertigungsart").Value = "FREMD"
+                    '        ' r.Cells("Abfertigungsart").Value = "FREMD"
-                            r.Cells("Abfertigungsart").Value = r.Cells("tblSnd_FremdspeditionText").Value
+                    '        r.Cells("Abfertigungsart").Value = r.Cells("tblSnd_FremdspeditionText").Value
-                        Else 'Nomal
+                    '    Else 'Nomal
-                            Dim Abfertigungsland As String = r.Cells("tblSnd_Zollsystem_Land").Value
+                    '        Dim Abfertigungsland As String = r.Cells("tblSnd_Zollsystem_Land").Value
-                            If Abfertigungsland <> "" Then Abfertigungsland = "[" & Abfertigungsland & "] "
+                    '        If Abfertigungsland <> "" Then Abfertigungsland = "[" & Abfertigungsland & "] "
 
-                            r.Cells("Abfertigungsart").Value = VERAGSQL.getValueTxtBySql("SELECT Abfertigungsbezeichnung FROM Abfertigungsarten WHERE [Abfertigungsart]='" & r.Cells("tblSnd_Abfertigungsart_ID").Value.ToString & "'", "FMZOLL")
+                    '        r.Cells("Abfertigungsart").Value = VERAGSQL.getValueTxtBySql("SELECT Abfertigungsbezeichnung FROM Abfertigungsarten WHERE [Abfertigungsart]='" & r.Cells("tblSnd_Abfertigungsart_ID").Value.ToString & "'", "FMZOLL")
-                            r.Cells("Abfertigungsart").Value = Abfertigungsland & r.Cells("Abfertigungsart").Value
+                    '        r.Cells("Abfertigungsart").Value = Abfertigungsland & r.Cells("Abfertigungsart").Value
 
-                            If r.Cells("Abfertigungsart").Value.ToString.Length > 20 Then r.Cells("Abfertigungsart").Value = r.Cells("Abfertigungsart").Value.Substring(0, 20) & ".."
+                    '        If r.Cells("Abfertigungsart").Value.ToString.Length > 20 Then r.Cells("Abfertigungsart").Value = r.Cells("Abfertigungsart").Value.Substring(0, 20) & ".."
-                        End If
+                    '    End If
 
-                        If .Columns("StatusVorbereitetQS") IsNot Nothing Then
+                    '    If .Columns("StatusVorbereitetQS") IsNot Nothing Then
-                            If r.Cells("tblSnd_Vorbereitet").Value IsNot DBNull.Value Then
+                    '        If r.Cells("tblSnd_Vorbereitet").Value IsNot DBNull.Value Then
-                                DirectCast(r.Cells("StatusVorbereitetQS"), DataGridViewImageCell).Value = My.Resources.statusBtn_vorbereitet_Aktiv
+                    '            DirectCast(r.Cells("StatusVorbereitetQS"), DataGridViewImageCell).Value = My.Resources.statusBtn_vorbereitet_Aktiv
-                                DirectCast(r.Cells("StatusVorbereitetQS"), DataGridViewImageCell).ToolTipText = "Status 'Vorbereitet-QS' entfernen" & vbNewLine & "(" & r.Cells("tblSnd_Vorgeschrieben").Value & ")"
+                    '            DirectCast(r.Cells("StatusVorbereitetQS"), DataGridViewImageCell).ToolTipText = "Status 'Vorbereitet-QS' entfernen" & vbNewLine & "(" & r.Cells("tblSnd_Vorgeschrieben").Value & ")"
-                            Else
+                    '        Else
-                                DirectCast(r.Cells("StatusVorbereitetQS"), DataGridViewImageCell).ToolTipText = "Status 'Vorbereitet-QS' eintragen"
+                    '            DirectCast(r.Cells("StatusVorbereitetQS"), DataGridViewImageCell).ToolTipText = "Status 'Vorbereitet-QS' eintragen"
-                            End If
+                    '        End If
-                        End If
+                    '    End If
-                        If .Columns("StatusVorgeschrieben") IsNot Nothing Then
+                    '    If .Columns("StatusVorgeschrieben") IsNot Nothing Then
-                            If r.Cells("tblSnd_Vorgeschrieben").Value IsNot DBNull.Value Then
+                    '        If r.Cells("tblSnd_Vorgeschrieben").Value IsNot DBNull.Value Then
-                                DirectCast(r.Cells("StatusVorgeschrieben"), DataGridViewImageCell).Value = My.Resources.statusBtn_vorgeschrieben_Aktiv
+                    '            DirectCast(r.Cells("StatusVorgeschrieben"), DataGridViewImageCell).Value = My.Resources.statusBtn_vorgeschrieben_Aktiv
-                                DirectCast(r.Cells("StatusVorgeschrieben"), DataGridViewImageCell).ToolTipText = "Status 'Vorgeschrieben' entfernen" & vbNewLine & "(" & r.Cells("tblSnd_Vorgeschrieben").Value & ")"
+                    '            DirectCast(r.Cells("StatusVorgeschrieben"), DataGridViewImageCell).ToolTipText = "Status 'Vorgeschrieben' entfernen" & vbNewLine & "(" & r.Cells("tblSnd_Vorgeschrieben").Value & ")"
-                            Else
+                    '        Else
-                                DirectCast(r.Cells("StatusVorgeschrieben"), DataGridViewImageCell).ToolTipText = "Status 'Vorgeschrieben' eintragen"
+                    '            DirectCast(r.Cells("StatusVorgeschrieben"), DataGridViewImageCell).ToolTipText = "Status 'Vorgeschrieben' eintragen"
-                            End If
+                    '        End If
-                        End If
+                    '    End If
 
-                    End If
+                    'End If
 
                     ' MsgBox(r.Cells(1).Value)
                     ' MsgBox(r.Cells(6).Value)
@@ -635,7 +571,7 @@ Public Class usrCntlHauptfenster_Suche_AVISO
                     'Farbkennung
 
                     If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_MeineSND_Farbe") Then
-                        If Not cbx_My_LKW.Checked Then
+                        If True Then
                             Select Case r.Cells("Status").Value
                                 Case VERAG_PROG_ALLGEMEIN.cGlobal.Status_NichtEingetroffen, VERAG_PROG_ALLGEMEIN.cGlobal.Status_Freigegeben '"1", "2"
                                 ' Freigabe, N.Eingetr.
@@ -890,89 +826,6 @@ Public Class usrCntlHauptfenster_Suche_AVISO
             hSQL += " ORDER BY Ankunft ASC, AvisoEingang ASC, Datum ASC"
 
 
-        Else
-
-
-            '----------------------------------------------------------------------------------------------------------------------------------
-            '--- Sendung ---
-            '----------------------------------------------------------------------------------------------------------------------------------
-            Dim inBearbeitungSQL = " tblSendungen.LetzterMitarbeiterId=@maId " ' 1<>1 " 'DEFAULT = "Benutzer"
-            If cboMyAvisoAnzeige._value <> "" Then
-                If cboMyAvisoAnzeige._value = "ALLE" Then
-                    '  inBearbeitungSQL = " 1=1 " 'ALLE
-                    inBearbeitungSQL = " (  (tblSendungen.[tblSnd_TeamId] IN (SELECT [team_id]  FROM [ADMIN].[dbo].[tblTeams] WHERE [team_firma]='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'))       OR      (Aviso.[TeamId] IN (SELECT [team_id]  FROM [ADMIN].[dbo].[tblTeams] WHERE [team_firma]='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' AND tblSendungen.[tblSnd_TeamId] is null))       OR        [tblSendungen].tblSnd_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'       OR        tblSendungen.LetzterMitarbeiterId=@maId) "
-                ElseIf cboMyAvisoAnzeige._value = "T1" Then
-                    inBearbeitungSQL = " tblSnd_Abfertigungsart_ID=5 "
-                    'NUR VERAG/IMEX:
-                    inBearbeitungSQL &= " AND FilialenNr IN (SELECT FilialenNr FROM " & VERAG_PROG_ALLGEMEIN.cAllgemein.FMZOLL_SERVER & ".VERAG.dbo.Filialen WHERE  Filialen.FilialenNr=tblSendungen.FilialenNr and Filialen.Firma IN ('VERAG','IMEX')) "
-                ElseIf cboMyAvisoAnzeige._value <> "Benutzer" And IsNumeric(cboMyAvisoAnzeige._value) Then
-                    If cboMyAvisoAnzeige._value = "27" Then ' TEAM SALZBURG
-                        inBearbeitungSQL = " ((Aviso.[TeamId]= " & cboMyAvisoAnzeige._value & "  AND tblSendungen.[tblSnd_TeamId] is null)  OR tblSendungen.[tblSnd_TeamId]= " & cboMyAvisoAnzeige._value & " OR tblSendungen.LetzterMitarbeiterId=@maId 
-                                                    OR Grenzstelle IN('SBG') OR (tblSendungen.FilialenNr  IN('5701') AND tblSnd_Abfertigungsart_ID IN(1,38,39,46,66)) )  "
-                    Else
-                        inBearbeitungSQL = " ((Aviso.[TeamId]= " & cboMyAvisoAnzeige._value & "  AND tblSendungen.[tblSnd_TeamId] is null)  OR tblSendungen.[tblSnd_TeamId]= " & cboMyAvisoAnzeige._value & " OR tblSendungen.LetzterMitarbeiterId=@maId) "
-
-                    End If
-                End If
-            End If
-            Dim hSQLFirma = ""
-            hSQL = " SELECT AvisoID, CASE WHEN [LKW_fertig] = 1 THEN 'OK' ELSE '' END AS [LKW_fertig], CASE WHEN [VerwahrungStatus] = 1 THEN 'OK' ELSE '' END AS [VerwahrungStatus],[Status],tblSendungen.LetzterMitarbeiterId,tblSendungen.LetzterMitarbeiter, LKW_Nr, VoraussichtlichesEintreffen,Dauer, Datum, AvisoEingang, Ankunft, Grenzstelle, Freigabe, Aviso.LetzterMitarbeiterId AS maId,AvisoTVHinweis  " &
-                                     " ,tblSnd_Empfaenger,AbfertigungsNr,tblSnd_Abfertigungsart_ID,tblSnd_Vorgeschrieben,tblSnd_Vorbereitet,tblSnd_Status,tblSnd_SendungID,tblSnd_Fremdspedition,tblSnd_FremdspeditionText " &
-                                     " FROM Aviso INNER JOIN tblSendungen ON AvisoID=tblSnd_AvisoID " &
-                                     " WHERE   (  Status IN (0, 3, 4, 5)  OR ( Status = 1 AND [Abgeschlossen] = 0 ))  " &
-                                            hSQLFirma & " AND  ( " & inBearbeitungSQL & ") "
-
-            Select Case cboMy_VB.CheckState
-                Case CheckState.Checked : hSQL &= " AND tblSnd_Vorgeschrieben is not null	 "
-                Case CheckState.Unchecked : hSQL &= " AND tblSnd_Vorgeschrieben is null	 "
-                    ' Case CheckState.Indeterminate : hSQL &= " AND tblSnd_Vorbereitet is not null	 "
-            End Select
-            Select Case cboMy_QS.CheckState
-                Case CheckState.Checked : hSQL &= " AND tblSnd_Vorbereitet is not null	 "
-                Case CheckState.Unchecked : hSQL &= " AND tblSnd_Vorbereitet is null	 "
-                    ' Case CheckState.Indeterminate : hSQL &= " AND tblSnd_Vorbereitet is not null	 "
-            End Select
-            If cboMy_Grenzstelle._value = "ALLE_WO" Then
-                hSQL += " AND Grenzstelle IN (SELECT [grz_Grenzstelle] FROM [tblGrenzstelle] where (grz_Warenort=1 AND (grz_Firma ='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' )) ) "
-
-            Else
-
-                If cboMy_Grenzstelle._value.Replace("ALLE_BACK", "") <> "" Then hSQL &= " AND Grenzstelle = '" & cboMy_Grenzstelle._value & "'"
-                If cboMy_Grenzstelle._value = "ALLE_BACK" Then hSQL &= " AND FilialenNr NOT IN ('7001','7002','7003') "
-
-            End If
-
-            If cbx_My_Brexit.Visible AndAlso Not cbx_My_Brexit.Checked Then hSQL &= " AND FilialenNr NOT IN ('7001','7002','7003') "
-
-            'Farbe
-            If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_MeineSND_Farbe") Then
-                Select Case btnColor.BackColor
-                    Case Color.Red
-                        hSQL &= " AND (Status = 3 ) "
-                    Case Color.Orange
-                        ' hSQL &= " AND (  (Status IN (0, 4, 5) AND cast(VoraussichtlichesEintreffen as DATE) <= cast(GETDATE() AS DATE) ) ) "
-                        hSQL &= " AND (  (Status IN (0, 4, 5) AND cast(VoraussichtlichesEintreffen as DATE) <= cast(DATEADD(DAY, " & getDaysVorschreiben(1) & ",GETDATE()) AS DATE) ) ) "
-                    Case Color.Yellow
-                        hSQL &= " AND ( (Status IN (0, 4, 5) AND cast(VoraussichtlichesEintreffen as DATE) BETWEEN cast(DATEADD(DAY," & getDaysVorschreiben(2) & ",GETDATE()) AS DATE) AND  cast(DATEADD(DAY," & getDaysVorschreiben(3) & ",GETDATE()) AS DATE) ) ) "
-                End Select
-            End If
-            ''Farbe
-            'If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_MeineSND_Farbe") Then
-            '    Select Case btnColor.BackColor
-            '        Case Color.Red
-            '            hSQL &= " AND (Status = 3 OR (Status IN (0, 3, 4, 5) AND cast(VoraussichtlichesEintreffen as DATE)<= cast(GETDATE() AS DATE) ) or VoraussichtlichesEintreffen is null) "
-            '        Case Color.Orange
-            '            hSQL &= " AND (  (Status IN (0, 4, 5) AND cast(VoraussichtlichesEintreffen as DATE) = cast(DATEADD(DAY, 1,GETDATE()) AS DATE) ) ) "
-            '        Case Color.Yellow
-            '            hSQL &= " AND ( (Status IN (0, 4, 5) AND cast(VoraussichtlichesEintreffen as DATE) BETWEEN cast(DATEADD(DAY, 2,GETDATE()) AS DATE) AND  cast(DATEADD(DAY, 3,GETDATE()) AS DATE) ) ) "
-            '    End Select
-            'End If
-
-            'hSQL &= " AND (Grenzstelle ='???' OR  Status NOT IN (1)) " ' "Freigabe" nur bei Fremde Grenze anzeigen!
-            ' Funktioniert nciht, wg. WO
-
-            hSQL &= " ORDER BY case	 " & " when [Status] =3 then 0 " & " when [Status] =1 then 5 " & " else 1 " & " END, VoraussichtlichesEintreffen, Grenzstelle,Ankunft " & If(cbx_My_LKW.Checked, "", ",tblSnd_SendungID")
-
         End If
 
         '  MsgBox(hSQL)
@@ -995,12 +848,11 @@ Public Class usrCntlHauptfenster_Suche_AVISO
         'gridAviso.DataSource = AVISOBinding.bindingSource
 
         'MsgBox(DirectCast(gridAviso.DataSource, DataTable).Rows.Count)
+
         'Grid neu designen
-
-
-        If CheckBox1.Checked Then
         gridAviso_SpaltenFestlegen()
-        End If
+
+
 
         'Tabelle Kommt/Geht bereinigen
         If gridAviso.RowCount = 0 Then
@@ -1015,7 +867,7 @@ Public Class usrCntlHauptfenster_Suche_AVISO
         '   lblAnzahl.Text = "Einträge: " & Format(VERAG_PROG_ALLGEMEIN.cGlobal.AnzahlAuswahl, "#,##0") & " ausgewählt" ' / " & Format(AnzahlAlle, "#,##0") & " gesamt"
 
         hMerkZeit = Now
-        lblZeit_aktuell.Text = "letzte Aktualisierung: " & Format(Now, "HH:mm")
+        lblZeit_aktuell.Text = "Refresh: " & Format(Now, "HH:mm")
 
 
 
@@ -1058,7 +910,7 @@ Public Class usrCntlHauptfenster_Suche_AVISO
     '    initPnlSearch()
     'End Sub
     Sub initPnlSearch()
-        MsgBox("s")
+
         If pnlSearch.Visible Then
             pnlSearch.Visible = False
             Panel1.Height -= pnlSearch.Height
@@ -1105,30 +957,31 @@ Public Class usrCntlHauptfenster_Suche_AVISO
 
 
     Private Sub Button4_Click_1(sender As Object, e As EventArgs) Handles Button4.Click
-        If CheckBox1.Checked Then
+        'If CheckBox1.Checked Then
-            toggle_LKW_SND("LKW")
+        '    toggle_LKW_SND("LKW")
-        Else
+        'Else
-            toggle_LKW_SND("SND")
+        '    toggle_LKW_SND("SND")
-        End If
+        'End If
-    End Sub
-
-    Private Sub toggle_LKW_SND(typ)
-        AVISO_TYP = typ
-        If AVISO_TYP = "LKW" Then
-            tbcntrAvisoLKW.Visible = True
-            tbcntrAvisoSND.Visible = False
-            pblSNDOptions.Visible = False
-
-        ElseIf AVISO_TYP = "SND" Then
-            tbcntrAvisoLKW.Visible = False
-            tbcntrAvisoSND.Visible = True
-            pblSNDOptions.Visible = True
-        End If
-
         Aviso_anzeigen("")
-
     End Sub
 
+    'Private Sub toggle_LKW_SND(typ)
+    '    AVISO_TYP = typ
+    '    If AVISO_TYP = "LKW" Then
+    '        tbcntrAvisoLKW.Visible = True
+    '        tbcntrAvisoSND.Visible = False
+    '        pblSNDOptions.Visible = False
+
+    '    ElseIf AVISO_TYP = "SND" Then
+    '        tbcntrAvisoLKW.Visible = False
+    '        tbcntrAvisoSND.Visible = True
+    '        pblSNDOptions.Visible = True
+    '    End If
+
+    '    Aviso_anzeigen("")
+
+    'End Sub
+
     Private Sub txtSuche_KeyDown1(sender As Object, e As PreviewKeyDownEventArgs) Handles txtSuche.PreviewKeyDown
         If e.KeyCode = Keys.Return Or e.KeyCode = Keys.Tab Then
             Aviso_anzeigen("")
@@ -1376,7 +1229,7 @@ Public Class usrCntlHauptfenster_Suche_AVISO
             Exit Sub
         End If
 
-        If cbx_My_LKW.Checked Then
+        If True Then
 
 
             Dim frmGrayOut = VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.grayoutForm()
@@ -1386,19 +1239,6 @@ Public Class usrCntlHauptfenster_Suche_AVISO
 
             PARENT_FRMHAUPTFENSTER.btnRefresh.PerformClick() 'Aviso_anzeigen("")
 
-        Else
-
-            If gridAviso.SelectedRows(0).Cells("tblSnd_SendungID").Value Is DBNull.Value Then Exit Sub
-
-            Dim SendungsId = gridAviso.SelectedRows(0).Cells("tblSnd_SendungID").Value
-            Dim AvisoID = gridAviso.SelectedRows(0).Cells("AvisoID").Value
-
-            Dim f = Func.openSnd(SendungsId, AvisoID)
-            If f IsNot Nothing Then
-                AddHandler f.FormClosed, Sub()
-                                             PARENT_FRMHAUPTFENSTER.btnRefresh.PerformClick()
-                                         End Sub
-            End If
         End If
 
         If gridAviso.SelectedRows.Count = 0 Then Exit Sub
@@ -1421,46 +1261,6 @@ Public Class usrCntlHauptfenster_Suche_AVISO
 
 
 
-    Private Sub cboMyAvisoAnzeige_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboMyAvisoAnzeige.SelectedIndexChanged, cbx_My_LKW.CheckedChanged, cbx_My_Brexit.CheckedChanged, cboMy_Grenzstelle.SelectedIndexChanged, cboMy_QS.CheckStateChanged, cboMy_VB.CheckStateChanged
-        If Grid_aktiv Then
-            'Wenn VERIMEX/T1 und cboMyAvisoAnzeige geändert --> Checkboxes richtig setzen
-            If sender Is cboMyAvisoAnzeige Then
-                If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERIMEX" Then
-                    Grid_aktiv = False
-                    If cboMyAvisoAnzeige._value = "T1" Then
-                        cboMy_QS.CheckState = CheckState.Checked
-                        cboMy_VB.CheckState = CheckState.Unchecked
-                    Else
-                        cboMy_QS.CheckState = CheckState.Indeterminate
-                        cboMy_VB.CheckState = CheckState.Indeterminate
-                    End If
-                    Grid_aktiv = True
-                End If
-            End If
-
-            'DGV anzeigen: 
-            Aviso_anzeigen("")
-        End If
-        cboMy_QS.Visible = Not cbx_My_LKW.Checked
-        cboMy_VB.Visible = Not cbx_My_LKW.Checked
-        cboMyAvisoAnzeige.Visible = Not cbx_My_LKW.Checked
-        lblMySND_Anzeige.Visible = Not cbx_My_LKW.Checked
-
-        If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_MeineSND_Farbe") Then
-            btnColor.Visible = Not cbx_My_LKW.Checked
-        Else
-            btnColor.Visible = False
-        End If
-        If cbx_My_LKW.Checked Then
-            '  lblMeineAviso.Text = "Meine Aviso:"
-            cbx_My_Brexit.Visible = False
-        Else
-            ' lblMeineAviso.Text = "Meine Sendungen:"
-            cbx_My_Brexit.Visible = True
-        End If
-    End Sub
-
-
     Private Sub cboImEx_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboImEx.SelectedIndexChanged
         If Grid_aktiv Then
             Aviso_anzeigen("")
@@ -1473,31 +1273,11 @@ Public Class usrCntlHauptfenster_Suche_AVISO
         End If
     End Sub
 
-    Private Sub Button13_Click(sender As Object, e As EventArgs) Handles btnColor.Click
+    Private Sub Button13_Click(sender As Object, e As EventArgs)
         ctxtFarben.Show(Cursor.Position)
 
     End Sub
 
-    Private Sub ToolStripMenuItem19_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem19.Click
-        btnColor.BackColor = Color.Red
-        '   meineAviso_anzeigen()
-    End Sub
-
-    Private Sub ToolStripMenuItem20_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem20.Click
-        btnColor.BackColor = Color.Orange
-        ' meineAviso_anzeigen()
-    End Sub
-
-    Private Sub ToolStripMenuItem21_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem21.Click
-        btnColor.BackColor = Color.Yellow
-        ' meineAviso_anzeigen()
-    End Sub
-
-
-    Private Sub ALLEToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ALLEToolStripMenuItem.Click
-        btnColor.BackColor = Color.White
-        '  meineAviso_anzeigen()
-    End Sub
 
 
     Function getDateVorschreiben(addDays) As Date
@@ -1959,4 +1739,5 @@ Public Class usrCntlHauptfenster_Suche_AVISO
         'pnlSearch.Visible = Not pnlSearch.Visible
         initPnlSearch()
     End Sub
+
 End Class

Aviso/usrCntlHauptfenster_Suche_SND.Designer.vb

@@ -0,0 +1,491 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class usrCntlHauptfenster_Suche_SND
+    Inherits System.Windows.Forms.UserControl
+
+    'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()>
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrCntlHauptfenster_Suche_SND))
+        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.btnDetailsuche = New System.Windows.Forms.Button()
+        Me.lblDauer = New System.Windows.Forms.Label()
+        Me.lblEintraege = New System.Windows.Forms.Label()
+        Me.cbx_My_Brexit = New System.Windows.Forms.CheckBox()
+        Me.btnColor = New System.Windows.Forms.Button()
+        Me.lblMySND_Anzeige = New System.Windows.Forms.Label()
+        Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cboMy_QS = New System.Windows.Forms.CheckBox()
+        Me.cboMy_VB = New System.Windows.Forms.CheckBox()
+        Me.lblMySnd_Grenzstelle = New System.Windows.Forms.Label()
+        Me.tbcntrAvisoSND = New System.Windows.Forms.TabControl()
+        Me.tbSndAlle = New System.Windows.Forms.TabPage()
+        Me.tbSndOffen = New System.Windows.Forms.TabPage()
+        Me.tbSndFreigegeben = New System.Windows.Forms.TabPage()
+        Me.btnNeu = New System.Windows.Forms.Button()
+        Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        Me.TimerAkte = New System.Windows.Forms.Timer(Me.components)
+        Me.ctxtFarben = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.ALLEToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem19 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem20 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem21 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.lblZeit_aktuell = New System.Windows.Forms.Label()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Panel1.SuspendLayout()
+        Me.tbcntrAvisoSND.SuspendLayout()
+        CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.ctxtFarben.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'Panel1
+        '
+        Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Panel1.Controls.Add(Me.Label1)
+        Me.Panel1.Controls.Add(Me.Button2)
+        Me.Panel1.Controls.Add(Me.Button1)
+        Me.Panel1.Controls.Add(Me.lblZeit_aktuell)
+        Me.Panel1.Controls.Add(Me.cbx_My_Brexit)
+        Me.Panel1.Controls.Add(Me.tbcntrAvisoSND)
+        Me.Panel1.Controls.Add(Me.btnDetailsuche)
+        Me.Panel1.Controls.Add(Me.btnColor)
+        Me.Panel1.Controls.Add(Me.lblDauer)
+        Me.Panel1.Controls.Add(Me.lblMySND_Anzeige)
+        Me.Panel1.Controls.Add(Me.cboMyAvisoAnzeige)
+        Me.Panel1.Controls.Add(Me.btnNeu)
+        Me.Panel1.Controls.Add(Me.cboMy_Grenzstelle)
+        Me.Panel1.Controls.Add(Me.lblEintraege)
+        Me.Panel1.Controls.Add(Me.cboMy_QS)
+        Me.Panel1.Controls.Add(Me.cboMy_VB)
+        Me.Panel1.Controls.Add(Me.lblMySnd_Grenzstelle)
+        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel1.Font = New System.Drawing.Font("Segoe UI", 9.0!)
+        Me.Panel1.Location = New System.Drawing.Point(0, 0)
+        Me.Panel1.Name = "Panel1"
+        Me.Panel1.Size = New System.Drawing.Size(1243, 76)
+        Me.Panel1.TabIndex = 3
+        '
+        'btnDetailsuche
+        '
+        Me.btnDetailsuche.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
+        Me.btnDetailsuche.FlatAppearance.BorderColor = System.Drawing.Color.Black
+        Me.btnDetailsuche.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnDetailsuche.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!)
+        Me.btnDetailsuche.ForeColor = System.Drawing.Color.White
+        Me.btnDetailsuche.ImageAlign = System.Drawing.ContentAlignment.TopRight
+        Me.btnDetailsuche.Location = New System.Drawing.Point(788, 11)
+        Me.btnDetailsuche.Margin = New System.Windows.Forms.Padding(0)
+        Me.btnDetailsuche.Name = "btnDetailsuche"
+        Me.btnDetailsuche.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
+        Me.btnDetailsuche.Size = New System.Drawing.Size(185, 27)
+        Me.btnDetailsuche.TabIndex = 39
+        Me.btnDetailsuche.Text = "Detailsuche"
+        Me.btnDetailsuche.UseVisualStyleBackColor = False
+        '
+        'lblDauer
+        '
+        Me.lblDauer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblDauer.BackColor = System.Drawing.Color.Transparent
+        Me.lblDauer.ForeColor = System.Drawing.Color.White
+        Me.lblDauer.Location = New System.Drawing.Point(974, 21)
+        Me.lblDauer.Name = "lblDauer"
+        Me.lblDauer.Size = New System.Drawing.Size(136, 17)
+        Me.lblDauer.TabIndex = 27
+        Me.lblDauer.Text = "1111123 ms"
+        Me.lblDauer.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        '
+        'lblEintraege
+        '
+        Me.lblEintraege.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblEintraege.BackColor = System.Drawing.Color.Transparent
+        Me.lblEintraege.ForeColor = System.Drawing.Color.White
+        Me.lblEintraege.Location = New System.Drawing.Point(971, 8)
+        Me.lblEintraege.Name = "lblEintraege"
+        Me.lblEintraege.Size = New System.Drawing.Size(139, 15)
+        Me.lblEintraege.TabIndex = 14
+        Me.lblEintraege.Text = "0 Einträge"
+        Me.lblEintraege.TextAlign = System.Drawing.ContentAlignment.TopRight
+        '
+        'cbx_My_Brexit
+        '
+        Me.cbx_My_Brexit.AutoSize = True
+        Me.cbx_My_Brexit.ForeColor = System.Drawing.Color.White
+        Me.cbx_My_Brexit.Location = New System.Drawing.Point(342, 6)
+        Me.cbx_My_Brexit.Name = "cbx_My_Brexit"
+        Me.cbx_My_Brexit.Size = New System.Drawing.Size(63, 19)
+        Me.cbx_My_Brexit.TabIndex = 28
+        Me.cbx_My_Brexit.Text = "BREXIT"
+        Me.cbx_My_Brexit.UseVisualStyleBackColor = True
+        Me.cbx_My_Brexit.Visible = False
+        '
+        'btnColor
+        '
+        Me.btnColor.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnColor.BackColor = System.Drawing.Color.White
+        Me.btnColor.Location = New System.Drawing.Point(937, 50)
+        Me.btnColor.Name = "btnColor"
+        Me.btnColor.Size = New System.Drawing.Size(36, 23)
+        Me.btnColor.TabIndex = 37
+        Me.btnColor.UseVisualStyleBackColor = False
+        '
+        'lblMySND_Anzeige
+        '
+        Me.lblMySND_Anzeige.AutoSize = True
+        Me.lblMySND_Anzeige.ForeColor = System.Drawing.Color.White
+        Me.lblMySND_Anzeige.Location = New System.Drawing.Point(142, 7)
+        Me.lblMySND_Anzeige.Name = "lblMySND_Anzeige"
+        Me.lblMySND_Anzeige.Size = New System.Drawing.Size(52, 15)
+        Me.lblMySND_Anzeige.TabIndex = 20
+        Me.lblMySND_Anzeige.Text = "Anzeige:"
+        '
+        'cboMyAvisoAnzeige
+        '
+        Me.cboMyAvisoAnzeige._allowedValuesFreiText = Nothing
+        Me.cboMyAvisoAnzeige._allowFreiText = False
+        Me.cboMyAvisoAnzeige._value = ""
+        Me.cboMyAvisoAnzeige.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cboMyAvisoAnzeige.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+        Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.cboMyAvisoAnzeige.FormattingEnabled = True
+        Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(200, 5)
+        Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige"
+        Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(118, 21)
+        Me.cboMyAvisoAnzeige.TabIndex = 21
+        '
+        'cboMy_Grenzstelle
+        '
+        Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing
+        Me.cboMy_Grenzstelle._allowFreiText = False
+        Me.cboMy_Grenzstelle._value = ""
+        Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+        Me.cboMy_Grenzstelle.DropDownWidth = 120
+        Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.cboMy_Grenzstelle.FormattingEnabled = True
+        Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(72, 5)
+        Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle"
+        Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21)
+        Me.cboMy_Grenzstelle.TabIndex = 26
+        '
+        'cboMy_QS
+        '
+        Me.cboMy_QS.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.cboMy_QS.AutoSize = True
+        Me.cboMy_QS.Checked = True
+        Me.cboMy_QS.CheckState = System.Windows.Forms.CheckState.Indeterminate
+        Me.cboMy_QS.ForeColor = System.Drawing.Color.White
+        Me.cboMy_QS.Location = New System.Drawing.Point(1203, 55)
+        Me.cboMy_QS.Name = "cboMy_QS"
+        Me.cboMy_QS.Size = New System.Drawing.Size(15, 14)
+        Me.cboMy_QS.TabIndex = 33
+        Me.cboMy_QS.ThreeState = True
+        Me.cboMy_QS.UseVisualStyleBackColor = True
+        '
+        'cboMy_VB
+        '
+        Me.cboMy_VB.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.cboMy_VB.AutoSize = True
+        Me.cboMy_VB.Checked = True
+        Me.cboMy_VB.CheckState = System.Windows.Forms.CheckState.Indeterminate
+        Me.cboMy_VB.ForeColor = System.Drawing.Color.White
+        Me.cboMy_VB.Location = New System.Drawing.Point(1222, 55)
+        Me.cboMy_VB.Name = "cboMy_VB"
+        Me.cboMy_VB.Size = New System.Drawing.Size(15, 14)
+        Me.cboMy_VB.TabIndex = 32
+        Me.cboMy_VB.ThreeState = True
+        Me.cboMy_VB.UseVisualStyleBackColor = True
+        '
+        'lblMySnd_Grenzstelle
+        '
+        Me.lblMySnd_Grenzstelle.AutoSize = True
+        Me.lblMySnd_Grenzstelle.ForeColor = System.Drawing.Color.White
+        Me.lblMySnd_Grenzstelle.Location = New System.Drawing.Point(4, 8)
+        Me.lblMySnd_Grenzstelle.Name = "lblMySnd_Grenzstelle"
+        Me.lblMySnd_Grenzstelle.Size = New System.Drawing.Size(67, 15)
+        Me.lblMySnd_Grenzstelle.TabIndex = 25
+        Me.lblMySnd_Grenzstelle.Text = "Grenzstelle:"
+        '
+        'tbcntrAvisoSND
+        '
+        Me.tbcntrAvisoSND.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.tbcntrAvisoSND.Controls.Add(Me.tbSndAlle)
+        Me.tbcntrAvisoSND.Controls.Add(Me.tbSndOffen)
+        Me.tbcntrAvisoSND.Controls.Add(Me.tbSndFreigegeben)
+        Me.tbcntrAvisoSND.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.tbcntrAvisoSND.ImeMode = System.Windows.Forms.ImeMode.NoControl
+        Me.tbcntrAvisoSND.ItemSize = New System.Drawing.Size(60, 30)
+        Me.tbcntrAvisoSND.Location = New System.Drawing.Point(3, 45)
+        Me.tbcntrAvisoSND.Name = "tbcntrAvisoSND"
+        Me.tbcntrAvisoSND.Padding = New System.Drawing.Point(12, 3)
+        Me.tbcntrAvisoSND.SelectedIndex = 0
+        Me.tbcntrAvisoSND.Size = New System.Drawing.Size(360, 31)
+        Me.tbcntrAvisoSND.TabIndex = 27
+        Me.tbcntrAvisoSND.Visible = False
+        '
+        'tbSndAlle
+        '
+        Me.tbSndAlle.BackColor = System.Drawing.SystemColors.ActiveBorder
+        Me.tbSndAlle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.tbSndAlle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.tbSndAlle.Location = New System.Drawing.Point(4, 34)
+        Me.tbSndAlle.Name = "tbSndAlle"
+        Me.tbSndAlle.Padding = New System.Windows.Forms.Padding(3)
+        Me.tbSndAlle.Size = New System.Drawing.Size(352, 0)
+        Me.tbSndAlle.TabIndex = 0
+        Me.tbSndAlle.Text = "Alle Sendungen"
+        '
+        'tbSndOffen
+        '
+        Me.tbSndOffen.BackColor = System.Drawing.SystemColors.ActiveBorder
+        Me.tbSndOffen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.tbSndOffen.Location = New System.Drawing.Point(4, 34)
+        Me.tbSndOffen.Name = "tbSndOffen"
+        Me.tbSndOffen.Padding = New System.Windows.Forms.Padding(3)
+        Me.tbSndOffen.Size = New System.Drawing.Size(121, 0)
+        Me.tbSndOffen.TabIndex = 1
+        Me.tbSndOffen.Text = "Offen"
+        '
+        'tbSndFreigegeben
+        '
+        Me.tbSndFreigegeben.Location = New System.Drawing.Point(4, 34)
+        Me.tbSndFreigegeben.Name = "tbSndFreigegeben"
+        Me.tbSndFreigegeben.Size = New System.Drawing.Size(121, 0)
+        Me.tbSndFreigegeben.TabIndex = 2
+        Me.tbSndFreigegeben.Text = "Freigegeben"
+        Me.tbSndFreigegeben.UseVisualStyleBackColor = True
+        '
+        'btnNeu
+        '
+        Me.btnNeu.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnNeu.Font = New System.Drawing.Font("Segoe UI", 11.0!)
+        Me.btnNeu.ForeColor = System.Drawing.Color.Black
+        Me.btnNeu.Image = CType(resources.GetObject("btnNeu.Image"), System.Drawing.Image)
+        Me.btnNeu.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnNeu.Location = New System.Drawing.Point(1116, 6)
+        Me.btnNeu.MaximumSize = New System.Drawing.Size(121, 35)
+        Me.btnNeu.Name = "btnNeu"
+        Me.btnNeu.Size = New System.Drawing.Size(121, 35)
+        Me.btnNeu.TabIndex = 32
+        Me.btnNeu.Text = "Sendung"
+        Me.btnNeu.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnNeu.UseVisualStyleBackColor = True
+        Me.btnNeu.Visible = False
+        '
+        'gridAviso
+        '
+        Me.gridAviso.AKTUALISIERUNGS_INTERVALL = -1
+        Me.gridAviso.AllowUserToAddRows = False
+        Me.gridAviso.AllowUserToDeleteRows = False
+        Me.gridAviso.AllowUserToResizeRows = False
+        DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+        Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray
+        Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable
+        DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
+        Me.gridAviso.ColumnHeadersHeight = 25
+        Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle3
+        Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.gridAviso.Location = New System.Drawing.Point(0, 76)
+        Me.gridAviso.MultiSelect = False
+        Me.gridAviso.Name = "gridAviso"
+        Me.gridAviso.ReadOnly = True
+        DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
+        Me.gridAviso.RowHeadersVisible = False
+        Me.gridAviso.RowHeadersWidth = 62
+        Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
+        DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle5
+        Me.gridAviso.RowTemplate.ReadOnly = True
+        Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.gridAviso.Size = New System.Drawing.Size(1243, 556)
+        Me.gridAviso.TabIndex = 4
+        Me.gridAviso.TabStop = False
+        '
+        'TimerAkte
+        '
+        Me.TimerAkte.Interval = 5000
+        '
+        'ctxtFarben
+        '
+        Me.ctxtFarben.ImageScalingSize = New System.Drawing.Size(24, 24)
+        Me.ctxtFarben.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ALLEToolStripMenuItem, Me.ToolStripMenuItem19, Me.ToolStripMenuItem20, Me.ToolStripMenuItem21})
+        Me.ctxtFarben.Name = "cntxt"
+        Me.ctxtFarben.Size = New System.Drawing.Size(122, 92)
+        '
+        'ALLEToolStripMenuItem
+        '
+        Me.ALLEToolStripMenuItem.Name = "ALLEToolStripMenuItem"
+        Me.ALLEToolStripMenuItem.Size = New System.Drawing.Size(121, 22)
+        Me.ALLEToolStripMenuItem.Text = "ALLE"
+        '
+        'ToolStripMenuItem19
+        '
+        Me.ToolStripMenuItem19.BackColor = System.Drawing.Color.Red
+        Me.ToolStripMenuItem19.Name = "ToolStripMenuItem19"
+        Me.ToolStripMenuItem19.Size = New System.Drawing.Size(121, 22)
+        Me.ToolStripMenuItem19.Text = "ROT"
+        '
+        'ToolStripMenuItem20
+        '
+        Me.ToolStripMenuItem20.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(0, Byte), Integer))
+        Me.ToolStripMenuItem20.Name = "ToolStripMenuItem20"
+        Me.ToolStripMenuItem20.Size = New System.Drawing.Size(121, 22)
+        Me.ToolStripMenuItem20.Text = "ORANGE"
+        '
+        'ToolStripMenuItem21
+        '
+        Me.ToolStripMenuItem21.BackColor = System.Drawing.Color.Yellow
+        Me.ToolStripMenuItem21.Name = "ToolStripMenuItem21"
+        Me.ToolStripMenuItem21.Size = New System.Drawing.Size(121, 22)
+        Me.ToolStripMenuItem21.Text = "GELB"
+        '
+        'lblZeit_aktuell
+        '
+        Me.lblZeit_aktuell.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblZeit_aktuell.AutoSize = True
+        Me.lblZeit_aktuell.ForeColor = System.Drawing.Color.White
+        Me.lblZeit_aktuell.Location = New System.Drawing.Point(668, 13)
+        Me.lblZeit_aktuell.Name = "lblZeit_aktuell"
+        Me.lblZeit_aktuell.Size = New System.Drawing.Size(101, 15)
+        Me.lblZeit_aktuell.TabIndex = 40
+        Me.lblZeit_aktuell.Text = "Refresh: 11:22 Uhr"
+        Me.lblZeit_aktuell.Visible = False
+        '
+        'Button1
+        '
+        Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button1.BackColor = System.Drawing.Color.Purple
+        Me.Button1.Font = New System.Drawing.Font("Segoe UI", 9.0!)
+        Me.Button1.ForeColor = System.Drawing.Color.White
+        Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button1.Location = New System.Drawing.Point(1109, 49)
+        Me.Button1.MaximumSize = New System.Drawing.Size(121, 35)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(88, 24)
+        Me.Button1.TabIndex = 41
+        Me.Button1.Text = "Vorschreiben"
+        Me.Button1.UseVisualStyleBackColor = False
+        '
+        'Button2
+        '
+        Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button2.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer))
+        Me.Button2.Font = New System.Drawing.Font("Segoe UI", 9.0!)
+        Me.Button2.ForeColor = System.Drawing.Color.White
+        Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button2.Location = New System.Drawing.Point(1015, 49)
+        Me.Button2.MaximumSize = New System.Drawing.Size(121, 35)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(88, 24)
+        Me.Button2.TabIndex = 42
+        Me.Button2.Text = "Abklärung"
+        Me.Button2.UseVisualStyleBackColor = False
+        '
+        'Label1
+        '
+        Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Label1.AutoSize = True
+        Me.Label1.ForeColor = System.Drawing.Color.White
+        Me.Label1.Location = New System.Drawing.Point(868, 54)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(63, 15)
+        Me.Label1.TabIndex = 43
+        Me.Label1.Text = "Prio/Stufe:"
+        '
+        'usrCntlHauptfenster_Suche_SND
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.Controls.Add(Me.gridAviso)
+        Me.Controls.Add(Me.Panel1)
+        Me.Name = "usrCntlHauptfenster_Suche_SND"
+        Me.Size = New System.Drawing.Size(1243, 632)
+        Me.Panel1.ResumeLayout(False)
+        Me.Panel1.PerformLayout()
+        Me.tbcntrAvisoSND.ResumeLayout(False)
+        CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ctxtFarben.ResumeLayout(False)
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents Panel1 As Panel
+    Friend WithEvents cbx_My_Brexit As CheckBox
+    Friend WithEvents btnColor As Button
+    Friend WithEvents lblMySND_Anzeige As Label
+    Friend WithEvents cboMyAvisoAnzeige As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents cboMy_Grenzstelle As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents cboMy_QS As CheckBox
+    Friend WithEvents cboMy_VB As CheckBox
+    Friend WithEvents lblMySnd_Grenzstelle As Label
+    Friend WithEvents tbcntrAvisoSND As TabControl
+    Friend WithEvents tbSndAlle As TabPage
+    Friend WithEvents tbSndOffen As TabPage
+    Friend WithEvents tbSndFreigegeben As TabPage
+    Friend WithEvents lblEintraege As Label
+    Friend WithEvents gridAviso As VERAG_PROG_ALLGEMEIN.MyDatagridview
+    Friend WithEvents TimerAkte As Timer
+    Friend WithEvents ctxtFarben As ContextMenuStrip
+    Friend WithEvents ALLEToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem19 As ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem20 As ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem21 As ToolStripMenuItem
+    Friend WithEvents lblDauer As Label
+    Friend WithEvents btnNeu As Button
+    Friend WithEvents btnDetailsuche As Button
+    Friend WithEvents lblZeit_aktuell As Label
+    Friend WithEvents Button2 As Button
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Label1 As Label
+End Class

Aviso/usrCntlHauptfenster_Suche_SND.resx

@@ -0,0 +1,135 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="btnNeu.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAABVSURBVEhL7c0xDgAgCENR738Ar4uDi7bEECMsdngO
+        BPzNzFolGmSbTw+zA9wlCnowouBGQQ9GroN4nELB5/4KRtEnC9wlCnowouBGQQ9G7oKVaJBtAF0U0pEO
+        zULyAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <metadata name="TimerAkte.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <metadata name="ctxtFarben.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>126, 56</value>
+  </metadata>
+</root>