diff --git a/Aviso/Anhänge/frmSendungAnhangImport.vb b/Aviso/Anhänge/frmSendungAnhangImport.vb
index 1371eab..70fec30 100644
--- a/Aviso/Anhänge/frmSendungAnhangImport.vb
+++ b/Aviso/Anhänge/frmSendungAnhangImport.vb
@@ -108,8 +108,8 @@ Public Class frmSendungAnhangImport
                                                  If pAnchor IsNot Nothing AndAlso pAnchor Is pClick Then
                                                      Dim i1 As Integer = pAnchor.Controls.IndexOf(anchor)
                                                      Dim i2 As Integer = pAnchor.Controls.IndexOf(USRCNTL)
-                                                     Dim fromIdx As Integer = Math.Min(i1, i2)
-                                                     Dim toIdx As Integer = Math.Max(i1, i2)
+                                                     Dim fromIdx As Integer = Math.min(i1, i2)
+                                                     Dim toIdx As Integer = Math.max(i1, i2)
 
                                                      ' Vorher alles deselektieren (beide Panels)
                                                      For Each c As Control In flpnlAviso.Controls
@@ -183,7 +183,7 @@ Public Class frmSendungAnhangImport
                                     End Sub
     End Sub
 
-    Sub initLocationViewer(loc, typ)
+    Sub initLocationViewer(loc As String, typ As String)
 
         Try
 
@@ -206,7 +206,7 @@ Public Class frmSendungAnhangImport
                     If loc <> "" Then
                         Dim data = File.ReadAllBytes(loc)
 
-                        Dim header As String = System.Text.Encoding.ASCII.GetString(data, 0, Math.Min(4, data.Length))
+                        Dim header As String = System.Text.Encoding.ASCII.GetString(data, 0, Math.min(4, data.Length))
 
                         If header = "%PDF" Then
 
@@ -219,9 +219,9 @@ Public Class frmSendungAnhangImport
                     End If
 
 
-                        'NOT WORKING
-                        'PdfViewer.LoadFromFile(loc) NOT WORKING
-                    End If
+                    'NOT WORKING
+                    'PdfViewer.LoadFromFile(loc) NOT WORKING
+                End If
             ElseIf typ = "BILD" Or typ = ".jpg" Then
                 PdfViewer.Visible = False
                 WebBrowser.Visible = (loc <> "")
@@ -236,7 +236,7 @@ Public Class frmSendungAnhangImport
             Button5.Visible = PdfViewer.Visible
 
         Catch ex As Exception
-            VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
+            VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Path: " & loc, System.Reflection.MethodInfo.GetCurrentMethod.Name)
         End Try
     End Sub
 
diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb
index b9ff00b..864b12e 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("4.3.0.2")>
-<Assembly: AssemblyFileVersion("4.3.0.2")>
+<Assembly: AssemblyVersion("4.3.0.3")>
+<Assembly: AssemblyFileVersion("4.3.0.3")>
diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb
index 9940558..f191c05 100644
--- a/Aviso/frmSendungsdetailsNEU.vb
+++ b/Aviso/frmSendungsdetailsNEU.vb
@@ -2018,7 +2018,7 @@ Public Class frmSendungsdetailsNEU
 
         If SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen Then
             btnSpeditionsbuchEintragen.BackgroundImage = My.Resources.speditionsbuchAktiv
-            setTooltioBtn(btnSpeditionsbuchEintragen, "Speditionsbuch Eingetrag öffnen")
+            setTooltioBtn(btnSpeditionsbuchEintragen, "Speditionsbucheintrag öffnen")
         End If