From d7dfab0ac471cedc1abf54f4d1f6343ab289f69f Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Wed, 7 Feb 2024 15:58:56 +0100
Subject: [PATCH 1/4] aviso

---
 Aviso.sln                             |  4 ++--
 Aviso/Aviso.vbproj                    | 28 +++++++++++++--------------
 Aviso/My Project/AssemblyInfo.vb      |  4 ++--
 Aviso/My Project/Settings.Designer.vb |  2 +-
 Aviso/frmLogin.vb                     |  6 +-----
 Aviso/usrcntlAktDetails.Designer.vb   |  4 ++--
 Gemeinsames/Gemeinsames.vbproj        | 11 ++++++-----
 7 files changed, 28 insertions(+), 31 deletions(-)

diff --git a/Aviso.sln b/Aviso.sln
index 33ee9a5..316dd95 100644
--- a/Aviso.sln
+++ b/Aviso.sln
@@ -43,8 +43,8 @@ Global
 		Release|x86 = Release|x86
 	EndGlobalSection
 	GlobalSection(ProjectConfigurationPlatforms) = postSolution
-		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.ActiveCfg = Debug|x64
-		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.Build.0 = Debug|x64
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Mixed Platforms.ActiveCfg = Debug|x64
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Mixed Platforms.Build.0 = Debug|x64
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|x64.ActiveCfg = Debug|x64
diff --git a/Aviso/Aviso.vbproj b/Aviso/Aviso.vbproj
index 554c1bd..f6b0616 100644
--- a/Aviso/Aviso.vbproj
+++ b/Aviso/Aviso.vbproj
@@ -47,7 +47,8 @@
     <DefineTrace>true</DefineTrace>
     <OutputPath>bin\Debug\</OutputPath>
     <DocumentationFile>AVISO.xml</DocumentationFile>
-    <NoWarn>41999,42016,42017,42018,42019,42020,42021,42022,42032,42036</NoWarn>
+    <NoWarn>
+    </NoWarn>
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
@@ -58,7 +59,8 @@
     <Optimize>true</Optimize>
     <OutputPath>bin\Release\</OutputPath>
     <DocumentationFile>AVISO.xml</DocumentationFile>
-    <NoWarn>41999,42016,42017,42018,42019,42020,42021,42022,42032,42036</NoWarn>
+    <NoWarn>
+    </NoWarn>
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>
   <PropertyGroup>
@@ -111,7 +113,7 @@
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>
   <PropertyGroup>
-    <AssemblyOriginatorKeyFile>Aviso_1_TemporaryKey.pfx</AssemblyOriginatorKeyFile>
+    <AssemblyOriginatorKeyFile>PrivateCodeSignaturDaniel20240131.pfx</AssemblyOriginatorKeyFile>
   </PropertyGroup>
   <PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Release|x64'">
     <OutputPath>bin\Release\</OutputPath>
@@ -126,9 +128,8 @@
       <SpecificVersion>False</SpecificVersion>
       <HintPath>C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\BouncyCastle.Crypto.dll</HintPath>
     </Reference>
-    <Reference Include="ChilkatDotNet47, Version=9.5.0.88, Culture=neutral, PublicKeyToken=eb5fc1fc52ef09bd, processorArchitecture=AMD64">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\ChillKat64\neu 2023\chilkatdotnet47-9.5.0-x64\ChilkatDotNet47.dll</HintPath>
+    <Reference Include="ChilkatDotNet47">
+      <HintPath>..\..\..\dll\ChillKat64\ChilkatDotNet47.dll</HintPath>
     </Reference>
     <Reference Include="ClosedXML, Version=0.95.4.0, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
@@ -337,10 +338,6 @@
     <Reference Include="ThoughtWorks.QRCode">
       <HintPath>..\..\..\dll\ThoughtWorks.QRCode.dll</HintPath>
     </Reference>
-    <Reference Include="VERAG_PROG_ALLGEMEIN, Version=1.0.0.0, Culture=neutral, processorArchitecture=AMD64">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\bin\Debug\VERAG_PROG_ALLGEMEIN.dll</HintPath>
-    </Reference>
     <Reference Include="WindowsBase" />
   </ItemGroup>
   <ItemGroup>
@@ -1396,17 +1393,14 @@
     </EmbeddedResource>
   </ItemGroup>
   <ItemGroup>
-    <None Include="AL20210908.pfx" />
+    <None Include="AL20231110.pfx" />
     <None Include="App.config" />
-    <None Include="Aviso_1_TemporaryKey.pfx" />
-    <None Include="Aviso_TemporaryKey.pfx" />
     <None Include="Dokumentenbeschriftung\PageReport1.rdlx">
       <SubType>Component</SubType>
     </None>
     <None Include="GenerelleGestellungenVorlagen\GenerelleGestellung_DE.pdf">
       <CopyToOutputDirectory>Always</CopyToOutputDirectory>
     </None>
-    <None Include="LME.pfx" />
     <None Include="My Project\app.manifest" />
     <None Include="My Project\Application.myapp">
       <Generator>MyApplicationCodeGenerator</Generator>
@@ -1418,6 +1412,7 @@
       <CustomToolNamespace>My</CustomToolNamespace>
       <LastGenOutput>Settings.Designer.vb</LastGenOutput>
     </None>
+    <None Include="PrivateCodeSignaturDaniel20240131.pfx" />
     <None Include="Resources\Flender_Bocholt.xlsx" />
     <None Include="Resources\ATANAK_Instructions_Export.xlsx">
       <CopyToOutputDirectory>Always</CopyToOutputDirectory>
@@ -1470,6 +1465,11 @@
       <Project>{289bcd77-bc00-4ba1-95ed-a79176d99525}</Project>
       <Name>SDL</Name>
     </ProjectReference>
+    <ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
+      <Project>{a3b497bd-842c-4a2b-b398-ed1976849df1}</Project>
+      <Name>VERAG_PROG_ALLGEMEIN</Name>
+      <Private>True</Private>
+    </ProjectReference>
   </ItemGroup>
   <ItemGroup>
     <BootstrapperPackage Include=".NETFramework,Version=v4.0,Profile=Client">
diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb
index eb38cfe..321fa7b 100644
--- a/Aviso/My Project/AssemblyInfo.vb	
+++ b/Aviso/My Project/AssemblyInfo.vb	
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("3.9.6.2")>
-<Assembly: AssemblyFileVersion("3.9.6.2")>
+<Assembly: AssemblyVersion("3.9.7.0")>
+<Assembly: AssemblyFileVersion("3.9.7.0")>
diff --git a/Aviso/My Project/Settings.Designer.vb b/Aviso/My Project/Settings.Designer.vb
index b9dc239..936f759 100644
--- a/Aviso/My Project/Settings.Designer.vb	
+++ b/Aviso/My 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", "17.3.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.6.0.0"),  _
      Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
     Partial Friend NotInheritable Class MySettings
         Inherits Global.System.Configuration.ApplicationSettingsBase
diff --git a/Aviso/frmLogin.vb b/Aviso/frmLogin.vb
index 865da56..14a554f 100644
--- a/Aviso/frmLogin.vb
+++ b/Aviso/frmLogin.vb
@@ -1,10 +1,6 @@
 Imports System.IO
-Imports System.Windows.Forms
 Imports VERAG_PROG_ALLGEMEIN
 
-Imports System.Reflection
-Imports System.DirectoryServices
-Imports Therefore.API
 
 Public Class frmLogin
 
@@ -15,7 +11,7 @@ Public Class frmLogin
     Private ADMIN As New cADMIN
     Public firma As String = "VERAG"
 
-    Dim SECRET = False
+    Dim SECRET As Boolean = False
     Public Sub New()
         InitializeComponent()
         Icon = cMeineFunktionenAVISO.GetProgrammIcon
diff --git a/Aviso/usrcntlAktDetails.Designer.vb b/Aviso/usrcntlAktDetails.Designer.vb
index 87f1c34..d71cef7 100644
--- a/Aviso/usrcntlAktDetails.Designer.vb
+++ b/Aviso/usrcntlAktDetails.Designer.vb
@@ -1318,6 +1318,7 @@ Partial Class usrcntlAktDetails
         'Panel8
         '
         Me.Panel8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.Panel8.Controls.Add(Me.lblAktUebernommen)
         Me.Panel8.Controls.Add(Me.lblLKWChat_MsgCnt)
         Me.Panel8.Controls.Add(Me.lblBarZuKassierenSumme)
         Me.Panel8.Controls.Add(Me.picAVISOMessenger)
@@ -1339,7 +1340,6 @@ Partial Class usrcntlAktDetails
         Me.Panel8.Controls.Add(Me.pnlAbgeschlossen)
         Me.Panel8.Controls.Add(Me.lklAuswahlAufheben)
         Me.Panel8.Controls.Add(Me.txtLKWID)
-        Me.Panel8.Controls.Add(Me.lblAktUebernommen)
         Me.Panel8.Dock = System.Windows.Forms.DockStyle.Top
         Me.Panel8.Location = New System.Drawing.Point(0, 0)
         Me.Panel8.Name = "Panel8"
@@ -1609,8 +1609,8 @@ Partial Class usrcntlAktDetails
         'pnlAbgeschlossen
         '
         Me.pnlAbgeschlossen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.pnlAbgeschlossen.Controls.Add(Me.Label2)
         Me.pnlAbgeschlossen.Controls.Add(Me.pic)
+        Me.pnlAbgeschlossen.Controls.Add(Me.Label2)
         Me.pnlAbgeschlossen.Location = New System.Drawing.Point(413, 75)
         Me.pnlAbgeschlossen.Name = "pnlAbgeschlossen"
         Me.pnlAbgeschlossen.Size = New System.Drawing.Size(157, 44)
diff --git a/Gemeinsames/Gemeinsames.vbproj b/Gemeinsames/Gemeinsames.vbproj
index 43b8767..f3e32c4 100644
--- a/Gemeinsames/Gemeinsames.vbproj
+++ b/Gemeinsames/Gemeinsames.vbproj
@@ -92,7 +92,7 @@
     <SignAssembly>false</SignAssembly>
   </PropertyGroup>
   <PropertyGroup>
-    <AssemblyOriginatorKeyFile>Gemeinsames_TemporaryKey.pfx</AssemblyOriginatorKeyFile>
+    <AssemblyOriginatorKeyFile>PrivateCodeSignaturDaniel20240131.pfx</AssemblyOriginatorKeyFile>
   </PropertyGroup>
   <ItemGroup>
     <Reference Include="Accessibility" />
@@ -129,6 +129,10 @@
     <Reference Include="System.Core" />
     <Reference Include="System.Xml.Linq" />
     <Reference Include="System.Data.DataSetExtensions" />
+    <Reference Include="VERAG_PROG_ALLGEMEIN, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\..\..\VERAG_PROG_ALLGEMEIN\bin\Debug\VERAG_PROG_ALLGEMEIN.dll</HintPath>
+    </Reference>
   </ItemGroup>
   <ItemGroup>
     <Import Include="Microsoft.VisualBasic" />
@@ -252,6 +256,7 @@
     </None>
   </ItemGroup>
   <ItemGroup>
+    <None Include="PrivateCodeSignaturDaniel20240131.pfx" />
     <None Include="Resources\Versionsinfo.txt" />
   </ItemGroup>
   <ItemGroup>
@@ -309,10 +314,6 @@
       <Project>{50e8e49b-4fd9-4dd4-b159-bdc2b7d0e94f}</Project>
       <Name>DAKOSY_Worker_lib</Name>
     </ProjectReference>
-    <ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
-      <Project>{a3b497bd-842c-4a2b-b398-ed1976849df1}</Project>
-      <Name>VERAG_PROG_ALLGEMEIN</Name>
-    </ProjectReference>
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
   <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 

From e10ecbe4eb599901d458971e14dc3cb82a074c48 Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Mon, 12 Feb 2024 13:06:05 +0100
Subject: [PATCH 2/4] manifest f. AddIn

---
 Aviso/Aviso.vbproj |  3 +-
 Aviso/app.manifest | 79 ++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 81 insertions(+), 1 deletion(-)
 create mode 100644 Aviso/app.manifest

diff --git a/Aviso/Aviso.vbproj b/Aviso/Aviso.vbproj
index e31e624..176f9d6 100644
--- a/Aviso/Aviso.vbproj
+++ b/Aviso/Aviso.vbproj
@@ -79,7 +79,7 @@
     <ApplicationIcon>aviso.ico</ApplicationIcon>
   </PropertyGroup>
   <PropertyGroup>
-    <ApplicationManifest>My Project\app.manifest</ApplicationManifest>
+    <ApplicationManifest>app.manifest</ApplicationManifest>
   </PropertyGroup>
   <PropertyGroup>
     <ManifestCertificateThumbprint>34D75D5089806BE69485715D014CE0611D10E677</ManifestCertificateThumbprint>
@@ -1395,6 +1395,7 @@
   <ItemGroup>
     <None Include="AL20231110.pfx" />
     <None Include="App.config" />
+    <None Include="app.manifest" />
     <None Include="Dokumentenbeschriftung\PageReport1.rdlx">
       <SubType>Component</SubType>
     </None>
diff --git a/Aviso/app.manifest b/Aviso/app.manifest
new file mode 100644
index 0000000..f2d5d59
--- /dev/null
+++ b/Aviso/app.manifest
@@ -0,0 +1,79 @@
+<?xml version="1.0" encoding="utf-8"?>
+<assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1">
+	<assemblyIdentity name="AVISO" version="3.9.7.0" language="neutral" processorArchitecture="amd64" />
+  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
+    <security>
+      <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
+        <!-- UAC-Manifestoptionen
+             Wenn Sie die Ebene der Benutzerkontensteuerung für Windows ändern möchten, ersetzen Sie den 
+             Knoten "requestedExecutionLevel" wie folgt.
+
+        <requestedExecutionLevel  level="asInvoker" uiAccess="false" />
+        <requestedExecutionLevel  level="requireAdministrator" uiAccess="false" />
+        <requestedExecutionLevel  level="highestAvailable" uiAccess="false" />
+
+            Durch Angabe des Elements "requestedExecutionLevel" wird die Datei- und Registrierungsvirtualisierung deaktiviert. 
+            Entfernen Sie dieses Element, wenn diese Virtualisierung aus Gründen der Abwärtskompatibilität
+            für die Anwendung erforderlich ist.
+        -->
+        <requestedExecutionLevel level="asInvoker" uiAccess="false" />
+      </requestedPrivileges>
+    </security>
+  </trustInfo>
+
+  <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
+    <application>
+      <!-- Eine Liste der Windows-Versionen, unter denen diese Anwendung getestet
+           und für die sie entwickelt wurde. Wenn Sie die Auskommentierung der entsprechenden Elemente aufheben,
+           wird von Windows automatisch die kompatibelste Umgebung ausgewählt. -->
+
+      <!-- Windows Vista -->
+      <!--<supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}" />-->
+
+      <!-- Windows 7 -->
+      <!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}" />-->
+
+      <!-- Windows 8 -->
+      <!--<supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}" />-->
+
+      <!-- Windows 8.1 -->
+      <!--<supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}" />-->
+
+      <!-- Windows 10 -->
+      <!--<supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}" />-->
+
+    </application>
+  </compatibility>
+
+  <!-- Gibt an, dass die Anwendung mit DPI-Werten kompatibel ist und von Windows nicht automatisch auf höhere
+       DPI-Werte skaliert wird. WPF-Anwendungen (Windows Presentation Foundation) sind automatisch mit DPI-Werten kompatibel, eine Aktivierung 
+       ist nicht erforderlich. Für Windows Forms-Anwendungen für .NET Framework 4.6, die diese Einstellung aktivieren, muss 
+       auch die Einstellung "'EnableWindowsFormsHighDpiAutoResizing" in der Datei "app.config" auf TRUE festgelegt werden. 
+       
+       Hierdurch können für die Anwendung lange Pfade verwendet werden. Weitere Informationen finden Sie unter https://docs.microsoft.com/windows/win32/fileio/maximum-file-path-limitation.-->
+  <!--
+  <application xmlns="urn:schemas-microsoft-com:asm.v3">
+    <windowsSettings>
+      <dpiAware xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">true</dpiAware>
+      <longPathAware xmlns="http://schemas.microsoft.com/SMI/2016/WindowsSettings">true</longPathAware>
+    </windowsSettings>
+  </application>
+  -->
+
+  <!-- Designs für allgemeine Windows-Steuerelemente und -Dialogfelder (Windows XP und höher) aktivieren -->
+  <!--
+  <dependency>
+    <dependentAssembly>
+      <assemblyIdentity
+          type="win32"
+          name="Microsoft.Windows.Common-Controls"
+          version="6.0.0.0"
+          processorArchitecture="*"
+          publicKeyToken="6595b64144ccf1df"
+          language="*"
+        />
+    </dependentAssembly>
+  </dependency>
+  -->
+
+</assembly>

From 61cdfb612ac9d664b6de6b7f3980103413c33d5b Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Thu, 22 Feb 2024 15:19:26 +0100
Subject: [PATCH 3/4] gesamtsicherheiten

---
 Aviso.sln                              |   4 +-
 Aviso/Aviso.vbproj                     |  20 +-
 Aviso/My Project/AssemblyInfo.vb       |   4 +-
 Aviso/My Project/Resources.Designer.vb | 382 +++++++++++++------------
 Aviso/My Project/Resources.resx        |   3 +
 Aviso/app.manifest                     |   2 +-
 Aviso/frmGesamtsicherheitenMenuNEU.vb  |  12 +-
 Aviso/frmHauptfenster.Designer.vb      | 260 +++++++++--------
 Aviso/frmHauptfenster.vb               |  71 ++---
 Aviso/frmSendungsdetailsNEU.vb         |   2 +-
 Gemeinsames/Gemeinsames.vbproj         |  14 +-
 11 files changed, 397 insertions(+), 377 deletions(-)

diff --git a/Aviso.sln b/Aviso.sln
index 316dd95..33ee9a5 100644
--- a/Aviso.sln
+++ b/Aviso.sln
@@ -43,8 +43,8 @@ Global
 		Release|x86 = Release|x86
 	EndGlobalSection
 	GlobalSection(ProjectConfigurationPlatforms) = postSolution
-		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
-		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.ActiveCfg = Debug|x64
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.Build.0 = Debug|x64
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Mixed Platforms.ActiveCfg = Debug|x64
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Mixed Platforms.Build.0 = Debug|x64
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|x64.ActiveCfg = Debug|x64
diff --git a/Aviso/Aviso.vbproj b/Aviso/Aviso.vbproj
index 176f9d6..20d1150 100644
--- a/Aviso/Aviso.vbproj
+++ b/Aviso/Aviso.vbproj
@@ -78,9 +78,7 @@
   <PropertyGroup>
     <ApplicationIcon>aviso.ico</ApplicationIcon>
   </PropertyGroup>
-  <PropertyGroup>
-    <ApplicationManifest>app.manifest</ApplicationManifest>
-  </PropertyGroup>
+  <PropertyGroup />
   <PropertyGroup>
     <ManifestCertificateThumbprint>34D75D5089806BE69485715D014CE0611D10E677</ManifestCertificateThumbprint>
   </PropertyGroup>
@@ -89,7 +87,7 @@
     </ManifestKeyFile>
   </PropertyGroup>
   <PropertyGroup>
-    <GenerateManifests>false</GenerateManifests>
+    <GenerateManifests>true</GenerateManifests>
   </PropertyGroup>
   <PropertyGroup>
     <TargetZone>LocalIntranet</TargetZone>
@@ -109,7 +107,7 @@
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>
   <PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|AnyCPU'">
-    <PlatformTarget>AnyCPU</PlatformTarget>
+    <PlatformTarget>x64</PlatformTarget>
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>
   <PropertyGroup>
@@ -135,6 +133,10 @@
       <SpecificVersion>False</SpecificVersion>
       <HintPath>..\packages\ClosedXML.0.95.4\lib\net46\ClosedXML.dll</HintPath>
     </Reference>
+    <Reference Include="cNCTSPartnerWorker, Version=1.0.0.0, Culture=neutral, processorArchitecture=AMD64">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\..\..\ADMIN\ADMIN\cNCTSPartnerWorker\bin\Debug\cNCTSPartnerWorker.dll</HintPath>
+    </Reference>
     <Reference Include="com.esendex.sdk, Version=3.8.0.0, Culture=neutral, PublicKeyToken=9dceac28a20578e2, processorArchitecture=MSIL">
       <HintPath>..\packages\esendex-dotnet-sdk.3.8.0\lib\net35\com.esendex.sdk.dll</HintPath>
     </Reference>
@@ -1326,7 +1328,7 @@
     </EmbeddedResource>
     <EmbeddedResource Include="My Project\licenses.licx" />
     <EmbeddedResource Include="My Project\Resources.resx">
-      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
+      <Generator>PublicVbMyResourcesResXFileCodeGenerator</Generator>
       <CustomToolNamespace>My.Resources</CustomToolNamespace>
       <SubType>Designer</SubType>
       <LastGenOutput>Resources.Designer.vb</LastGenOutput>
@@ -1402,7 +1404,6 @@
     <None Include="GenerelleGestellungenVorlagen\GenerelleGestellung_DE.pdf">
       <CopyToOutputDirectory>Always</CopyToOutputDirectory>
     </None>
-    <None Include="My Project\app.manifest" />
     <None Include="My Project\Application.myapp">
       <Generator>MyApplicationCodeGenerator</Generator>
       <LastGenOutput>Application.Designer.vb</LastGenOutput>
@@ -1454,10 +1455,6 @@
     <None Include="Resources\Versionsinfo.txt" />
   </ItemGroup>
   <ItemGroup>
-    <ProjectReference Include="..\..\..\ADMIN\ADMIN\cNCTSPartnerWorker\NCTSPartnerWorker.vbproj">
-      <Project>{2bbd7643-82a1-481f-a014-eb7fcdeed3b5}</Project>
-      <Name>NCTSPartnerWorker</Name>
-    </ProjectReference>
     <ProjectReference Include="..\..\..\ADMIN\ADMIN\TELOTEK_Worker_lib\TELOTEC_Worker_lib.vbproj">
       <Project>{5b947a66-009a-4bb6-b925-f84a01045095}</Project>
       <Name>TELOTEC_Worker_lib</Name>
@@ -1502,6 +1499,7 @@
   </ItemGroup>
   <ItemGroup>
     <Content Include="aviso.ico" />
+    <None Include="bin\Debug\Resources\ambar_boarder.png" />
     <Content Include="My Project\aktAlt.jpg" />
     <None Include="Resources\ZwAbEinfuegen.png" />
     <None Include="Resources\unisped_aeo_DE.jpg" />
diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb
index 321fa7b..53a313c 100644
--- a/Aviso/My Project/AssemblyInfo.vb	
+++ b/Aviso/My Project/AssemblyInfo.vb	
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("3.9.7.0")>
-<Assembly: AssemblyFileVersion("3.9.7.0")>
+<Assembly: AssemblyVersion("3.9.7.1")>
+<Assembly: AssemblyFileVersion("3.9.7.1")>
diff --git a/Aviso/My Project/Resources.Designer.vb b/Aviso/My Project/Resources.Designer.vb
index b9d3c8d..58fec13 100644
--- a/Aviso/My Project/Resources.Designer.vb	
+++ b/Aviso/My Project/Resources.Designer.vb	
@@ -26,7 +26,7 @@ Namespace My.Resources
      Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
      Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
      Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
-    Friend Module Resources
+    Public Module Resources
         
         Private resourceMan As Global.System.Resources.ResourceManager
         
@@ -36,7 +36,7 @@ Namespace My.Resources
         '''  Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
         '''</summary>
         <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
-        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+        Public ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
             Get
                 If Object.ReferenceEquals(resourceMan, Nothing) Then
                     Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("AVISO.Resources", GetType(Resources).Assembly)
@@ -51,7 +51,7 @@ Namespace My.Resources
         '''  Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
         '''</summary>
         <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
-        Friend Property Culture() As Global.System.Globalization.CultureInfo
+        Public Property Culture() As Global.System.Globalization.CultureInfo
             Get
                 Return resourceCulture
             End Get
@@ -63,7 +63,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property _3s() As System.Drawing.Bitmap
+        Public ReadOnly Property _3s() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("_3s", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -73,7 +73,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property _SUB() As System.Drawing.Bitmap
+        Public ReadOnly Property _SUB() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("_SUB", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -83,7 +83,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property abfetigungTR_aktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property abfetigungTR_aktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("abfetigungTR_aktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -93,7 +93,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property abfetigungTR_inaktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property abfetigungTR_inaktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("abfetigungTR_inaktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -103,7 +103,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property abgeklaertAktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property abgeklaertAktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("abgeklaertAktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -113,7 +113,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property abgeklaertInaktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property abgeklaertInaktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("abgeklaertInaktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -123,7 +123,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property abklaerungTR_Aktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property abklaerungTR_Aktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("abklaerungTR_Aktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -133,7 +133,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property abklaerungTR_Inaktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property abklaerungTR_Inaktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("abklaerungTR_Inaktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -143,7 +143,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property add_person() As System.Drawing.Bitmap
+        Public ReadOnly Property add_person() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("add_person", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -153,7 +153,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Zeichenfolge, die aviso2015 ähnelt.
         '''</summary>
-        Friend ReadOnly Property ADMIN_pwd() As String
+        Public ReadOnly Property ADMIN_pwd() As String
             Get
                 Return ResourceManager.GetString("ADMIN_pwd", resourceCulture)
             End Get
@@ -162,7 +162,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property akt_ATILLA() As System.Drawing.Bitmap
+        Public ReadOnly Property akt_ATILLA() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("akt_ATILLA", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -172,7 +172,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property AMB() As System.Drawing.Bitmap
+        Public ReadOnly Property AMB() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("AMB", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -182,7 +182,17 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property ambar_simple() As System.Drawing.Bitmap
+        Public ReadOnly Property ambar_boarder() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("ambar_boarder", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Public ReadOnly Property ambar_simple() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("ambar_simple", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -192,7 +202,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property android_add_contact() As System.Drawing.Bitmap
+        Public ReadOnly Property android_add_contact() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("android-add-contact", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -202,7 +212,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property android_clock() As System.Drawing.Bitmap
+        Public ReadOnly Property android_clock() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("android_clock", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -212,7 +222,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property android_clock_s() As System.Drawing.Bitmap
+        Public ReadOnly Property android_clock_s() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("android_clock_s", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -222,7 +232,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property android_note() As System.Drawing.Bitmap
+        Public ReadOnly Property android_note() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("android_note", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -232,7 +242,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property arrow_down_orange() As System.Drawing.Bitmap
+        Public ReadOnly Property arrow_down_orange() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("arrow_down_orange", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -242,7 +252,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property arrow_left_a() As System.Drawing.Bitmap
+        Public ReadOnly Property arrow_left_a() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("arrow_left_a", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -252,7 +262,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property arrow_right_a() As System.Drawing.Bitmap
+        Public ReadOnly Property arrow_right_a() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("arrow_right_a", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -262,7 +272,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Zeichenfolge, die  ähnelt.
         '''</summary>
-        Friend ReadOnly Property asdas2d1a() As String
+        Public ReadOnly Property asdas2d1a() As String
             Get
                 Return ResourceManager.GetString("asdas2d1a", resourceCulture)
             End Get
@@ -271,7 +281,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
         '''</summary>
-        Friend ReadOnly Property ATANAK_Instructions_Export() As Byte()
+        Public ReadOnly Property ATANAK_Instructions_Export() As Byte()
             Get
                 Dim obj As Object = ResourceManager.GetObject("ATANAK_Instructions_Export", resourceCulture)
                 Return CType(obj,Byte())
@@ -281,7 +291,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
         '''</summary>
-        Friend ReadOnly Property ATANAK_Instructions_Export_T1() As Byte()
+        Public ReadOnly Property ATANAK_Instructions_Export_T1() As Byte()
             Get
                 Dim obj As Object = ResourceManager.GetObject("ATANAK_Instructions_Export_T1", resourceCulture)
                 Return CType(obj,Byte())
@@ -291,7 +301,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
         '''</summary>
-        Friend ReadOnly Property ATANAK_Instructions_Import() As Byte()
+        Public ReadOnly Property ATANAK_Instructions_Import() As Byte()
             Get
                 Dim obj As Object = ResourceManager.GetObject("ATANAK_Instructions_Import", resourceCulture)
                 Return CType(obj,Byte())
@@ -301,7 +311,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property Atilla() As System.Drawing.Bitmap
+        Public ReadOnly Property Atilla() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("Atilla", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -311,7 +321,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property atr() As System.Drawing.Bitmap
+        Public ReadOnly Property atr() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("atr", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -321,7 +331,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property atr_s() As System.Drawing.Bitmap
+        Public ReadOnly Property atr_s() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("atr_s", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -331,7 +341,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property auftrag() As System.Drawing.Bitmap
+        Public ReadOnly Property auftrag() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("auftrag", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -341,7 +351,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property auftrag3() As System.Drawing.Bitmap
+        Public ReadOnly Property auftrag3() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("auftrag3", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -351,7 +361,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Icon ähnlich wie (Symbol).
         '''</summary>
-        Friend ReadOnly Property Aviso() As System.Drawing.Icon
+        Public ReadOnly Property Aviso() As System.Drawing.Icon
             Get
                 Dim obj As Object = ResourceManager.GetObject("Aviso", resourceCulture)
                 Return CType(obj,System.Drawing.Icon)
@@ -361,7 +371,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property aviso_messenger() As System.Drawing.Bitmap
+        Public ReadOnly Property aviso_messenger() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("aviso_messenger", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -371,7 +381,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Icon ähnlich wie (Symbol).
         '''</summary>
-        Friend ReadOnly Property avisoNewMsg() As System.Drawing.Icon
+        Public ReadOnly Property avisoNewMsg() As System.Drawing.Icon
             Get
                 Dim obj As Object = ResourceManager.GetObject("avisoNewMsg", resourceCulture)
                 Return CType(obj,System.Drawing.Icon)
@@ -381,7 +391,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property beleg() As System.Drawing.Bitmap
+        Public ReadOnly Property beleg() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("beleg", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -391,7 +401,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property beleg1() As System.Drawing.Bitmap
+        Public ReadOnly Property beleg1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("beleg1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -401,7 +411,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property belegEUR() As System.Drawing.Bitmap
+        Public ReadOnly Property belegEUR() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("belegEUR", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -411,7 +421,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property belegEUR1() As System.Drawing.Bitmap
+        Public ReadOnly Property belegEUR1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("belegEUR1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -421,7 +431,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property bundesanzeiger() As System.Drawing.Bitmap
+        Public ReadOnly Property bundesanzeiger() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("bundesanzeiger", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -431,7 +441,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property cartable_ouvert() As System.Drawing.Bitmap
+        Public ReadOnly Property cartable_ouvert() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("cartable_ouvert", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -441,7 +451,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property changeKd() As System.Drawing.Bitmap
+        Public ReadOnly Property changeKd() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("changeKd", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -451,7 +461,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property dakosy() As System.Drawing.Bitmap
+        Public ReadOnly Property dakosy() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("dakosy", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -461,7 +471,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property dakosy_dy() As System.Drawing.Bitmap
+        Public ReadOnly Property dakosy_dy() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("dakosy_dy", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -471,7 +481,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property del() As System.Drawing.Bitmap
+        Public ReadOnly Property del() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("del", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -481,7 +491,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property del_gray() As System.Drawing.Bitmap
+        Public ReadOnly Property del_gray() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("del_gray", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -491,7 +501,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property del1() As System.Drawing.Bitmap
+        Public ReadOnly Property del1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("del1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -501,7 +511,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property del2() As System.Drawing.Bitmap
+        Public ReadOnly Property del2() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("del2", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -511,7 +521,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
         '''</summary>
-        Friend ReadOnly Property DGS_Instructions_Export() As Byte()
+        Public ReadOnly Property DGS_Instructions_Export() As Byte()
             Get
                 Dim obj As Object = ResourceManager.GetObject("DGS_Instructions_Export", resourceCulture)
                 Return CType(obj,Byte())
@@ -521,7 +531,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
         '''</summary>
-        Friend ReadOnly Property DGS_Instructions_Export_T1() As Byte()
+        Public ReadOnly Property DGS_Instructions_Export_T1() As Byte()
             Get
                 Dim obj As Object = ResourceManager.GetObject("DGS_Instructions_Export_T1", resourceCulture)
                 Return CType(obj,Byte())
@@ -531,7 +541,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
         '''</summary>
-        Friend ReadOnly Property DGS_Instructions_Import() As Byte()
+        Public ReadOnly Property DGS_Instructions_Import() As Byte()
             Get
                 Dim obj As Object = ResourceManager.GetObject("DGS_Instructions_Import", resourceCulture)
                 Return CType(obj,Byte())
@@ -541,7 +551,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property digitalerAkt() As System.Drawing.Bitmap
+        Public ReadOnly Property digitalerAkt() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("digitalerAkt", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -551,7 +561,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property digitalerAkt_small() As System.Drawing.Bitmap
+        Public ReadOnly Property digitalerAkt_small() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("digitalerAkt_small", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -561,7 +571,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property disconnect() As System.Drawing.Bitmap
+        Public ReadOnly Property disconnect() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("disconnect", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -571,7 +581,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property docAllgemein() As System.Drawing.Bitmap
+        Public ReadOnly Property docAllgemein() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("docAllgemein", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -581,7 +591,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property documents() As System.Drawing.Bitmap
+        Public ReadOnly Property documents() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("documents", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -591,7 +601,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property els() As System.Drawing.Bitmap
+        Public ReadOnly Property els() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("els", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -601,7 +611,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property email() As System.Drawing.Bitmap
+        Public ReadOnly Property email() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("email", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -611,7 +621,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property email_big1() As System.Drawing.Bitmap
+        Public ReadOnly Property email_big1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("email_big1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -621,7 +631,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property evolog() As System.Drawing.Bitmap
+        Public ReadOnly Property evolog() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("evolog", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -631,7 +641,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property Excel_2013_logo_155x110() As System.Drawing.Bitmap
+        Public ReadOnly Property Excel_2013_logo_155x110() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("Excel_2013_logo_155x110", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -641,7 +651,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property fakturiertAktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property fakturiertAktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("fakturiertAktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -651,7 +661,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property fakturiertInaktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property fakturiertInaktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("fakturiertInaktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -661,7 +671,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property fragezeichen() As System.Drawing.Bitmap
+        Public ReadOnly Property fragezeichen() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("fragezeichen", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -671,7 +681,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property fragezeichen1() As System.Drawing.Bitmap
+        Public ReadOnly Property fragezeichen1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("fragezeichen1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -681,7 +691,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property fremdSped() As System.Drawing.Bitmap
+        Public ReadOnly Property fremdSped() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("fremdSped", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -691,7 +701,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property FrontOfficeSUB() As System.Drawing.Bitmap
+        Public ReadOnly Property FrontOfficeSUB() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("FrontOfficeSUB", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -701,7 +711,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property FrontOfficeSUB_Horizontal() As System.Drawing.Bitmap
+        Public ReadOnly Property FrontOfficeSUB_Horizontal() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("FrontOfficeSUB_Horizontal", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -711,7 +721,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property ge_transport() As System.Drawing.Bitmap
+        Public ReadOnly Property ge_transport() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("ge_transport", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -721,7 +731,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property gear2() As System.Drawing.Bitmap
+        Public ReadOnly Property gear2() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("gear2", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -731,7 +741,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property GVMS_image() As System.Drawing.Bitmap
+        Public ReadOnly Property GVMS_image() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("GVMS-image", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -741,7 +751,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property handy() As System.Drawing.Bitmap
+        Public ReadOnly Property handy() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("handy", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -751,7 +761,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property handy1() As System.Drawing.Bitmap
+        Public ReadOnly Property handy1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("handy1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -761,7 +771,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property handy2() As System.Drawing.Bitmap
+        Public ReadOnly Property handy2() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("handy2", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -771,7 +781,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property hp_versuchskaninchen() As System.Drawing.Bitmap
+        Public ReadOnly Property hp_versuchskaninchen() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("hp_versuchskaninchen", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -781,7 +791,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property igl() As System.Drawing.Bitmap
+        Public ReadOnly Property igl() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("igl", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -791,7 +801,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property image_443x282() As System.Drawing.Bitmap
+        Public ReadOnly Property image_443x282() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("image_443x282", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -801,7 +811,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property ImageIcon() As System.Drawing.Bitmap
+        Public ReadOnly Property ImageIcon() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("ImageIcon", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -811,7 +821,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property IMEX() As System.Drawing.Bitmap
+        Public ReadOnly Property IMEX() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("IMEX", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -821,7 +831,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property IMEX_LOGO_simple() As System.Drawing.Bitmap
+        Public ReadOnly Property IMEX_LOGO_simple() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("IMEX_LOGO_simple", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -831,7 +841,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property info() As System.Drawing.Bitmap
+        Public ReadOnly Property info() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("info", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -841,7 +851,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property isd() As System.Drawing.Bitmap
+        Public ReadOnly Property isd() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("isd", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -851,7 +861,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property istLog() As System.Drawing.Bitmap
+        Public ReadOnly Property istLog() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("istLog", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -861,7 +871,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property kasse() As System.Drawing.Bitmap
+        Public ReadOnly Property kasse() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("kasse", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -871,7 +881,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property kasse_sw() As System.Drawing.Bitmap
+        Public ReadOnly Property kasse_sw() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("kasse_sw", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -881,7 +891,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property kasse_sw_small() As System.Drawing.Bitmap
+        Public ReadOnly Property kasse_sw_small() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("kasse_sw_small", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -891,7 +901,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property kasse1() As System.Drawing.Bitmap
+        Public ReadOnly Property kasse1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("kasse1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -901,7 +911,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property kita() As System.Drawing.Bitmap
+        Public ReadOnly Property kita() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("kita", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -911,7 +921,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property Koerfez61() As System.Drawing.Bitmap
+        Public ReadOnly Property Koerfez61() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("Koerfez61", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -921,7 +931,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property LateAviso_s() As System.Drawing.Bitmap
+        Public ReadOnly Property LateAviso_s() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("LateAviso_s", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -931,7 +941,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property LEX() As System.Drawing.Bitmap
+        Public ReadOnly Property LEX() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("LEX", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -941,7 +951,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property lorry() As System.Drawing.Bitmap
+        Public ReadOnly Property lorry() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("lorry", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -951,7 +961,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property lorry_ummelden() As System.Drawing.Bitmap
+        Public ReadOnly Property lorry_ummelden() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("lorry_ummelden", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -961,7 +971,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property meris() As System.Drawing.Bitmap
+        Public ReadOnly Property meris() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("meris", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -971,7 +981,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property mitarbeiter() As System.Drawing.Bitmap
+        Public ReadOnly Property mitarbeiter() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("mitarbeiter", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -981,7 +991,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property mitarbeiter_s() As System.Drawing.Bitmap
+        Public ReadOnly Property mitarbeiter_s() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("mitarbeiter_s", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -991,7 +1001,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
         '''</summary>
-        Friend ReadOnly Property MUSTER() As Byte()
+        Public ReadOnly Property MUSTER() As Byte()
             Get
                 Dim obj As Object = ResourceManager.GetObject("MUSTER", resourceCulture)
                 Return CType(obj,Byte())
@@ -1001,7 +1011,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property NDK() As System.Drawing.Bitmap
+        Public ReadOnly Property NDK() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("NDK", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1011,7 +1021,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property nellenquack() As System.Drawing.Bitmap
+        Public ReadOnly Property nellenquack() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("nellenquack", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1021,7 +1031,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property NKD() As System.Drawing.Bitmap
+        Public ReadOnly Property NKD() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("NKD", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1031,7 +1041,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property noAviso_s() As System.Drawing.Bitmap
+        Public ReadOnly Property noAviso_s() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("noAviso_s", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1041,7 +1051,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property noAviso_s1() As System.Drawing.Bitmap
+        Public ReadOnly Property noAviso_s1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("noAviso_s1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1051,7 +1061,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property ok() As System.Drawing.Bitmap
+        Public ReadOnly Property ok() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("ok", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1061,7 +1071,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property parkplatz() As System.Drawing.Bitmap
+        Public ReadOnly Property parkplatz() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("parkplatz", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1071,7 +1081,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property passport() As System.Drawing.Bitmap
+        Public ReadOnly Property passport() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("passport", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1081,7 +1091,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property pdf() As System.Drawing.Bitmap
+        Public ReadOnly Property pdf() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("pdf", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1091,7 +1101,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property pdf1() As System.Drawing.Bitmap
+        Public ReadOnly Property pdf1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("pdf1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1101,7 +1111,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property pdf11() As System.Drawing.Bitmap
+        Public ReadOnly Property pdf11() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("pdf11", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1111,7 +1121,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property pdfprint() As System.Drawing.Bitmap
+        Public ReadOnly Property pdfprint() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("pdfprint", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1121,7 +1131,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property pdfprint1() As System.Drawing.Bitmap
+        Public ReadOnly Property pdfprint1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("pdfprint1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1131,7 +1141,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property person() As System.Drawing.Bitmap
+        Public ReadOnly Property person() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("person", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1141,7 +1151,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property person_add() As System.Drawing.Bitmap
+        Public ReadOnly Property person_add() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("person_add", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1151,7 +1161,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property personCheck() As System.Drawing.Bitmap
+        Public ReadOnly Property personCheck() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("personCheck", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1161,7 +1171,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property personCheck_blue() As System.Drawing.Bitmap
+        Public ReadOnly Property personCheck_blue() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("personCheck_blue", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1171,7 +1181,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property personCheck_blue_small() As System.Drawing.Bitmap
+        Public ReadOnly Property personCheck_blue_small() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("personCheck_blue_small", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1181,7 +1191,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property personCheck_gray_small() As System.Drawing.Bitmap
+        Public ReadOnly Property personCheck_gray_small() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("personCheck_gray_small", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1191,7 +1201,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property personCheck_small() As System.Drawing.Bitmap
+        Public ReadOnly Property personCheck_small() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("personCheck_small", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1201,7 +1211,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property personInaktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property personInaktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("personInaktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1211,7 +1221,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property plus() As System.Drawing.Bitmap
+        Public ReadOnly Property plus() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("plus", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1221,7 +1231,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property plus1() As System.Drawing.Bitmap
+        Public ReadOnly Property plus1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("plus1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1231,7 +1241,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property printer() As System.Drawing.Bitmap
+        Public ReadOnly Property printer() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("printer", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1241,7 +1251,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property QS() As System.Drawing.Bitmap
+        Public ReadOnly Property QS() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("QS", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1251,7 +1261,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property refresh() As System.Drawing.Bitmap
+        Public ReadOnly Property refresh() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("refresh", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1261,7 +1271,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property rhenus() As System.Drawing.Bitmap
+        Public ReadOnly Property rhenus() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("rhenus", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1271,7 +1281,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property sanduhr() As System.Drawing.Bitmap
+        Public ReadOnly Property sanduhr() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("sanduhr", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1281,7 +1291,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property SBG() As System.Drawing.Bitmap
+        Public ReadOnly Property SBG() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("SBG", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1291,7 +1301,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property scanner() As System.Drawing.Bitmap
+        Public ReadOnly Property scanner() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("scanner", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1301,7 +1311,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property search() As System.Drawing.Bitmap
+        Public ReadOnly Property search() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("search", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1311,7 +1321,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property search1() As System.Drawing.Bitmap
+        Public ReadOnly Property search1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("search1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1321,7 +1331,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property searchGG() As System.Drawing.Bitmap
+        Public ReadOnly Property searchGG() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("searchGG", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1331,7 +1341,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property soenmez() As System.Drawing.Bitmap
+        Public ReadOnly Property soenmez() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("soenmez", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1341,7 +1351,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property spedbuch() As System.Drawing.Bitmap
+        Public ReadOnly Property spedbuch() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("spedbuch", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1351,7 +1361,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property spedbuch_small() As System.Drawing.Bitmap
+        Public ReadOnly Property spedbuch_small() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("spedbuch_small", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1361,7 +1371,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property spedbuch1() As System.Drawing.Bitmap
+        Public ReadOnly Property spedbuch1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("spedbuch1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1371,7 +1381,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property speditionsbuchAktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property speditionsbuchAktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("speditionsbuchAktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1381,7 +1391,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property speditionsbuchInaktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property speditionsbuchInaktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("speditionsbuchInaktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1391,7 +1401,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property sprinter() As System.Drawing.Bitmap
+        Public ReadOnly Property sprinter() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("sprinter", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1401,7 +1411,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property sprinter_white() As System.Drawing.Bitmap
+        Public ReadOnly Property sprinter_white() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("sprinter_white", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1411,7 +1421,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property statistik() As System.Drawing.Bitmap
+        Public ReadOnly Property statistik() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("statistik", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1421,7 +1431,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property statusBtn_vorbereitet_Aktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property statusBtn_vorbereitet_Aktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("statusBtn_vorbereitet_Aktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1431,7 +1441,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property statusBtn_vorbereitet_InAktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property statusBtn_vorbereitet_InAktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("statusBtn_vorbereitet_InAktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1441,7 +1451,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property statusBtn_vorgeschrieben_Aktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property statusBtn_vorgeschrieben_Aktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("statusBtn_vorgeschrieben_Aktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1451,7 +1461,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property statusBtn_vorgeschrieben_InAktiv() As System.Drawing.Bitmap
+        Public ReadOnly Property statusBtn_vorgeschrieben_InAktiv() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("statusBtn_vorgeschrieben_InAktiv", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1461,7 +1471,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property stift() As System.Drawing.Bitmap
+        Public ReadOnly Property stift() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("stift", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1471,7 +1481,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property stift1() As System.Drawing.Bitmap
+        Public ReadOnly Property stift1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("stift1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1481,7 +1491,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property stift2() As System.Drawing.Bitmap
+        Public ReadOnly Property stift2() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("stift2", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1491,7 +1501,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property tan() As System.Drawing.Bitmap
+        Public ReadOnly Property tan() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("tan", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1501,7 +1511,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property tarife() As System.Drawing.Bitmap
+        Public ReadOnly Property tarife() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("tarife", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1511,7 +1521,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property Telefonliste() As System.Drawing.Bitmap
+        Public ReadOnly Property Telefonliste() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("Telefonliste", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1521,7 +1531,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property Telefonliste_small() As System.Drawing.Bitmap
+        Public ReadOnly Property Telefonliste_small() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("Telefonliste_small", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1531,7 +1541,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property tranparent30Perc() As System.Drawing.Bitmap
+        Public ReadOnly Property tranparent30Perc() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("tranparent30Perc", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1541,7 +1551,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Icon ähnlich wie (Symbol).
         '''</summary>
-        Friend ReadOnly Property truck_black() As System.Drawing.Icon
+        Public ReadOnly Property truck_black() As System.Drawing.Icon
             Get
                 Dim obj As Object = ResourceManager.GetObject("truck_black", resourceCulture)
                 Return CType(obj,System.Drawing.Icon)
@@ -1551,7 +1561,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property tts() As System.Drawing.Bitmap
+        Public ReadOnly Property tts() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("tts", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1561,7 +1571,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property uid() As System.Drawing.Bitmap
+        Public ReadOnly Property uid() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("uid", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1571,7 +1581,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property unisped_aeo_DE() As System.Drawing.Bitmap
+        Public ReadOnly Property unisped_aeo_DE() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("unisped_aeo_DE", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1581,7 +1591,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property Unisped_DE_logo() As System.Drawing.Bitmap
+        Public ReadOnly Property Unisped_DE_logo() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("Unisped_DE_logo", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1591,7 +1601,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property Unisped_logo() As System.Drawing.Bitmap
+        Public ReadOnly Property Unisped_logo() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("Unisped_logo", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1601,7 +1611,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Zeichenfolge, die 6.0 ähnelt.
         '''</summary>
-        Friend ReadOnly Property UpdaterVersion() As String
+        Public ReadOnly Property UpdaterVersion() As String
             Get
                 Return ResourceManager.GetString("UpdaterVersion", resourceCulture)
             End Get
@@ -1610,7 +1620,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property urgent() As System.Drawing.Bitmap
+        Public ReadOnly Property urgent() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("urgent", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1620,7 +1630,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property Verag_AG_Logopng() As System.Drawing.Bitmap
+        Public ReadOnly Property Verag_AG_Logopng() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("Verag_AG_Logopng", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1630,7 +1640,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property verimex() As System.Drawing.Bitmap
+        Public ReadOnly Property verimex() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("verimex", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1640,7 +1650,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property vermerk() As System.Drawing.Bitmap
+        Public ReadOnly Property vermerk() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("vermerk", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1650,7 +1660,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property vermerkBtn() As System.Drawing.Bitmap
+        Public ReadOnly Property vermerkBtn() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("vermerkBtn", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1678,7 +1688,7 @@ Namespace My.Resources
         '''
         '''Version 2 [Rest der Zeichenfolge wurde abgeschnitten]&quot;; ähnelt.
         '''</summary>
-        Friend ReadOnly Property Versionsinfo() As String
+        Public ReadOnly Property Versionsinfo() As String
             Get
                 Return ResourceManager.GetString("Versionsinfo", resourceCulture)
             End Get
@@ -1687,7 +1697,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property vorauszahlung() As System.Drawing.Bitmap
+        Public ReadOnly Property vorauszahlung() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("vorauszahlung", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1697,7 +1707,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property vorauszahlung_bg() As System.Drawing.Bitmap
+        Public ReadOnly Property vorauszahlung_bg() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("vorauszahlung_bg", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1707,7 +1717,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property vorauszahlung1() As System.Drawing.Bitmap
+        Public ReadOnly Property vorauszahlung1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("vorauszahlung1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1717,7 +1727,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property vorauszahlung11() As System.Drawing.Bitmap
+        Public ReadOnly Property vorauszahlung11() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("vorauszahlung11", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1727,7 +1737,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property vorauszahlung2() As System.Drawing.Bitmap
+        Public ReadOnly Property vorauszahlung2() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("vorauszahlung2", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1737,7 +1747,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property vorauszahlung3() As System.Drawing.Bitmap
+        Public ReadOnly Property vorauszahlung3() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("vorauszahlung3", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1747,7 +1757,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
         '''</summary>
-        Friend ReadOnly Property VZ_HINDERNISS___ZOLLBESCHAU___PROTOKOLL() As Byte()
+        Public ReadOnly Property VZ_HINDERNISS___ZOLLBESCHAU___PROTOKOLL() As Byte()
             Get
                 Dim obj As Object = ResourceManager.GetObject("VZ_HINDERNISS___ZOLLBESCHAU___PROTOKOLL", resourceCulture)
                 Return CType(obj,Byte())
@@ -1757,7 +1767,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property WAI() As System.Drawing.Bitmap
+        Public ReadOnly Property WAI() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("WAI", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1767,7 +1777,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property warning() As System.Drawing.Bitmap
+        Public ReadOnly Property warning() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("warning", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1777,7 +1787,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property warning2() As System.Drawing.Bitmap
+        Public ReadOnly Property warning2() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("warning2", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1787,7 +1797,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property weiterleiten() As System.Drawing.Bitmap
+        Public ReadOnly Property weiterleiten() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("weiterleiten", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1797,7 +1807,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property weiterleiten_small1() As System.Drawing.Bitmap
+        Public ReadOnly Property weiterleiten_small1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("weiterleiten_small1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1807,7 +1817,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property wheel() As System.Drawing.Bitmap
+        Public ReadOnly Property wheel() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("wheel", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1817,7 +1827,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property wiki() As System.Drawing.Bitmap
+        Public ReadOnly Property wiki() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("wiki", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1827,7 +1837,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property word() As System.Drawing.Bitmap
+        Public ReadOnly Property word() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("word", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1837,7 +1847,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property word1() As System.Drawing.Bitmap
+        Public ReadOnly Property word1() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("word1", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1847,7 +1857,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property zeus() As System.Drawing.Bitmap
+        Public ReadOnly Property zeus() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("zeus", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1857,7 +1867,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property zoll() As System.Drawing.Bitmap
+        Public ReadOnly Property zoll() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("zoll", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1867,7 +1877,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property zoll_m() As System.Drawing.Bitmap
+        Public ReadOnly Property zoll_m() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("zoll_m", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1877,7 +1887,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property zoll_mmm() As System.Drawing.Bitmap
+        Public ReadOnly Property zoll_mmm() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("zoll_mmm", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1887,7 +1897,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property zoll_s() As System.Drawing.Bitmap
+        Public ReadOnly Property zoll_s() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("zoll_s", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
@@ -1897,7 +1907,7 @@ Namespace My.Resources
         '''<summary>
         '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
         '''</summary>
-        Friend ReadOnly Property zollico() As System.Drawing.Bitmap
+        Public ReadOnly Property zollico() As System.Drawing.Bitmap
             Get
                 Dim obj As Object = ResourceManager.GetObject("zollico", resourceCulture)
                 Return CType(obj,System.Drawing.Bitmap)
diff --git a/Aviso/My Project/Resources.resx b/Aviso/My Project/Resources.resx
index 9d22669..0fa4b67 100644
--- a/Aviso/My Project/Resources.resx	
+++ b/Aviso/My Project/Resources.resx	
@@ -667,4 +667,7 @@
   <data name="wiki" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\wiki.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="ambar_boarder" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\bin\Debug\Resources\ambar_boarder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
 </root>
\ No newline at end of file
diff --git a/Aviso/app.manifest b/Aviso/app.manifest
index f2d5d59..8737134 100644
--- a/Aviso/app.manifest
+++ b/Aviso/app.manifest
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="utf-8"?>
 <assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1">
-	<assemblyIdentity name="AVISO" version="3.9.7.0" language="neutral" processorArchitecture="amd64" />
+	<assemblyIdentity version="1.0.0.0" name="MyApplication.app" />
   <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
     <security>
       <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
diff --git a/Aviso/frmGesamtsicherheitenMenuNEU.vb b/Aviso/frmGesamtsicherheitenMenuNEU.vb
index 627a808..f9397ad 100644
--- a/Aviso/frmGesamtsicherheitenMenuNEU.vb
+++ b/Aviso/frmGesamtsicherheitenMenuNEU.vb
@@ -11,6 +11,15 @@ Public Class frmGesamtsicherheitenMenuNEU
     Public firmaId As Integer
 
 
+    Public Sub New()
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
     Private Sub frmGesamtsicherheitenNEU_Menu_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
 
@@ -19,13 +28,14 @@ Public Class frmGesamtsicherheitenMenuNEU
             Case "VERAG AG" : firmaId = 1 : chkOffen.Checked = False
             Case "IMEX" : firmaId = 20 : chkOffen.Checked = False
             Case "Verag CS" : firmaId = 11 : chkOffen.Checked = False
+            Case "Unisped GmbH" : firmaId = 21 : chkOffen.Checked = False
         End Select
 
 
         cbxStandort.fillWithSQL("SELECT FilialenNr, cast(FilialenNr as varchar(4)) + ' ' + Grenzstelle FROM Filialen WHERE Fil_Status='A' ORDER BY FilialenNr ", True, "FMZOLL", True)
-        'cbxWarenort.fillWithSQL("SELECT [grz_Grenzstelle], [grz_Bezeichnung] FROM [tblGrenzstelle] WHERE [grz_Aktiv] ='1' AND [grz_Warenort] ='1' ORDER BY [grz_Reihenfolge] ", True, "AVISO", True)
         cbxWarenort.fillWithSQL("SELECT [wo_warenort],CONCAT([wo_bezeichnung],' - ' ,[wo_knnr]) FROM [tblWarenorte] WHERE [wo_aktiv] ='1' AND [wo_firma] = '" & firmaId & "' ORDER BY [wo_reihenfolge]  ", True, "AVISO", True)
         cbxWarenort.DropDownWidth = 150
+
         Me.Text = "Gesamtsicherheiten " & Standort
         frmHauptfenster.EnableDoubleBuffered(dgvListe)
 
diff --git a/Aviso/frmHauptfenster.Designer.vb b/Aviso/frmHauptfenster.Designer.vb
index db11176..b5f5809 100644
--- a/Aviso/frmHauptfenster.Designer.vb
+++ b/Aviso/frmHauptfenster.Designer.vb
@@ -24,15 +24,15 @@ 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 DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle21 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle22 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle23 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle24 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle25 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle26 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle27 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)
@@ -117,10 +117,12 @@ Partial Class frmHauptfenster
         Me.ToolStripMenuItem5 = New System.Windows.Forms.ToolStripMenuItem()
         Me.BürgschaftenExcelToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.ToolStripMenuItem6 = New System.Windows.Forms.ToolStripMenuItem()
-        Me.DEGesamtsicherheitVeragGmbHToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.ATGesamtsicherheitVeragAGToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.ATGesamtsicherheitVeragCSToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.GesamtsicherheitenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ATVeragAGToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ATImexCSToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ATVeragCSToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.DEVeragGmbHToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ATUnispedGmbHToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.ToolStripMenuItem10 = New System.Windows.Forms.ToolStripMenuItem()
         Me.TICKETWaidhausToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.ToolStripSeparator10 = New System.Windows.Forms.ToolStripSeparator()
@@ -863,7 +865,7 @@ Partial Class frmHauptfenster
         '
         'FunktionenToolStripMenuItem
         '
-        Me.FunktionenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GenerelleGestellungenDurchsuchenToolStripMenuItem, Me.KundenVonFremdenSpeditionenToolStripMenuItem, Me.KundenverwaltungToolStripMenuItem, Me.MDMParkplatzkartenToolStripMenuItem, Me.SMSSendenToolStripMenuItem, Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem, Me.MRNBarcodedruckToolStripMenuItem, Me.ToolStripSeparator12, Me.tool_BRGXLS, Me.ToolStripMenuItem4, Me.ToolStripMenuItem5, Me.BürgschaftenExcelToolStripMenuItem, Me.ToolStripMenuItem6, Me.DEGesamtsicherheitVeragGmbHToolStripMenuItem, Me.ATGesamtsicherheitVeragAGToolStripMenuItem, Me.ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem, Me.ATGesamtsicherheitVeragCSToolStripMenuItem, Me.ToolStripMenuItem10, Me.TICKETWaidhausToolStripMenuItem, Me.ToolStripSeparator10, Me.DAKOSYToolStripMenuItem, Me.ToolStripSeparator23, Me.ToolStripMenuItem3, Me.SDLAbholaufträgeToolStripMenuItem, Me.ToolStripMenuItem13, Me.VorauskassenToolStripMenuItem, Me.ToolStripSeparator11, Me.EssensbestellungenToolStripMenuItem, Me.AdministrationEssensbestellungenToolStripMenuItem, Me.ToolStripSeparator24, Me.WarenorteToolStripMenuItem, Me.DatevBuchungsexportToolStripMenuItem, Me.APIToolStripMenuItem})
+        Me.FunktionenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GenerelleGestellungenDurchsuchenToolStripMenuItem, Me.KundenVonFremdenSpeditionenToolStripMenuItem, Me.KundenverwaltungToolStripMenuItem, Me.MDMParkplatzkartenToolStripMenuItem, Me.SMSSendenToolStripMenuItem, Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem, Me.MRNBarcodedruckToolStripMenuItem, Me.ToolStripSeparator12, Me.tool_BRGXLS, Me.ToolStripMenuItem4, Me.ToolStripMenuItem5, Me.BürgschaftenExcelToolStripMenuItem, Me.ToolStripMenuItem6, Me.GesamtsicherheitenToolStripMenuItem, Me.ToolStripMenuItem10, Me.TICKETWaidhausToolStripMenuItem, Me.ToolStripSeparator10, Me.DAKOSYToolStripMenuItem, Me.ToolStripSeparator23, Me.ToolStripMenuItem3, Me.SDLAbholaufträgeToolStripMenuItem, Me.ToolStripMenuItem13, Me.VorauskassenToolStripMenuItem, Me.ToolStripSeparator11, Me.EssensbestellungenToolStripMenuItem, Me.AdministrationEssensbestellungenToolStripMenuItem, Me.ToolStripSeparator24, Me.WarenorteToolStripMenuItem, Me.DatevBuchungsexportToolStripMenuItem, Me.APIToolStripMenuItem})
         Me.FunktionenToolStripMenuItem.Name = "FunktionenToolStripMenuItem"
         Me.FunktionenToolStripMenuItem.Size = New System.Drawing.Size(79, 21)
         Me.FunktionenToolStripMenuItem.Text = "Funktionen"
@@ -871,26 +873,26 @@ Partial Class frmHauptfenster
         'GenerelleGestellungenDurchsuchenToolStripMenuItem
         '
         Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Name = "GenerelleGestellungenDurchsuchenToolStripMenuItem"
-        Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Text = "Generelle Gestellungen durchsuchen"
         Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Visible = False
         '
         'KundenVonFremdenSpeditionenToolStripMenuItem
         '
         Me.KundenVonFremdenSpeditionenToolStripMenuItem.Name = "KundenVonFremdenSpeditionenToolStripMenuItem"
-        Me.KundenVonFremdenSpeditionenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.KundenVonFremdenSpeditionenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.KundenVonFremdenSpeditionenToolStripMenuItem.Text = "Kunden von fremden Speditionen"
         '
         'KundenverwaltungToolStripMenuItem
         '
         Me.KundenverwaltungToolStripMenuItem.Name = "KundenverwaltungToolStripMenuItem"
-        Me.KundenverwaltungToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.KundenverwaltungToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.KundenverwaltungToolStripMenuItem.Text = "Kundenverwaltung"
         '
         'MDMParkplatzkartenToolStripMenuItem
         '
         Me.MDMParkplatzkartenToolStripMenuItem.Name = "MDMParkplatzkartenToolStripMenuItem"
-        Me.MDMParkplatzkartenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.MDMParkplatzkartenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.MDMParkplatzkartenToolStripMenuItem.Text = "MDM - Parkplatzkarten"
         '
         'SMSSendenToolStripMenuItem
@@ -898,7 +900,7 @@ Partial Class frmHauptfenster
         Me.SMSSendenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NeueSMSSendenToolStripMenuItem, Me.GesendeteSMSToolStripMenuItem})
         Me.SMSSendenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.handy2
         Me.SMSSendenToolStripMenuItem.Name = "SMSSendenToolStripMenuItem"
-        Me.SMSSendenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.SMSSendenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.SMSSendenToolStripMenuItem.Text = "SMS"
         '
         'NeueSMSSendenToolStripMenuItem
@@ -916,104 +918,114 @@ Partial Class frmHauptfenster
         'ZollprogrammeNachEORIDurchsuchenToolStripMenuItem
         '
         Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Name = "ZollprogrammeNachEORIDurchsuchenToolStripMenuItem"
-        Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Text = "Zollprogramme nach EORI durchsuchen"
         '
         'MRNBarcodedruckToolStripMenuItem
         '
         Me.MRNBarcodedruckToolStripMenuItem.Name = "MRNBarcodedruckToolStripMenuItem"
-        Me.MRNBarcodedruckToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.MRNBarcodedruckToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.MRNBarcodedruckToolStripMenuItem.Text = "MRN Barcodedruck"
         '
         'ToolStripSeparator12
         '
         Me.ToolStripSeparator12.Name = "ToolStripSeparator12"
-        Me.ToolStripSeparator12.Size = New System.Drawing.Size(380, 6)
+        Me.ToolStripSeparator12.Size = New System.Drawing.Size(388, 6)
         '
         'tool_BRGXLS
         '
         Me.tool_BRGXLS.Name = "tool_BRGXLS"
-        Me.tool_BRGXLS.Size = New System.Drawing.Size(383, 22)
+        Me.tool_BRGXLS.Size = New System.Drawing.Size(391, 30)
         Me.tool_BRGXLS.Text = "Bürgschaften Excel"
         '
         'ToolStripMenuItem4
         '
         Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4"
-        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(383, 22)
+        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(391, 30)
         Me.ToolStripMenuItem4.Text = "DE | Gesamtsicherheit VERAG GmbH - Excel"
         Me.ToolStripMenuItem4.Visible = False
         '
         'ToolStripMenuItem5
         '
         Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5"
-        Me.ToolStripMenuItem5.Size = New System.Drawing.Size(383, 22)
+        Me.ToolStripMenuItem5.Size = New System.Drawing.Size(391, 30)
         Me.ToolStripMenuItem5.Text = "AT | Gesamtsicherheit VERAG AG - Excel"
         Me.ToolStripMenuItem5.Visible = False
         '
         'BürgschaftenExcelToolStripMenuItem
         '
         Me.BürgschaftenExcelToolStripMenuItem.Name = "BürgschaftenExcelToolStripMenuItem"
-        Me.BürgschaftenExcelToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.BürgschaftenExcelToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.BürgschaftenExcelToolStripMenuItem.Text = "AT | Gesamtsicherheit VERAG Customs Service - Excel"
         Me.BürgschaftenExcelToolStripMenuItem.Visible = False
         '
         'ToolStripMenuItem6
         '
         Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6"
-        Me.ToolStripMenuItem6.Size = New System.Drawing.Size(383, 22)
+        Me.ToolStripMenuItem6.Size = New System.Drawing.Size(391, 30)
         Me.ToolStripMenuItem6.Text = "AT | Gesamtsicherheit IMEX Customs Service GmbH - Excel"
         Me.ToolStripMenuItem6.Visible = False
         '
-        'DEGesamtsicherheitVeragGmbHToolStripMenuItem
+        'GesamtsicherheitenToolStripMenuItem
         '
-        Me.DEGesamtsicherheitVeragGmbHToolStripMenuItem.Name = "DEGesamtsicherheitVeragGmbHToolStripMenuItem"
-        Me.DEGesamtsicherheitVeragGmbHToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
-        Me.DEGesamtsicherheitVeragGmbHToolStripMenuItem.Text = "DE | Gesamtsicherheit Verag GmbH"
-        Me.DEGesamtsicherheitVeragGmbHToolStripMenuItem.Visible = False
+        Me.GesamtsicherheitenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ATVeragAGToolStripMenuItem, Me.ATImexCSToolStripMenuItem, Me.ATVeragCSToolStripMenuItem, Me.DEVeragGmbHToolStripMenuItem, Me.ATUnispedGmbHToolStripMenuItem})
+        Me.GesamtsicherheitenToolStripMenuItem.Name = "GesamtsicherheitenToolStripMenuItem"
+        Me.GesamtsicherheitenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
+        Me.GesamtsicherheitenToolStripMenuItem.Text = "Gesamtsicherheiten"
+        Me.GesamtsicherheitenToolStripMenuItem.Visible = False
         '
-        'ATGesamtsicherheitVeragAGToolStripMenuItem
+        'ATVeragAGToolStripMenuItem
         '
-        Me.ATGesamtsicherheitVeragAGToolStripMenuItem.Name = "ATGesamtsicherheitVeragAGToolStripMenuItem"
-        Me.ATGesamtsicherheitVeragAGToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
-        Me.ATGesamtsicherheitVeragAGToolStripMenuItem.Text = "AT | Gesamtsicherheit Verag AG"
-        Me.ATGesamtsicherheitVeragAGToolStripMenuItem.Visible = False
+        Me.ATVeragAGToolStripMenuItem.Name = "ATVeragAGToolStripMenuItem"
+        Me.ATVeragAGToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.ATVeragAGToolStripMenuItem.Text = "AT | Verag AG"
         '
-        'ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem
+        'ATImexCSToolStripMenuItem
         '
-        Me.ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Name = "ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem"
-        Me.ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
-        Me.ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Text = "AT | Gesamtsicherheit IMEX CS GmbH"
-        Me.ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Visible = False
+        Me.ATImexCSToolStripMenuItem.Name = "ATImexCSToolStripMenuItem"
+        Me.ATImexCSToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.ATImexCSToolStripMenuItem.Text = "AT | IMEX CS GmbH"
         '
-        'ATGesamtsicherheitVeragCSToolStripMenuItem
+        'ATVeragCSToolStripMenuItem
         '
-        Me.ATGesamtsicherheitVeragCSToolStripMenuItem.Name = "ATGesamtsicherheitVeragCSToolStripMenuItem"
-        Me.ATGesamtsicherheitVeragCSToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
-        Me.ATGesamtsicherheitVeragCSToolStripMenuItem.Text = "AT | Gesamtsicherheit Verag CS"
-        Me.ATGesamtsicherheitVeragCSToolStripMenuItem.Visible = False
+        Me.ATVeragCSToolStripMenuItem.Name = "ATVeragCSToolStripMenuItem"
+        Me.ATVeragCSToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.ATVeragCSToolStripMenuItem.Text = "AT | Verag CS"
+        '
+        'DEVeragGmbHToolStripMenuItem
+        '
+        Me.DEVeragGmbHToolStripMenuItem.Name = "DEVeragGmbHToolStripMenuItem"
+        Me.DEVeragGmbHToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.DEVeragGmbHToolStripMenuItem.Text = "DE | Verag GmbH"
+        '
+        'ATUnispedGmbHToolStripMenuItem
+        '
+        Me.ATUnispedGmbHToolStripMenuItem.Name = "ATUnispedGmbHToolStripMenuItem"
+        Me.ATUnispedGmbHToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.ATUnispedGmbHToolStripMenuItem.Text = "AT | Unisped GmbH"
         '
         'ToolStripMenuItem10
         '
         Me.ToolStripMenuItem10.Name = "ToolStripMenuItem10"
-        Me.ToolStripMenuItem10.Size = New System.Drawing.Size(383, 22)
+        Me.ToolStripMenuItem10.Size = New System.Drawing.Size(391, 30)
         Me.ToolStripMenuItem10.Text = "TICKET Parkplatz"
         '
         'TICKETWaidhausToolStripMenuItem
         '
         Me.TICKETWaidhausToolStripMenuItem.Name = "TICKETWaidhausToolStripMenuItem"
-        Me.TICKETWaidhausToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.TICKETWaidhausToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.TICKETWaidhausToolStripMenuItem.Text = "Infoschreiben Parkplatz"
         '
         'ToolStripSeparator10
         '
         Me.ToolStripSeparator10.Name = "ToolStripSeparator10"
-        Me.ToolStripSeparator10.Size = New System.Drawing.Size(380, 6)
+        Me.ToolStripSeparator10.Size = New System.Drawing.Size(388, 6)
         '
         'DAKOSYToolStripMenuItem
         '
         Me.DAKOSYToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.StammreferenzenVerwaltenToolStripMenuItem})
         Me.DAKOSYToolStripMenuItem.Name = "DAKOSYToolStripMenuItem"
-        Me.DAKOSYToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.DAKOSYToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.DAKOSYToolStripMenuItem.Text = "DAKOSY"
         '
         'StammreferenzenVerwaltenToolStripMenuItem
@@ -1025,75 +1037,75 @@ Partial Class frmHauptfenster
         'ToolStripSeparator23
         '
         Me.ToolStripSeparator23.Name = "ToolStripSeparator23"
-        Me.ToolStripSeparator23.Size = New System.Drawing.Size(380, 6)
+        Me.ToolStripSeparator23.Size = New System.Drawing.Size(388, 6)
         '
         'ToolStripMenuItem3
         '
         Me.ToolStripMenuItem3.Image = Global.AVISO.My.Resources.Resources.atr
         Me.ToolStripMenuItem3.Name = "ToolStripMenuItem3"
-        Me.ToolStripMenuItem3.Size = New System.Drawing.Size(383, 22)
+        Me.ToolStripMenuItem3.Size = New System.Drawing.Size(391, 30)
         Me.ToolStripMenuItem3.Text = "Original-ATR"
         '
         'SDLAbholaufträgeToolStripMenuItem
         '
         Me.SDLAbholaufträgeToolStripMenuItem.Name = "SDLAbholaufträgeToolStripMenuItem"
-        Me.SDLAbholaufträgeToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.SDLAbholaufträgeToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.SDLAbholaufträgeToolStripMenuItem.Text = "SDL Abholaufträge"
         '
         'ToolStripMenuItem13
         '
         Me.ToolStripMenuItem13.Name = "ToolStripMenuItem13"
-        Me.ToolStripMenuItem13.Size = New System.Drawing.Size(383, 22)
+        Me.ToolStripMenuItem13.Size = New System.Drawing.Size(391, 30)
         Me.ToolStripMenuItem13.Text = "Postversand (Einschreiben)"
         '
         'VorauskassenToolStripMenuItem
         '
         Me.VorauskassenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.vorauszahlung
         Me.VorauskassenToolStripMenuItem.Name = "VorauskassenToolStripMenuItem"
-        Me.VorauskassenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.VorauskassenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.VorauskassenToolStripMenuItem.Text = "Vorauskassen"
         '
         'ToolStripSeparator11
         '
         Me.ToolStripSeparator11.Name = "ToolStripSeparator11"
-        Me.ToolStripSeparator11.Size = New System.Drawing.Size(380, 6)
+        Me.ToolStripSeparator11.Size = New System.Drawing.Size(388, 6)
         '
         'EssensbestellungenToolStripMenuItem
         '
         Me.EssensbestellungenToolStripMenuItem.Name = "EssensbestellungenToolStripMenuItem"
-        Me.EssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.EssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.EssensbestellungenToolStripMenuItem.Text = "Essensbestellungen"
         Me.EssensbestellungenToolStripMenuItem.Visible = False
         '
         'AdministrationEssensbestellungenToolStripMenuItem
         '
         Me.AdministrationEssensbestellungenToolStripMenuItem.Name = "AdministrationEssensbestellungenToolStripMenuItem"
-        Me.AdministrationEssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.AdministrationEssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.AdministrationEssensbestellungenToolStripMenuItem.Text = "Administration Essensbestellungen"
         Me.AdministrationEssensbestellungenToolStripMenuItem.Visible = False
         '
         'ToolStripSeparator24
         '
         Me.ToolStripSeparator24.Name = "ToolStripSeparator24"
-        Me.ToolStripSeparator24.Size = New System.Drawing.Size(380, 6)
+        Me.ToolStripSeparator24.Size = New System.Drawing.Size(388, 6)
         '
         'WarenorteToolStripMenuItem
         '
         Me.WarenorteToolStripMenuItem.Name = "WarenorteToolStripMenuItem"
-        Me.WarenorteToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.WarenorteToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.WarenorteToolStripMenuItem.Text = "Warenorte"
         '
         'DatevBuchungsexportToolStripMenuItem
         '
         Me.DatevBuchungsexportToolStripMenuItem.Name = "DatevBuchungsexportToolStripMenuItem"
-        Me.DatevBuchungsexportToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.DatevBuchungsexportToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.DatevBuchungsexportToolStripMenuItem.Text = "Datev  Buchungsexport"
         Me.DatevBuchungsexportToolStripMenuItem.Visible = False
         '
         'APIToolStripMenuItem
         '
         Me.APIToolStripMenuItem.Name = "APIToolStripMenuItem"
-        Me.APIToolStripMenuItem.Size = New System.Drawing.Size(383, 22)
+        Me.APIToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
         Me.APIToolStripMenuItem.Text = "API"
         '
         'StatistikToolStripMenuItem
@@ -1608,7 +1620,7 @@ Partial Class frmHauptfenster
         '
         Me.VERAGWIKIToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.wiki
         Me.VERAGWIKIToolStripMenuItem.Name = "VERAGWIKIToolStripMenuItem"
-        Me.VERAGWIKIToolStripMenuItem.Size = New System.Drawing.Size(201, 30)
+        Me.VERAGWIKIToolStripMenuItem.Size = New System.Drawing.Size(193, 22)
         Me.VERAGWIKIToolStripMenuItem.Text = "VERAG-WIKI"
         '
         'btnWoche
@@ -2469,38 +2481,38 @@ Partial Class frmHauptfenster
         Me.gridMyAviso.AllowUserToDeleteRows = False
         Me.gridMyAviso.AllowUserToOrderColumns = True
         Me.gridMyAviso.AllowUserToResizeRows = False
-        DataGridViewCellStyle10.BackColor = System.Drawing.Color.Azure
-        Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle10
+        DataGridViewCellStyle19.BackColor = System.Drawing.Color.Azure
+        Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle19
         Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White
-        DataGridViewCellStyle11.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle11.BackColor = System.Drawing.SystemColors.Control
-        DataGridViewCellStyle11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
-        DataGridViewCellStyle11.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle11.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridMyAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle11
+        DataGridViewCellStyle20.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle20.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
+        DataGridViewCellStyle20.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle20.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle20.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle20.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.gridMyAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle20
         Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        DataGridViewCellStyle12.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle12.BackColor = System.Drawing.SystemColors.Window
-        DataGridViewCellStyle12.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle12.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle12.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle12.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridMyAviso.DefaultCellStyle = DataGridViewCellStyle12
+        DataGridViewCellStyle21.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle21.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle21.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle21.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle21.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle21.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle21.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridMyAviso.DefaultCellStyle = DataGridViewCellStyle21
         Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Fill
         Me.gridMyAviso.Location = New System.Drawing.Point(0, 21)
         Me.gridMyAviso.Name = "gridMyAviso"
         Me.gridMyAviso.ReadOnly = True
-        DataGridViewCellStyle13.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle13.BackColor = System.Drawing.SystemColors.Control
-        DataGridViewCellStyle13.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle13.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle13.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle13.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridMyAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle13
+        DataGridViewCellStyle22.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle22.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle22.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle22.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle22.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle22.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle22.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.gridMyAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle22
         Me.gridMyAviso.RowHeadersVisible = False
         Me.gridMyAviso.RowHeadersWidth = 62
         Me.gridMyAviso.Size = New System.Drawing.Size(488, 279)
@@ -2913,47 +2925,47 @@ Partial Class frmHauptfenster
         Me.gridAviso.AllowUserToAddRows = False
         Me.gridAviso.AllowUserToDeleteRows = False
         Me.gridAviso.AllowUserToResizeRows = False
-        DataGridViewCellStyle14.BackColor = System.Drawing.Color.Azure
-        DataGridViewCellStyle14.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle14
+        DataGridViewCellStyle23.BackColor = System.Drawing.Color.Azure
+        DataGridViewCellStyle23.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle23
         Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray
         Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable
-        DataGridViewCellStyle15.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle15.BackColor = System.Drawing.Color.LightBlue
-        DataGridViewCellStyle15.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle15.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle15.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle15.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle15
+        DataGridViewCellStyle24.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle24.BackColor = System.Drawing.Color.LightBlue
+        DataGridViewCellStyle24.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle24.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle24.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle24.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle24.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle24
         Me.gridAviso.ColumnHeadersHeight = 25
         Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        DataGridViewCellStyle16.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle16.BackColor = System.Drawing.SystemColors.Window
-        DataGridViewCellStyle16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle16.ForeColor = System.Drawing.SystemColors.ControlText
-        DataGridViewCellStyle16.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle16.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle16
+        DataGridViewCellStyle25.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle25.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle25.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle25.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle25.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle25.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle25.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle25
         Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill
         Me.gridAviso.Location = New System.Drawing.Point(0, 248)
         Me.gridAviso.MultiSelect = False
         Me.gridAviso.Name = "gridAviso"
         Me.gridAviso.ReadOnly = True
-        DataGridViewCellStyle17.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
-        DataGridViewCellStyle17.BackColor = System.Drawing.SystemColors.Control
-        DataGridViewCellStyle17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        DataGridViewCellStyle17.ForeColor = System.Drawing.SystemColors.WindowText
-        DataGridViewCellStyle17.SelectionBackColor = System.Drawing.SystemColors.Highlight
-        DataGridViewCellStyle17.SelectionForeColor = System.Drawing.SystemColors.HighlightText
-        DataGridViewCellStyle17.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle17
+        DataGridViewCellStyle26.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle26.BackColor = System.Drawing.SystemColors.Control
+        DataGridViewCellStyle26.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DataGridViewCellStyle26.ForeColor = System.Drawing.SystemColors.WindowText
+        DataGridViewCellStyle26.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle26.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle26.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle26
         Me.gridAviso.RowHeadersVisible = False
         Me.gridAviso.RowHeadersWidth = 62
         Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
-        DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
-        Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle18
+        DataGridViewCellStyle27.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle27
         Me.gridAviso.RowTemplate.ReadOnly = True
         Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
         Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
@@ -4085,10 +4097,6 @@ Partial Class frmHauptfenster
     Friend WithEvents ToolStripSeparator19 As ToolStripSeparator
     Friend WithEvents PBNIrelandFähreToolStripMenuItem As ToolStripMenuItem
     Friend WithEvents ToolStripSeparator20 As ToolStripSeparator
-    Friend WithEvents ATGesamtsicherheitVeragAGToolStripMenuItem As ToolStripMenuItem
-    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
@@ -4154,4 +4162,10 @@ Partial Class frmHauptfenster
     Friend WithEvents ToolStripMenuItem3 As ToolStripMenuItem
     Friend WithEvents ToolStripSeparator24 As ToolStripSeparator
     Friend WithEvents VERAGWIKIToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents GesamtsicherheitenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ATVeragAGToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ATImexCSToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ATVeragCSToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents DEVeragGmbHToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ATUnispedGmbHToolStripMenuItem As ToolStripMenuItem
 End Class
diff --git a/Aviso/frmHauptfenster.vb b/Aviso/frmHauptfenster.vb
index c5eeb18..2bb1d25 100644
--- a/Aviso/frmHauptfenster.vb
+++ b/Aviso/frmHauptfenster.vb
@@ -308,13 +308,7 @@ Public Class frmHauptfenster
             End If
         End If
 
-        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("GESAMTSICHERHEIT", "AVISO") Then
-            DEGesamtsicherheitVeragGmbHToolStripMenuItem.Visible = True
-            ATGesamtsicherheitVeragAGToolStripMenuItem.Visible = True
-            ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Visible = True
-            ATGesamtsicherheitVeragCSToolStripMenuItem.Visible = True
-        End If
-
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("GESAMTSICHERHEIT", "AVISO") Then GesamtsicherheitenToolStripMenuItem.Visible = True
 
         Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
             Case "ATILLA" ' Case "VERAG", "IMEX"
@@ -1335,15 +1329,11 @@ Public Class frmHauptfenster
                 '    End Select
                 'End If
 
-                '''sqlStr &= " AND (Grenzstelle ='???' OR  Status NOT IN (1)) " ' "Freigabe" nur bei Fremde Grenze anzeigen!
-                ''' Funktioniert nciht, wg. WO
+                'sqlStr &= " AND (Grenzstelle ='???' OR  Status NOT IN (1)) " ' "Freigabe" nur bei Fremde Grenze anzeigen!
+                ' Funktioniert nciht, wg. WO
 
+                sqlStr &= " ORDER BY case	 " & " when [Status] =3 then 0 " & " when [Status] =1 then 5 " & " else 1 " & " END, VoraussichtlichesEintreffen, Grenzstelle,Ankunft " & If(cbx_My_LKW.Checked, "", ",tblSnd_SendungID")
 
-                sqlStr &= " ORDER BY case	 " &
-                                                     " when [Status] =3 then 0 " &
-                                                     " when [Status] =1 then 5 " &
-                                                     " else 1 " &
-                                             " END, VoraussichtlichesEintreffen, Grenzstelle,Ankunft " & If(cbx_My_LKW.Checked, "", ",tblSnd_SendungID")
             End If
             '   MsgBox(sqlStr)
             'Dim sqlStr As String = " SELECT AvisoID, [Status],CASE WHEN LetzterMitarbeiterId=@maId then '0' ELSE '1' END as [statVorb], LKW_Nr, Dauer, Datum, AvisoEingang, Ankunft, Grenzstelle, Freigabe, LetzterMitarbeiterId AS maId, CASE WHEN LetzterMitarbeiterId=@maId then '0' ELSE '1' END  as Vorbereitung,LetzterMitarbeiter,CASE WHEN [LKW_fertig] = 1 THEN 'OK' ELSE '' END AS [LKW_fertig],AvisoTVHinweis " &
@@ -2751,30 +2741,30 @@ Public Class frmHauptfenster
             ' Label4.Visible = False '- -> NICHT MEHR
             ' cboGrenzstelle.Visible = Falsee '- -> NICHT MEHR
             'BürgschaftenExcelToolStripMenuItem.Visible = True
-            ATGesamtsicherheitVeragCSToolStripMenuItem.Visible = True
+            ATVeragCSToolStripMenuItem.Visible = True
             'ToolStripMenuItem4.Visible = True
-            DEGesamtsicherheitVeragGmbHToolStripMenuItem.Visible = True
+            DEVeragGmbHToolStripMenuItem.Visible = True
             'ToolStripMenuItem5.Visible = True
-            ATGesamtsicherheitVeragAGToolStripMenuItem.Visible = True
+            ATVeragAGToolStripMenuItem.Visible = True
         ElseIf VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERIMEX" Then
             'nix
         ElseIf VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "IMEX" Then
             'btnGenerelleGestellungen.Visible = False
             'ToolStripMenuItem4.Visible = True
-            DEGesamtsicherheitVeragGmbHToolStripMenuItem.Visible = True
+            DEVeragGmbHToolStripMenuItem.Visible = True
             'ToolStripMenuItem5.Visible = True
-            ATGesamtsicherheitVeragAGToolStripMenuItem.Visible = True
+            ATVeragAGToolStripMenuItem.Visible = True
             'ToolStripMenuItem6.Visible = True
-            ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Visible = True
+            ATImexCSToolStripMenuItem.Visible = True
         Else 'VERAG
             'BürgschaftenExcelToolStripMenuItem.Visible = True
-            ATGesamtsicherheitVeragCSToolStripMenuItem.Visible = True
+            ATVeragCSToolStripMenuItem.Visible = True
             'ToolStripMenuItem4.Visible = True
-            DEGesamtsicherheitVeragGmbHToolStripMenuItem.Visible = True
+            DEVeragGmbHToolStripMenuItem.Visible = True
             'ToolStripMenuItem5.Visible = True
-            ATGesamtsicherheitVeragAGToolStripMenuItem.Visible = True
+            ATVeragAGToolStripMenuItem.Visible = True
             'ToolStripMenuItem6.Visible = True
-            ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Visible = True
+            ATImexCSToolStripMenuItem.Visible = True
             If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG = "WAI" Then
                 Button5.Visible = True
             End If
@@ -4290,29 +4280,22 @@ Public Class frmHauptfenster
         Process.Start("https://www.ros.ie/customs-roro-control-web/ros/pbn/create")
     End Sub
 
-    Private Sub ATGesamtsicherheitVeragAGToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitVeragAGToolStripMenuItem.Click
-        Dim frm As New frmGesamtsicherheitenMenuNEU
-        frm.Standort = "VERAG AG"
+    Private Sub ATGesamtsicherheitVeragAGToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATVeragAGToolStripMenuItem.Click, DEVeragGmbHToolStripMenuItem.Click, ATImexCSToolStripMenuItem.Click, ATVeragCSToolStripMenuItem.Click, ATUnispedGmbHToolStripMenuItem.Click
+
+        Dim frm As New frmGesamtsicherheitenMenuNEU()
+        Select Case sender.name
+            Case "ATVeragAGToolStripMenuItem" : frm.Standort = "VERAG AG"
+            Case "DEVeragGmbHToolStripMenuItem" : frm.Standort = "Verag GmbH"
+            Case "ATImexCSToolStripMenuItem" : frm.Standort = "IMEX"
+            Case "ATVeragCSToolStripMenuItem" : frm.Standort = "Verag CS"
+            Case "ATUnispedGmbHToolStripMenuItem" : frm.Standort = "Unisped GmbH"
+        End Select
+
         frm.Show()
+
     End Sub
 
-    Private Sub DEGesamtsicherheitVeragGmbHToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DEGesamtsicherheitVeragGmbHToolStripMenuItem.Click
-        Dim frm As New frmGesamtsicherheitenMenuNEU
-        frm.Standort = "Verag GmbH"
-        frm.Show()
-    End Sub
 
-    Private Sub ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Click
-        Dim frm As New frmGesamtsicherheitenMenuNEU
-        frm.Standort = "IMEX"
-        frm.Show()
-    End Sub
-
-    Private Sub ATGesamtsicherheitVeragCSToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitVeragCSToolStripMenuItem.Click
-        Dim frm As New frmGesamtsicherheitenMenuNEU
-        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
@@ -4556,6 +4539,8 @@ Public Class frmHauptfenster
     Private Sub VERAGWIKIToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VERAGWIKIToolStripMenuItem.Click
 
     End Sub
+
+
 End Class
 
 Public Class AvisoStatusFunctions
diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb
index 7a32b71..d33320a 100644
--- a/Aviso/frmSendungsdetailsNEU.vb
+++ b/Aviso/frmSendungsdetailsNEU.vb
@@ -4112,7 +4112,7 @@ Public Class frmSendungsdetailsNEU
 
                         AvisoStatusFunctions.insertSendungsVermerk(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID, AvisoId, "An Fremdspediteur avisiert (Warenort)", 98)
 
-                        Mail.HTMLBody = "<div style=""font-family:Calibri, Arial;font-size:15px;"">" & TextHTML & SDL.cFakturierung.getSignature("DE") & "</div>"
+                        Mail.HTMLBody = "<div style=""font-family:Calibri, Arial;font-size:15px;"">" & TextHTML & SDL.cFakturierung.getSignature("DE",,,,,, False) & "</div>"
 
                     End If
 
diff --git a/Gemeinsames/Gemeinsames.vbproj b/Gemeinsames/Gemeinsames.vbproj
index f3e32c4..5529c25 100644
--- a/Gemeinsames/Gemeinsames.vbproj
+++ b/Gemeinsames/Gemeinsames.vbproj
@@ -96,6 +96,10 @@
   </PropertyGroup>
   <ItemGroup>
     <Reference Include="Accessibility" />
+    <Reference Include="DAKOSY_Worker, Version=1.0.0.0, Culture=neutral, processorArchitecture=AMD64">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\..\..\ADMIN\ADMIN\DAKOSY_Worker\bin\Debug\DAKOSY_Worker.dll</HintPath>
+    </Reference>
     <Reference Include="GrapeCity.ActiveReports">
       <HintPath>C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\GrapeCity.ActiveReports.dll</HintPath>
     </Reference>
@@ -129,10 +133,6 @@
     <Reference Include="System.Core" />
     <Reference Include="System.Xml.Linq" />
     <Reference Include="System.Data.DataSetExtensions" />
-    <Reference Include="VERAG_PROG_ALLGEMEIN, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\VERAG_PROG_ALLGEMEIN\bin\Debug\VERAG_PROG_ALLGEMEIN.dll</HintPath>
-    </Reference>
   </ItemGroup>
   <ItemGroup>
     <Import Include="Microsoft.VisualBasic" />
@@ -310,9 +310,9 @@
     </Content>
   </ItemGroup>
   <ItemGroup>
-    <ProjectReference Include="..\..\..\ADMIN\ADMIN\DAKOSY_Worker\DAKOSY_Worker_lib.vbproj">
-      <Project>{50e8e49b-4fd9-4dd4-b159-bdc2b7d0e94f}</Project>
-      <Name>DAKOSY_Worker_lib</Name>
+    <ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
+      <Project>{a3b497bd-842c-4a2b-b398-ed1976849df1}</Project>
+      <Name>VERAG_PROG_ALLGEMEIN</Name>
     </ProjectReference>
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />

From beaf4e7adec435971fa0b04d67db22ab194fa1b8 Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Fri, 23 Feb 2024 16:04:26 +0100
Subject: [PATCH 4/4] ErrorHandler

---
 Aviso/frmSendungsdetailsNEU.vb | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb
index d33320a..2f2a93a 100644
--- a/Aviso/frmSendungsdetailsNEU.vb
+++ b/Aviso/frmSendungsdetailsNEU.vb
@@ -5212,6 +5212,7 @@ Public Class frmSendungsdetailsNEU
         Try
             Printername = oPS.PrinterName
         Catch ex As System.Exception
+            VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
         End Try