neu

2021-09-07 08:31:10 +02:00
parent 2d06d935ef
commit 787491cf6b
36 changed files with 1090 additions and 631 deletions
--- a/AVISOUPDATER/AVISOUPDATER.vbproj
+++ b/AVISOUPDATER/AVISOUPDATER.vbproj
@@ -16,7 +16,7 @@
    </TargetFrameworkProfile>
  </PropertyGroup>
  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
-    <PlatformTarget>AnyCPU</PlatformTarget>
+    <PlatformTarget>x64</PlatformTarget>
    <DebugSymbols>true</DebugSymbols>
    <DebugType>full</DebugType>
    <DefineDebug>true</DefineDebug>
--- a/AVISO_CHECKIN/AVISO_CHECKIN.vbproj
+++ b/AVISO_CHECKIN/AVISO_CHECKIN.vbproj
@@ -16,7 +16,7 @@
    <Deterministic>true</Deterministic>
  </PropertyGroup>
  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
-    <PlatformTarget>AnyCPU</PlatformTarget>
+    <PlatformTarget>x64</PlatformTarget>
    <DebugSymbols>true</DebugSymbols>
    <DebugType>full</DebugType>
    <DefineDebug>true</DefineDebug>
--- a/Aviso/App.config
+++ b/Aviso/App.config
@@ -6,7 +6,8 @@
        </sectionGroup>
    </configSections>
    <connectionStrings>
-        <add name="AVISO.My.MySettings.AVISO_ConnectionString_TEST" connectionString="Data Source=192.168.0.90\DEVSQL;Initial Catalog=AVISO_new;Integrated Security=false;User ID=sa;Password=BmWr501956;" providerName="System.Data.SqlClient" />
+        <add name="AVISO.My.MySettings.AVISO_ConnectionString_TEST" connectionString="Data Source=192.168.0.90\DEVSQL;Initial Catalog=AVISO_new;Integrated Security=false;User ID=sa;Password=BmWr501956;"
            providerName="System.Data.SqlClient" />
    </connectionStrings>
    <startup>
        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7" />
--- a/Aviso/Aviso.vbproj
+++ b/Aviso/Aviso.vbproj
@@ -40,7 +40,7 @@
    <BootstrapperEnabled>true</BootstrapperEnabled>
  </PropertyGroup>
  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
-    <PlatformTarget>x86</PlatformTarget>
+    <PlatformTarget>x64</PlatformTarget>
    <DebugSymbols>true</DebugSymbols>
    <DebugType>full</DebugType>
    <DefineDebug>true</DefineDebug>
@@ -101,6 +101,13 @@
  <PropertyGroup>
    <DelaySign>false</DelaySign>
  </PropertyGroup>
  <PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|x64'">
    <PlatformTarget>x64</PlatformTarget>
    <OutputPath>bin\Debug\</OutputPath>
  </PropertyGroup>
  <PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|AnyCPU'">
    <PlatformTarget>x64</PlatformTarget>
  </PropertyGroup>
  <ItemGroup>
    <Reference Include="Accessibility" />
    <Reference Include="BouncyCastle.Crypto, Version=1.8.5.0, Culture=neutral, PublicKeyToken=0e99375e54769942, processorArchitecture=MSIL">
@@ -181,7 +188,40 @@
      <SpecificVersion>False</SpecificVersion>
      <HintPath>..\..\..\dll\itextsharp.pdfa.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.AspNetCore.Authentication">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.AspNetCore.Authentication.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.AspNetCore.Authentication.Cookies">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.AspNetCore.Authentication.Cookies.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.AspNetCore.Hosting">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.AspNetCore.Hosting.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.AspNetCore.Hosting.Abstractions">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.AspNetCore.Hosting.Abstractions.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.AspNetCore.Http">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.AspNetCore.Http.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.AspNetCore.Http.Abstractions">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.AspNetCore.Http.Abstractions.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.CSharp" />
    <Reference Include="Microsoft.Extensions.Configuration">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.Extensions.Configuration.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.Extensions.Configuration.Abstractions">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.Extensions.Configuration.Abstractions.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.Extensions.DependencyInjection">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.Extensions.DependencyInjection.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.Extensions.DependencyInjection.Abstractions">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.Extensions.DependencyInjection.Abstractions.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.Extensions.Hosting">
      <HintPath>..\..\..\dll\ASP.NET\Microsoft.Extensions.Hosting.dll</HintPath>
    </Reference>
    <Reference Include="Microsoft.Office.Interop.Excel, Version=15.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c, processorArchitecture=MSIL">
      <EmbedInteropTypes>True</EmbedInteropTypes>
    </Reference>
@@ -206,17 +246,17 @@
    <Reference Include="NumericBox">
      <HintPath>..\..\..\dll\NumericBox.dll</HintPath>
    </Reference>
-    <Reference Include="Spire.License, Version=1.3.8.46, Culture=neutral, PublicKeyToken=b1144360237c8b3f, processorArchitecture=MSIL">
+    <Reference Include="Spire.License, Version=1.4.0.46, Culture=neutral, PublicKeyToken=b1144360237c8b3f, processorArchitecture=MSIL">
      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\PDF Spire\6.10\Spire.License.dll</HintPath>
+      <HintPath>..\..\..\dll\Spire.PDF\2021\Spire.License.dll</HintPath>
    </Reference>
-    <Reference Include="Spire.Pdf, Version=6.8.5.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
+    <Reference Include="Spire.Pdf, Version=7.8.2.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\PDF Spire\6.10\Spire.Pdf.dll</HintPath>
+      <HintPath>..\..\..\dll\Spire.PDF\2021\Spire.Pdf.dll</HintPath>
    </Reference>
-    <Reference Include="Spire.PdfViewer.Forms, Version=5.8.2.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
+    <Reference Include="Spire.PdfViewer.Forms, Version=6.6.0.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\PDF Spire\6.10\Spire.PdfViewer.Forms.dll</HintPath>
+      <HintPath>..\..\..\dll\Spire.PDF\2021\Spire.PdfViewer.Forms.dll</HintPath>
    </Reference>
    <Reference Include="System" />
    <Reference Include="System.Buffers, Version=4.0.2.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
@@ -397,6 +437,12 @@
    <Compile Include="Classes\cSendungsoptions.vb" />
    <Compile Include="cProgramFunctions.vb" />
    <Compile Include="cServerClient.vb" />
    <Compile Include="cTESTT.Designer.vb">
      <DependentUpon>cTESTT.vb</DependentUpon>
    </Compile>
    <Compile Include="cTESTT.vb">
      <SubType>Form</SubType>
    </Compile>
    <Compile Include="cUpdateUpdater.vb" />
    <Compile Include="Dokumentenbeschriftung\frmPrintLayout.Designer.vb">
      <DependentUpon>frmPrintLayout.vb</DependentUpon>
@@ -1268,6 +1314,8 @@
    <None Include="Resources\abklaerungTR_Aktiv.jpg" />
    <None Include="Resources\fragezeichen1.png" />
    <None Include="Resources\AMB.png" />
    <None Include="Resources\sprinter.png" />
    <None Include="Resources\sprinter_white.png" />
    <Content Include="Resources\WLAN\RunNHide.exe">
      <CopyToOutputDirectory>Always</CopyToOutputDirectory>
    </Content>
--- a/Aviso/CHMRC.vb
+++ b/Aviso/CHMRC.vb
@@ -1,6 +1,90 @@
-Public Class CHMRC
+Imports System.Net.Http
 Imports System.Web
 Imports System
 Imports Microsoft.AspNetCore.Authentication.Cookies
 Imports Microsoft.AspNetCore.Builder
 Imports Microsoft.AspNetCore.Hosting
 Imports Microsoft.AspNetCore.Http
 Imports Microsoft.Extensions.Configuration
 Imports Microsoft.Extensions.DependencyInjection
 Imports Microsoft.Extensions.Hosting
 'Public Class Startup
 '    Public Sub New(ByVal configuration As IConfiguration)
 '        configuration = configuration
 '    End Sub
 '    Public ReadOnly Property Configuration As IConfiguration
 '    Public Sub ConfigureServices(ByVal services As IServiceCollection)
 '        services.Configure(Configuration)
 '        services.Configure(Of CookiePolicyOptions)(Function(options)
 '                                                       options.CheckConsentNeeded = Function(context) True
 '                                                       options.MinimumSameSitePolicy = SameSiteMode.None
 '                                                   End Function)
 '        services.AddSession(Function(options)
 '                                options.IdleTimeout = TimeSpan.FromSeconds(10)
 '                                options.Cookie.HttpOnly = True
 '                                options.Cookie.IsEssential = True
 '                            End Function)
 '        services.AddAuthentication(Function(options)
 '                                       options.DefaultAuthenticateScheme = CookieAuthenticationDefaults.AuthenticationScheme
 '                                       options.DefaultSignInScheme = CookieAuthenticationDefaults.AuthenticationScheme
 '                                       options.DefaultChallengeScheme = "HMRC"
 '                                   End Function).AddCookie().AddOAuth("HMRC", Function(options)
 '                                                                                  options.ClientId = Configuration("clientId")
 '                                                                                  options.ClientSecret = Configuration("clientSecret")
 '                                                                                  options.CallbackPath = New PathString(Configuration("oauthCallbackUri"))
 '                                                                                  options.Scope.Add("hello")
 '                                                                                  options.SaveTokens = True
 '                                                                                  options.AuthorizationEndpoint = Configuration("uri") & "/oauth/authorize"
 '                                                                                  options.TokenEndpoint = Configuration("uri") & "/oauth/token"
 '                                                                              End Function)
 '        services.AddRazorPages(Function(options)
 '                                   options.Conventions.AddPageRoute("/HelloWorld/Index", "")
 '                               End Function)
 '    End Sub
 '    Public Sub Configure(ByVal app As IApplicationBuilder, ByVal env As IWebHostEnvironment)
 '        If env.IsDevelopment() Then
 '            app.UseDeveloperExceptionPage()
 '        Else
 '            app.UseExceptionHandler("/Error")
 '            app.UseHsts()
 '        End If
 '        app.UseHttpsRedirection()
 '        app.UseStaticFiles()
 '        app.UseRouting()
 '        app.UseAuthorization()
 '        app.UseAuthentication()
 '        app.UseSession()
 '        app.UseCookiePolicy()
 '        app.UseEndpoints(Function(endpoints)
 '                             endpoints.MapRazorPages()
 '                             endpoints.MapControllerRoute(name:="default", pattern:="{controller=HelloWorld}/{action=Index}")
 '                         End Function)
 '    End Sub
 'End Class
 Public Class CHMRC
    Shared Sub hmrcTEST()
        'Dim client As HttpClient = HttpClientBuilder.create().build()
        'Dim request As HttpGet = New HttpGet("https://test-api.service.hmrc.gov.uk/hello/world")
        'request.addHeader("Accept", "application/vnd.hmrc.1.0+json")
        'Dim response As HttpResponse = client.execute(request)
        'Dim statusCode As Integer = response.getStatusLine().getStatusCode()
        'Dim responseBody As String = EntityUtils.toString(response.getEntity())
        Exit Sub
        Debug.WriteLine("HMRC Start")
        Dim oauth2 As Chilkat.OAuth2 = New Chilkat.OAuth2()
        Dim success As Boolean
@@ -103,7 +187,8 @@
        Debug.WriteLine(json.Emit())
        Dim fac As Chilkat.FileAccess = New Chilkat.FileAccess()
-        fac.WriteEntireTextFile("qa_data/tokens/hmrc.json", json.Emit(), "utf-8", False)
+        'fac.WriteEntireTextFile("qa_data/tokens/hmrc.json", json.Emit(), "utf-8", False)
        fac.WriteEntireTextFile("C:\Users\DEVELOPER1\Desktop\hmrc.json", json.Emit(), "utf-8", False)
    End Sub
--- a/Project/AssemblyInfo.vb
+++ b/Project/AssemblyInfo.vb
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
-<Assembly: AssemblyVersion("3.6.7.1")>
+<Assembly: AssemblyVersion("3.6.8.6")>
-<Assembly: AssemblyFileVersion("3.6.7.1")>
+<Assembly: AssemblyFileVersion("3.6.8.6")>
--- a/Project/Resources.Designer.vb
+++ b/Project/Resources.Designer.vb
@@ -22,7 +22,7 @@ Namespace My.Resources
    '''<summary>
    '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
    '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "16.0.0.0"),  _
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"),  _
     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
@@ -1239,6 +1239,26 @@ Namespace My.Resources
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property sprinter() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("sprinter", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property sprinter_white() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("sprinter_white", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        '''<summary>
        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
        '''</summary>
@@ -1489,7 +1509,7 @@ Namespace My.Resources
        End Property
        '''<summary>
-        '''  Sucht eine lokalisierte Zeichenfolge, die 3.6.7.1 ähnelt.
+        '''  Sucht eine lokalisierte Zeichenfolge, die 3.6.8.6 ähnelt.
        '''</summary>
        Friend ReadOnly Property Version() As String
            Get
--- a/Project/Resources.resx
+++ b/Project/Resources.resx
@@ -536,7 +536,7 @@
    <value>..\Resources\plus.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
  </data>
  <data name="Version" xml:space="preserve">
-    <value>3.6.7.1</value>
+    <value>3.6.8.6</value>
  </data>
  <data name="statusBtn_vorgeschrieben_Aktiv" type="System.Resources.ResXFileRef, System.Windows.Forms">
    <value>..\Resources\statusBtn_vorgeschrieben_Aktiv.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -604,4 +604,10 @@
  <data name="ATANAK_Instructions_Export_T1" type="System.Resources.ResXFileRef, System.Windows.Forms">
    <value>..\Resources\ATANAK_Instructions_Export_T1.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
  </data>
  <data name="sprinter" type="System.Resources.ResXFileRef, System.Windows.Forms">
    <value>..\Resources\sprinter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
  </data>
  <data name="sprinter_white" type="System.Resources.ResXFileRef, System.Windows.Forms">
    <value>..\Resources\sprinter_white.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
  </data>
 </root>
--- a/Project/Settings.Designer.vb
+++ b/Project/Settings.Designer.vb
@@ -15,7 +15,7 @@ Option Explicit On
 Namespace My
    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.9.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.0.2.0"),  _
     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
    Partial Friend NotInheritable Class MySettings
        Inherits Global.System.Configuration.ApplicationSettingsBase
@@ -78,17 +78,6 @@ Namespace My
            End Set
        End Property
        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString),  _
         Global.System.Configuration.DefaultSettingValueAttribute("Data Source=192.168.0.90\DEVSQL;Initial Catalog=AVISO_new;Integrated Security=fal"& _ 
            "se;User ID=sa;Password=BmWr501956;")>  _
        Public ReadOnly Property AVISO_ConnectionString_TEST() As String
            Get
                Return CType(Me("AVISO_ConnectionString_TEST"),String)
            End Get
        End Property
        <Global.System.Configuration.UserScopedSettingAttribute(),  _
         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.Configuration.DefaultSettingValueAttribute("")>  _
@@ -100,6 +89,17 @@ Namespace My
                Me("s") = value
            End Set
        End Property
        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString),  _
         Global.System.Configuration.DefaultSettingValueAttribute("Data Source=192.168.0.90\DEVSQL;Initial Catalog=AVISO_new;Integrated Security=fal"& _ 
            "se;User ID=sa;Password=BmWr501956;")>  _
        Public ReadOnly Property AVISO_ConnectionString_TEST() As String
            Get
                Return CType(Me("AVISO_ConnectionString_TEST"),String)
            End Get
        End Property
    End Class
 End Namespace
--- a/Project/Settings.settings
+++ b/Project/Settings.settings
@@ -8,16 +8,16 @@
    <Setting Name="frmMainPosition" Type="System.Drawing.Point" Scope="User">
      <Value Profile="(Default)">200, 200</Value>
    </Setting>
    <Setting Name="s" Type="System.String" Scope="User">
      <Value Profile="(Default)" />
    </Setting>
    <Setting Name="AVISO_ConnectionString_TEST" Type="(Connection string)" Scope="Application">
      <DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
-&lt;SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"&gt;
+&lt;SerializableConnectionString xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"&gt;
  &lt;ConnectionString&gt;Data Source=192.168.0.90\DEVSQL;Initial Catalog=AVISO_new;Integrated Security=false;User ID=sa;Password=BmWr501956;&lt;/ConnectionString&gt;
  &lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt;
 &lt;/SerializableConnectionString&gt;</DesignTimeValue>
      <Value Profile="(Default)">Data Source=192.168.0.90\DEVSQL;Initial Catalog=AVISO_new;Integrated Security=false;User ID=sa;Password=BmWr501956;</Value>
    </Setting>
    <Setting Name="s" Type="System.String" Scope="User">
      <Value Profile="(Default)" />
    </Setting>
  </Settings>
 </SettingsFile>
--- a/Project/license.elic.xml
+++ b/Project/license.elic.xml
@@ -1,15 +1,15 @@
 <?xml version="1.0" encoding="utf-8" standalone="yes"?>
-<License Key="Kcc8AQDam71K/TwKN8J+J66RFFuPrMAUqo5xnPNt/M3KRgFPvgBUm1KcM/ICZPXNWQdx4itZZlhQyECJlX+eIEZrG9Xv7+ZYR+Bu4EZzp4D1jBkuFk7IDX2MzPxiv1mhZYptupPef8Aw/ZL/G5vlLN3dQAhANlhRxgEROflMXhyS7Zi0I7Gkf1fYiIgFaXxnTnp0tnYIuTxtW/AQjdnoTF/x0EdCH84ELXVp/NzopJGl97hUfXguDa68anPd2RxV+hr5JnUs0/fS1uI+g6QlRsmXHrIESFZS2xF0LHpabdyDq0ugWbnkp82K0E84Y7PoHnZo/urJvFnXnmBOJec7+UykBfr5tLsAUjirHzqsvgg7hzQHZvbGWe6hw/oXKRIXl+mVlNgojO8hVMMNSh92PVgrZ6fYyGBcpeXRcDdJgzkwjxD34BiiybipxQaQaqg+ABESmvS0LeuawR3PQGbWlaGPQ0phfCOQPEZ32XBhgP+A8rNlGPK3oIpNVj4VbWnQnfhfOTwbR39zg1y3Q7bjX06i+0OgWp7uDG3oXgkZszjrcuMLnCpmBNJn8YxTv8kUcQxAi7KToEOIOoYUjkPbtddDchLepAvAF5VS1USviH44GBqJpl6DP0U/H71xfrSsY9OIOVS8460eKChYLTlxGlinfqLRbsYBbmPCmIs4HktznH/e+hwxgqggOffQgcm8ddezv3beg9p1mlatmzfMjnFreFrf6jbFp628YpakVOwXXAcz/czLeW+JChPii00TEbYTfwAT4Jd6CBGw/GoUEjuCdap0Q3u/EAAWFfEeJWe2/5yy6RSSTeD5GruiQhtYCjNXlHvmiOH9uBu5RL+tYeIHT5LC51FNsUXLRr/3XFoRju+Yy1xYME/ix5jH7zqzTxrvJDSzzOpy/Tgz4zvtW99cJYnsfNqNEKfegc3vUP8dIE/DUIcRAto0d/51FrYcDf2qRxHAHGPveImc7GnPNeut8NS5476m9iL26FWHv9O7gq6w9IUYgNThOi7HBEupPjI2/cOHdNPHo+gfvIiVDFG1jbJKs2H6CY4UQau4RW3ySoGI9FsLWacr/IKRVCi2u2rvIsxH4T5a9sdGUdaZhHMFFQTIcZcqQn6Hrff5HMe2Kv3RbxVd38w9ESqMl2T/mfbommmWB5SonvWbcm2qcThfwN+Fhcx7SzByVMPrCG+tLkj7L9UmZgyZG2FSghQY7nUDCgfH04LB6Dt84jLNhlVh1+3bbFxDawnE5Z6qDGhaRoKFmqRKxxamyCGFDekZwl9a2ORm3Tgt535Ksy/romFLiDE7K31Zf1fHxOKgCMyfH3YprEW1HXUrP1XcXtumx6OFvaEF8KVk+tUxCUigZN0QWKtlfPQv6Gm3/h/9DF0kM8Uu7LVieLjN/qmQ/38eoGjv5kyefWRWUGclIkoRoIi0PU2seG69wOhtaRgoPMhmJydMQPmw9Wvglmco3iK4VWON/ddaZmk69moUdmV3Ywez1C1DVm5M" Version="1.3">
+<License Key="dwnrAQD6L5lhoO/wj5lrUwKMO33j2gTPZ1lhuN2VFgLUXnDb8AcEWtTxaNuu4w1t8fL0DTwoP9h+VLEleF1Guf+yZ6rkI+kC+jnRp7T6GE5fsm7ux01HpyEL7a3MITHLYyNC2k+k0bfe5a3tSO1TK8KY0rDtMEBqi7AcETnYXs/ZdGbvg8325stZu4wLyrcJ/nGlh/2ZutYTyZuFbySTnEr7l4E8bP/0Du0Nplk6sKhEoccc6inKb5bLs0gJenV4vQ2cXKzWuTg3hdbfVaJahRIHiJThJHrklsJQE7WbMYAvuFXCGq/1cVr3WeqNspgqMPNVsupDxdF+skTgnTVHrxIohS6tkO+PCbtRWST92AhHpDXJdTxPcqk9pvz1RjPgu2wSgBkkU8x7g9v5M5IZDJ0hlDPYg7DnZGMfftWeeRRffnPD5wRG3snFznEfFfHv1CpXjHYjYvQdMoZVQTQKlIMy1lJQVug8AGj15FcHWFQ3JSeITQGsPMPCwbPtb5mpmpuLVRAFUYEgNx6wPgA+7T/6D3BBTzeE5izFW+vSL/87EZXzw0SSiQaYRzuOF5OJeusu6n4B6cDt1r8r9Hn31Kt7xyfelv76dXVwJGXBv4wHoW4IlzKHZue6lnNC8jLzD8j0kDONv3IaNR5F5zyPglc6wW2PfLOTAfMbfkZlmSk9UTvdum4nW+WI+aJzdu4PF+2ZyVP/FOhlAa39RaJuCIPxlHHRaIhF5cxf4u4J7ScWFJMkwxlGKf+/tyDq9P9+XrrUm41cdP4SQXNsQQz7G9pivq9c7LRU5k3Wj24CxaiKNl0JxHO1epq2XlAnQLbx4xJXEzSN7jFWyA1E99bRfteEXEDle+fgi9iK4gogIdLe4StbNjSQScVlPwJhmytvrS+kBIJZPPQ37PCpXHwghv7HbZ3IDQdHVMNjoZY52RWV/2ZR0CKXlmMmscsyaOtgfu/yHNYinIRNzKq65lrImTC+3sKWobR/TLt6jjFJ7245Sgt5QiCMEJD2/WGmsKKhCwq35pth6PqSBHLGyC3oQItwqoGoVWjP6SdPxiLf1UUeJbULg3gD/4Utlg7LYOHB2WIr2vxwHl8ASrzESuF4ollJqDDxknLiG3fUN0jO+AoFEgRo8FFqtQBJHAGPwJ6F5atrcmoK+magoQ/TiOOv/nRl2R2Zzn9oalLTC7qU2c/M76J3V7l2pU6Gpa31O05r9sn9kHMFdLTqq/cBo0joFw3czGLxHWsUOw07PoZZznYPACwl7m3sVNPCs0HBAileDcI3iROONLetxPBsHl/o6xDirK0uo+wCRI/o4kWS7v2KzBRS2Q2sypumeHUdyyipaWunfW/QlamGN6h8sKB9Wmglah/z/BG0pleMVJfS3JpjIu+HpPgSNoEumzlOtNRZwXWzTiLlhCtYjq9Ip/QeC32YH02EHv6g4IE+J+bKVRshSBvXkc06PZK/WEuYBgYkgbFR8h1KmSCq/42fuKyebvuBGrOQ4Ht0" Version="1.3">
    <Type>Runtime</Type>
    <Username>VERAG Spedition AG</Username>
    <Email>al@verag.ag</Email>
    <Organization>VERAG Spedition AG</Organization>
-    <LicensedDate>2020-08-12T00:00:00Z</LicensedDate>
+    <LicensedDate>2021-08-11T12:00:00Z</LicensedDate>
-    <ExpiredDate>2021-08-12T00:00:00Z</ExpiredDate>
+    <ExpiredDate>2022-08-11T12:00:00Z</ExpiredDate>
    <Products>
        <Product>
            <Name>Spire.PDF Platinum</Name>
-            <Version>6.5</Version>
+            <Version>7.5</Version>
            <Subscription>
                <NumberOfPermittedDeveloper>1</NumberOfPermittedDeveloper>
                <NumberOfPermittedSite>1</NumberOfPermittedSite>
--- a/Aviso/Resources/sprinter.png
+++ b/Aviso/Resources/sprinter.png
--- a/Aviso/Resources/sprinter_white.png
+++ b/Aviso/Resources/sprinter_white.png
--- a/Aviso/cTESTT.Designer.vb
+++ b/Aviso/cTESTT.Designer.vb
@@ -0,0 +1,30 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
 Partial Class cTESTT
    Inherits System.Windows.Forms.Form
    'Das Formular ü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()
        components = New System.ComponentModel.Container
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(800, 450)
        Me.Text = "cTESTT"
    End Sub
 End Class
--- a/Aviso/cTESTT.vb
+++ b/Aviso/cTESTT.vb
@@ -0,0 +1,3 @@
 Public Class cTESTT
 End Class
--- a/Aviso/frmEintragAviso.designer.vb
+++ b/Aviso/frmEintragAviso.designer.vb
@@ -72,7 +72,7 @@ Partial Class frmEintragAviso
        Me.optTelefonisch = New System.Windows.Forms.RadioButton()
        Me.Label12 = New System.Windows.Forms.Label()
        Me.cbxHandling = New System.Windows.Forms.CheckBox()
-        Me.cboGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox
+        Me.cboGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.lblAktenuebersicht = New System.Windows.Forms.Label()
        Me.grpAviso = New System.Windows.Forms.GroupBox()
        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
@@ -149,6 +149,8 @@ Partial Class frmEintragAviso
        Me.UsrCntlAviso_Vorpapiere1 = New AVISO.usrCntlAviso_Vorpapiere()
        Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.Label2 = New System.Windows.Forms.Label()
        Me.cboTransportmittelart = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.Label4 = New System.Windows.Forms.Label()
        Me.panAdmin.SuspendLayout()
        Me.grpAviso.SuspendLayout()
        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -166,10 +168,10 @@ Partial Class frmEintragAviso
        Me.btnOK.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnOK.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnOK.Location = New System.Drawing.Point(12, 650)
+        Me.btnOK.Location = New System.Drawing.Point(12, 687)
        Me.btnOK.Name = "btnOK"
        Me.btnOK.Size = New System.Drawing.Size(306, 45)
-        Me.btnOK.TabIndex = 18
+        Me.btnOK.TabIndex = 24
        Me.btnOK.Text = "OK"
        Me.btnOK.UseVisualStyleBackColor = True
        '
@@ -179,7 +181,7 @@ Partial Class frmEintragAviso
        Me.lblErfAm.Location = New System.Drawing.Point(220, 12)
        Me.lblErfAm.Name = "lblErfAm"
        Me.lblErfAm.Size = New System.Drawing.Size(59, 13)
-        Me.lblErfAm.TabIndex = 1
+        Me.lblErfAm.TabIndex = 2
        Me.lblErfAm.Text = "Erfasst am:"
        '
        'btnAbbruch
@@ -187,10 +189,10 @@ Partial Class frmEintragAviso
        Me.btnAbbruch.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.btnAbbruch.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnAbbruch.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.btnAbbruch.Location = New System.Drawing.Point(324, 650)
+        Me.btnAbbruch.Location = New System.Drawing.Point(324, 687)
        Me.btnAbbruch.Name = "btnAbbruch"
        Me.btnAbbruch.Size = New System.Drawing.Size(91, 45)
-        Me.btnAbbruch.TabIndex = 19
+        Me.btnAbbruch.TabIndex = 27
        Me.btnAbbruch.Text = "Abbruch"
        Me.btnAbbruch.UseVisualStyleBackColor = True
        '
@@ -198,40 +200,40 @@ Partial Class frmEintragAviso
        '
        Me.txtInfo.AcceptsReturn = True
        Me.txtInfo.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.txtInfo.Location = New System.Drawing.Point(424, 620)
+        Me.txtInfo.Location = New System.Drawing.Point(424, 657)
        Me.txtInfo.MaxLength = 240
        Me.txtInfo.Multiline = True
        Me.txtInfo.Name = "txtInfo"
        Me.txtInfo.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
        Me.txtInfo.Size = New System.Drawing.Size(360, 75)
-        Me.txtInfo.TabIndex = 49
+        Me.txtInfo.TabIndex = 25
        '
        'Label3
        '
        Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.Label3.AutoSize = True
-        Me.Label3.Location = New System.Drawing.Point(421, 604)
+        Me.Label3.Location = New System.Drawing.Point(421, 641)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(25, 13)
-        Me.Label3.TabIndex = 48
+        Me.Label3.TabIndex = 21
        Me.Label3.Text = "Info"
        '
        'lblFraecher
        '
        Me.lblFraecher.AutoSize = True
-        Me.lblFraecher.Location = New System.Drawing.Point(6, 199)
+        Me.lblFraecher.Location = New System.Drawing.Point(6, 230)
        Me.lblFraecher.Name = "lblFraecher"
        Me.lblFraecher.Size = New System.Drawing.Size(46, 13)
-        Me.lblFraecher.TabIndex = 24
+        Me.lblFraecher.TabIndex = 25
        Me.lblFraecher.Text = "Frächter"
        '
        'lblAvisierer
        '
        Me.lblAvisierer.AutoSize = True
-        Me.lblAvisierer.Location = New System.Drawing.Point(6, 238)
+        Me.lblAvisierer.Location = New System.Drawing.Point(6, 269)
        Me.lblAvisierer.Name = "lblAvisierer"
        Me.lblAvisierer.Size = New System.Drawing.Size(47, 13)
-        Me.lblAvisierer.TabIndex = 30
+        Me.lblAvisierer.TabIndex = 31
        Me.lblAvisierer.Text = "Avisierer"
        '
        'lblLkwKennzeichen
@@ -240,7 +242,7 @@ Partial Class frmEintragAviso
        Me.lblLkwKennzeichen.Location = New System.Drawing.Point(25, 125)
        Me.lblLkwKennzeichen.Name = "lblLkwKennzeichen"
        Me.lblLkwKennzeichen.Size = New System.Drawing.Size(48, 13)
-        Me.lblLkwKennzeichen.TabIndex = 13
+        Me.lblLkwKennzeichen.TabIndex = 11
        Me.lblLkwKennzeichen.Text = "LKW-Nr:"
        '
        'txtÄnderungen
@@ -256,7 +258,7 @@ Partial Class frmEintragAviso
        Me.txtÄnderungen.Name = "txtÄnderungen"
        Me.txtÄnderungen.ReadOnly = True
        Me.txtÄnderungen.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
-        Me.txtÄnderungen.Size = New System.Drawing.Size(360, 352)
+        Me.txtÄnderungen.Size = New System.Drawing.Size(360, 389)
        Me.txtÄnderungen.TabIndex = 13
        Me.txtÄnderungen.TabStop = False
        '
@@ -266,7 +268,7 @@ Partial Class frmEintragAviso
        Me.lblAenderungen.Location = New System.Drawing.Point(426, 232)
        Me.lblAenderungen.Name = "lblAenderungen"
        Me.lblAenderungen.Size = New System.Drawing.Size(65, 13)
-        Me.lblAenderungen.TabIndex = 10
+        Me.lblAenderungen.TabIndex = 12
        Me.lblAenderungen.Text = "Änderungen"
        '
        'dtpDatum
@@ -276,7 +278,7 @@ Partial Class frmEintragAviso
        Me.dtpDatum.Location = New System.Drawing.Point(285, 7)
        Me.dtpDatum.Name = "dtpDatum"
        Me.dtpDatum.Size = New System.Drawing.Size(130, 20)
-        Me.dtpDatum.TabIndex = 2
+        Me.dtpDatum.TabIndex = 0
        '
        'txtLKW_Nr
        '
@@ -285,7 +287,7 @@ Partial Class frmEintragAviso
        Me.txtLKW_Nr.MaxLength = 30
        Me.txtLKW_Nr.Name = "txtLKW_Nr"
        Me.txtLKW_Nr.Size = New System.Drawing.Size(162, 26)
-        Me.txtLKW_Nr.TabIndex = 18
+        Me.txtLKW_Nr.TabIndex = 15
        '
        'lblStatus
        '
@@ -335,10 +337,10 @@ Partial Class frmEintragAviso
        Me.panAdmin.Controls.Add(Me.Label8)
        Me.panAdmin.Controls.Add(Me.lblFreigabe)
        Me.panAdmin.Controls.Add(Me.lblAnkunft)
-        Me.panAdmin.Location = New System.Drawing.Point(543, 413)
+        Me.panAdmin.Location = New System.Drawing.Point(543, 450)
        Me.panAdmin.Name = "panAdmin"
        Me.panAdmin.Size = New System.Drawing.Size(253, 187)
-        Me.panAdmin.TabIndex = 20
+        Me.panAdmin.TabIndex = 18
        Me.panAdmin.Visible = False
        '
        'optVorgeschrieben
@@ -582,10 +584,10 @@ Partial Class frmEintragAviso
        '
        Me.lblGrenze.AutoSize = True
        Me.lblGrenze.ForeColor = System.Drawing.Color.Black
-        Me.lblGrenze.Location = New System.Drawing.Point(240, 125)
+        Me.lblGrenze.Location = New System.Drawing.Point(25, 171)
        Me.lblGrenze.Name = "lblGrenze"
        Me.lblGrenze.Size = New System.Drawing.Size(59, 13)
-        Me.lblGrenze.TabIndex = 16
+        Me.lblGrenze.TabIndex = 18
        Me.lblGrenze.Text = "Grenzstelle"
        '
        'dtpAvisoEingangDatum
@@ -676,10 +678,10 @@ Partial Class frmEintragAviso
        '
        Me.Label12.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.Label12.BackColor = System.Drawing.Color.Transparent
-        Me.Label12.Location = New System.Drawing.Point(421, 696)
+        Me.Label12.Location = New System.Drawing.Point(421, 733)
        Me.Label12.Name = "Label12"
        Me.Label12.Size = New System.Drawing.Size(372, 32)
-        Me.Label12.TabIndex = 52
+        Me.Label12.TabIndex = 29
        Me.Label12.Text = "Achtung: im Feld Info nur allgemeine Infos erfassen. " & Global.Microsoft.VisualBasic.ChrW(10) & "Ab Status ANKUNFT kann dies" &
    "es Infofeld nicht mehr geändert werden!"
        '
@@ -687,23 +689,26 @@ Partial Class frmEintragAviso
        '
        Me.cbxHandling.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
        Me.cbxHandling.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
-        Me.cbxHandling.Location = New System.Drawing.Point(272, 330)
+        Me.cbxHandling.Location = New System.Drawing.Point(272, 361)
        Me.cbxHandling.Name = "cbxHandling"
        Me.cbxHandling.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0)
        Me.cbxHandling.Size = New System.Drawing.Size(123, 24)
-        Me.cbxHandling.TabIndex = 45
+        Me.cbxHandling.TabIndex = 46
        Me.cbxHandling.Text = "Handling"
        Me.cbxHandling.UseVisualStyleBackColor = False
        '
        'cboGrenzstelle
        '
        Me.cboGrenzstelle._allowedValuesFreiText = Nothing
        Me.cboGrenzstelle._allowFreiText = False
        Me.cboGrenzstelle._value = ""
        Me.cboGrenzstelle.BackColor = System.Drawing.Color.White
        Me.cboGrenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cboGrenzstelle.FormattingEnabled = True
        Me.cboGrenzstelle.Items.AddRange(New Object() {"", "SUB", "SBG", "WAI", "NKD", "SFD", "NEU", "AMB", "WO_GE", "???"})
-        Me.cboGrenzstelle.Location = New System.Drawing.Point(243, 139)
+        Me.cboGrenzstelle.Location = New System.Drawing.Point(28, 185)
        Me.cboGrenzstelle.Name = "cboGrenzstelle"
        Me.cboGrenzstelle.Size = New System.Drawing.Size(74, 28)
        Me.cboGrenzstelle.TabIndex = 20
@@ -715,12 +720,15 @@ Partial Class frmEintragAviso
        Me.lblAktenuebersicht.Location = New System.Drawing.Point(12, 9)
        Me.lblAktenuebersicht.Name = "lblAktenuebersicht"
        Me.lblAktenuebersicht.Size = New System.Drawing.Size(130, 20)
-        Me.lblAktenuebersicht.TabIndex = 0
+        Me.lblAktenuebersicht.TabIndex = 1
        Me.lblAktenuebersicht.Text = "Aktenübersicht"
        '
        'grpAviso
        '
        Me.grpAviso.Controls.Add(Me.cboTransportmittelart)
        Me.grpAviso.Controls.Add(Me.Label4)
        Me.grpAviso.Controls.Add(Me.PictureBox1)
        Me.grpAviso.Controls.Add(Me.Button1)
        Me.grpAviso.Controls.Add(Me.lblErr_KdNr)
        Me.grpAviso.Controls.Add(Me.Button5)
        Me.grpAviso.Controls.Add(Me.lblErrVorraussuchtlEintreffen)
@@ -749,7 +757,6 @@ Partial Class frmEintragAviso
        Me.grpAviso.Controls.Add(Me.lblErr_Frächter)
        Me.grpAviso.Controls.Add(Me.lblErr_LKW)
        Me.grpAviso.Controls.Add(Me.lblErr_Grenzstelle)
        Me.grpAviso.Controls.Add(Me.Button1)
        Me.grpAviso.Controls.Add(Me.cbxHandling)
        Me.grpAviso.Controls.Add(Me.cboGrenzstelle)
        Me.grpAviso.Controls.Add(Me.Label10)
@@ -771,8 +778,8 @@ Partial Class frmEintragAviso
        Me.grpAviso.Controls.Add(Me.pnl)
        Me.grpAviso.Location = New System.Drawing.Point(12, 49)
        Me.grpAviso.Name = "grpAviso"
-        Me.grpAviso.Size = New System.Drawing.Size(403, 406)
+        Me.grpAviso.Size = New System.Drawing.Size(403, 434)
-        Me.grpAviso.TabIndex = 5
+        Me.grpAviso.TabIndex = 7
        Me.grpAviso.TabStop = False
        Me.grpAviso.Text = "Aviso"
        '
@@ -790,19 +797,18 @@ Partial Class frmEintragAviso
        '
        Me.lblErr_KdNr.AutoSize = True
        Me.lblErr_KdNr.ForeColor = System.Drawing.Color.Red
-        Me.lblErr_KdNr.Location = New System.Drawing.Point(130, 238)
+        Me.lblErr_KdNr.Location = New System.Drawing.Point(130, 269)
        Me.lblErr_KdNr.Name = "lblErr_KdNr"
        Me.lblErr_KdNr.Size = New System.Drawing.Size(136, 13)
-        Me.lblErr_KdNr.TabIndex = 32
+        Me.lblErr_KdNr.TabIndex = 33
        Me.lblErr_KdNr.Text = "Kunden-Nummer eingeben!"
        Me.lblErr_KdNr.Visible = False
        '
        'Button5
        '
        Me.Button5.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
-        Me.Button5.Location = New System.Drawing.Point(272, 47)
+        Me.Button5.Location = New System.Drawing.Point(272, 48)
        Me.Button5.Name = "Button5"
        Me.Button5.Size = New System.Drawing.Size(119, 21)
        Me.Button5.TabIndex = 7
@@ -824,19 +830,19 @@ Partial Class frmEintragAviso
        'txtAvisiererAuftragsNr
        '
        Me.txtAvisiererAuftragsNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
-        Me.txtAvisiererAuftragsNr.Location = New System.Drawing.Point(9, 370)
+        Me.txtAvisiererAuftragsNr.Location = New System.Drawing.Point(9, 401)
        Me.txtAvisiererAuftragsNr.MaxLength = 30
        Me.txtAvisiererAuftragsNr.Name = "txtAvisiererAuftragsNr"
        Me.txtAvisiererAuftragsNr.Size = New System.Drawing.Size(388, 20)
-        Me.txtAvisiererAuftragsNr.TabIndex = 47
+        Me.txtAvisiererAuftragsNr.TabIndex = 48
        '
        'lblAvisiererAtrNr
        '
        Me.lblAvisiererAtrNr.AutoSize = True
-        Me.lblAvisiererAtrNr.Location = New System.Drawing.Point(6, 356)
+        Me.lblAvisiererAtrNr.Location = New System.Drawing.Point(6, 387)
        Me.lblAvisiererAtrNr.Name = "lblAvisiererAtrNr"
        Me.lblAvisiererAtrNr.Size = New System.Drawing.Size(106, 13)
-        Me.lblAvisiererAtrNr.TabIndex = 46
+        Me.lblAvisiererAtrNr.TabIndex = 47
        Me.lblAvisiererAtrNr.Text = "Avisierer-AuftragsNr.:"
        '
        'kdAuftraggeber
@@ -857,12 +863,12 @@ Partial Class frmEintragAviso
        Me.kdAuftraggeber.KdNr = "-1"
        Me.kdAuftraggeber.kdNrField = Nothing
        Me.kdAuftraggeber.KdNrNullInt = Nothing
-        Me.kdAuftraggeber.Location = New System.Drawing.Point(9, 293)
+        Me.kdAuftraggeber.Location = New System.Drawing.Point(9, 324)
        Me.kdAuftraggeber.Name = "kdAuftraggeber"
        Me.kdAuftraggeber.nurAktive = False
        Me.kdAuftraggeber.searchActive = True
        Me.kdAuftraggeber.Size = New System.Drawing.Size(343, 20)
-        Me.kdAuftraggeber.TabIndex = 41
+        Me.kdAuftraggeber.TabIndex = 42
        Me.kdAuftraggeber.TIMER_SEARCH = True
        Me.kdAuftraggeber.usrcntl = Nothing
        Me.kdAuftraggeber.Visible = False
@@ -885,12 +891,12 @@ Partial Class frmEintragAviso
        Me.kdAvisierer.KdNr = "-1"
        Me.kdAvisierer.kdNrField = Nothing
        Me.kdAvisierer.KdNrNullInt = Nothing
-        Me.kdAvisierer.Location = New System.Drawing.Point(9, 254)
+        Me.kdAvisierer.Location = New System.Drawing.Point(9, 285)
        Me.kdAvisierer.Name = "kdAvisierer"
        Me.kdAvisierer.nurAktive = False
        Me.kdAvisierer.searchActive = True
        Me.kdAvisierer.Size = New System.Drawing.Size(343, 20)
-        Me.kdAvisierer.TabIndex = 35
+        Me.kdAvisierer.TabIndex = 36
        Me.kdAvisierer.TIMER_SEARCH = True
        Me.kdAvisierer.usrcntl = Nothing
        '
@@ -912,12 +918,12 @@ Partial Class frmEintragAviso
        Me.kdFrächter.KdNr = "-1"
        Me.kdFrächter.kdNrField = Nothing
        Me.kdFrächter.KdNrNullInt = Nothing
-        Me.kdFrächter.Location = New System.Drawing.Point(9, 215)
+        Me.kdFrächter.Location = New System.Drawing.Point(9, 246)
        Me.kdFrächter.Name = "kdFrächter"
        Me.kdFrächter.nurAktive = False
        Me.kdFrächter.searchActive = True
        Me.kdFrächter.Size = New System.Drawing.Size(343, 20)
-        Me.kdFrächter.TabIndex = 27
+        Me.kdFrächter.TabIndex = 28
        Me.kdFrächter.TIMER_SEARCH = True
        Me.kdFrächter.usrcntl = Nothing
        '
@@ -927,10 +933,10 @@ Partial Class frmEintragAviso
        Me.Button4.FlatAppearance.BorderSize = 0
        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button4.Image = Global.AVISO.My.Resources.Resources.person_add
-        Me.Button4.Location = New System.Drawing.Point(377, 211)
+        Me.Button4.Location = New System.Drawing.Point(377, 242)
        Me.Button4.Name = "Button4"
        Me.Button4.Size = New System.Drawing.Size(25, 25)
-        Me.Button4.TabIndex = 29
+        Me.Button4.TabIndex = 30
        Me.Button4.TabStop = False
        Me.Button4.Tag = "Kunde hinzufügen"
        Me.Button4.TextAlign = System.Drawing.ContentAlignment.BottomCenter
@@ -961,7 +967,7 @@ Partial Class frmEintragAviso
        Me.sbLkwNationalitaet.SQL_SELECT = Nothing
        Me.sbLkwNationalitaet.SQL_WHERE = Nothing
        Me.sbLkwNationalitaet.SQL_WhereParamList = Nothing
-        Me.sbLkwNationalitaet.TabIndex = 19
+        Me.sbLkwNationalitaet.TabIndex = 16
        Me.sbLkwNationalitaet.usrcntl = Nothing
        '
        'lblNat
@@ -970,17 +976,17 @@ Partial Class frmEintragAviso
        Me.lblNat.Location = New System.Drawing.Point(187, 125)
        Me.lblNat.Name = "lblNat"
        Me.lblNat.Size = New System.Drawing.Size(27, 13)
-        Me.lblNat.TabIndex = 15
+        Me.lblNat.TabIndex = 13
        Me.lblNat.Text = "Nat."
        '
        'txtFahrerHandy
        '
        Me.txtFahrerHandy.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
-        Me.txtFahrerHandy.Location = New System.Drawing.Point(24, 332)
+        Me.txtFahrerHandy.Location = New System.Drawing.Point(24, 363)
        Me.txtFahrerHandy.MaxLength = 30
        Me.txtFahrerHandy.Name = "txtFahrerHandy"
        Me.txtFahrerHandy.Size = New System.Drawing.Size(234, 20)
-        Me.txtFahrerHandy.TabIndex = 44
+        Me.txtFahrerHandy.TabIndex = 45
        '
        'Button2
        '
@@ -988,10 +994,10 @@ Partial Class frmEintragAviso
        Me.Button2.FlatAppearance.BorderSize = 0
        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button2.Image = Global.AVISO.My.Resources.Resources.person_add
-        Me.Button2.Location = New System.Drawing.Point(377, 251)
+        Me.Button2.Location = New System.Drawing.Point(377, 282)
        Me.Button2.Name = "Button2"
        Me.Button2.Size = New System.Drawing.Size(25, 24)
-        Me.Button2.TabIndex = 37
+        Me.Button2.TabIndex = 38
        Me.Button2.TabStop = False
        Me.Button2.Tag = "Kunde hinzufügen"
        Me.Button2.TextAlign = System.Drawing.ContentAlignment.BottomCenter
@@ -1002,7 +1008,7 @@ Partial Class frmEintragAviso
        '
        Me.pic.BackgroundImage = Global.AVISO.My.Resources.Resources.handy
        Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
-        Me.pic.Location = New System.Drawing.Point(5, 332)
+        Me.pic.Location = New System.Drawing.Point(5, 363)
        Me.pic.Name = "pic"
        Me.pic.Size = New System.Drawing.Size(20, 20)
        Me.pic.TabIndex = 40
@@ -1011,19 +1017,19 @@ Partial Class frmEintragAviso
        'lblFahrerHandyNr
        '
        Me.lblFahrerHandyNr.AutoSize = True
-        Me.lblFahrerHandyNr.Location = New System.Drawing.Point(6, 318)
+        Me.lblFahrerHandyNr.Location = New System.Drawing.Point(6, 349)
        Me.lblFahrerHandyNr.Name = "lblFahrerHandyNr"
        Me.lblFahrerHandyNr.Size = New System.Drawing.Size(116, 13)
-        Me.lblFahrerHandyNr.TabIndex = 43
+        Me.lblFahrerHandyNr.TabIndex = 44
        Me.lblFahrerHandyNr.Text = "Fahrer Handy-Nummer:"
        '
        'cbxFrächterUnbekannt
        '
        Me.cbxFrächterUnbekannt.AutoSize = True
-        Me.cbxFrächterUnbekannt.Location = New System.Drawing.Point(122, 198)
+        Me.cbxFrächterUnbekannt.Location = New System.Drawing.Point(122, 229)
        Me.cbxFrächterUnbekannt.Name = "cbxFrächterUnbekannt"
        Me.cbxFrächterUnbekannt.Size = New System.Drawing.Size(104, 17)
-        Me.cbxFrächterUnbekannt.TabIndex = 25
+        Me.cbxFrächterUnbekannt.TabIndex = 26
        Me.cbxFrächterUnbekannt.Text = "noch unbekannt"
        Me.cbxFrächterUnbekannt.UseVisualStyleBackColor = True
        Me.cbxFrächterUnbekannt.Visible = False
@@ -1035,10 +1041,10 @@ Partial Class frmEintragAviso
        Me.btnAuftraggeber.FlatAppearance.BorderSize = 0
        Me.btnAuftraggeber.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnAuftraggeber.Image = CType(resources.GetObject("btnAuftraggeber.Image"), System.Drawing.Image)
-        Me.btnAuftraggeber.Location = New System.Drawing.Point(352, 289)
+        Me.btnAuftraggeber.Location = New System.Drawing.Point(352, 320)
        Me.btnAuftraggeber.Name = "btnAuftraggeber"
        Me.btnAuftraggeber.Size = New System.Drawing.Size(25, 25)
-        Me.btnAuftraggeber.TabIndex = 42
+        Me.btnAuftraggeber.TabIndex = 43
        Me.btnAuftraggeber.TabStop = False
        Me.btnAuftraggeber.Tag = "Kunde hinzufügen"
        Me.btnAuftraggeber.TextAlign = System.Drawing.ContentAlignment.BottomCenter
@@ -1053,10 +1059,10 @@ Partial Class frmEintragAviso
        Me.btnAvisiererKd.FlatAppearance.BorderSize = 0
        Me.btnAvisiererKd.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnAvisiererKd.Image = CType(resources.GetObject("btnAvisiererKd.Image"), System.Drawing.Image)
-        Me.btnAvisiererKd.Location = New System.Drawing.Point(352, 250)
+        Me.btnAvisiererKd.Location = New System.Drawing.Point(352, 281)
        Me.btnAvisiererKd.Name = "btnAvisiererKd"
        Me.btnAvisiererKd.Size = New System.Drawing.Size(25, 25)
-        Me.btnAvisiererKd.TabIndex = 36
+        Me.btnAvisiererKd.TabIndex = 37
        Me.btnAvisiererKd.TabStop = False
        Me.btnAvisiererKd.Tag = "Kunde hinzufügen"
        Me.btnAvisiererKd.TextAlign = System.Drawing.ContentAlignment.BottomCenter
@@ -1070,10 +1076,10 @@ Partial Class frmEintragAviso
        Me.btnFraechterKd.FlatAppearance.BorderSize = 0
        Me.btnFraechterKd.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnFraechterKd.Image = CType(resources.GetObject("btnFraechterKd.Image"), System.Drawing.Image)
-        Me.btnFraechterKd.Location = New System.Drawing.Point(352, 211)
+        Me.btnFraechterKd.Location = New System.Drawing.Point(352, 242)
        Me.btnFraechterKd.Name = "btnFraechterKd"
        Me.btnFraechterKd.Size = New System.Drawing.Size(25, 25)
-        Me.btnFraechterKd.TabIndex = 28
+        Me.btnFraechterKd.TabIndex = 29
        Me.btnFraechterKd.TabStop = False
        Me.btnFraechterKd.Tag = "Kunde hinzufügen"
        Me.btnFraechterKd.TextAlign = System.Drawing.ContentAlignment.BottomCenter
@@ -1084,10 +1090,10 @@ Partial Class frmEintragAviso
        '
        Me.lblErrImex.AutoSize = True
        Me.lblErrImex.ForeColor = System.Drawing.Color.Red
-        Me.lblErrImex.Location = New System.Drawing.Point(236, 109)
+        Me.lblErrImex.Location = New System.Drawing.Point(72, 217)
        Me.lblErrImex.Name = "lblErrImex"
        Me.lblErrImex.Size = New System.Drawing.Size(119, 13)
-        Me.lblErrImex.TabIndex = 11
+        Me.lblErrImex.TabIndex = 24
        Me.lblErrImex.Text = "Import/Export angeben!"
        Me.lblErrImex.Visible = False
        '
@@ -1099,7 +1105,7 @@ Partial Class frmEintragAviso
        Me.cboImEx.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cboImEx.FormattingEnabled = True
        Me.cboImEx.Items.AddRange(New Object() {"", "IMPORT", "EXPORT"})
-        Me.cboImEx.Location = New System.Drawing.Point(323, 139)
+        Me.cboImEx.Location = New System.Drawing.Point(108, 185)
        Me.cboImEx.Name = "cboImEx"
        Me.cboImEx.Size = New System.Drawing.Size(79, 28)
        Me.cboImEx.TabIndex = 21
@@ -1109,10 +1115,10 @@ Partial Class frmEintragAviso
        '
        Me.Label1.AutoSize = True
        Me.Label1.ForeColor = System.Drawing.Color.Black
-        Me.Label1.Location = New System.Drawing.Point(320, 125)
+        Me.Label1.Location = New System.Drawing.Point(105, 171)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(35, 13)
-        Me.Label1.TabIndex = 17
+        Me.Label1.TabIndex = 19
        Me.Label1.Text = "Im/Ex"
        Me.Label1.Visible = False
        '
@@ -1131,10 +1137,10 @@ Partial Class frmEintragAviso
        '
        Me.lblErr_Avisierer.AutoSize = True
        Me.lblErr_Avisierer.ForeColor = System.Drawing.Color.Red
-        Me.lblErr_Avisierer.Location = New System.Drawing.Point(194, 238)
+        Me.lblErr_Avisierer.Location = New System.Drawing.Point(194, 269)
        Me.lblErr_Avisierer.Name = "lblErr_Avisierer"
        Me.lblErr_Avisierer.Size = New System.Drawing.Size(97, 13)
-        Me.lblErr_Avisierer.TabIndex = 33
+        Me.lblErr_Avisierer.TabIndex = 34
        Me.lblErr_Avisierer.Text = "Avisierer eingeben!"
        Me.lblErr_Avisierer.Visible = False
        '
@@ -1142,10 +1148,10 @@ Partial Class frmEintragAviso
        '
        Me.lblErr_Frächter.AutoSize = True
        Me.lblErr_Frächter.ForeColor = System.Drawing.Color.Red
-        Me.lblErr_Frächter.Location = New System.Drawing.Point(92, 238)
+        Me.lblErr_Frächter.Location = New System.Drawing.Point(92, 269)
        Me.lblErr_Frächter.Name = "lblErr_Frächter"
        Me.lblErr_Frächter.Size = New System.Drawing.Size(96, 13)
-        Me.lblErr_Frächter.TabIndex = 31
+        Me.lblErr_Frächter.TabIndex = 32
        Me.lblErr_Frächter.Text = "Frächter eingeben!"
        Me.lblErr_Frächter.Visible = False
        '
@@ -1156,7 +1162,7 @@ Partial Class frmEintragAviso
        Me.lblErr_LKW.Location = New System.Drawing.Point(75, 125)
        Me.lblErr_LKW.Name = "lblErr_LKW"
        Me.lblErr_LKW.Size = New System.Drawing.Size(95, 13)
-        Me.lblErr_LKW.TabIndex = 14
+        Me.lblErr_LKW.TabIndex = 12
        Me.lblErr_LKW.Text = "LKW-Nr eingeben!"
        Me.lblErr_LKW.Visible = False
        '
@@ -1164,10 +1170,10 @@ Partial Class frmEintragAviso
        '
        Me.lblErr_Grenzstelle.AutoSize = True
        Me.lblErr_Grenzstelle.ForeColor = System.Drawing.Color.Red
-        Me.lblErr_Grenzstelle.Location = New System.Drawing.Point(157, 109)
+        Me.lblErr_Grenzstelle.Location = New System.Drawing.Point(13, 217)
        Me.lblErr_Grenzstelle.Name = "lblErr_Grenzstelle"
        Me.lblErr_Grenzstelle.Size = New System.Drawing.Size(109, 13)
-        Me.lblErr_Grenzstelle.TabIndex = 10
+        Me.lblErr_Grenzstelle.TabIndex = 23
        Me.lblErr_Grenzstelle.Text = "Grenzstelle eingeben!"
        Me.lblErr_Grenzstelle.Visible = False
        '
@@ -1176,10 +1182,10 @@ Partial Class frmEintragAviso
        Me.Button1.FlatAppearance.BorderSize = 0
        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button1.Image = CType(resources.GetObject("Button1.Image"), System.Drawing.Image)
-        Me.Button1.Location = New System.Drawing.Point(360, 149)
+        Me.Button1.Location = New System.Drawing.Point(357, 85)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(37, 20)
-        Me.Button1.TabIndex = 22
+        Me.Button1.TabIndex = 10
        Me.Button1.UseVisualStyleBackColor = True
        Me.Button1.Visible = False
        '
@@ -1189,20 +1195,20 @@ Partial Class frmEintragAviso
        Me.lblAtrAvis.Cursor = System.Windows.Forms.Cursors.Hand
        Me.lblAtrAvis.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.lblAtrAvis.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.lblAtrAvis.Location = New System.Drawing.Point(296, 278)
+        Me.lblAtrAvis.Location = New System.Drawing.Point(296, 309)
        Me.lblAtrAvis.Name = "lblAtrAvis"
        Me.lblAtrAvis.Size = New System.Drawing.Size(56, 13)
-        Me.lblAtrAvis.TabIndex = 40
+        Me.lblAtrAvis.TabIndex = 41
        Me.lblAtrAvis.Text = "= Avisierer"
        Me.lblAtrAvis.Visible = False
        '
        'lblAtr
        '
        Me.lblAtr.AutoSize = True
-        Me.lblAtr.Location = New System.Drawing.Point(6, 278)
+        Me.lblAtr.Location = New System.Drawing.Point(6, 309)
        Me.lblAtr.Name = "lblAtr"
        Me.lblAtr.Size = New System.Drawing.Size(71, 13)
-        Me.lblAtr.TabIndex = 38
+        Me.lblAtr.TabIndex = 39
        Me.lblAtr.Text = "Auftraggeber:"
        Me.lblAtr.Visible = False
        '
@@ -1212,19 +1218,19 @@ Partial Class frmEintragAviso
        Me.Label17.Cursor = System.Windows.Forms.Cursors.Hand
        Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label17.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.Label17.Location = New System.Drawing.Point(297, 238)
+        Me.Label17.Location = New System.Drawing.Point(297, 269)
        Me.Label17.Name = "Label17"
        Me.Label17.Size = New System.Drawing.Size(55, 13)
-        Me.Label17.TabIndex = 34
+        Me.Label17.TabIndex = 35
        Me.Label17.Text = "= Frächter"
        '
        'cbxAuftraggeberfurAlleSendungen
        '
        Me.cbxAuftraggeberfurAlleSendungen.AutoSize = True
-        Me.cbxAuftraggeberfurAlleSendungen.Location = New System.Drawing.Point(122, 276)
+        Me.cbxAuftraggeberfurAlleSendungen.Location = New System.Drawing.Point(122, 307)
        Me.cbxAuftraggeberfurAlleSendungen.Name = "cbxAuftraggeberfurAlleSendungen"
        Me.cbxAuftraggeberfurAlleSendungen.Size = New System.Drawing.Size(194, 17)
-        Me.cbxAuftraggeberfurAlleSendungen.TabIndex = 39
+        Me.cbxAuftraggeberfurAlleSendungen.TabIndex = 40
        Me.cbxAuftraggeberfurAlleSendungen.Text = "= Auftraggeber (für alle Sendungen)"
        Me.cbxAuftraggeberfurAlleSendungen.UseVisualStyleBackColor = True
        '
@@ -1234,10 +1240,10 @@ Partial Class frmEintragAviso
        Me.Label22.Cursor = System.Windows.Forms.Cursors.Hand
        Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label22.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.Label22.Location = New System.Drawing.Point(296, 199)
+        Me.Label22.Location = New System.Drawing.Point(296, 230)
        Me.Label22.Name = "Label22"
        Me.Label22.Size = New System.Drawing.Size(56, 13)
-        Me.Label22.TabIndex = 26
+        Me.Label22.TabIndex = 27
        Me.Label22.Text = "= Avisierer"
        '
        'lblVoraussEintreff
@@ -1264,23 +1270,23 @@ Partial Class frmEintragAviso
        'pnl
        '
        Me.pnl.BackColor = System.Drawing.Color.PapayaWhip
        Me.pnl.Controls.Add(Me.cbxWarenort)
        Me.pnl.Controls.Add(Me.txtBestimmungszollstelle)
        Me.pnl.Controls.Add(Me.cbxWarenort)
        Me.pnl.Controls.Add(Me.lblZA)
-        Me.pnl.Location = New System.Drawing.Point(0, 170)
+        Me.pnl.Location = New System.Drawing.Point(193, 176)
        Me.pnl.Name = "pnl"
-        Me.pnl.Size = New System.Drawing.Size(402, 24)
+        Me.pnl.Size = New System.Drawing.Size(204, 40)
-        Me.pnl.TabIndex = 23
+        Me.pnl.TabIndex = 22
        Me.pnl.Visible = False
        '
        'cbxWarenort
        '
        Me.cbxWarenort.AutoSize = True
        Me.cbxWarenort.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
-        Me.cbxWarenort.Location = New System.Drawing.Point(321, 4)
+        Me.cbxWarenort.Location = New System.Drawing.Point(134, 2)
        Me.cbxWarenort.Name = "cbxWarenort"
        Me.cbxWarenort.Size = New System.Drawing.Size(70, 17)
-        Me.cbxWarenort.TabIndex = 2
+        Me.cbxWarenort.TabIndex = 1
        Me.cbxWarenort.Text = "Warenort"
        Me.cbxWarenort.UseVisualStyleBackColor = True
        '
@@ -1298,22 +1304,22 @@ Partial Class frmEintragAviso
        Me.txtBestimmungszollstelle.INVISIBLE_COLUMNS = Nothing
        Me.txtBestimmungszollstelle.key_visible = False
        Me.txtBestimmungszollstelle.KEYPARAM = Nothing
-        Me.txtBestimmungszollstelle.Location = New System.Drawing.Point(52, 2)
+        Me.txtBestimmungszollstelle.Location = New System.Drawing.Point(4, 17)
        Me.txtBestimmungszollstelle.MaxLength = 50
        Me.txtBestimmungszollstelle.Name = "txtBestimmungszollstelle"
        Me.txtBestimmungszollstelle.searchActive = True
-        Me.txtBestimmungszollstelle.Size = New System.Drawing.Size(265, 20)
+        Me.txtBestimmungszollstelle.Size = New System.Drawing.Size(197, 20)
        Me.txtBestimmungszollstelle.SQL_ORDER_BY = Nothing
        Me.txtBestimmungszollstelle.SQL_SELECT = Nothing
        Me.txtBestimmungszollstelle.SQL_WHERE = Nothing
        Me.txtBestimmungszollstelle.SQL_WhereParamList = Nothing
-        Me.txtBestimmungszollstelle.TabIndex = 1
+        Me.txtBestimmungszollstelle.TabIndex = 2
        Me.txtBestimmungszollstelle.usrcntl = Nothing
        '
        'lblZA
        '
        Me.lblZA.AutoSize = True
-        Me.lblZA.Location = New System.Drawing.Point(6, 5)
+        Me.lblZA.Location = New System.Drawing.Point(1, 3)
        Me.lblZA.Name = "lblZA"
        Me.lblZA.Size = New System.Drawing.Size(44, 13)
        Me.lblZA.TabIndex = 0
@@ -1327,7 +1333,7 @@ Partial Class frmEintragAviso
        Me.btnAbsSrch.Location = New System.Drawing.Point(447, 411)
        Me.btnAbsSrch.Name = "btnAbsSrch"
        Me.btnAbsSrch.Size = New System.Drawing.Size(37, 20)
-        Me.btnAbsSrch.TabIndex = 12
+        Me.btnAbsSrch.TabIndex = 16
        Me.btnAbsSrch.UseVisualStyleBackColor = True
        Me.btnAbsSrch.Visible = False
        '
@@ -1337,21 +1343,21 @@ Partial Class frmEintragAviso
        Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.Transparent
        Me.UsrCntlTestsystem1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.UsrCntlTestsystem1.ForeColor = System.Drawing.Color.Red
-        Me.UsrCntlTestsystem1.Location = New System.Drawing.Point(464, 658)
+        Me.UsrCntlTestsystem1.Location = New System.Drawing.Point(464, 695)
        Me.UsrCntlTestsystem1.Margin = New System.Windows.Forms.Padding(5, 6, 5, 6)
        Me.UsrCntlTestsystem1.Name = "UsrCntlTestsystem1"
        Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28)
-        Me.UsrCntlTestsystem1.TabIndex = 51
+        Me.UsrCntlTestsystem1.TabIndex = 28
        '
        'lblErrFmZollKdNr
        '
        Me.lblErrFmZollKdNr.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.lblErrFmZollKdNr.AutoSize = True
        Me.lblErrFmZollKdNr.ForeColor = System.Drawing.Color.Red
-        Me.lblErrFmZollKdNr.Location = New System.Drawing.Point(591, 636)
+        Me.lblErrFmZollKdNr.Location = New System.Drawing.Point(591, 673)
        Me.lblErrFmZollKdNr.Name = "lblErrFmZollKdNr"
        Me.lblErrFmZollKdNr.Size = New System.Drawing.Size(156, 26)
-        Me.lblErrFmZollKdNr.TabIndex = 50
+        Me.lblErrFmZollKdNr.TabIndex = 26
        Me.lblErrFmZollKdNr.Text = "Wenn möglich bitte die FM-Zoll " & Global.Microsoft.VisualBasic.ChrW(10) & "Zuordnung mit KdNr eintragen!"
        Me.lblErrFmZollKdNr.Visible = False
        '
@@ -1363,7 +1369,7 @@ Partial Class frmEintragAviso
        Me.grp.Location = New System.Drawing.Point(483, 455)
        Me.grp.Name = "grp"
        Me.grp.Size = New System.Drawing.Size(98, 67)
-        Me.grp.TabIndex = 17
+        Me.grp.TabIndex = 19
        Me.grp.TabStop = False
        Me.grp.Visible = False
        '
@@ -1374,7 +1380,7 @@ Partial Class frmEintragAviso
        Me.txtDyRef.MaxLength = 30
        Me.txtDyRef.Name = "txtDyRef"
        Me.txtDyRef.Size = New System.Drawing.Size(234, 20)
-        Me.txtDyRef.TabIndex = 16
+        Me.txtDyRef.TabIndex = 15
        Me.txtDyRef.Visible = False
        '
        'picDy
@@ -1394,7 +1400,7 @@ Partial Class frmEintragAviso
        Me.lblDy.Location = New System.Drawing.Point(491, 386)
        Me.lblDy.Name = "lblDy"
        Me.lblDy.Size = New System.Drawing.Size(109, 13)
-        Me.lblDy.TabIndex = 15
+        Me.lblDy.TabIndex = 14
        Me.lblDy.Text = "Dakosy-Referenz-Nr.:"
        Me.lblDy.Visible = False
        '
@@ -1409,7 +1415,7 @@ Partial Class frmEintragAviso
        Me.grpAktVerzollung.Location = New System.Drawing.Point(424, 73)
        Me.grpAktVerzollung.Name = "grpAktVerzollung"
        Me.grpAktVerzollung.Size = New System.Drawing.Size(359, 110)
-        Me.grpAktVerzollung.TabIndex = 8
+        Me.grpAktVerzollung.TabIndex = 10
        Me.grpAktVerzollung.TabStop = False
        Me.grpAktVerzollung.Text = "Sendungen - Details"
        '
@@ -1635,7 +1641,7 @@ Partial Class frmEintragAviso
        Me.Button3.Location = New System.Drawing.Point(424, 189)
        Me.Button3.Name = "Button3"
        Me.Button3.Size = New System.Drawing.Size(359, 37)
-        Me.Button3.TabIndex = 9
+        Me.Button3.TabIndex = 11
        Me.Button3.Text = "Weiter zu den Sendungsdetails"
        Me.Button3.UseVisualStyleBackColor = True
        '
@@ -1648,7 +1654,7 @@ Partial Class frmEintragAviso
        Me.cbxSendungsvorlagen.Location = New System.Drawing.Point(446, 49)
        Me.cbxSendungsvorlagen.Name = "cbxSendungsvorlagen"
        Me.cbxSendungsvorlagen.Size = New System.Drawing.Size(205, 21)
-        Me.cbxSendungsvorlagen.TabIndex = 7
+        Me.cbxSendungsvorlagen.TabIndex = 9
        Me.cbxSendungsvorlagen.Text = "Sendungsvorlagen erfassen"
        Me.cbxSendungsvorlagen.UseVisualStyleBackColor = True
        '
@@ -1657,10 +1663,10 @@ Partial Class frmEintragAviso
        Me.cbxAktenzettelDrucken.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.cbxAktenzettelDrucken.BackColor = System.Drawing.Color.WhiteSmoke
        Me.cbxAktenzettelDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.cbxAktenzettelDrucken.Location = New System.Drawing.Point(12, 620)
+        Me.cbxAktenzettelDrucken.Location = New System.Drawing.Point(12, 657)
        Me.cbxAktenzettelDrucken.Name = "cbxAktenzettelDrucken"
        Me.cbxAktenzettelDrucken.Size = New System.Drawing.Size(403, 33)
-        Me.cbxAktenzettelDrucken.TabIndex = 11
+        Me.cbxAktenzettelDrucken.TabIndex = 22
        Me.cbxAktenzettelDrucken.Text = "Aktenzettel ausdrucken:"
        Me.cbxAktenzettelDrucken.UseVisualStyleBackColor = False
        Me.cbxAktenzettelDrucken.Visible = False
@@ -1673,10 +1679,10 @@ Partial Class frmEintragAviso
        Me.cboPrinter.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.cboPrinter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboPrinter.FormattingEnabled = True
-        Me.cboPrinter.Location = New System.Drawing.Point(209, 625)
+        Me.cboPrinter.Location = New System.Drawing.Point(209, 662)
        Me.cboPrinter.Name = "cboPrinter"
        Me.cboPrinter.Size = New System.Drawing.Size(206, 21)
-        Me.cboPrinter.TabIndex = 12
+        Me.cboPrinter.TabIndex = 23
        Me.cboPrinter.Visible = False
        '
        'dgvAnhaenge
@@ -1692,13 +1698,13 @@ Partial Class frmEintragAviso
        Me.dgvAnhaenge.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.dgvAnhaenge.ColumnHeadersVisible = False
        Me.dgvAnhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.columnName, Me.clmnPfad})
-        Me.dgvAnhaenge.Location = New System.Drawing.Point(424, 395)
+        Me.dgvAnhaenge.Location = New System.Drawing.Point(424, 432)
        Me.dgvAnhaenge.Name = "dgvAnhaenge"
        Me.dgvAnhaenge.ReadOnly = True
        Me.dgvAnhaenge.RowHeadersVisible = False
        Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.dgvAnhaenge.Size = New System.Drawing.Size(360, 205)
-        Me.dgvAnhaenge.TabIndex = 14
+        Me.dgvAnhaenge.TabIndex = 17
        Me.dgvAnhaenge.Visible = False
        '
        'columnName
@@ -1721,28 +1727,27 @@ Partial Class frmEintragAviso
        Me.UsrCntlEintragAvisoAtilla.Location = New System.Drawing.Point(424, 49)
        Me.UsrCntlEintragAvisoAtilla.Name = "UsrCntlEintragAvisoAtilla"
        Me.UsrCntlEintragAvisoAtilla.Size = New System.Drawing.Size(360, 487)
-        Me.UsrCntlEintragAvisoAtilla.TabIndex = 6
+        Me.UsrCntlEintragAvisoAtilla.TabIndex = 8
        Me.UsrCntlEintragAvisoAtilla.Visible = False
        '
        'UsrCntlAviso_Vorpapiere1
        '
        Me.UsrCntlAviso_Vorpapiere1.BackColor = System.Drawing.Color.White
-        Me.UsrCntlAviso_Vorpapiere1.Location = New System.Drawing.Point(12, 466)
+        Me.UsrCntlAviso_Vorpapiere1.Location = New System.Drawing.Point(12, 489)
        Me.UsrCntlAviso_Vorpapiere1.Name = "UsrCntlAviso_Vorpapiere1"
        Me.UsrCntlAviso_Vorpapiere1.Size = New System.Drawing.Size(410, 157)
-        Me.UsrCntlAviso_Vorpapiere1.TabIndex = 63
+        Me.UsrCntlAviso_Vorpapiere1.TabIndex = 20
        '
        'cboFirma
        '
        Me.cboFirma._allowedValuesFreiText = Nothing
        Me.cboFirma._allowFreiText = False
        Me.cboFirma._value = ""
        Me.cboFirma.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.cboFirma.FormattingEnabled = True
        Me.cboFirma.Location = New System.Drawing.Point(285, 28)
        Me.cboFirma.Name = "cboFirma"
        Me.cboFirma.Size = New System.Drawing.Size(130, 21)
-        Me.cboFirma.TabIndex = 70
+        Me.cboFirma.TabIndex = 6
        '
        'Label2
        '
@@ -1750,16 +1755,42 @@ Partial Class frmEintragAviso
        Me.Label2.Location = New System.Drawing.Point(220, 31)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(43, 13)
-        Me.Label2.TabIndex = 71
+        Me.Label2.TabIndex = 5
        Me.Label2.Text = "FIRMA:"
        '
        'cboTransportmittelart
        '
        Me.cboTransportmittelart._allowedValuesFreiText = Nothing
        Me.cboTransportmittelart._allowFreiText = False
        Me.cboTransportmittelart._value = ""
        Me.cboTransportmittelart.BackColor = System.Drawing.Color.White
        Me.cboTransportmittelart.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboTransportmittelart.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.cboTransportmittelart.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cboTransportmittelart.FormattingEnabled = True
        Me.cboTransportmittelart.Items.AddRange(New Object() {"", "SUB", "SBG", "WAI", "NKD", "SFD", "NEU", "AMB", "WO_GE", "???"})
        Me.cboTransportmittelart.Location = New System.Drawing.Point(245, 139)
        Me.cboTransportmittelart.Name = "cboTransportmittelart"
        Me.cboTransportmittelart.Size = New System.Drawing.Size(146, 28)
        Me.cboTransportmittelart.TabIndex = 17
        '
        'Label4
        '
        Me.Label4.AutoSize = True
        Me.Label4.ForeColor = System.Drawing.Color.Black
        Me.Label4.Location = New System.Drawing.Point(242, 125)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(120, 13)
        Me.Label4.TabIndex = 14
        Me.Label4.Text = "Art des Transportmittels:"
        '
        'frmEintragAviso
        '
        Me.AcceptButton = Me.btnOK
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.Color.White
-        Me.ClientSize = New System.Drawing.Size(792, 728)
+        Me.ClientSize = New System.Drawing.Size(792, 765)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.cboFirma)
        Me.Controls.Add(Me.UsrCntlAviso_Vorpapiere1)
@@ -1945,4 +1976,6 @@ Partial Class frmEintragAviso
    Friend WithEvents UsrCntlAviso_Vorpapiere1 As usrCntlAviso_Vorpapiere
    Friend WithEvents cboFirma As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents Label2 As Label
    Friend WithEvents cboTransportmittelart As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents Label4 As Label
 End Class
--- a/Aviso/frmEintragAviso.resx
+++ b/Aviso/frmEintragAviso.resx
@@ -118,6 +118,25 @@
    <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="Button1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABIAAAASCAYAAABWzo5XAAAABGdBTUEAALGPC/xhBQAAAytJREFUOE+d
        kmtIU2EYx3df01qiZYX0JfuYBEFF2U2JEgqESCgScYpQZlYalV20mpUVRuk03+k2L7Plpt0sO5ouK7tf
        zcsSnYlCecl5vLy7uXOezuYpEhOqHzzwwvv8f/CHh/MTHo/H9/PznxUt25+kLiQGr98wkunpWTG+vn4+
        fD6fy679EZIkJx5CoVAUvDYsVqU1jpdXN43nEv2WHMJC3qlpHG9u73VGRspC/f3ne09sT8Uj4nJ5/OUr
        N8Yo9C3DOY8HB98NA27HgHtsgM1WwPc7qd6OfiupUun2sbkpeERSqa/05Nky52F9f9+tLsCPBwC7ZZ9G
        AX8YAfzMAriszTXwtOF997JlK9ew2Ul4ROvWb086eqnKcbEBsLoZsFv2sBdwPSOs6wdc2QO4qNk1ml5q
        /pKRka1ns5PwiKJk578HJzc1h2TaamN1zobLL6iurNd0i/wRZUwhXLXKRtqS+ZweOWjAnUplEcFmJ+ER
        7Yw8M7TqwMfWoNQxtC3fUXCkiiqT19Pa1Ic0SqqkmHHd3qF23N2lHG3IzdVMLwoJjZKFx+QNbM1xoORK
        F1K8pZHeDOhmF6DCFkByI41kWkeBvNT8LSUlY3qRROLts+9o4VCczqa5+opGNb2AmuyATE5AL4YBlZgA
        pVVTqvonr1tFIrEXm52ER8QcAGfJkuCQs4r7HZpGu/rN0Hj+IEWjURpQu51SVXW71ApFOWRmFn/dvGlL
        uFjAEXvSv8GKOByBQCRZsWJzXOL+C905xcSn9j6LvmeALLtn/NhXcfNBa3LyxdaiwsrOiuxjddd2Lyzx
        9ebOnUhO8Ev0kwULAleHhcl00dGHiLi4I0RERAIhEAi9REKh+FxCrMGkDQer6TRk7w0smT+bG8DGpoqm
        Q8DjiOPXzdR2KIPAZToJuOkEXNmzWDOPlf21yM1MMWdOYqikpA0tZWTHYYyRZcUvKmZqzvknkRufGdyA
        hA1emrY8t+wEU/MM5MUvNNjGyBnsyt/jI+EGJIZIis3ump/ToOelBiinXcp+/xtMzbmJG7wMhqvHQH7q
        GthsjMjd738Gj5ASh80mtVrtUpqmOT8ASDXvdskQmQUAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="btnAuftraggeber.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        /9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
@@ -170,25 +189,6 @@
        GeuhGHJlLIWZ87MMo3smaqZiqexlR2tlklE0Gx7LORD5N1Oi7H7DhgBjpESOJjE+4mJgKrF6j/k3Q1QP
        RI3PGQGtXO0esRjCewqiCUGsiPkqQDjfRUDyER/d8fpwN3PTe69ruEMf5x159iQ1Gdw8XEF5sGJMpWDY
        +nZayU2yE6UbN06v1D2SXlXjZ6zdOnKSjgggkZEqRDfyFJwG0cC4FwLgXA//2Q==
 </value>
  </data>
  <data name="Button1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABIAAAASCAYAAABWzo5XAAAABGdBTUEAALGPC/xhBQAAAytJREFUOE+d
        kmtIU2EYx3df01qiZYX0JfuYBEFF2U2JEgqESCgScYpQZlYalV20mpUVRuk03+k2L7Plpt0sO5ouK7tf
        zcsSnYlCecl5vLy7uXOezuYpEhOqHzzwwvv8f/CHh/MTHo/H9/PznxUt25+kLiQGr98wkunpWTG+vn4+
        fD6fy679EZIkJx5CoVAUvDYsVqU1jpdXN43nEv2WHMJC3qlpHG9u73VGRspC/f3ne09sT8Uj4nJ5/OUr
        N8Yo9C3DOY8HB98NA27HgHtsgM1WwPc7qd6OfiupUun2sbkpeERSqa/05Nky52F9f9+tLsCPBwC7ZZ9G
        AX8YAfzMAriszTXwtOF997JlK9ew2Ul4ROvWb086eqnKcbEBsLoZsFv2sBdwPSOs6wdc2QO4qNk1ml5q
        /pKRka1ns5PwiKJk578HJzc1h2TaamN1zobLL6iurNd0i/wRZUwhXLXKRtqS+ZweOWjAnUplEcFmJ+ER
        7Yw8M7TqwMfWoNQxtC3fUXCkiiqT19Pa1Ic0SqqkmHHd3qF23N2lHG3IzdVMLwoJjZKFx+QNbM1xoORK
        F1K8pZHeDOhmF6DCFkByI41kWkeBvNT8LSUlY3qRROLts+9o4VCczqa5+opGNb2AmuyATE5AL4YBlZgA
        pVVTqvonr1tFIrEXm52ER8QcAGfJkuCQs4r7HZpGu/rN0Hj+IEWjURpQu51SVXW71ApFOWRmFn/dvGlL
        uFjAEXvSv8GKOByBQCRZsWJzXOL+C905xcSn9j6LvmeALLtn/NhXcfNBa3LyxdaiwsrOiuxjddd2Lyzx
        9ebOnUhO8Ev0kwULAleHhcl00dGHiLi4I0RERAIhEAi9REKh+FxCrMGkDQer6TRk7w0smT+bG8DGpoqm
        Q8DjiOPXzdR2KIPAZToJuOkEXNmzWDOPlf21yM1MMWdOYqikpA0tZWTHYYyRZcUvKmZqzvknkRufGdyA
        hA1emrY8t+wEU/MM5MUvNNjGyBnsyt/jI+EGJIZIis3ump/ToOelBiinXcp+/xtMzbmJG7wMhqvHQH7q
        GthsjMjd738Gj5ASh80mtVrtUpqmOT8ASDXvdskQmQUAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="btnAbsSrch.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -216,6 +216,12 @@
  <metadata name="clmnPfad.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>True</value>
  </metadata>
  <metadata name="columnName.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>True</value>
  </metadata>
  <metadata name="clmnPfad.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>True</value>
  </metadata>
  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        AAABAAEAgIAAAAEAIAAoCAEAFgAAACgAAACAAAAAAAEAAAEAIAAAAAAAAAgBABMLAAATCwAAAAAAAAAA
--- a/Aviso/frmEintragAviso.vb
+++ b/Aviso/frmEintragAviso.vb
@@ -97,7 +97,12 @@ Public Class frmEintragAviso
        cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???"))
        cboGrenzstelle.changeItem("")
-
+        cboTransportmittelart.Items.Clear()
        cboTransportmittelart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
        cboTransportmittelart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("LKW", "LKW"))
        cboTransportmittelart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SPRINTER", "SPRINTER"))
        cboTransportmittelart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("CONTAINER", "CONTAINER"))
        cboTransportmittelart.changeItem("")
        sbLkwNationalitaet.initSearchBox(Me.FindForm, " [Code] ,[Description] as Land FROM tbl_DY_ZollDE_C0008_LaenderFull", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", "Code", "FMZOLL", , 400, 200)
@@ -331,6 +336,8 @@ Public Class frmEintragAviso
                    optUnbekannt.Checked = True
                End If
            cboGrenzstelle.changeItem(myAviso.Grenzstelle)
            cboTransportmittelart.changeItem(myAviso.Transportmittelart)
            cboImEx.Text = If(myAviso.ImEx, "")
                hStatus = myAviso.Status
                If myAviso.Ankunft = LeerDatum Then
@@ -830,6 +837,9 @@ Public Class frmEintragAviso
                ' MsgBox(myAviso.Grenzstelle)
            End If
            myAviso.Transportmittelart = cboTransportmittelart._value
            If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
                myAviso.Grenzstelle = "AMB"
            End If
@@ -1637,6 +1647,13 @@ Public Class frmEintragAviso
    End Sub
    Private Sub cboTransportmittelart_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboTransportmittelart.SelectedIndexChanged
        If cboTransportmittelart._value = "CONTAINER" Then
            lblLkwKennzeichen.Text = "Container-Nr:"
        Else
            lblLkwKennzeichen.Text = "LKW-Nr:"
        End If
    End Sub
    Private Sub cboGrenzstelle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboGrenzstelle.SelectedIndexChanged
        pnl.Visible = False
--- a/Aviso/frmHauptfenster.Designer.vb
+++ b/Aviso/frmHauptfenster.Designer.vb
@@ -24,12 +24,12 @@ Partial Class frmHauptfenster
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmHauptfenster))
-        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.mnuInfo = New System.Windows.Forms.ToolStripMenuItem()
        Me.conÜbernehmen = New System.Windows.Forms.ToolStripMenuItem()
        Me.conMenuAviso = New System.Windows.Forms.ContextMenuStrip(Me.components)
@@ -183,6 +183,12 @@ Partial Class frmHauptfenster
        Me.EORIUKGeneriertenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.KAPKentAccessPermitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.mnuFragezeichen = New System.Windows.Forms.ToolStripMenuItem()
        Me.VerfahrenshandbücherToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.ChecklistenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.ChecklisteWOCHECKLISTEZEallgemein = New System.Windows.Forms.ToolStripMenuItem()
        Me.WOCECKLISTEZEWDHToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.HandbuchToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.btnWoche = New System.Windows.Forms.Button()
        Me.btnGestern = New System.Windows.Forms.Button()
@@ -363,7 +369,7 @@ Partial Class frmHauptfenster
        'mnuInfo
        '
        Me.mnuInfo.Name = "mnuInfo"
-        Me.mnuInfo.Size = New System.Drawing.Size(130, 22)
+        Me.mnuInfo.Size = New System.Drawing.Size(193, 22)
        Me.mnuInfo.Text = "Info"
        '
        'conÜbernehmen
@@ -1312,17 +1318,55 @@ Partial Class frmHauptfenster
        '
        'mnuFragezeichen
        '
-        Me.mnuFragezeichen.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mnuInfo, Me.HandbuchToolStripMenuItem})
+        Me.mnuFragezeichen.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mnuInfo, Me.VerfahrenshandbücherToolStripMenuItem, Me.ChecklistenToolStripMenuItem, Me.HandbuchToolStripMenuItem})
        Me.mnuFragezeichen.ForeColor = System.Drawing.Color.Black
        Me.mnuFragezeichen.ImageTransparentColor = System.Drawing.Color.Brown
        Me.mnuFragezeichen.Name = "mnuFragezeichen"
        Me.mnuFragezeichen.Size = New System.Drawing.Size(24, 20)
        Me.mnuFragezeichen.Text = "?"
        '
        'VerfahrenshandbücherToolStripMenuItem
        '
        Me.VerfahrenshandbücherToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem})
        Me.VerfahrenshandbücherToolStripMenuItem.Name = "VerfahrenshandbücherToolStripMenuItem"
        Me.VerfahrenshandbücherToolStripMenuItem.Size = New System.Drawing.Size(193, 22)
        Me.VerfahrenshandbücherToolStripMenuItem.Text = "Verfahrenshandbücher"
        '
        'VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem
        '
        Me.VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem.Name = "VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem"
        Me.VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem.Size = New System.Drawing.Size(306, 22)
        Me.VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem.Text = "Verfahrenshandbuch VERAG GmbH Zoll WO"
        '
        'ChecklistenToolStripMenuItem
        '
        Me.ChecklistenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ChecklisteWOCHECKLISTEZEallgemein, Me.WOCECKLISTEZEWDHToolStripMenuItem, Me.WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem})
        Me.ChecklistenToolStripMenuItem.Name = "ChecklistenToolStripMenuItem"
        Me.ChecklistenToolStripMenuItem.Size = New System.Drawing.Size(193, 22)
        Me.ChecklistenToolStripMenuItem.Text = "Checklisten"
        '
        'ChecklisteWOCHECKLISTEZEallgemein
        '
        Me.ChecklisteWOCHECKLISTEZEallgemein.Name = "ChecklisteWOCHECKLISTEZEallgemein"
        Me.ChecklisteWOCHECKLISTEZEallgemein.Size = New System.Drawing.Size(311, 22)
        Me.ChecklisteWOCHECKLISTEZEallgemein.Text = "WO CHECKLISTE ZE allgemein"
        '
        'WOCECKLISTEZEWDHToolStripMenuItem
        '
        Me.WOCECKLISTEZEWDHToolStripMenuItem.Name = "WOCECKLISTEZEWDHToolStripMenuItem"
        Me.WOCECKLISTEZEWDHToolStripMenuItem.Size = New System.Drawing.Size(311, 22)
        Me.WOCECKLISTEZEWDHToolStripMenuItem.Text = "WO CHECKLISTE ZE WDH"
        '
        'WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem
        '
        Me.WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem.Name = "WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem"
        Me.WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem.Size = New System.Drawing.Size(311, 22)
        Me.WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem.Text = "WO CHECKLISTE Abgang Verwahrungsort ZV"
        '
        'HandbuchToolStripMenuItem
        '
        Me.HandbuchToolStripMenuItem.Name = "HandbuchToolStripMenuItem"
-        Me.HandbuchToolStripMenuItem.Size = New System.Drawing.Size(130, 22)
+        Me.HandbuchToolStripMenuItem.Size = New System.Drawing.Size(193, 22)
        Me.HandbuchToolStripMenuItem.Text = "Handbuch"
        '
        'btnWoche
@@ -1867,7 +1911,7 @@ Partial Class frmHauptfenster
        Me.SplitContainer2.Panel2.Controls.Add(Me.SplitContainer3)
        Me.SplitContainer2.Panel2MinSize = 650
        Me.SplitContainer2.Size = New System.Drawing.Size(884, 300)
-        Me.SplitContainer2.SplitterDistance = 210
+        Me.SplitContainer2.SplitterDistance = 216
        Me.SplitContainer2.SplitterWidth = 1
        Me.SplitContainer2.TabIndex = 0
        '
@@ -1881,7 +1925,7 @@ Partial Class frmHauptfenster
        Me.pnlLinks.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlLinks.Location = New System.Drawing.Point(0, 86)
        Me.pnlLinks.Name = "pnlLinks"
-        Me.pnlLinks.Size = New System.Drawing.Size(210, 214)
+        Me.pnlLinks.Size = New System.Drawing.Size(216, 214)
        Me.pnlLinks.TabIndex = 0
        '
        'Panel2
@@ -1894,7 +1938,7 @@ Partial Class frmHauptfenster
        Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top
        Me.Panel2.Location = New System.Drawing.Point(0, 0)
        Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(210, 111)
+        Me.Panel2.Size = New System.Drawing.Size(216, 111)
        Me.Panel2.TabIndex = 10
        '
        'Label7
@@ -1916,7 +1960,7 @@ Partial Class frmHauptfenster
        Me.lblErrVermerk.ForeColor = System.Drawing.Color.Red
        Me.lblErrVermerk.Location = New System.Drawing.Point(12, 158)
        Me.lblErrVermerk.Name = "lblErrVermerk"
-        Me.lblErrVermerk.Size = New System.Drawing.Size(184, 27)
+        Me.lblErrVermerk.Size = New System.Drawing.Size(190, 27)
        Me.lblErrVermerk.TabIndex = 1
        Me.lblErrVermerk.Text = "Bei diesem Status kann kein Vermerk erfasst werden!"
        Me.lblErrVermerk.TextAlign = System.Drawing.ContentAlignment.BottomLeft
@@ -1991,7 +2035,7 @@ Partial Class frmHauptfenster
        Me.pnlLinksOben.Dock = System.Windows.Forms.DockStyle.Top
        Me.pnlLinksOben.Location = New System.Drawing.Point(0, 0)
        Me.pnlLinksOben.Name = "pnlLinksOben"
-        Me.pnlLinksOben.Size = New System.Drawing.Size(210, 86)
+        Me.pnlLinksOben.Size = New System.Drawing.Size(216, 86)
        Me.pnlLinksOben.TabIndex = 1
        '
        'Label22
@@ -2052,8 +2096,8 @@ Partial Class frmHauptfenster
        'SplitContainer3.Panel2
        '
        Me.SplitContainer3.Panel2.Controls.Add(Me.pnl)
-        Me.SplitContainer3.Size = New System.Drawing.Size(673, 300)
+        Me.SplitContainer3.Size = New System.Drawing.Size(667, 300)
-        Me.SplitContainer3.SplitterDistance = 169
+        Me.SplitContainer3.SplitterDistance = 167
        Me.SplitContainer3.TabIndex = 3
        '
        'UsrCntlBenachrichtigungen1
@@ -2062,7 +2106,7 @@ Partial Class frmHauptfenster
        Me.UsrCntlBenachrichtigungen1.Location = New System.Drawing.Point(0, 0)
        Me.UsrCntlBenachrichtigungen1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
        Me.UsrCntlBenachrichtigungen1.Name = "UsrCntlBenachrichtigungen1"
-        Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(169, 300)
+        Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(167, 300)
        Me.UsrCntlBenachrichtigungen1.TabIndex = 0
        '
        'pnl
@@ -2073,7 +2117,7 @@ Partial Class frmHauptfenster
        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(500, 300)
+        Me.pnl.Size = New System.Drawing.Size(496, 300)
        Me.pnl.TabIndex = 0
        '
        'Button10
@@ -2097,8 +2141,8 @@ Partial Class frmHauptfenster
        Me.gridMyAviso.AllowUserToDeleteRows = False
        Me.gridMyAviso.AllowUserToOrderColumns = True
        Me.gridMyAviso.AllowUserToResizeRows = False
-        DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle7.BackColor = System.Drawing.Color.Azure
-        Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+        Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7
        Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White
        Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
        Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Top
@@ -2107,7 +2151,7 @@ Partial Class frmHauptfenster
        Me.gridMyAviso.ReadOnly = True
        Me.gridMyAviso.RowHeadersVisible = False
        Me.gridMyAviso.RowHeadersWidth = 62
-        Me.gridMyAviso.Size = New System.Drawing.Size(500, 277)
+        Me.gridMyAviso.Size = New System.Drawing.Size(496, 277)
        Me.gridMyAviso.TabIndex = 0
        '
        'Panel6
@@ -2125,7 +2169,7 @@ Partial Class frmHauptfenster
        Me.Panel6.Dock = System.Windows.Forms.DockStyle.Top
        Me.Panel6.Location = New System.Drawing.Point(0, 0)
        Me.Panel6.Name = "Panel6"
-        Me.Panel6.Size = New System.Drawing.Size(500, 21)
+        Me.Panel6.Size = New System.Drawing.Size(496, 21)
        Me.Panel6.TabIndex = 1
        '
        'lblMeineAviso
@@ -2151,7 +2195,7 @@ Partial Class frmHauptfenster
        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(181, 1)
+        Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(177, 1)
        Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle"
        Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21)
        Me.cboMy_Grenzstelle.TabIndex = 26
@@ -2161,7 +2205,7 @@ Partial Class frmHauptfenster
        Me.Label18.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label18.AutoSize = True
        Me.Label18.ForeColor = System.Drawing.Color.White
-        Me.Label18.Location = New System.Drawing.Point(113, 4)
+        Me.Label18.Location = New System.Drawing.Point(109, 4)
        Me.Label18.Name = "Label18"
        Me.Label18.Size = New System.Drawing.Size(62, 13)
        Me.Label18.TabIndex = 25
@@ -2172,7 +2216,7 @@ Partial Class frmHauptfenster
        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(57, 3)
+        Me.cbx_My_LKW.Location = New System.Drawing.Point(53, 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
@@ -2186,7 +2230,7 @@ Partial Class frmHauptfenster
        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(443, 3)
+        Me.cboMy_QS.Location = New System.Drawing.Point(439, 3)
        Me.cboMy_QS.Name = "cboMy_QS"
        Me.cboMy_QS.Size = New System.Drawing.Size(15, 14)
        Me.cboMy_QS.TabIndex = 23
@@ -2200,7 +2244,7 @@ Partial Class frmHauptfenster
        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(464, 3)
+        Me.cboMy_VB.Location = New System.Drawing.Point(460, 3)
        Me.cboMy_VB.Name = "cboMy_VB"
        Me.cboMy_VB.Size = New System.Drawing.Size(15, 14)
        Me.cboMy_VB.TabIndex = 22
@@ -2218,7 +2262,7 @@ Partial Class frmHauptfenster
        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(300, 1)
+        Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(296, 1)
        Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige"
        Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(127, 21)
        Me.cboMyAvisoAnzeige.TabIndex = 21
@@ -2228,7 +2272,7 @@ Partial Class frmHauptfenster
        Me.Label17.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label17.AutoSize = True
        Me.Label17.ForeColor = System.Drawing.Color.White
-        Me.Label17.Location = New System.Drawing.Point(251, 3)
+        Me.Label17.Location = New System.Drawing.Point(247, 3)
        Me.Label17.Name = "Label17"
        Me.Label17.Size = New System.Drawing.Size(48, 13)
        Me.Label17.TabIndex = 20
@@ -2238,7 +2282,7 @@ Partial Class frmHauptfenster
        '
        Me.lblAkte.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.lblAkte.ForeColor = System.Drawing.Color.White
-        Me.lblAkte.Location = New System.Drawing.Point(829, 6)
+        Me.lblAkte.Location = New System.Drawing.Point(825, 6)
        Me.lblAkte.Name = "lblAkte"
        Me.lblAkte.Size = New System.Drawing.Size(207, 19)
        Me.lblAkte.TabIndex = 1
@@ -2272,7 +2316,7 @@ Partial Class frmHauptfenster
        Me.tabVorgeschrieben.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.tabVorgeschrieben.Location = New System.Drawing.Point(4, 34)
        Me.tabVorgeschrieben.Name = "tabVorgeschrieben"
-        Me.tabVorgeschrieben.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tabVorgeschrieben.Padding = New System.Windows.Forms.Padding(3)
        Me.tabVorgeschrieben.Size = New System.Drawing.Size(753, 0)
        Me.tabVorgeschrieben.TabIndex = 3
        Me.tabVorgeschrieben.Text = "3.Vorgeschrieben"
@@ -2283,7 +2327,7 @@ Partial Class frmHauptfenster
        Me.tabFreigegeben.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.tabFreigegeben.Location = New System.Drawing.Point(4, 34)
        Me.tabFreigegeben.Name = "tabFreigegeben"
-        Me.tabFreigegeben.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tabFreigegeben.Padding = New System.Windows.Forms.Padding(3)
        Me.tabFreigegeben.Size = New System.Drawing.Size(753, 0)
        Me.tabFreigegeben.TabIndex = 5
        Me.tabFreigegeben.Text = "5. Freigegeben"
@@ -2294,7 +2338,7 @@ Partial Class frmHauptfenster
        Me.tabNichtEingetroffen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.tabNichtEingetroffen.Location = New System.Drawing.Point(4, 34)
        Me.tabNichtEingetroffen.Name = "tabNichtEingetroffen"
-        Me.tabNichtEingetroffen.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tabNichtEingetroffen.Padding = New System.Windows.Forms.Padding(3)
        Me.tabNichtEingetroffen.Size = New System.Drawing.Size(753, 0)
        Me.tabNichtEingetroffen.TabIndex = 6
        Me.tabNichtEingetroffen.Text = "Nicht eingetroffen"
@@ -2305,7 +2349,7 @@ Partial Class frmHauptfenster
        Me.tabAnkunft.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.tabAnkunft.Location = New System.Drawing.Point(4, 34)
        Me.tabAnkunft.Name = "tabAnkunft"
-        Me.tabAnkunft.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tabAnkunft.Padding = New System.Windows.Forms.Padding(3)
        Me.tabAnkunft.Size = New System.Drawing.Size(753, 0)
        Me.tabAnkunft.TabIndex = 4
        Me.tabAnkunft.Text = "4. Ankunft"
@@ -2316,7 +2360,7 @@ Partial Class frmHauptfenster
        Me.tabVorbereitet.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.tabVorbereitet.Location = New System.Drawing.Point(4, 34)
        Me.tabVorbereitet.Name = "tabVorbereitet"
-        Me.tabVorbereitet.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tabVorbereitet.Padding = New System.Windows.Forms.Padding(3)
        Me.tabVorbereitet.Size = New System.Drawing.Size(753, 0)
        Me.tabVorbereitet.TabIndex = 2
        Me.tabVorbereitet.Text = "2.Vorbereitet QS"
@@ -2369,7 +2413,7 @@ Partial Class frmHauptfenster
        Me.tabAlle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.tabAlle.Location = New System.Drawing.Point(4, 34)
        Me.tabAlle.Name = "tabAlle"
-        Me.tabAlle.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tabAlle.Padding = New System.Windows.Forms.Padding(3)
        Me.tabAlle.Size = New System.Drawing.Size(753, 0)
        Me.tabAlle.TabIndex = 0
        Me.tabAlle.Text = "Alle"
@@ -2380,7 +2424,7 @@ Partial Class frmHauptfenster
        Me.tabErfasst.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.tabErfasst.Location = New System.Drawing.Point(4, 34)
        Me.tabErfasst.Name = "tabErfasst"
-        Me.tabErfasst.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3)
+        Me.tabErfasst.Padding = New System.Windows.Forms.Padding(3)
        Me.tabErfasst.Size = New System.Drawing.Size(753, 0)
        Me.tabErfasst.TabIndex = 1
        Me.tabErfasst.Text = "1. Erfasst"
@@ -2470,47 +2514,47 @@ Partial Class frmHauptfenster
        Me.gridAviso.AllowUserToAddRows = False
        Me.gridAviso.AllowUserToDeleteRows = False
        Me.gridAviso.AllowUserToResizeRows = False
-        DataGridViewCellStyle2.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle8.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
+        Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle8
        Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray
        Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable
-        DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle3.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle9.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle3.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle9.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle3
+        Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle9
        Me.gridAviso.ColumnHeadersHeight = 25
        Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle10.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle10.BackColor = System.Drawing.SystemColors.Window
-        DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle10.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.ControlText
+        DataGridViewCellStyle10.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle10.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle10.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle4
+        Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle10
        Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill
        Me.gridAviso.Location = New System.Drawing.Point(0, 208)
        Me.gridAviso.MultiSelect = False
        Me.gridAviso.Name = "gridAviso"
        Me.gridAviso.ReadOnly = True
-        DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle11.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle11.BackColor = System.Drawing.SystemColors.Control
-        DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle11.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle11.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle5
+        Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle11
        Me.gridAviso.RowHeadersVisible = False
        Me.gridAviso.RowHeadersWidth = 62
        Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle6
+        Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle12
        Me.gridAviso.RowTemplate.ReadOnly = True
        Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
        Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
@@ -3488,4 +3532,10 @@ Partial Class frmHauptfenster
    Friend WithEvents DEGesamtsicherheitVeragGmbHToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents ATGesamtsicherheitVeragCSToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents VerfahrenshandbücherToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents ChecklistenToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents ChecklisteWOCHECKLISTEZEallgemein As ToolStripMenuItem
    Friend WithEvents WOCECKLISTEZEWDHToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem As ToolStripMenuItem
 End Class
--- a/Aviso/frmHauptfenster.resx
+++ b/Aviso/frmHauptfenster.resx
@@ -225,6 +225,9 @@
        pOTzPwAAAABJRU5ErkJggg==
 </value>
  </data>
  <metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>598, 17</value>
  </metadata>
  <metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>697, 17</value>
  </metadata>
--- a/Aviso/frmHauptfenster.vb
+++ b/Aviso/frmHauptfenster.vb
@@ -421,7 +421,7 @@ Public Class frmHauptfenster
        'zuerst noch prüfen, ob unerledigte Aviso auf nicht eingetroffen gesetzt werden können
        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Avisodaten_verwalten", Me) Then
-            Dim hSQL As String = "Select * FROM Aviso WHERE Status In (0,4,5) And Datum < " & SQLDatum(Now.AddDays(-21)) & "  And dateadd(DAY,10,VoraussichtlichesEintreffen) < GETDATE() and  Firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'  "
+            Dim hSQL As String = "Select * FROM Aviso WHERE Status In (0,4,5) And Datum < " & SQLDatum(Now.AddDays(-21)) & "  And dateadd(DAY,10,VoraussichtlichesEintreffen) < GETDATE() and  Firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' AND Grenzstelle IN ('AMB','NKD','SBG','SUB','WAI')  "
            'dateadd(DAY,10,VoraussichtlichesEintreffen)  --> Voraussichtliches Eintreffen muss zudem um 10 Tage überschritten sein --> Container/Hafen haben lange Vorlaufzeiten
            Dim anz As Integer = AvisoDAL.Check_Nicht_eingetroffen(hSQL)
            If anz > 0 Then
@@ -530,6 +530,7 @@ Public Class frmHauptfenster
            End If
            .Columns("TageBisEintreffen").Visible = False
            .Columns("Transportmittelart").Visible = False
            .Columns("Status").Width = 25
            .Columns("Status").HeaderText = "St."
@@ -765,7 +766,7 @@ Public Class frmHauptfenster
        Dim hSQL As String = "SELECT " & top & " AvisoID, Status, LKW_Nr, Auftraggeber, Frächter,VoraussichtlichesEintreffen, AvisoEingang, Ankunft, Dauer, Grenzstelle,letzterMitarbeiter,CASE WHEN [ZOLLDigitalEingereicht] = 1 THEN 'DE' ELSE CASE WHEN [LKW_fertig] = 1 THEN 'OK' ELSE '' END END AS [LKW_fertig], Datum, Vorbereitet, Vorgeschrieben,  Freigabe, "
-        hSQL &= " Telefonisch, Info,Handling,AvisoTVHinweis,DATEDIFF(DAY,getdate(),[VoraussichtlichesEintreffen]) TageBisEintreffen "
+        hSQL &= " Telefonisch, Info,Handling,AvisoTVHinweis,DATEDIFF(DAY,getdate(),[VoraussichtlichesEintreffen]) TageBisEintreffen,isnull(Transportmittelart,'')Transportmittelart"
        hSQL &= " FROM Aviso "
        hSQL &= " WHERE 1=1 "
@@ -2555,6 +2556,14 @@ Public Class frmHauptfenster
        'VERAG_PROG_ALLGEMEIN.cTherefore.saveFileTo_ImportFolderCat("C:\Users\test01\Desktop\TEST.pdf", "12345", "", "Import ab Jänner 2021", "Import ab Jänner 2021")
        'Exit Sub
        Dim dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", 717858, {3})
        For Each d In dt.Rows
            MsgBox(d("LKW_Nr"))
        Next
        Exit Sub
        CHMRC.hmrcTEST()
        Exit Sub
@@ -3736,6 +3745,45 @@ Public Class frmHauptfenster
        frm.Standort = "Verag CS"
        frm.Show()
    End Sub
    Private Sub gridAviso_CellPainting(sender As Object, e As DataGridViewCellPaintingEventArgs) Handles gridAviso.CellPainting
        If e.RowIndex <> -1 AndAlso gridAviso.Columns(e.ColumnIndex).Name = "Status" Then
            If gridAviso.Rows(e.RowIndex).Cells("Transportmittelart").Value = "SPRINTER" Then
                If (e.PaintParts And DataGridViewPaintParts.Background) <> DataGridViewPaintParts.None Then
                    e.Graphics.DrawImage(My.Resources.sprinter_white, e.CellBounds)
                    'e.CellStyle.BackColor = Color.White
                End If
                If Not e.Handled Then
                    e.Handled = True
                    e.PaintContent(e.CellBounds)
                End If
            End If
        End If
    End Sub
    Private Sub VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VerfahrenshandbuchVERAGGmbHZollWOToolStripMenuItem.Click
        Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "SONSTIGE", "", "", "VerfahrenshandbuchVERAGGmbHZollWO")
        DS.OPEN_SINGLE()
    End Sub
    Private Sub ChecklisteWOVERAGGmbHToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ChecklisteWOCHECKLISTEZEallgemein.Click
        Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "SONSTIGE", "", "", "ChecklisteWOCHECKLISTEZEallgemein")
        DS.OPEN_SINGLE()
    End Sub
    Private Sub WOCECKLISTEZEWDHToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles WOCECKLISTEZEWDHToolStripMenuItem.Click
        Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "SONSTIGE", "", "", "WOCECKLISTEZEWDH")
        DS.OPEN_SINGLE()
    End Sub
    Private Sub WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles WOCECKLISTEAbgangVerwahrungsortZVToolStripMenuItem.Click
        Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "SONSTIGE", "", "", "WOCECKLISTEAbgangVerwahrungsortZV")
        DS.OPEN_SINGLE()
    End Sub
 End Class
 Public Class AvisoStatusFunctions
@@ -5236,14 +5284,14 @@ Public Class AvisoStatusFunctions
        SENDUNG_TMP.saveSachbearbeiter = True
-        If SENDUNG_TMP.tblSnd_Vorgeschrieben IsNot Nothing Then
+        'If SENDUNG_TMP.tblSnd_Vorgeschrieben IsNot Nothing Then
-            MsgBox("Sendung wurde bereits auf 'Vorgeschrieben' gesetzt - Status nicht mehr möglich!")
+        '    MsgBox("Sendung wurde bereits auf 'Vorgeschrieben' gesetzt - Status nicht mehr möglich!")
-            Return False
+        '    Return False
-        End If
+        'End If
-        If SENDUNG_TMP.tblSnd_Vorbereitet IsNot Nothing Then
+        'If SENDUNG_TMP.tblSnd_Vorbereitet IsNot Nothing Then
-            MsgBox("Sendung wurde bereits auf 'QS Vorbereitet' gesetzt - Status nicht mehr möglich!")
+        '    MsgBox("Sendung wurde bereits auf 'QS Vorbereitet' gesetzt - Status nicht mehr möglich!")
-            Return False
+        '    Return False
-        End If
+        'End If
        If SENDUNG_TMP.tblSnd_AbklaerungTR Is Nothing Then
--- a/Aviso/frmLaufzettel.vb
+++ b/Aviso/frmLaufzettel.vb
@@ -186,6 +186,15 @@ Public Class frmLaufzettel
    End Sub
    Private Sub btnLaufzettelDrucken_Click(sender As Object, e As EventArgs) Handles btnLaufzettelDrucken.Click
        If CheckBox2.Checked Then
            If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "WAI" Then
                If Not CheckBox3.Checked And Not CheckBox4.Checked Then
                    MsgBox("Bitte 'AT ZOLL' oder 'DE ZOLL' auswählen!")
                    Exit Sub
                End If
            End If
        End If
        doLZ(False)
        Me.Close()
    End Sub
@@ -246,11 +255,21 @@ Public Class frmLaufzettel
                        If path <> "" Then VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, cboPrinter.SelectedItem.ToString) '(New System.Drawing.Printing.PrinterSettings).PrinterName)
                    Catch ex As Exception : MsgBox(ex.Message & ex.StackTrace) : End Try
                Else
                    If Not CheckBox3.Checked And Not CheckBox4.Checked Then
                        MsgBox("Bitte 'AT ZOLL' oder 'DE ZOLL' auswählen!")
                        Exit Sub
                    End If
                    Try
-                        Dim path = SDL.FormularManagerNEU.zumZOLL_AVISO(AVISO, If(CheckBox3.Checked, "AT", If(CheckBox4.Checked, "DE", "")))
+                        'If CheckBox3.Checked Then path = SDL.FormularManagerNEU.zumZOLL_AVISO(AVISO, If(CheckBox3.Checked, "AT", If(CheckBox4.Checked, "DE", "")))
                        Dim path = ""
                        If CheckBox3.Checked Then path = SDL.FormularManagerNEU.zumZOLL_AVISO_AT(AVISO)
                        If CheckBox4.Checked Then path = SDL.FormularManagerNEU.zumZOLL_AVISO_DE(AVISO)
                        If path <> "" Then VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, cboPrinter.SelectedItem.ToString) '(New System.Drawing.Printing.PrinterSettings).PrinterName)
                    Catch ex As Exception : MsgBox(ex.Message & ex.StackTrace) : End Try
                End If
            End If
        End If
--- a/Aviso/frmSendungsdetailsNEU.Designer.vb
+++ b/Aviso/frmSendungsdetailsNEU.Designer.vb
@@ -24,13 +24,13 @@ Partial Class frmSendungsdetailsNEU
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungsdetailsNEU))
-        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.pnl = New System.Windows.Forms.Panel()
        Me.Panel4 = New System.Windows.Forms.Panel()
        Me.TabControl1 = New System.Windows.Forms.TabControl()
@@ -130,10 +130,8 @@ Partial Class frmSendungsdetailsNEU
        Me.Button14 = New System.Windows.Forms.Button()
        Me.Button12 = New System.Windows.Forms.Button()
        Me.txtGewicht = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.txtBARzuKassieren = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.lblWarenbezeichnung = New System.Windows.Forms.Label()
        Me.Label35 = New System.Windows.Forms.Label()
        Me.lblZuKass = New System.Windows.Forms.Label()
        Me.lblCollGew = New System.Windows.Forms.Label()
        Me.Button3 = New System.Windows.Forms.Button()
        Me.Button8 = New System.Windows.Forms.Button()
@@ -144,6 +142,9 @@ Partial Class frmSendungsdetailsNEU
        Me.lblAnmerkung = New System.Windows.Forms.Label()
        Me.cboPrinter = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.rtbAnmerkung = New System.Windows.Forms.RichTextBox()
        Me.Panel22 = New System.Windows.Forms.Panel()
        Me.txtBARzuKassieren = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.lblZuKass = New System.Windows.Forms.Label()
        Me.tbVorkosten = New System.Windows.Forms.TabPage()
        Me.lblVK_BEarbeitungAbbrechen = New System.Windows.Forms.LinkLabel()
        Me.btnVorkostenAdd = New System.Windows.Forms.Button()
@@ -327,6 +328,7 @@ Partial Class frmSendungsdetailsNEU
        Me.KopierenZwischenablageToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.LaufzetteldruckJANEINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.GestellungslisteAnfügenJANEINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripMenuItem()
@@ -376,7 +378,6 @@ Partial Class frmSendungsdetailsNEU
        Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.ToolStripMenuItem14 = New System.Windows.Forms.ToolStripMenuItem()
        Me.NurÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.pnl.SuspendLayout()
        Me.Panel4.SuspendLayout()
        Me.TabControl1.SuspendLayout()
@@ -401,6 +402,7 @@ Partial Class frmSendungsdetailsNEU
        Me.pnlDetails.SuspendLayout()
        Me.tbcntr.SuspendLayout()
        Me.TabPage4.SuspendLayout()
        Me.Panel22.SuspendLayout()
        Me.tbVorkosten.SuspendLayout()
        CType(Me.dgvVorkosten, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.tbBAR.SuspendLayout()
@@ -455,9 +457,9 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel4.Controls.Add(Me.TabControl1)
        Me.Panel4.Controls.Add(Me.Panel14)
        Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.Panel4.Location = New System.Drawing.Point(0, 439)
+        Me.Panel4.Location = New System.Drawing.Point(0, 452)
        Me.Panel4.Name = "Panel4"
-        Me.Panel4.Size = New System.Drawing.Size(1214, 337)
+        Me.Panel4.Size = New System.Drawing.Size(1214, 324)
        Me.Panel4.TabIndex = 2
        '
        'TabControl1
@@ -472,7 +474,7 @@ Partial Class frmSendungsdetailsNEU
        Me.TabControl1.Location = New System.Drawing.Point(0, 37)
        Me.TabControl1.Name = "TabControl1"
        Me.TabControl1.SelectedIndex = 0
-        Me.TabControl1.Size = New System.Drawing.Size(1214, 300)
+        Me.TabControl1.Size = New System.Drawing.Size(1214, 287)
        Me.TabControl1.TabIndex = 1
        '
        'tbAnhang
@@ -482,7 +484,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbAnhang.Controls.Add(Me.Panel19)
        Me.tbAnhang.Location = New System.Drawing.Point(4, 22)
        Me.tbAnhang.Name = "tbAnhang"
-        Me.tbAnhang.Size = New System.Drawing.Size(1206, 274)
+        Me.tbAnhang.Size = New System.Drawing.Size(1206, 261)
        Me.tbAnhang.TabIndex = 4
        Me.tbAnhang.Text = "Anhang"
        Me.tbAnhang.UseVisualStyleBackColor = True
@@ -496,7 +498,7 @@ Partial Class frmSendungsdetailsNEU
        Me.btnDirektAnfuegen.Location = New System.Drawing.Point(648, 75)
        Me.btnDirektAnfuegen.Name = "btnDirektAnfuegen"
        Me.btnDirektAnfuegen.Size = New System.Drawing.Size(142, 34)
-        Me.btnDirektAnfuegen.TabIndex = 4
+        Me.btnDirektAnfuegen.TabIndex = 2
        Me.btnDirektAnfuegen.Text = "Direkt anfügen ..."
        Me.btnDirektAnfuegen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnDirektAnfuegen.UseVisualStyleBackColor = True
@@ -510,14 +512,14 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvAnhang.AllowUserToResizeColumns = False
        Me.dgvAnhang.AllowUserToResizeRows = False
        Me.dgvAnhang.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Window
-        DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.dgvAnhang.DefaultCellStyle = DataGridViewCellStyle1
+        Me.dgvAnhang.DefaultCellStyle = DataGridViewCellStyle8
        Me.dgvAnhang.Dock = System.Windows.Forms.DockStyle.Fill
        Me.dgvAnhang.Location = New System.Drawing.Point(0, 45)
        Me.dgvAnhang.Name = "dgvAnhang"
@@ -525,7 +527,7 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvAnhang.RowHeadersVisible = False
        Me.dgvAnhang.RowTemplate.Height = 40
        Me.dgvAnhang.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvAnhang.Size = New System.Drawing.Size(1206, 229)
+        Me.dgvAnhang.Size = New System.Drawing.Size(1206, 216)
        Me.dgvAnhang.TabIndex = 1
        '
        'Panel19
@@ -552,7 +554,7 @@ Partial Class frmSendungsdetailsNEU
        Me.btnQuckScan.Location = New System.Drawing.Point(631, 5)
        Me.btnQuckScan.Name = "btnQuckScan"
        Me.btnQuckScan.Size = New System.Drawing.Size(107, 34)
-        Me.btnQuckScan.TabIndex = 108
+        Me.btnQuckScan.TabIndex = 4
        Me.btnQuckScan.Text = "Quick-Scan"
        Me.btnQuckScan.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnQuckScan.UseVisualStyleBackColor = True
@@ -722,7 +724,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbKundenInfo.Controls.Add(Me.Panel20)
        Me.tbKundenInfo.Location = New System.Drawing.Point(4, 22)
        Me.tbKundenInfo.Name = "tbKundenInfo"
-        Me.tbKundenInfo.Size = New System.Drawing.Size(1206, 274)
+        Me.tbKundenInfo.Size = New System.Drawing.Size(1206, 261)
        Me.tbKundenInfo.TabIndex = 5
        Me.tbKundenInfo.Text = "Kundeninfo"
        Me.tbKundenInfo.UseVisualStyleBackColor = True
@@ -734,7 +736,7 @@ Partial Class frmSendungsdetailsNEU
        Me.pnlKundenInfo.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlKundenInfo.Location = New System.Drawing.Point(0, 10)
        Me.pnlKundenInfo.Name = "pnlKundenInfo"
-        Me.pnlKundenInfo.Size = New System.Drawing.Size(1206, 264)
+        Me.pnlKundenInfo.Size = New System.Drawing.Size(1206, 251)
        Me.pnlKundenInfo.TabIndex = 1
        '
        'Panel20
@@ -751,7 +753,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbZollabfertigung.Controls.Add(Me.Panel16)
        Me.tbZollabfertigung.Location = New System.Drawing.Point(4, 22)
        Me.tbZollabfertigung.Name = "tbZollabfertigung"
-        Me.tbZollabfertigung.Size = New System.Drawing.Size(1206, 274)
+        Me.tbZollabfertigung.Size = New System.Drawing.Size(1206, 261)
        Me.tbZollabfertigung.TabIndex = 2
        Me.tbZollabfertigung.Text = "Zollabfertigung"
        Me.tbZollabfertigung.UseVisualStyleBackColor = True
@@ -764,7 +766,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel16.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Panel16.Location = New System.Drawing.Point(0, 0)
        Me.Panel16.Name = "Panel16"
-        Me.Panel16.Size = New System.Drawing.Size(1206, 274)
+        Me.Panel16.Size = New System.Drawing.Size(1206, 261)
        Me.Panel16.TabIndex = 0
        '
        'dgvZollAnmeldungen
@@ -781,7 +783,7 @@ Partial Class frmSendungsdetailsNEU
        Me.dgvZollAnmeldungen.ReadOnly = True
        Me.dgvZollAnmeldungen.RowTemplate.Height = 30
        Me.dgvZollAnmeldungen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(1206, 212)
+        Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(1206, 199)
        Me.dgvZollAnmeldungen.TabIndex = 1
        '
        'Panel17
@@ -790,7 +792,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel17.Controls.Add(Me.Button6)
        Me.Panel17.Controls.Add(Me.Button5)
        Me.Panel17.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.Panel17.Location = New System.Drawing.Point(0, 236)
+        Me.Panel17.Location = New System.Drawing.Point(0, 223)
        Me.Panel17.Name = "Panel17"
        Me.Panel17.Size = New System.Drawing.Size(1206, 38)
        Me.Panel17.TabIndex = 2
@@ -886,7 +888,6 @@ Partial Class frmSendungsdetailsNEU
        '
        'ToolStripMenuItem11
        '
        Me.ToolStripMenuItem11.Enabled = False
        Me.ToolStripMenuItem11.Image = Global.AVISO.My.Resources.Resources.plus
        Me.ToolStripMenuItem11.Name = "ToolStripMenuItem11"
        Me.ToolStripMenuItem11.Padding = New System.Windows.Forms.Padding(8, 0, 8, 0)
@@ -978,7 +979,7 @@ Partial Class frmSendungsdetailsNEU
        Me.TabPage1.Location = New System.Drawing.Point(4, 22)
        Me.TabPage1.Name = "TabPage1"
        Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage1.Size = New System.Drawing.Size(1206, 274)
+        Me.TabPage1.Size = New System.Drawing.Size(1206, 261)
        Me.TabPage1.TabIndex = 0
        Me.TabPage1.Text = "Kunden - Zolltarif"
        Me.TabPage1.UseVisualStyleBackColor = True
@@ -994,7 +995,7 @@ Partial Class frmSendungsdetailsNEU
        Me.pnlKundenZolltarif.Location = New System.Drawing.Point(3, 36)
        Me.pnlKundenZolltarif.MinimumSize = New System.Drawing.Size(2, 103)
        Me.pnlKundenZolltarif.Name = "pnlKundenZolltarif"
-        Me.pnlKundenZolltarif.Size = New System.Drawing.Size(1200, 235)
+        Me.pnlKundenZolltarif.Size = New System.Drawing.Size(1200, 222)
        Me.pnlKundenZolltarif.TabIndex = 1
        Me.pnlKundenZolltarif.TabStop = True
        '
@@ -1003,7 +1004,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Label22.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label22.AutoSize = True
-        Me.Label22.Location = New System.Drawing.Point(4, 194)
+        Me.Label22.Location = New System.Drawing.Point(4, 181)
        Me.Label22.Name = "Label22"
        Me.Label22.Size = New System.Drawing.Size(209, 13)
        Me.Label22.TabIndex = 0
@@ -1015,7 +1016,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.AutoSize = True
-        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Location = New System.Drawing.Point(4, 208)
+        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Location = New System.Drawing.Point(4, 195)
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Name = "lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden"
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Size = New System.Drawing.Size(338, 13)
        Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.TabIndex = 1
@@ -1060,7 +1061,7 @@ Partial Class frmSendungsdetailsNEU
        Me.TabPage2.Location = New System.Drawing.Point(4, 22)
        Me.TabPage2.Name = "TabPage2"
        Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage2.Size = New System.Drawing.Size(1206, 274)
+        Me.TabPage2.Size = New System.Drawing.Size(1206, 261)
        Me.TabPage2.TabIndex = 1
        Me.TabPage2.Text = "Speditionsbuch"
        Me.TabPage2.UseVisualStyleBackColor = True
@@ -1077,7 +1078,7 @@ Partial Class frmSendungsdetailsNEU
        Me.DataGridView.Dock = System.Windows.Forms.DockStyle.Fill
        Me.DataGridView.Location = New System.Drawing.Point(3, 94)
        Me.DataGridView.Name = "DataGridView"
-        Me.DataGridView.Size = New System.Drawing.Size(1200, 177)
+        Me.DataGridView.Size = New System.Drawing.Size(1200, 164)
        Me.DataGridView.TabIndex = 1
        '
        'pnlSpedBuchNacherfassung
@@ -1382,7 +1383,7 @@ Partial Class frmSendungsdetailsNEU
        Me.TabPage3.Controls.Add(Me.gridVermerke)
        Me.TabPage3.Location = New System.Drawing.Point(4, 22)
        Me.TabPage3.Name = "TabPage3"
-        Me.TabPage3.Size = New System.Drawing.Size(1206, 274)
+        Me.TabPage3.Size = New System.Drawing.Size(1206, 261)
        Me.TabPage3.TabIndex = 3
        Me.TabPage3.Text = "Vermerke"
        Me.TabPage3.UseVisualStyleBackColor = True
@@ -1392,51 +1393,51 @@ Partial Class frmSendungsdetailsNEU
        Me.gridVermerke.AllowUserToAddRows = False
        Me.gridVermerke.AllowUserToDeleteRows = False
        Me.gridVermerke.AllowUserToResizeRows = False
-        DataGridViewCellStyle2.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle9.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
+        Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle9
        Me.gridVermerke.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle10.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle3.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle10.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle3.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle10.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle10.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle10.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle10.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle3
+        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle10
        Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle11.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle11.BackColor = System.Drawing.SystemColors.Window
-        DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle11.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.ControlText
+        DataGridViewCellStyle11.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle11.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle4
+        Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle11
        Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill
        Me.gridVermerke.Location = New System.Drawing.Point(0, 0)
        Me.gridVermerke.MultiSelect = False
        Me.gridVermerke.Name = "gridVermerke"
        Me.gridVermerke.ReadOnly = True
-        DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle12.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle12.BackColor = System.Drawing.SystemColors.Control
-        DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle12.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle12.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle12.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle5
+        Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle12
        Me.gridVermerke.RowHeadersVisible = False
        Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle6
+        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle13
        Me.gridVermerke.RowTemplate.Height = 20
        Me.gridVermerke.RowTemplate.ReadOnly = True
        Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
        Me.gridVermerke.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
        Me.gridVermerke.ShowCellErrors = False
        Me.gridVermerke.ShowRowErrors = False
-        Me.gridVermerke.Size = New System.Drawing.Size(1206, 274)
+        Me.gridVermerke.Size = New System.Drawing.Size(1206, 261)
        Me.gridVermerke.TabIndex = 0
        Me.gridVermerke.TabStop = False
        '
@@ -1461,7 +1462,7 @@ Partial Class frmSendungsdetailsNEU
        Me.pnlDetails.Location = New System.Drawing.Point(0, 55)
        Me.pnlDetails.MinimumSize = New System.Drawing.Size(0, 310)
        Me.pnlDetails.Name = "pnlDetails"
-        Me.pnlDetails.Size = New System.Drawing.Size(1214, 384)
+        Me.pnlDetails.Size = New System.Drawing.Size(1214, 397)
        Me.pnlDetails.TabIndex = 1
        '
        'tbcntr
@@ -1473,7 +1474,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbcntr.Location = New System.Drawing.Point(837, 69)
        Me.tbcntr.Name = "tbcntr"
        Me.tbcntr.SelectedIndex = 0
-        Me.tbcntr.Size = New System.Drawing.Size(377, 312)
+        Me.tbcntr.Size = New System.Drawing.Size(377, 325)
        Me.tbcntr.TabIndex = 2
        Me.tbcntr.TabStop = False
        '
@@ -1493,10 +1494,8 @@ Partial Class frmSendungsdetailsNEU
        Me.TabPage4.Controls.Add(Me.Button14)
        Me.TabPage4.Controls.Add(Me.Button12)
        Me.TabPage4.Controls.Add(Me.txtGewicht)
        Me.TabPage4.Controls.Add(Me.txtBARzuKassieren)
        Me.TabPage4.Controls.Add(Me.lblWarenbezeichnung)
        Me.TabPage4.Controls.Add(Me.Label35)
        Me.TabPage4.Controls.Add(Me.lblZuKass)
        Me.TabPage4.Controls.Add(Me.lblCollGew)
        Me.TabPage4.Controls.Add(Me.Button3)
        Me.TabPage4.Controls.Add(Me.Button8)
@@ -1507,10 +1506,11 @@ Partial Class frmSendungsdetailsNEU
        Me.TabPage4.Controls.Add(Me.lblAnmerkung)
        Me.TabPage4.Controls.Add(Me.cboPrinter)
        Me.TabPage4.Controls.Add(Me.rtbAnmerkung)
        Me.TabPage4.Controls.Add(Me.Panel22)
        Me.TabPage4.Location = New System.Drawing.Point(4, 22)
        Me.TabPage4.Name = "TabPage4"
        Me.TabPage4.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage4.Size = New System.Drawing.Size(369, 286)
+        Me.TabPage4.Size = New System.Drawing.Size(369, 299)
        Me.TabPage4.TabIndex = 0
        Me.TabPage4.Text = "Aktendeckel"
        Me.TabPage4.UseVisualStyleBackColor = True
@@ -1528,31 +1528,31 @@ Partial Class frmSendungsdetailsNEU
        Me.txtFrachtkosten._Waehrung = True
        Me.txtFrachtkosten._WaehrungZeichen = True
        Me.txtFrachtkosten.ForeColor = System.Drawing.Color.Black
-        Me.txtFrachtkosten.Location = New System.Drawing.Point(300, 69)
+        Me.txtFrachtkosten.Location = New System.Drawing.Point(300, 77)
        Me.txtFrachtkosten.MaxLineLength = -1
        Me.txtFrachtkosten.MaxLines_Warning = ""
        Me.txtFrachtkosten.MaxLines_Warning_Label = Nothing
        Me.txtFrachtkosten.Name = "txtFrachtkosten"
        Me.txtFrachtkosten.Size = New System.Drawing.Size(64, 20)
-        Me.txtFrachtkosten.TabIndex = 14
+        Me.txtFrachtkosten.TabIndex = 13
        Me.txtFrachtkosten.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        '
        'Label1
        '
        Me.Label1.AutoSize = True
-        Me.Label1.Location = New System.Drawing.Point(232, 72)
+        Me.Label1.Location = New System.Drawing.Point(232, 80)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(55, 13)
-        Me.Label1.TabIndex = 13
+        Me.Label1.TabIndex = 12
        Me.Label1.Text = "Fracht (€):"
        '
        'cbx
        '
        Me.cbx.AutoSize = True
-        Me.cbx.Location = New System.Drawing.Point(310, 152)
+        Me.cbx.Location = New System.Drawing.Point(310, 168)
        Me.cbx.Name = "cbx"
        Me.cbx.Size = New System.Drawing.Size(55, 17)
-        Me.cbx.TabIndex = 21
+        Me.cbx.TabIndex = 20
        Me.cbx.Text = "Laufz."
        Me.cbx.UseVisualStyleBackColor = True
        Me.cbx.Visible = False
@@ -1571,7 +1571,7 @@ Partial Class frmSendungsdetailsNEU
        Me.txtWarenwertWaehrung.INVISIBLE_COLUMNS = Nothing
        Me.txtWarenwertWaehrung.key_visible = False
        Me.txtWarenwertWaehrung.KEYPARAM = Nothing
-        Me.txtWarenwertWaehrung.Location = New System.Drawing.Point(186, 69)
+        Me.txtWarenwertWaehrung.Location = New System.Drawing.Point(186, 77)
        Me.txtWarenwertWaehrung.Name = "txtWarenwertWaehrung"
        Me.txtWarenwertWaehrung.searchActive = True
        Me.txtWarenwertWaehrung.Size = New System.Drawing.Size(40, 20)
@@ -1579,16 +1579,16 @@ Partial Class frmSendungsdetailsNEU
        Me.txtWarenwertWaehrung.SQL_SELECT = Nothing
        Me.txtWarenwertWaehrung.SQL_WHERE = Nothing
        Me.txtWarenwertWaehrung.SQL_WhereParamList = Nothing
-        Me.txtWarenwertWaehrung.TabIndex = 12
+        Me.txtWarenwertWaehrung.TabIndex = 11
        Me.txtWarenwertWaehrung.usrcntl = Nothing
        '
        'lblWW
        '
        Me.lblWW.AutoSize = True
-        Me.lblWW.Location = New System.Drawing.Point(4, 72)
+        Me.lblWW.Location = New System.Drawing.Point(4, 80)
        Me.lblWW.Name = "lblWW"
        Me.lblWW.Size = New System.Drawing.Size(62, 13)
-        Me.lblWW.TabIndex = 10
+        Me.lblWW.TabIndex = 9
        Me.lblWW.Text = "Warenwert:"
        '
        'txtWarenwert
@@ -1604,13 +1604,13 @@ Partial Class frmSendungsdetailsNEU
        Me.txtWarenwert._Waehrung = False
        Me.txtWarenwert._WaehrungZeichen = True
        Me.txtWarenwert.ForeColor = System.Drawing.Color.Black
-        Me.txtWarenwert.Location = New System.Drawing.Point(78, 69)
+        Me.txtWarenwert.Location = New System.Drawing.Point(78, 77)
        Me.txtWarenwert.MaxLineLength = -1
        Me.txtWarenwert.MaxLines_Warning = ""
        Me.txtWarenwert.MaxLines_Warning_Label = Nothing
        Me.txtWarenwert.Name = "txtWarenwert"
        Me.txtWarenwert.Size = New System.Drawing.Size(109, 20)
-        Me.txtWarenwert.TabIndex = 11
+        Me.txtWarenwert.TabIndex = 10
        Me.txtWarenwert.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        '
        'Button21
@@ -1619,11 +1619,11 @@ Partial Class frmSendungsdetailsNEU
        Me.Button21.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
        Me.Button21.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button21.Location = New System.Drawing.Point(233, 253)
+        Me.Button21.Location = New System.Drawing.Point(233, 269)
        Me.Button21.Name = "Button21"
        Me.Button21.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
        Me.Button21.Size = New System.Drawing.Size(131, 30)
-        Me.Button21.TabIndex = 27
+        Me.Button21.TabIndex = 26
        Me.Button21.Text = "weitere Formulare"
        Me.Button21.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.Button21.UseVisualStyleBackColor = True
@@ -1631,18 +1631,18 @@ Partial Class frmSendungsdetailsNEU
        'lblAnmerkungDispoliste
        '
        Me.lblAnmerkungDispoliste.AutoSize = True
-        Me.lblAnmerkungDispoliste.Location = New System.Drawing.Point(3, 238)
+        Me.lblAnmerkungDispoliste.Location = New System.Drawing.Point(3, 254)
        Me.lblAnmerkungDispoliste.Name = "lblAnmerkungDispoliste"
        Me.lblAnmerkungDispoliste.Size = New System.Drawing.Size(112, 13)
-        Me.lblAnmerkungDispoliste.TabIndex = 24
+        Me.lblAnmerkungDispoliste.TabIndex = 23
        Me.lblAnmerkungDispoliste.Text = "Anmerkung Dispoliste:"
        '
        'rtbAnmerkungDispoliste
        '
-        Me.rtbAnmerkungDispoliste.Location = New System.Drawing.Point(6, 252)
+        Me.rtbAnmerkungDispoliste.Location = New System.Drawing.Point(6, 268)
        Me.rtbAnmerkungDispoliste.Name = "rtbAnmerkungDispoliste"
        Me.rtbAnmerkungDispoliste.Size = New System.Drawing.Size(224, 31)
-        Me.rtbAnmerkungDispoliste.TabIndex = 26
+        Me.rtbAnmerkungDispoliste.TabIndex = 25
        Me.rtbAnmerkungDispoliste.Text = ""
        '
        'btnImportaviso
@@ -1652,11 +1652,11 @@ Partial Class frmSendungsdetailsNEU
        Me.btnImportaviso.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
        Me.btnImportaviso.Image = Global.AVISO.My.Resources.Resources.auftrag3
        Me.btnImportaviso.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnImportaviso.Location = New System.Drawing.Point(233, 195)
+        Me.btnImportaviso.Location = New System.Drawing.Point(233, 211)
        Me.btnImportaviso.Name = "btnImportaviso"
        Me.btnImportaviso.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
        Me.btnImportaviso.Size = New System.Drawing.Size(131, 30)
-        Me.btnImportaviso.TabIndex = 23
+        Me.btnImportaviso.TabIndex = 22
        Me.btnImportaviso.Text = "Importaviso"
        Me.btnImportaviso.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnImportaviso.UseVisualStyleBackColor = True
@@ -1669,11 +1669,11 @@ Partial Class frmSendungsdetailsNEU
        Me.btnVorauszahlung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
        Me.btnVorauszahlung.Image = Global.AVISO.My.Resources.Resources.vorauszahlung3
        Me.btnVorauszahlung.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnVorauszahlung.Location = New System.Drawing.Point(233, 224)
+        Me.btnVorauszahlung.Location = New System.Drawing.Point(233, 240)
        Me.btnVorauszahlung.Name = "btnVorauszahlung"
        Me.btnVorauszahlung.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
        Me.btnVorauszahlung.Size = New System.Drawing.Size(131, 30)
-        Me.btnVorauszahlung.TabIndex = 25
+        Me.btnVorauszahlung.TabIndex = 24
        Me.btnVorauszahlung.Text = "Vorauskasse"
        Me.btnVorauszahlung.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.btnVorauszahlung.UseVisualStyleBackColor = True
@@ -1689,21 +1689,21 @@ Partial Class frmSendungsdetailsNEU
        Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button14.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
        Me.Button14.ImageAlign = System.Drawing.ContentAlignment.TopCenter
-        Me.Button14.Location = New System.Drawing.Point(350, 24)
+        Me.Button14.Location = New System.Drawing.Point(349, 61)
        Me.Button14.Name = "Button14"
        Me.Button14.Padding = New System.Windows.Forms.Padding(0, 13, 0, 0)
        Me.Button14.Size = New System.Drawing.Size(15, 15)
-        Me.Button14.TabIndex = 2
+        Me.Button14.TabIndex = 8
        Me.Button14.TabStop = False
        Me.Button14.TextAlign = System.Drawing.ContentAlignment.BottomCenter
        Me.Button14.UseVisualStyleBackColor = True
        '
        'Button12
        '
-        Me.Button12.Location = New System.Drawing.Point(49, 145)
+        Me.Button12.Location = New System.Drawing.Point(49, 161)
        Me.Button12.Name = "Button12"
        Me.Button12.Size = New System.Drawing.Size(75, 23)
-        Me.Button12.TabIndex = 18
+        Me.Button12.TabIndex = 17
        Me.Button12.Text = "ATLAS"
        Me.Button12.UseVisualStyleBackColor = True
        Me.Button12.Visible = False
@@ -1721,82 +1721,50 @@ Partial Class frmSendungsdetailsNEU
        Me.txtGewicht._Waehrung = False
        Me.txtGewicht._WaehrungZeichen = True
        Me.txtGewicht.ForeColor = System.Drawing.Color.Black
-        Me.txtGewicht.Location = New System.Drawing.Point(146, 50)
+        Me.txtGewicht.Location = New System.Drawing.Point(81, 22)
        Me.txtGewicht.MaxLineLength = -1
        Me.txtGewicht.MaxLines_Warning = ""
        Me.txtGewicht.MaxLines_Warning_Label = Nothing
        Me.txtGewicht.Name = "txtGewicht"
-        Me.txtGewicht.Size = New System.Drawing.Size(60, 20)
+        Me.txtGewicht.Size = New System.Drawing.Size(69, 20)
-        Me.txtGewicht.TabIndex = 6
+        Me.txtGewicht.TabIndex = 4
        Me.txtGewicht.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        '
        'txtBARzuKassieren
        '
        Me.txtBARzuKassieren._DateTimeOnly = False
        Me.txtBARzuKassieren._numbersOnly = False
        Me.txtBARzuKassieren._numbersOnlyKommastellen = ""
        Me.txtBARzuKassieren._Prozent = False
        Me.txtBARzuKassieren._ShortDateNew = False
        Me.txtBARzuKassieren._ShortDateOnly = False
        Me.txtBARzuKassieren._TimeOnly = False
        Me.txtBARzuKassieren._value = ""
        Me.txtBARzuKassieren._Waehrung = True
        Me.txtBARzuKassieren._WaehrungZeichen = True
        Me.txtBARzuKassieren.ForeColor = System.Drawing.Color.Black
        Me.txtBARzuKassieren.Location = New System.Drawing.Point(300, 50)
        Me.txtBARzuKassieren.MaxLineLength = -1
        Me.txtBARzuKassieren.MaxLines_Warning = ""
        Me.txtBARzuKassieren.MaxLines_Warning_Label = Nothing
        Me.txtBARzuKassieren.Name = "txtBARzuKassieren"
        Me.txtBARzuKassieren.Size = New System.Drawing.Size(64, 20)
        Me.txtBARzuKassieren.TabIndex = 8
        Me.txtBARzuKassieren.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        '
        'lblWarenbezeichnung
        '
        Me.lblWarenbezeichnung.AutoSize = True
-        Me.lblWarenbezeichnung.Location = New System.Drawing.Point(3, 3)
+        Me.lblWarenbezeichnung.Location = New System.Drawing.Point(4, 34)
        Me.lblWarenbezeichnung.Name = "lblWarenbezeichnung"
-        Me.lblWarenbezeichnung.Size = New System.Drawing.Size(100, 13)
+        Me.lblWarenbezeichnung.Size = New System.Drawing.Size(0, 13)
-        Me.lblWarenbezeichnung.TabIndex = 0
+        Me.lblWarenbezeichnung.TabIndex = 6
        Me.lblWarenbezeichnung.Text = "Warenbezeichnung"
        '
        'Label35
        '
        Me.Label35.AutoSize = True
-        Me.Label35.Location = New System.Drawing.Point(232, 95)
+        Me.Label35.Location = New System.Drawing.Point(232, 111)
        Me.Label35.Name = "Label35"
        Me.Label35.Size = New System.Drawing.Size(131, 13)
-        Me.Label35.TabIndex = 16
+        Me.Label35.TabIndex = 15
        Me.Label35.Text = "Aktenzettel drucken/PDF:"
        '
        'lblZuKass
        '
        Me.lblZuKass.AutoSize = True
        Me.lblZuKass.Location = New System.Drawing.Point(232, 53)
        Me.lblZuKass.Name = "lblZuKass"
        Me.lblZuKass.Size = New System.Drawing.Size(69, 13)
        Me.lblZuKass.TabIndex = 9
        Me.lblZuKass.Text = "zu kassieren:"
        '
        'lblCollGew
        '
        Me.lblCollGew.AutoSize = True
-        Me.lblCollGew.Location = New System.Drawing.Point(4, 53)
+        Me.lblCollGew.Location = New System.Drawing.Point(3, 5)
        Me.lblCollGew.Name = "lblCollGew"
-        Me.lblCollGew.Size = New System.Drawing.Size(73, 13)
+        Me.lblCollGew.Size = New System.Drawing.Size(171, 13)
-        Me.lblCollGew.TabIndex = 3
+        Me.lblCollGew.TabIndex = 0
-        Me.lblCollGew.Text = "Colli/Gewicht:"
+        Me.lblCollGew.Text = "Colli/Gewicht/Warenbezeichnung:"
        '
        'Button3
        '
        Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button3.Image = CType(resources.GetObject("Button3.Image"), System.Drawing.Image)
-        Me.Button3.Location = New System.Drawing.Point(233, 111)
+        Me.Button3.Location = New System.Drawing.Point(233, 127)
        Me.Button3.Margin = New System.Windows.Forms.Padding(0, 3, 0, 3)
        Me.Button3.Name = "Button3"
        Me.Button3.Size = New System.Drawing.Size(78, 60)
-        Me.Button3.TabIndex = 19
+        Me.Button3.TabIndex = 18
        Me.Button3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.Button3.UseVisualStyleBackColor = True
        '
@@ -1805,10 +1773,10 @@ Partial Class frmSendungsdetailsNEU
        Me.Button8.BackgroundImage = CType(resources.GetObject("Button8.BackgroundImage"), System.Drawing.Image)
        Me.Button8.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
        Me.Button8.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button8.Location = New System.Drawing.Point(310, 111)
+        Me.Button8.Location = New System.Drawing.Point(310, 127)
        Me.Button8.Name = "Button8"
        Me.Button8.Size = New System.Drawing.Size(54, 60)
-        Me.Button8.TabIndex = 20
+        Me.Button8.TabIndex = 19
        Me.Button8.UseVisualStyleBackColor = True
        '
        'txtColli
@@ -1824,50 +1792,50 @@ Partial Class frmSendungsdetailsNEU
        Me.txtColli._Waehrung = False
        Me.txtColli._WaehrungZeichen = True
        Me.txtColli.ForeColor = System.Drawing.Color.Black
-        Me.txtColli.Location = New System.Drawing.Point(78, 50)
+        Me.txtColli.Location = New System.Drawing.Point(7, 22)
        Me.txtColli.MaxLineLength = -1
        Me.txtColli.MaxLines_Warning = ""
        Me.txtColli.MaxLines_Warning_Label = Nothing
        Me.txtColli.Name = "txtColli"
        Me.txtColli.Size = New System.Drawing.Size(46, 20)
-        Me.txtColli.TabIndex = 4
+        Me.txtColli.TabIndex = 3
        Me.txtColli.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        '
        'rtbWarenbezeichnung
        '
        Me.rtbWarenbezeichnung.Cursor = System.Windows.Forms.Cursors.IBeam
-        Me.rtbWarenbezeichnung.Location = New System.Drawing.Point(6, 19)
+        Me.rtbWarenbezeichnung.Location = New System.Drawing.Point(6, 41)
        Me.rtbWarenbezeichnung.MaxLength = 500
        Me.rtbWarenbezeichnung.Name = "rtbWarenbezeichnung"
-        Me.rtbWarenbezeichnung.Size = New System.Drawing.Size(359, 32)
+        Me.rtbWarenbezeichnung.Size = New System.Drawing.Size(359, 36)
-        Me.rtbWarenbezeichnung.TabIndex = 1
+        Me.rtbWarenbezeichnung.TabIndex = 7
        Me.rtbWarenbezeichnung.Text = ""
        '
        'Label23
        '
        Me.Label23.AutoSize = True
-        Me.Label23.Location = New System.Drawing.Point(123, 53)
+        Me.Label23.Location = New System.Drawing.Point(52, 25)
        Me.Label23.Name = "Label23"
        Me.Label23.Size = New System.Drawing.Size(23, 13)
-        Me.Label23.TabIndex = 5
+        Me.Label23.TabIndex = 1
        Me.Label23.Text = "Pk."
        '
        'Label24
        '
        Me.Label24.AutoSize = True
-        Me.Label24.Location = New System.Drawing.Point(207, 53)
+        Me.Label24.Location = New System.Drawing.Point(152, 25)
        Me.Label24.Name = "Label24"
        Me.Label24.Size = New System.Drawing.Size(19, 13)
-        Me.Label24.TabIndex = 7
+        Me.Label24.TabIndex = 5
        Me.Label24.Text = "kg"
        '
        'lblAnmerkung
        '
        Me.lblAnmerkung.AutoSize = True
-        Me.lblAnmerkung.Location = New System.Drawing.Point(6, 95)
+        Me.lblAnmerkung.Location = New System.Drawing.Point(6, 111)
        Me.lblAnmerkung.Name = "lblAnmerkung"
        Me.lblAnmerkung.Size = New System.Drawing.Size(64, 13)
-        Me.lblAnmerkung.TabIndex = 15
+        Me.lblAnmerkung.TabIndex = 14
        Me.lblAnmerkung.Text = "Anmerkung:"
        '
        'cboPrinter
@@ -1878,19 +1846,62 @@ Partial Class frmSendungsdetailsNEU
        Me.cboPrinter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboPrinter.DropDownWidth = 300
        Me.cboPrinter.FormattingEnabled = True
-        Me.cboPrinter.Location = New System.Drawing.Point(233, 171)
+        Me.cboPrinter.Location = New System.Drawing.Point(233, 187)
        Me.cboPrinter.Name = "cboPrinter"
        Me.cboPrinter.Size = New System.Drawing.Size(131, 21)
-        Me.cboPrinter.TabIndex = 22
+        Me.cboPrinter.TabIndex = 21
        '
        'rtbAnmerkung
        '
-        Me.rtbAnmerkung.Location = New System.Drawing.Point(6, 111)
+        Me.rtbAnmerkung.Location = New System.Drawing.Point(6, 127)
        Me.rtbAnmerkung.Name = "rtbAnmerkung"
        Me.rtbAnmerkung.Size = New System.Drawing.Size(224, 124)
-        Me.rtbAnmerkung.TabIndex = 17
+        Me.rtbAnmerkung.TabIndex = 16
        Me.rtbAnmerkung.Text = ""
        '
        'Panel22
        '
        Me.Panel22.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Panel22.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
        Me.Panel22.Controls.Add(Me.txtBARzuKassieren)
        Me.Panel22.Controls.Add(Me.lblZuKass)
        Me.Panel22.Location = New System.Drawing.Point(254, 0)
        Me.Panel22.Name = "Panel22"
        Me.Panel22.Size = New System.Drawing.Size(115, 41)
        Me.Panel22.TabIndex = 2
        Me.Panel22.TabStop = True
        '
        'txtBARzuKassieren
        '
        Me.txtBARzuKassieren._DateTimeOnly = False
        Me.txtBARzuKassieren._numbersOnly = False
        Me.txtBARzuKassieren._numbersOnlyKommastellen = ""
        Me.txtBARzuKassieren._Prozent = False
        Me.txtBARzuKassieren._ShortDateNew = False
        Me.txtBARzuKassieren._ShortDateOnly = False
        Me.txtBARzuKassieren._TimeOnly = False
        Me.txtBARzuKassieren._value = ""
        Me.txtBARzuKassieren._Waehrung = True
        Me.txtBARzuKassieren._WaehrungZeichen = True
        Me.txtBARzuKassieren.ForeColor = System.Drawing.Color.Black
        Me.txtBARzuKassieren.Location = New System.Drawing.Point(10, 16)
        Me.txtBARzuKassieren.MaxLineLength = -1
        Me.txtBARzuKassieren.MaxLines_Warning = ""
        Me.txtBARzuKassieren.MaxLines_Warning_Label = Nothing
        Me.txtBARzuKassieren.Name = "txtBARzuKassieren"
        Me.txtBARzuKassieren.Size = New System.Drawing.Size(100, 20)
        Me.txtBARzuKassieren.TabIndex = 1
        Me.txtBARzuKassieren.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        '
        'lblZuKass
        '
        Me.lblZuKass.AutoSize = True
        Me.lblZuKass.Location = New System.Drawing.Point(8, 3)
        Me.lblZuKass.Name = "lblZuKass"
        Me.lblZuKass.Size = New System.Drawing.Size(100, 13)
        Me.lblZuKass.TabIndex = 0
        Me.lblZuKass.Text = "zu kassieren (BAR):"
        '
        'tbVorkosten
        '
        Me.tbVorkosten.Controls.Add(Me.lblVK_BEarbeitungAbbrechen)
@@ -1901,7 +1912,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbVorkosten.Controls.Add(Me.dgvVorkosten)
        Me.tbVorkosten.Location = New System.Drawing.Point(4, 22)
        Me.tbVorkosten.Name = "tbVorkosten"
-        Me.tbVorkosten.Size = New System.Drawing.Size(369, 286)
+        Me.tbVorkosten.Size = New System.Drawing.Size(369, 299)
        Me.tbVorkosten.TabIndex = 2
        Me.tbVorkosten.Text = "Vorkosten"
        Me.tbVorkosten.UseVisualStyleBackColor = True
@@ -2045,8 +2056,8 @@ Partial Class frmSendungsdetailsNEU
        'clmnPreis
        '
        Me.clmnPreis.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        DataGridViewCellStyle7.Format = "C2"
+        DataGridViewCellStyle14.Format = "C2"
-        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle7
+        Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle14
        Me.clmnPreis.HeaderText = "Preis"
        Me.clmnPreis.MaxInputLength = 15
        Me.clmnPreis.Name = "clmnPreis"
@@ -2061,7 +2072,7 @@ Partial Class frmSendungsdetailsNEU
        Me.tbBAR.Location = New System.Drawing.Point(4, 22)
        Me.tbBAR.Name = "tbBAR"
        Me.tbBAR.Padding = New System.Windows.Forms.Padding(3)
-        Me.tbBAR.Size = New System.Drawing.Size(369, 286)
+        Me.tbBAR.Size = New System.Drawing.Size(369, 299)
        Me.tbBAR.TabIndex = 1
        Me.tbBAR.Text = "Abrechnung/BAR-Belege"
        Me.tbBAR.UseVisualStyleBackColor = True
@@ -2235,7 +2246,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel6.Location = New System.Drawing.Point(0, 69)
        Me.Panel6.MinimumSize = New System.Drawing.Size(2, 235)
        Me.Panel6.Name = "Panel6"
-        Me.Panel6.Size = New System.Drawing.Size(838, 310)
+        Me.Panel6.Size = New System.Drawing.Size(838, 325)
        Me.Panel6.TabIndex = 1
        '
        'picKdAtrNr_Fraechter
@@ -3005,7 +3016,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel15.Dock = System.Windows.Forms.DockStyle.Left
        Me.Panel15.Location = New System.Drawing.Point(0, 0)
        Me.Panel15.Name = "Panel15"
-        Me.Panel15.Size = New System.Drawing.Size(5, 310)
+        Me.Panel15.Size = New System.Drawing.Size(5, 325)
        Me.Panel15.TabIndex = 1
        '
        'txtAvisierer
@@ -3721,7 +3732,7 @@ Partial Class frmSendungsdetailsNEU
        Me.txtAnzahlPos.MaxLines_Warning_Label = Nothing
        Me.txtAnzahlPos.Name = "txtAnzahlPos"
        Me.txtAnzahlPos.Size = New System.Drawing.Size(41, 24)
-        Me.txtAnzahlPos.TabIndex = 17
+        Me.txtAnzahlPos.TabIndex = 14
        Me.txtAnzahlPos.Visible = False
        '
        'Label4
@@ -3732,7 +3743,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Label4.Location = New System.Drawing.Point(799, 6)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(64, 17)
-        Me.Label4.TabIndex = 16
+        Me.Label4.TabIndex = 5
        Me.Label4.Text = "Pos.Anz:"
        Me.Label4.Visible = False
        '
@@ -3744,7 +3755,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblAbfNrExists.Location = New System.Drawing.Point(117, 52)
        Me.lblAbfNrExists.Name = "lblAbfNrExists"
        Me.lblAbfNrExists.Size = New System.Drawing.Size(215, 13)
-        Me.lblAbfNrExists.TabIndex = 15
+        Me.lblAbfNrExists.TabIndex = 17
        Me.lblAbfNrExists.Text = "Abfertigungsnummer existiert bereits!"
        Me.lblAbfNrExists.Visible = False
        '
@@ -3756,7 +3767,7 @@ Partial Class frmSendungsdetailsNEU
        Me.cbxFremdspedition.Location = New System.Drawing.Point(639, 7)
        Me.cbxFremdspedition.Name = "cbxFremdspedition"
        Me.cbxFremdspedition.Size = New System.Drawing.Size(97, 17)
-        Me.cbxFremdspedition.TabIndex = 1
+        Me.cbxFremdspedition.TabIndex = 7
        Me.cbxFremdspedition.Text = "Fremdspedition"
        Me.cbxFremdspedition.UseVisualStyleBackColor = False
        '
@@ -3768,7 +3779,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblAbfNr_Err.Location = New System.Drawing.Point(99, 52)
        Me.lblAbfNr_Err.Name = "lblAbfNr_Err"
        Me.lblAbfNr_Err.Size = New System.Drawing.Size(235, 13)
-        Me.lblAbfNr_Err.TabIndex = 14
+        Me.lblAbfNr_Err.TabIndex = 16
        Me.lblAbfNr_Err.Text = "Abfertigungsnummer im falschen Format!"
        Me.lblAbfNr_Err.Visible = False
        '
@@ -3782,7 +3793,7 @@ Partial Class frmSendungsdetailsNEU
        Me.Panel1.Location = New System.Drawing.Point(1102, 0)
        Me.Panel1.Name = "Panel1"
        Me.Panel1.Size = New System.Drawing.Size(105, 63)
-        Me.Panel1.TabIndex = 3
+        Me.Panel1.TabIndex = 15
        Me.Panel1.TabStop = True
        '
        'Button13
@@ -3839,7 +3850,7 @@ Partial Class frmSendungsdetailsNEU
        Me.cboAbfertigungsart.Location = New System.Drawing.Point(422, 27)
        Me.cboAbfertigungsart.Name = "cboAbfertigungsart"
        Me.cboAbfertigungsart.Size = New System.Drawing.Size(315, 24)
-        Me.cboAbfertigungsart.TabIndex = 2
+        Me.cboAbfertigungsart.TabIndex = 12
        '
        'lblAbfertigungsart
        '
@@ -3849,7 +3860,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblAbfertigungsart.Location = New System.Drawing.Point(418, 7)
        Me.lblAbfertigungsart.Name = "lblAbfertigungsart"
        Me.lblAbfertigungsart.Size = New System.Drawing.Size(109, 17)
-        Me.lblAbfertigungsart.TabIndex = 0
+        Me.lblAbfertigungsart.TabIndex = 6
        Me.lblAbfertigungsart.Text = "Abfertigungsart:"
        '
        'pnlFremd
@@ -3863,7 +3874,7 @@ Partial Class frmSendungsdetailsNEU
        Me.pnlFremd.Location = New System.Drawing.Point(3, 5)
        Me.pnlFremd.Name = "pnlFremd"
        Me.pnlFremd.Size = New System.Drawing.Size(24, 63)
-        Me.pnlFremd.TabIndex = 4
+        Me.pnlFremd.TabIndex = 0
        '
        'Label9
        '
@@ -3986,7 +3997,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblAnzahl.Location = New System.Drawing.Point(738, 6)
        Me.lblAnzahl.Name = "lblAnzahl"
        Me.lblAnzahl.Size = New System.Drawing.Size(55, 17)
-        Me.lblAnzahl.TabIndex = 8
+        Me.lblAnzahl.TabIndex = 4
        Me.lblAnzahl.Text = "Anzahl:"
        Me.lblAnzahl.Visible = False
        '
@@ -3997,7 +4008,7 @@ Partial Class frmSendungsdetailsNEU
        Me.btnNeueAbfertigungNrVergeben.Location = New System.Drawing.Point(120, 27)
        Me.btnNeueAbfertigungNrVergeben.Name = "btnNeueAbfertigungNrVergeben"
        Me.btnNeueAbfertigungNrVergeben.Size = New System.Drawing.Size(224, 25)
-        Me.btnNeueAbfertigungNrVergeben.TabIndex = 10
+        Me.btnNeueAbfertigungNrVergeben.TabIndex = 9
        Me.btnNeueAbfertigungNrVergeben.Text = "Neue Abfertigung-Nr. vergeben"
        Me.btnNeueAbfertigungNrVergeben.UseVisualStyleBackColor = False
        Me.btnNeueAbfertigungNrVergeben.Visible = False
@@ -4010,7 +4021,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblFiliale.Location = New System.Drawing.Point(30, 6)
        Me.lblFiliale.Name = "lblFiliale"
        Me.lblFiliale.Size = New System.Drawing.Size(44, 17)
-        Me.lblFiliale.TabIndex = 5
+        Me.lblFiliale.TabIndex = 1
        Me.lblFiliale.Text = "Filiale"
        '
        'txtUnterNr
@@ -4032,7 +4043,7 @@ Partial Class frmSendungsdetailsNEU
        Me.txtUnterNr.MaxLines_Warning_Label = Nothing
        Me.txtUnterNr.Name = "txtUnterNr"
        Me.txtUnterNr.Size = New System.Drawing.Size(39, 24)
-        Me.txtUnterNr.TabIndex = 12
+        Me.txtUnterNr.TabIndex = 11
        Me.txtUnterNr.Visible = False
        '
        'lblAbfertigungsnummer
@@ -4043,7 +4054,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblAbfertigungsnummer.Location = New System.Drawing.Point(116, 6)
        Me.lblAbfertigungsnummer.Name = "lblAbfertigungsnummer"
        Me.lblAbfertigungsnummer.Size = New System.Drawing.Size(139, 17)
-        Me.lblAbfertigungsnummer.TabIndex = 6
+        Me.lblAbfertigungsnummer.TabIndex = 2
        Me.lblAbfertigungsnummer.Text = "Abfertigungsnummer"
        '
        'lblUnterNr
@@ -4054,7 +4065,7 @@ Partial Class frmSendungsdetailsNEU
        Me.lblUnterNr.Location = New System.Drawing.Point(344, 6)
        Me.lblUnterNr.Name = "lblUnterNr"
        Me.lblUnterNr.Size = New System.Drawing.Size(58, 17)
-        Me.lblUnterNr.TabIndex = 7
+        Me.lblUnterNr.TabIndex = 3
        Me.lblUnterNr.Text = "UnterNr"
        Me.lblUnterNr.Visible = False
        '
@@ -4069,7 +4080,7 @@ Partial Class frmSendungsdetailsNEU
        Me.cboFiliale.Location = New System.Drawing.Point(33, 27)
        Me.cboFiliale.Name = "cboFiliale"
        Me.cboFiliale.Size = New System.Drawing.Size(80, 24)
-        Me.cboFiliale.TabIndex = 9
+        Me.cboFiliale.TabIndex = 8
        '
        'txtAbfertigungsnummer
        '
@@ -4090,7 +4101,7 @@ Partial Class frmSendungsdetailsNEU
        Me.txtAbfertigungsnummer.MaxLines_Warning_Label = Nothing
        Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer"
        Me.txtAbfertigungsnummer.Size = New System.Drawing.Size(224, 24)
-        Me.txtAbfertigungsnummer.TabIndex = 11
+        Me.txtAbfertigungsnummer.TabIndex = 10
        '
        'Panel2
        '
@@ -4468,7 +4479,7 @@ Partial Class frmSendungsdetailsNEU
        '
        Me.cntxtAnh.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MarkiertePDFsDruckenToolStripMenuItem, Me.EMailAnfügenToolStripMenuItem, Me.KopierenZwischenablageToolStripMenuItem, Me.LaufzetteldruckJANEINToolStripMenuItem, Me.GestellungslisteAnfügenJANEINToolStripMenuItem, Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem})
        Me.cntxtAnh.Name = "cntxtAnh"
-        Me.cntxtAnh.Size = New System.Drawing.Size(286, 158)
+        Me.cntxtAnh.Size = New System.Drawing.Size(286, 136)
        '
        'MarkiertePDFsDruckenToolStripMenuItem
        '
@@ -4502,6 +4513,13 @@ Partial Class frmSendungsdetailsNEU
        Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
        Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Text = "Gestellungsliste anfügen JA/NEIN"
        '
        'AbrechungFremdeGrenzeAktDruckenToolStripMenuItem
        '
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.printer
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Name = "AbrechungFremdeGrenzeAktDruckenToolStripMenuItem"
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Text = "Abrechung: Fremde Grenze Akt drucken"
        '
        'ToolStripMenuItem3
        '
        Me.ToolStripMenuItem3.Image = Global.AVISO.My.Resources.Resources.plus
@@ -4836,13 +4854,6 @@ Partial Class frmSendungsdetailsNEU
        Me.NurÖffnenToolStripMenuItem.Size = New System.Drawing.Size(247, 22)
        Me.NurÖffnenToolStripMenuItem.Text = "nur öffnen"
        '
        'AbrechungFremdeGrenzeAktDruckenToolStripMenuItem
        '
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.printer
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Name = "AbrechungFremdeGrenzeAktDruckenToolStripMenuItem"
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Size = New System.Drawing.Size(285, 22)
        Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Text = "Abrechung: Fremde Grenze Akt drucken"
        '
        'frmSendungsdetailsNEU
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
@@ -4891,6 +4902,8 @@ Partial Class frmSendungsdetailsNEU
        Me.tbcntr.ResumeLayout(False)
        Me.TabPage4.ResumeLayout(False)
        Me.TabPage4.PerformLayout()
        Me.Panel22.ResumeLayout(False)
        Me.Panel22.PerformLayout()
        Me.tbVorkosten.ResumeLayout(False)
        Me.tbVorkosten.PerformLayout()
        CType(Me.dgvVorkosten, System.ComponentModel.ISupportInitialize).EndInit()
@@ -5284,4 +5297,5 @@ Partial Class frmSendungsdetailsNEU
    Friend WithEvents ToolStripMenuItem23 As ToolStripMenuItem
    Friend WithEvents ToolStripMenuItem24 As ToolStripMenuItem
    Friend WithEvents AbrechungFremdeGrenzeAktDruckenToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents Panel22 As Panel
 End Class
--- a/Aviso/frmSendungsdetailsNEU.resx
+++ b/Aviso/frmSendungsdetailsNEU.resx
@@ -118,6 +118,103 @@
    <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="Button14.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABIAAAASCAYAAABWzo5XAAAABGdBTUEAALGPC/xhBQAAAytJREFUOE+d
        kmtIU2EYx3df01qiZYX0JfuYBEFF2U2JEgqESCgScYpQZlYalV20mpUVRuk03+k2L7Plpt0sO5ouK7tf
        zcsSnYlCecl5vLy7uXOezuYpEhOqHzzwwvv8f/CHh/MTHo/H9/PznxUt25+kLiQGr98wkunpWTG+vn4+
        fD6fy679EZIkJx5CoVAUvDYsVqU1jpdXN43nEv2WHMJC3qlpHG9u73VGRspC/f3ne09sT8Uj4nJ5/OUr
        N8Yo9C3DOY8HB98NA27HgHtsgM1WwPc7qd6OfiupUun2sbkpeERSqa/05Nky52F9f9+tLsCPBwC7ZZ9G
        AX8YAfzMAriszTXwtOF997JlK9ew2Ul4ROvWb086eqnKcbEBsLoZsFv2sBdwPSOs6wdc2QO4qNk1ml5q
        /pKRka1ns5PwiKJk578HJzc1h2TaamN1zobLL6iurNd0i/wRZUwhXLXKRtqS+ZweOWjAnUplEcFmJ+ER
        7Yw8M7TqwMfWoNQxtC3fUXCkiiqT19Pa1Ic0SqqkmHHd3qF23N2lHG3IzdVMLwoJjZKFx+QNbM1xoORK
        F1K8pZHeDOhmF6DCFkByI41kWkeBvNT8LSUlY3qRROLts+9o4VCczqa5+opGNb2AmuyATE5AL4YBlZgA
        pVVTqvonr1tFIrEXm52ER8QcAGfJkuCQs4r7HZpGu/rN0Hj+IEWjURpQu51SVXW71ApFOWRmFn/dvGlL
        uFjAEXvSv8GKOByBQCRZsWJzXOL+C905xcSn9j6LvmeALLtn/NhXcfNBa3LyxdaiwsrOiuxjddd2Lyzx
        9ebOnUhO8Ev0kwULAleHhcl00dGHiLi4I0RERAIhEAi9REKh+FxCrMGkDQer6TRk7w0smT+bG8DGpoqm
        Q8DjiOPXzdR2KIPAZToJuOkEXNmzWDOPlf21yM1MMWdOYqikpA0tZWTHYYyRZcUvKmZqzvknkRufGdyA
        hA1emrY8t+wEU/MM5MUvNNjGyBnsyt/jI+EGJIZIis3ump/ToOelBiinXcp+/xtMzbmJG7wMhqvHQH7q
        GthsjMjd738Gj5ASh80mtVrtUpqmOT8ASDXvdskQmQUAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="Button3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAABGdBTUEAALGPC/xhBQAACQpJREFUaEPl
        mXlMlOkdx612m02brFe7bVNbNY2yXtHEVK1p0672Dw/wRAVFxFbARdAC4qICwkaqgqLoAoIgLvWEVRY8
        i+B6ACqnLCjHyDFcAzMc43AzM3z7e553GJhlAHWA2WS/ySeQ4Z3n9/2+z/tcL6N+9DIxmfMLMzOLDUPI
        p5qmR1ZhYXGtMlkjhoro6CRQs9OF1kdQFKQNQ6jY2EcsyGKh9RHU2wbp6uqCSt2FTqUa7Z0qtHYo0dym
        hKK1E/KWDjQ0dfDrjBYkOPj6oEHeJkSdop1fGxPzwDhBTp++OmCQtw0hlQvNXL2aYJwgAQEX+w3yLiFq
        Glv5dy5dumOcIH5+kXqDvGuI6gYhSFTUTeME8fUN6xPkfUJUypr5d8+fjzVOEB+fYJ0g7xuivFbBv3/u
        XIxxgnh6BmqDGBKiTCLnbZw9e8U4QfbvP8GDGBqipLKeB/nyy4vGCeLmdpQHUVMQQ0IUl8t4kMDAC8YJ
        4ux8WAhCvWFICFFpLQ8SEBAx8kGWLVsW7ujoqWYGVGq1QSEKiyU8iL9/KJYuXZozYcKEX2nKDJ/GjRv3
        k+XLl8c4ODjA0dGDG1Cq1AaFyC+q4u0cPRqE27dvY8WKFZg8efLvNCUN18SJEz9ctWqV38qVK9sIdGNp
        uRkSSQ127HDjBtj4MCTEy4IK3s7hw6cREREBV1c3ba1eJE2bNu3PGmtvJ/rCX01NTcHw9z+J3FwRyspq
        dBCLxbCx+Tc30EFBDAmR+1LM2/H2DoCTk1OfWqWlEnz11WWsX2/OPVGPRWus9q/Fixebs4sLCkpRXi7t
        lxs3bsDKyokbYAPdkBA5uaW8HU9Pf7BHViqV663ZjYODIwuj0FjWLzMzM7q4FpWVsgHx8vLCWPMbGLPh
        AUycUvGpVybMj+dgR/BL7I4owL6oIhy8LOIcuV7CYb8fuCSCS2Qhdp3Lh/XpPJj+JxuL3NPw8T8f46fm
        CbxH5PJmFBZWoKioEsXF1bxXKiqkOvXXrFmDKVOmOGts64p6Y6e9/U5UV9cNiFTaCGdnZ5TJlUPOv5wO
        oLNTiYyMwgF59CgTNH67yPZowX0vrV69urOwsBQ1NQ0D0tTUir179+JpteqdSSXui5X45rUSVws7EfVK
        F/sT8dQTRXjx4rWWtIx8BD2JRXhCgs7n5JetO58I7nuJdVdtbeOgKJVKWO89gevF6kG5WqTCsUwlPk99
        O6yv1yEuLo4mmBItScmZsPjfKRwKi9T5fMuWLZg0aZKrxn6P1q5dC5lMPihSqRSfhaUgKE+tl8Dv1NiW
        pMLqu++Hv78/8vPFg3LmzFksWrQoUWNf0IwZM36/bt061Ne/6ZfS0mqIRBVITk7GrsQ2eKV16bA7WY1P
        rhgOm0jKyoRaA5GamgGanKSaCIIoiNmhQz5obGzqQ01NPQ/RzYULF/DZky4tdo+68OG5LnwQNjTYup9E
        XZ1cp6Y+SkqqaG1Zz8bJz4UUpJkzZ+4KCQnFmzfNOlRWsrm7VktFRS18fX1hdx+cP10CRgUMLQs8HqC1
        tV2nbn+Ym5uzIBOEFCQKctDFxZ2M10KhaKaZqYX3RHW1TAf2iG33iIDdLWCCHxX2GXrGfF6Hjo6OPrW7
        kUhktNYokJhIa5cQ5NdCChIF8XRz86AZI4WTlVVEgZqoixtpcDdoaWtrx/pj6RjvRUVpqzVcFBYW6tRl
        NDYqqBdqcPNmqtbnhg0bWJDfCilIs2bNcnZ13a+9oDc5OSLqIfaoKaBSqTDDS45RtDsZThJozWB3vbm5
        mY+Hu3ef6/W2ceNGFuQ3QgoSBbHavdsV8fGpA3Lr1jNajER0h+rR1NyKey/kOH5XAatwBeZ61+Nj10Z8
        sLtTr7keujDWuQnTDtRj2ckGeMe34XJKA8plrfwpKCoqx4MH2Xrr94YF2bRpEwvySyEFafbs2X+xtbXH
        vXtp70k6UlJyeciCAjG/i2y8SSR1tIjW85/s+RaLJXzqzM0txvPnr/hzrr+9wYmJSWA90k72PxJSkKhH
        PrKwsEBSUtYPisTEDL2fMyIjo9l+q4Ds/0xIoZGlpSWePPlOLw8fZmLhwoUjjoeHt14/jOPHv8SCBQtu
        a+z3aPPmzXj27JVe7t17hCVLlow4Bw966fXDcHbei6lTp3pr7PeIbcKyskR6iY6OZdsBLXfu3KHuTRoW
        etfx8vLW64fB/JLtFYL7XqI/vEhMTMHLl2V9CAuLoLO6pZaMjIxhIyQkRFvH2/sLvX4YVlZWLMgiwX0v
        zZkzx9zX9yidyqr6EBX1XwQFBSMw8AyuXIlBXl4ezVA5yM5+QXcnG5mZ2WQiC+npWUhLyyQyaFZKp0cg
        HU+fptGMxnhOG85n9Hw/w+PHT+lwlEpjLwXffptC0y0jmWazPNphy+ik6MLrnT8fyU+H3/dTVFTBgqjJ
        9h8E99/T1q1btcdJfVy7lsjP10wdHZ200nfwfVFLSzstXm380KVQtPB9Gjuysk1nfb2CdghvNEcAOT/T
        sAOaRMK2QHWoqqrjbbPzeG1tA297376jfWr3Jjg4FPPmzbtElvueEJkopTgnJ5/ugkwv4eE3eSF2HB3q
        EGJxLT+fM5WVVSI29r5eDwxra2v2WP1DcN2Ptm3b1hUeHsUXrVevxFoePsymwlJeaLhCsFc/rC0me3t3
        nfqM+PgE2NrawcTE5CRZ7VnR+9Po0aMX0GofRoetPAqmtrGxQWjoN7yAmr0iHaYQJSUSGgPVvM7Fizdg
        Y7OdsGFbkdL58+d/PX78eFuy9zdiHDf6rpo+ffbYhITnvMBwh3j9uoq/GGfauNGuksqPJcZwI4YqNDTu
        Nvs/CNNwhxCJKvnfmezs9rGx0HPeMFRhYXG8YaVSxceHMEY6eKiWljZtMHYgE8K1aMMxGhqEkOxg1hO0
        581Md1ghcD0PzFRRUYW5cxeGaGwYJjMzi8Vsa20sWVjsZL1i+KNlamrxd9Yj+jh7NpYWrq9x5sw1nDp1
        GSdORMHPLxJHjoTj8OFQ+PgE0TbjNO2ZTsLd/Tjc3I7BxcUXe/Z8AUfHQ3BwOMhnJ/Zmf/t2F5pW99DW
        Yxc3382mTfadZOOPghvDxbbK443Ij0WjRv0fxAMdlKK/XzcAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="Button8.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAABoxJREFUSEut
        l3lM1EcUx0EREAU5mxi1VmPUmvYvQyKi4t0ijabVABZtAItSTWvBWLEgVlJERU0abVCr9QBBMESrHAKK
        lUus3CLHLrIILJew7MHuciy/b9+MuwRxUUh8yTfz25n3e5+Z+c3x1mQ0s7S0tNq/f/+hn4ODQ/cGBYWy
        8l1iPsH79oUvcXFZqw8xqgHQP5mYWJAsh8nczt5+rkKnE+qkUoibm8FKphd61TO1tECiV11jIypFInQr
        FEJAQEAExRjVOHiHvX2YfOlSdeeSJcoOZ2dl2+LFypbPPlc22NuryhwchKKZM5FtZ4cUW1skT5uGRHqO
        sbHBKWtrrmNTp+LIlCkIIwVZWuL4rl0oefZM6+vrG6rnvGUc/IOd3UnB3R29GzZAvX495GvWoGvjRmjz
        8qB98gTi1avRdfMm1OVlEIeEIGvWLEiTktCWno6sVasQR8DLBLw4aRJOUcwoPz9kPXoEnU4HT0/Pn/Ss
        N4yDA+3sooW1a6Fetw4qgshWuqFz+3aoUlJQO3MGZHfuQFNdjRTy7y4oQE1EBARBwEVzc8TSaK8Q+C8C
        xxD4OPmcCAjAo8ePMTg4iL6+PmHLli0het6QcfD3trbRupUroWBQNzd0LFuOdm9vDHR1QVNeDsnu3dA2
        NOAB+b84eRIt1CEG7nn5EneXL8dlKytcsLBAjJkZjpHPyZ07kV9UxH0GBgYgl8s13t7eB/VMbhzsN21a
        tGbZMnSuWIF2KluWLkXL1q3QVFSgatEiFNPUaqXNyKZ6JdWVBAbyoLE0yms02r8JfJ5G/+fEiYiimKfo
        GxeRX35+PtLS0pCTk4Pa2lp4eXn9qOe+Bn9nYxOtcHVFK/VeSsGbXFzQ6OGB7thYlH88C6ULF0Lx8CEG
        e3tRvHkzUubOwasHD5BE0xxPukpgNu3nCXyCgaljz8VixMXFISoqCuHh4QgKCsLZs2cFV1fX3UPgrdbW
        xyULF6By/nxUzJuHUtJ/s2cj18kJ96ZPxz9UJtDorlDwGHMLnCFQ1IQJiKSpPURlKK3sIIpFw8EO0h97
        9uBlayuePn2Kh9ThB9RJptTUVNaZmiHwBBOTT8xNTL4coS9srK2/vZ+VJdykFcyUZFBi4lCZeP06Lvnu
        wI2EBCTS7xs3bqCstBQdHR1oampCfX09l0QiQV1dHSoqKpqHwKOZg4PDnEH6mGq1Gj09PW+Lpr7jfjZU
        7R1QKRRD9Qp6lslkXF20QA3q7OxEVVWVlMV+H3gucQWlUsmDvSWtFi2p6eh8XgW5rNu4zwjV1NS8H+zo
        6MjBbBQqlcqoOouKUbf/VyjpmxprH6kPBlbWvcBjiqNqazfaPlLjAmtpSjUajXHRZyhxnAFNlwwaWgtG
        fYaJ9vPYwb20iBjcmNQVz1C04FPI/32Ed/kZNC4wnbc86Ej103EoPR7Nz2TRZi/oqOyl4MZ8DRoXuL+/
        nx32b4tWsvhrT9CWQ3dGJur9AviNZNRXL5FINHYwO+gZfLhYXdPBMLyKu04jp9802ldX49AUdgR9tK8H
        8PqC6CcYaxvQvzcuMBsFCzJcVI26Ld58tEw6qlNX16Lj/CWUOXwEkdt6SH/7HY1790Gy3R/tMRf4e+MC
        s2/I4Aax35JtvlDlF6CntAzytAwoC59AKxJDWy9BP51Yytx8SMMj0BoVje47KehOz8QAbcsxgZ2cnDiY
        jI+Qi8AM2EBgHW2fQZrKN9pHiLVramrRdS0eA2xNiMXjB2uKStDXTAnexm/4qA31YxHz56tfJHr/JWEA
        kxPkSclQF5dAGvQLVDl5rIobOxRWU+bSQlkmsxDKycopa2HGbqOMjAz+bDC6qdpYbHrkDKNmAPc1NqHt
        SCRkV2IhS7j5OoLeWPDpdGcz2N27d+Hs7Izs7GyEhoaigdIlSnORnJyM4uJixMTEsOuxlcWmVznDqA2f
        asW9TPTSNLPn4ZZHmWgsZSrx8fEIDg7G4cOH4b7BnScBlOQhNzcXWymN8tjgwcvKysp2Cm1Kr76GGLPh
        Uz2aHT16FIWFhXxkBw4cgL+/PzZt2oTbt28jkFIg1iEfHx94UCrFZoVmaEzbaQ5tH5YIGBXdWsKtW7cE
        unWE9PR0gRI74cyZM0J1dbUQGRkpUHYpnD59WsjMzBQKCgqEc+fOCXRkvn9xkU0hfWVqarqN5DNS1OZj
        YWHBS3Nzcx8zMzMf+r/F26ysrHg5efJk3qav20a+7iQLDqZcaTSZ6jXxA4rHBGDyP2IuNJzUb+7ZAAAA
        AElFTkSuQmCC
 </value>
  </data>
  <data name="btnDirektAnfuegen.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
@@ -1531,6 +1628,9 @@
        mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
 </value>
  </data>
  <metadata name="MenuStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>296, 17</value>
  </metadata>
  <data name="Button6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
@@ -1542,103 +1642,18 @@
  <metadata name="MenuStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>296, 17</value>
  </metadata>
-  <data name="Button14.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+  <metadata name="clmnVK_id.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>
+    <value>True</value>
-        iVBORw0KGgoAAAANSUhEUgAAABIAAAASCAYAAABWzo5XAAAABGdBTUEAALGPC/xhBQAAAytJREFUOE+d
+  </metadata>
-        kmtIU2EYx3df01qiZYX0JfuYBEFF2U2JEgqESCgScYpQZlYalV20mpUVRuk03+k2L7Plpt0sO5ouK7tf
+  <metadata name="clmnFirma.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-        zcsSnYlCecl5vLy7uXOezuYpEhOqHzzwwvv8f/CHh/MTHo/H9/PznxUt25+kLiQGr98wkunpWTG+vn4+
+    <value>True</value>
-        fD6fy679EZIkJx5CoVAUvDYsVqU1jpdXN43nEv2WHMJC3qlpHG9u73VGRspC/f3ne09sT8Uj4nJ5/OUr
+  </metadata>
-        N8Yo9C3DOY8HB98NA27HgHtsgM1WwPc7qd6OfiupUun2sbkpeERSqa/05Nky52F9f9+tLsCPBwC7ZZ9G
+  <metadata name="clmnLeistung.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-        AX8YAfzMAriszTXwtOF997JlK9ew2Ul4ROvWb086eqnKcbEBsLoZsFv2sBdwPSOs6wdc2QO4qNk1ml5q
+    <value>True</value>
-        /pKRka1ns5PwiKJk578HJzc1h2TaamN1zobLL6iurNd0i/wRZUwhXLXKRtqS+ZweOWjAnUplEcFmJ+ER
+  </metadata>
-        7Yw8M7TqwMfWoNQxtC3fUXCkiiqT19Pa1Ic0SqqkmHHd3qF23N2lHG3IzdVMLwoJjZKFx+QNbM1xoORK
+  <metadata name="clmnPreis.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-        F1K8pZHeDOhmF6DCFkByI41kWkeBvNT8LSUlY3qRROLts+9o4VCczqa5+opGNb2AmuyATE5AL4YBlZgA
+    <value>True</value>
-        pVVTqvonr1tFIrEXm52ER8QcAGfJkuCQs4r7HZpGu/rN0Hj+IEWjURpQu51SVXW71ApFOWRmFn/dvGlL
+  </metadata>
        uFjAEXvSv8GKOByBQCRZsWJzXOL+C905xcSn9j6LvmeALLtn/NhXcfNBa3LyxdaiwsrOiuxjddd2Lyzx
        9ebOnUhO8Ev0kwULAleHhcl00dGHiLi4I0RERAIhEAi9REKh+FxCrMGkDQer6TRk7w0smT+bG8DGpoqm
        Q8DjiOPXzdR2KIPAZToJuOkEXNmzWDOPlf21yM1MMWdOYqikpA0tZWTHYYyRZcUvKmZqzvknkRufGdyA
        hA1emrY8t+wEU/MM5MUvNNjGyBnsyt/jI+EGJIZIis3ump/ToOelBiinXcp+/xtMzbmJG7wMhqvHQH7q
        GthsjMjd738Gj5ASh80mtVrtUpqmOT8ASDXvdskQmQUAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="Button3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAABGdBTUEAALGPC/xhBQAACQpJREFUaEPl
        mXlMlOkdx612m02brFe7bVNbNY2yXtHEVK1p0672Dw/wRAVFxFbARdAC4qICwkaqgqLoAoIgLvWEVRY8
        i+B6ACqnLCjHyDFcAzMc43AzM3z7e553GJhlAHWA2WS/ySeQ4Z3n9/2+z/tcL6N+9DIxmfMLMzOLDUPI
        p5qmR1ZhYXGtMlkjhoro6CRQs9OF1kdQFKQNQ6jY2EcsyGKh9RHU2wbp6uqCSt2FTqUa7Z0qtHYo0dym
        hKK1E/KWDjQ0dfDrjBYkOPj6oEHeJkSdop1fGxPzwDhBTp++OmCQtw0hlQvNXL2aYJwgAQEX+w3yLiFq
        Glv5dy5dumOcIH5+kXqDvGuI6gYhSFTUTeME8fUN6xPkfUJUypr5d8+fjzVOEB+fYJ0g7xuivFbBv3/u
        XIxxgnh6BmqDGBKiTCLnbZw9e8U4QfbvP8GDGBqipLKeB/nyy4vGCeLmdpQHUVMQQ0IUl8t4kMDAC8YJ
        4ux8WAhCvWFICFFpLQ8SEBAx8kGWLVsW7ujoqWYGVGq1QSEKiyU8iL9/KJYuXZozYcKEX2nKDJ/GjRv3
        k+XLl8c4ODjA0dGDG1Cq1AaFyC+q4u0cPRqE27dvY8WKFZg8efLvNCUN18SJEz9ctWqV38qVK9sIdGNp
        uRkSSQ127HDjBtj4MCTEy4IK3s7hw6cREREBV1c3ba1eJE2bNu3PGmtvJ/rCX01NTcHw9z+J3FwRyspq
        dBCLxbCx+Tc30EFBDAmR+1LM2/H2DoCTk1OfWqWlEnz11WWsX2/OPVGPRWus9q/Fixebs4sLCkpRXi7t
        lxs3bsDKyokbYAPdkBA5uaW8HU9Pf7BHViqV663ZjYODIwuj0FjWLzMzM7q4FpWVsgHx8vLCWPMbGLPh
        AUycUvGpVybMj+dgR/BL7I4owL6oIhy8LOIcuV7CYb8fuCSCS2Qhdp3Lh/XpPJj+JxuL3NPw8T8f46fm
        CbxH5PJmFBZWoKioEsXF1bxXKiqkOvXXrFmDKVOmOGts64p6Y6e9/U5UV9cNiFTaCGdnZ5TJlUPOv5wO
        oLNTiYyMwgF59CgTNH67yPZowX0vrV69urOwsBQ1NQ0D0tTUir179+JpteqdSSXui5X45rUSVws7EfVK
        F/sT8dQTRXjx4rWWtIx8BD2JRXhCgs7n5JetO58I7nuJdVdtbeOgKJVKWO89gevF6kG5WqTCsUwlPk99
        O6yv1yEuLo4mmBItScmZsPjfKRwKi9T5fMuWLZg0aZKrxn6P1q5dC5lMPihSqRSfhaUgKE+tl8Dv1NiW
        pMLqu++Hv78/8vPFg3LmzFksWrQoUWNf0IwZM36/bt061Ne/6ZfS0mqIRBVITk7GrsQ2eKV16bA7WY1P
        rhgOm0jKyoRaA5GamgGanKSaCIIoiNmhQz5obGzqQ01NPQ/RzYULF/DZky4tdo+68OG5LnwQNjTYup9E
        XZ1cp6Y+SkqqaG1Zz8bJz4UUpJkzZ+4KCQnFmzfNOlRWsrm7VktFRS18fX1hdx+cP10CRgUMLQs8HqC1
        tV2nbn+Ym5uzIBOEFCQKctDFxZ2M10KhaKaZqYX3RHW1TAf2iG33iIDdLWCCHxX2GXrGfF6Hjo6OPrW7
        kUhktNYokJhIa5cQ5NdCChIF8XRz86AZI4WTlVVEgZqoixtpcDdoaWtrx/pj6RjvRUVpqzVcFBYW6tRl
        NDYqqBdqcPNmqtbnhg0bWJDfCilIs2bNcnZ13a+9oDc5OSLqIfaoKaBSqTDDS45RtDsZThJozWB3vbm5
        mY+Hu3ef6/W2ceNGFuQ3QgoSBbHavdsV8fGpA3Lr1jNajER0h+rR1NyKey/kOH5XAatwBeZ61+Nj10Z8
        sLtTr7keujDWuQnTDtRj2ckGeMe34XJKA8plrfwpKCoqx4MH2Xrr94YF2bRpEwvySyEFafbs2X+xtbXH
        vXtp70k6UlJyeciCAjG/i2y8SSR1tIjW85/s+RaLJXzqzM0txvPnr/hzrr+9wYmJSWA90k72PxJSkKhH
        PrKwsEBSUtYPisTEDL2fMyIjo9l+q4Ds/0xIoZGlpSWePPlOLw8fZmLhwoUjjoeHt14/jOPHv8SCBQtu
        a+z3aPPmzXj27JVe7t17hCVLlow4Bw966fXDcHbei6lTp3pr7PeIbcKyskR6iY6OZdsBLXfu3KHuTRoW
        etfx8vLW64fB/JLtFYL7XqI/vEhMTMHLl2V9CAuLoLO6pZaMjIxhIyQkRFvH2/sLvX4YVlZWLMgiwX0v
        zZkzx9zX9yidyqr6EBX1XwQFBSMw8AyuXIlBXl4ezVA5yM5+QXcnG5mZ2WQiC+npWUhLyyQyaFZKp0cg
        HU+fptGMxnhOG85n9Hw/w+PHT+lwlEpjLwXffptC0y0jmWazPNphy+ik6MLrnT8fyU+H3/dTVFTBgqjJ
        9h8E99/T1q1btcdJfVy7lsjP10wdHZ200nfwfVFLSzstXm380KVQtPB9Gjuysk1nfb2CdghvNEcAOT/T
        sAOaRMK2QHWoqqrjbbPzeG1tA297376jfWr3Jjg4FPPmzbtElvueEJkopTgnJ5/ugkwv4eE3eSF2HB3q
        EGJxLT+fM5WVVSI29r5eDwxra2v2WP1DcN2Ptm3b1hUeHsUXrVevxFoePsymwlJeaLhCsFc/rC0me3t3
        nfqM+PgE2NrawcTE5CRZ7VnR+9Po0aMX0GofRoetPAqmtrGxQWjoN7yAmr0iHaYQJSUSGgPVvM7Fizdg
        Y7OdsGFbkdL58+d/PX78eFuy9zdiHDf6rpo+ffbYhITnvMBwh3j9uoq/GGfauNGuksqPJcZwI4YqNDTu
        Nvs/CNNwhxCJKvnfmezs9rGx0HPeMFRhYXG8YaVSxceHMEY6eKiWljZtMHYgE8K1aMMxGhqEkOxg1hO0
        581Md1ghcD0PzFRRUYW5cxeGaGwYJjMzi8Vsa20sWVjsZL1i+KNlamrxd9Yj+jh7NpYWrq9x5sw1nDp1
        GSdORMHPLxJHjoTj8OFQ+PgE0TbjNO2ZTsLd/Tjc3I7BxcUXe/Z8AUfHQ3BwOMhnJ/Zmf/t2F5pW99DW
        Yxc3382mTfadZOOPghvDxbbK443Ij0WjRv0fxAMdlKK/XzcAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="Button8.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAABoxJREFUSEut
        l3lM1EcUx0EREAU5mxi1VmPUmvYvQyKi4t0ijabVABZtAItSTWvBWLEgVlJERU0abVCr9QBBMESrHAKK
        lUus3CLHLrIILJew7MHuciy/b9+MuwRxUUh8yTfz25n3e5+Z+c3x1mQ0s7S0tNq/f/+hn4ODQ/cGBYWy
        8l1iPsH79oUvcXFZqw8xqgHQP5mYWJAsh8nczt5+rkKnE+qkUoibm8FKphd61TO1tECiV11jIypFInQr
        FEJAQEAExRjVOHiHvX2YfOlSdeeSJcoOZ2dl2+LFypbPPlc22NuryhwchKKZM5FtZ4cUW1skT5uGRHqO
        sbHBKWtrrmNTp+LIlCkIIwVZWuL4rl0oefZM6+vrG6rnvGUc/IOd3UnB3R29GzZAvX495GvWoGvjRmjz
        8qB98gTi1avRdfMm1OVlEIeEIGvWLEiTktCWno6sVasQR8DLBLw4aRJOUcwoPz9kPXoEnU4HT0/Pn/Ss
        N4yDA+3sooW1a6Fetw4qgshWuqFz+3aoUlJQO3MGZHfuQFNdjRTy7y4oQE1EBARBwEVzc8TSaK8Q+C8C
        xxD4OPmcCAjAo8ePMTg4iL6+PmHLli0het6QcfD3trbRupUroWBQNzd0LFuOdm9vDHR1QVNeDsnu3dA2
        NOAB+b84eRIt1CEG7nn5EneXL8dlKytcsLBAjJkZjpHPyZ07kV9UxH0GBgYgl8s13t7eB/VMbhzsN21a
        tGbZMnSuWIF2KluWLkXL1q3QVFSgatEiFNPUaqXNyKZ6JdWVBAbyoLE0yms02r8JfJ5G/+fEiYiimKfo
        GxeRX35+PtLS0pCTk4Pa2lp4eXn9qOe+Bn9nYxOtcHVFK/VeSsGbXFzQ6OGB7thYlH88C6ULF0Lx8CEG
        e3tRvHkzUubOwasHD5BE0xxPukpgNu3nCXyCgaljz8VixMXFISoqCuHh4QgKCsLZs2cFV1fX3UPgrdbW
        xyULF6By/nxUzJuHUtJ/s2cj18kJ96ZPxz9UJtDorlDwGHMLnCFQ1IQJiKSpPURlKK3sIIpFw8EO0h97
        9uBlayuePn2Kh9ThB9RJptTUVNaZmiHwBBOTT8xNTL4coS9srK2/vZ+VJdykFcyUZFBi4lCZeP06Lvnu
        wI2EBCTS7xs3bqCstBQdHR1oampCfX09l0QiQV1dHSoqKpqHwKOZg4PDnEH6mGq1Gj09PW+Lpr7jfjZU
        7R1QKRRD9Qp6lslkXF20QA3q7OxEVVWVlMV+H3gucQWlUsmDvSWtFi2p6eh8XgW5rNu4zwjV1NS8H+zo
        6MjBbBQqlcqoOouKUbf/VyjpmxprH6kPBlbWvcBjiqNqazfaPlLjAmtpSjUajXHRZyhxnAFNlwwaWgtG
        fYaJ9vPYwb20iBjcmNQVz1C04FPI/32Ed/kZNC4wnbc86Ej103EoPR7Nz2TRZi/oqOyl4MZ8DRoXuL+/
        nx32b4tWsvhrT9CWQ3dGJur9AviNZNRXL5FINHYwO+gZfLhYXdPBMLyKu04jp9802ldX49AUdgR9tK8H
        8PqC6CcYaxvQvzcuMBsFCzJcVI26Ld58tEw6qlNX16Lj/CWUOXwEkdt6SH/7HY1790Gy3R/tMRf4e+MC
        s2/I4Aax35JtvlDlF6CntAzytAwoC59AKxJDWy9BP51Yytx8SMMj0BoVje47KehOz8QAbcsxgZ2cnDiY
        jI+Qi8AM2EBgHW2fQZrKN9pHiLVramrRdS0eA2xNiMXjB2uKStDXTAnexm/4qA31YxHz56tfJHr/JWEA
        kxPkSclQF5dAGvQLVDl5rIobOxRWU+bSQlkmsxDKycopa2HGbqOMjAz+bDC6qdpYbHrkDKNmAPc1NqHt
        SCRkV2IhS7j5OoLeWPDpdGcz2N27d+Hs7Izs7GyEhoaigdIlSnORnJyM4uJixMTEsOuxlcWmVznDqA2f
        asW9TPTSNLPn4ZZHmWgsZSrx8fEIDg7G4cOH4b7BnScBlOQhNzcXWymN8tjgwcvKysp2Cm1Kr76GGLPh
        Uz2aHT16FIWFhXxkBw4cgL+/PzZt2oTbt28jkFIg1iEfHx94UCrFZoVmaEzbaQ5tH5YIGBXdWsKtW7cE
        unWE9PR0gRI74cyZM0J1dbUQGRkpUHYpnD59WsjMzBQKCgqEc+fOCXRkvn9xkU0hfWVqarqN5DNS1OZj
        YWHBS3Nzcx8zMzMf+r/F26ysrHg5efJk3qav20a+7iQLDqZcaTSZ6jXxA4rHBGDyP2IuNJzUb+7ZAAAA
        AElFTkSuQmCC
 </value>
  </data>
  <metadata name="clmnVK_id.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>True</value>
  </metadata>
@@ -1883,6 +1898,9 @@
  <metadata name="cntxtOptions.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>174, 17</value>
  </metadata>
  <metadata name="ToolTip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>404, 17</value>
  </metadata>
  <metadata name="ctxtWeitereFormulare.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>596, 17</value>
  </metadata>
--- a/Aviso/usrcntlAktDetails.Designer.vb
+++ b/Aviso/usrcntlAktDetails.Designer.vb
@@ -23,17 +23,17 @@ Partial Class usrcntlAktDetails
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
-        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrcntlAktDetails))
-        Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
        Me.pnlDetailsRechts = New System.Windows.Forms.Panel()
        Me.Panel3 = New System.Windows.Forms.Panel()
        Me.SplitContainer = New System.Windows.Forms.SplitContainer()
@@ -162,6 +162,7 @@ Partial Class usrcntlAktDetails
        Me.btnLöschen = New System.Windows.Forms.Button()
        Me.btnÄndern = New System.Windows.Forms.Button()
        Me.btnTV = New System.Windows.Forms.Button()
        Me.Button4 = New System.Windows.Forms.Button()
        Me.pnlDetailsRechts.SuspendLayout()
        Me.Panel3.SuspendLayout()
        CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -581,46 +582,46 @@ Partial Class usrcntlAktDetails
        Me.dgvSendungen.AllowUserToAddRows = False
        Me.dgvSendungen.AllowUserToDeleteRows = False
        Me.dgvSendungen.AllowUserToResizeRows = False
-        DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle11.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvSendungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+        Me.dgvSendungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle11
        Me.dgvSendungen.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle12.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle12.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))
+        DataGridViewCellStyle12.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
+        DataGridViewCellStyle12.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle12.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle12.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
+        Me.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle12
        Me.dgvSendungen.ColumnHeadersHeight = 34
        Me.dgvSendungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle13.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle13.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))
+        DataGridViewCellStyle13.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
+        DataGridViewCellStyle13.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle13.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle13.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.dgvSendungen.DefaultCellStyle = DataGridViewCellStyle3
+        Me.dgvSendungen.DefaultCellStyle = DataGridViewCellStyle13
        Me.dgvSendungen.Dock = System.Windows.Forms.DockStyle.Fill
        Me.dgvSendungen.Location = New System.Drawing.Point(0, 0)
        Me.dgvSendungen.MultiSelect = False
        Me.dgvSendungen.Name = "dgvSendungen"
        Me.dgvSendungen.ReadOnly = True
-        DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle14.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle14.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))
+        DataGridViewCellStyle14.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
+        DataGridViewCellStyle14.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle14.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle14.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle14.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
+        Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle14
        Me.dgvSendungen.RowHeadersVisible = False
        Me.dgvSendungen.RowHeadersWidth = 62
        Me.dgvSendungen.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle5
+        Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle15
        Me.dgvSendungen.RowTemplate.Height = 20
        Me.dgvSendungen.RowTemplate.ReadOnly = True
        Me.dgvSendungen.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
@@ -956,46 +957,46 @@ Partial Class usrcntlAktDetails
        Me.gridVermerke.AllowUserToAddRows = False
        Me.gridVermerke.AllowUserToDeleteRows = False
        Me.gridVermerke.AllowUserToResizeRows = False
-        DataGridViewCellStyle6.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle16.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6
+        Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle16
        Me.gridVermerke.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle17.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle7.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle17.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle7.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle17.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle17.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle17.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle17.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle17.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle7
+        Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle17
        Me.gridVermerke.ColumnHeadersHeight = 34
        Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle18.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle18.BackColor = System.Drawing.SystemColors.Window
-        DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle18.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle18.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle18.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle8
+        Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle18
        Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill
        Me.gridVermerke.Location = New System.Drawing.Point(0, 30)
        Me.gridVermerke.MultiSelect = False
        Me.gridVermerke.Name = "gridVermerke"
        Me.gridVermerke.ReadOnly = True
-        DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle19.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle9.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle19.BackColor = System.Drawing.SystemColors.Control
-        DataGridViewCellStyle9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle19.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle19.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle19.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle9
+        Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle19
        Me.gridVermerke.RowHeadersVisible = False
        Me.gridVermerke.RowHeadersWidth = 62
        Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        DataGridViewCellStyle20.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle10
+        Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle20
        Me.gridVermerke.RowTemplate.Height = 20
        Me.gridVermerke.RowTemplate.ReadOnly = True
        Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
@@ -1932,6 +1933,7 @@ Partial Class usrcntlAktDetails
        Me.pnlOptionen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.pnlOptionen.BackColor = System.Drawing.Color.Black
        Me.pnlOptionen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.pnlOptionen.Controls.Add(Me.Button4)
        Me.pnlOptionen.Controls.Add(Me.btnWlanTicket)
        Me.pnlOptionen.Controls.Add(Me.Button13)
        Me.pnlOptionen.Controls.Add(Me.Button14)
@@ -2038,6 +2040,22 @@ Partial Class usrcntlAktDetails
        Me.btnTV.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnTV.UseVisualStyleBackColor = False
        '
        'Button4
        '
        Me.Button4.BackColor = System.Drawing.Color.White
        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
        Me.Button4.ForeColor = System.Drawing.Color.Black
        Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.Button4.Location = New System.Drawing.Point(3, 185)
        Me.Button4.Name = "Button4"
        Me.Button4.Size = New System.Drawing.Size(109, 28)
        Me.Button4.TabIndex = 104
        Me.Button4.TabStop = False
        Me.Button4.Text = "Status SMS"
        Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.Button4.UseVisualStyleBackColor = False
        '
        'usrcntlAktDetails
        '
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
@@ -2226,4 +2244,5 @@ Partial Class usrcntlAktDetails
    Friend WithEvents Button2 As Button
    Friend WithEvents btnQuckScan As Button
    Friend WithEvents btnWlanTicket As Button
    Friend WithEvents Button4 As Button
 End Class
--- a/Aviso/usrcntlAktDetails.vb
+++ b/Aviso/usrcntlAktDetails.vb
@@ -1196,14 +1196,17 @@ Public Class usrcntlAktDetails
                                        optionCell.Style.SelectionBackColor = optionCell.Style.BackColor
                                    Case 3
                                        optionCell.Value = "OK - Empfangen!"
-                                        optionCell.Style.BackColor = Color.Green
+                                        optionCell.LinkColor = Color.Green
-                                        optionCell.LinkColor = Color.White
+                                        ' optionCell.Style.BackColor = Color.Green
-                                        optionCell.Style.SelectionBackColor = optionCell.Style.BackColor
+                                        ' optionCell.LinkColor = Color.White
-                                    Case 4 : optionCell.Value = "Sende-Fehler!"
+                                        'optionCell.Style.SelectionBackColor = optionCell.Style.BackColor
                                    Case 4 : optionCell.Value = "SMS: Sendefehler!"
                                        optionCell.ToolTipText = "Sendefehler: " & SMS.sms_Failure
-                                        optionCell.Style.BackColor = Color.Red
+                                        optionCell.LinkColor = Color.Red
-                                        optionCell.LinkColor = Color.White
+                                        optionCell.Style.BackColor = Color.PapayaWhip
-                                        optionCell.Style.SelectionBackColor = optionCell.Style.BackColor
+                                        optionCell.Style.Font = New Font(Me.Font.FontFamily, Me.Font.Size, FontStyle.Bold)
                                        'optionCell.LinkColor = Color.White
                                        'optionCell.Style.SelectionBackColor = optionCell.Style.BackColor
                                End Select
                            End If
                        Case 53
@@ -1815,7 +1818,7 @@ Public Class usrcntlAktDetails
    End Sub
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles btnOptionen.Click
-        pnlOptionen.Height = 183 '157 '125
+        pnlOptionen.Height = 220 '183 '157 '125
        pnlOptionen.Visible = Not pnlOptionen.Visible
        If pnlOptionen.Visible Then pnlOptionen.Location = New Point(pnlOptionen.Location.X, btnOptionen.Height + pnl.Height + FlowLayoutPanel.Height)
@@ -2657,11 +2660,44 @@ Public Class usrcntlAktDetails
                            Dim outl As New Outlook.Application
                            Dim Mail As Microsoft.Office.Interop.Outlook.MailItem
                            Mail = outl.CreateItem(0)
                            Dim lan = "DE"
                            Dim AD As New VERAG_PROG_ALLGEMEIN.cAdressen(AVISO.Auftraggeber_KdNr)
                            Select Case AD.LandKz
                                Case "TR" : lan = "TR"
                                Case "GB" : lan = "EN"
                                Case "RS" : lan = "SRB"
                                Case "SRB" : lan = "SRB"
                            End Select
                            Dim tX As New VERAG_PROG_ALLGEMEIN.cTextkonserve("FRM_MNGR_MailText", "Dispoliste", lan, VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA)
                            If AD.hasEntry And tX.hasEntry Then
                                Dim TextHTML = ""
                                TextHTML &= tX.txt_text
                                TextHTML &= SDL.cFakturierung.getSignature(lan, tX.txt_firmaSig, True, True)
                                TextHTML &= "<br>"
                                TextHTML &= "Mit freundlichen Grüßen<br>"
                                TextHTML &= VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME & "<br>"
                                TextHTML &= "<br>"
                                Mail.HTMLBody = "<div style=""font-family:Calibri, Arial"">" & TextHTML & "</div>"
                                Mail.Subject = tX.txt_betreff.Replace("%LKWKennzeichen%", AVISO.LKW_Nr)
                            Else
                                Mail.Subject = "Dispoliste LKW-Nr: " & AVISO.LKW_Nr
                            End If
                            '   Mail.HTMLBody = "Sehr geehrte Damen und Herren,<br><br>anbei erhalten Sie die Rechnung Nr. " & RECHNUNG.RechnungsNr & "."
                            Mail.Attachments.Add(path, Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue, , "Dispoliste.pdf")
                            Mail.Display()
                        Catch ex As Exception
                            MsgBox("Fehler beim Öffnen des Mail-Programmes. PDF wird geladen!")
                            Process.Start(path)
@@ -3262,6 +3298,11 @@ Public Class usrcntlAktDetails
    End Sub
    Private Sub Button4_Click_1(sender As Object, e As EventArgs) Handles Button4.Click
        If VERAG_PROG_ALLGEMEIN.cSMS.SEND_StatusSMS(AVISO) Then
            MsgBox("Nur TEST!")
        End If
    End Sub
 End Class
--- a/Aviso/usrcntlAktDetailsATILLANeu.vb
+++ b/Aviso/usrcntlAktDetailsATILLANeu.vb
@@ -92,6 +92,7 @@ Public Class usrcntlAktDetailsATILLANeu
        loaded = True
        initTbCntr()
        Vermerke_anzeigen()
        'bei selchanged:
        'Vermerke_anzeigen()
@@ -1381,7 +1382,7 @@ Public Class usrcntlAktDetailsATILLANeu
        ElseIf tbcntr.SelectedTab Is tbZollanmeldungen Then
            initdgvZollAnmeldungen()
        ElseIf tbcntr.SelectedTab Is tbVermerke Then
-            Vermerke_anzeigen()
+            If loaded Then Vermerke_anzeigen()
        End If
    End Sub
--- a/AvisoTV/AvisoTV.vbproj
+++ b/AvisoTV/AvisoTV.vbproj
@@ -33,7 +33,7 @@
    <BootstrapperEnabled>true</BootstrapperEnabled>
  </PropertyGroup>
  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
-    <PlatformTarget>x86</PlatformTarget>
+    <PlatformTarget>x64</PlatformTarget>
    <DebugSymbols>true</DebugSymbols>
    <DebugType>full</DebugType>
    <DefineDebug>true</DefineDebug>
--- a/Diverses/Verfahrenshandbücker
+++ b/Diverses/Verfahrenshandbücker
--- a/Diverses/Verfahrenshandbücker
+++ b/Diverses/Verfahrenshandbücker
--- a/Diverses/Verfahrenshandbücker
+++ b/Diverses/Verfahrenshandbücker
--- a/Diverses/Verfahrenshandbücker
+++ b/Diverses/Verfahrenshandbücker
--- a/Diverses/sprinter.png
+++ b/Diverses/sprinter.png
--- a/Diverses/sprinter_white.png
+++ b/Diverses/sprinter_white.png
--- a/Gemeinsames/Gemeinsames.vbproj
+++ b/Gemeinsames/Gemeinsames.vbproj
@@ -35,7 +35,7 @@
    <BootstrapperEnabled>true</BootstrapperEnabled>
  </PropertyGroup>
  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
-    <PlatformTarget>AnyCPU</PlatformTarget>
+    <PlatformTarget>x64</PlatformTarget>
    <DebugSymbols>true</DebugSymbols>
    <DebugType>full</DebugType>
    <DefineDebug>true</DefineDebug>
@@ -187,7 +187,6 @@
    <EmbeddedResource Include="frmGrayOut.resx">
      <DependentUpon>frmGrayOut.vb</DependentUpon>
    </EmbeddedResource>
    <EmbeddedResource Include="My Project\licenses.licx" />
    <EmbeddedResource Include="My Project\Resources.resx">
      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
--- a/Project/licenses.licx
+++ b/Project/licenses.licx
@@ -1,2 +0,0 @@
 GrapeCity.ActiveReports.SectionReport, GrapeCity.ActiveReports.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff
 GrapeCity.ActiveReports.SectionReport, GrapeCity.ActiveReports.v9, Version=9.1.2302.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff
		`@@ -1,2 +0,0 @@`
			`GrapeCity.ActiveReports.SectionReport, GrapeCity.ActiveReports.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff`
			`GrapeCity.ActiveReports.SectionReport, GrapeCity.ActiveReports.v9, Version=9.1.2302.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff`