Sendungsdetails

Aviso/frmSendungsdetailsNEU.vb

@@ -101,7 +101,6 @@ Public Class frmSendungsdetailsNEU
         cntlFrachtfuehrer_Sonst.special(False)
         Try
 
-
             For Each c In Panel6.Controls
                 If c.GetType.ToString = "AVISO.usrcntlCheckBox" Then
                     Dim cntlCbx As usrcntlCheckBox = DirectCast(c, usrcntlCheckBox)
@@ -5936,14 +5935,9 @@ Public Class frmSendungsdetailsNEU
     Sub calculateFreightCosts()
 
         Dim f = New frmFrachtkostenBerechnen()
-
         f.UsrcntlFrachtkostenberechnung1.init(AvisoId, txtAbsenderKdNr._value, txtEmpfaengerKdNr._value, txtGewicht.Text, txtFrachtkostenGesamt.Text, rtbWarenbezeichnung.Text, txtWarenwert._value)
-
         If f.ShowDialog = DialogResult.OK Then
 
-            'txtFrachtkostenEU._value = frachkosten.usrcntlFrachtkostenberechnung.EUAnteil
-            'txtFrachtkostenNichtEU._value = frachkosten.nichtEUAnteil
-            'txtFrachtkostenGesamt._value = frachkosten.tbxGesamtfrachtkosten._value
         End If
 
 

Aviso/rCntrlVermerke.vb

@@ -142,7 +142,7 @@ Public Class rCntrlVermerke
     '                    End If
     '                Next
     '            Catch ex As Exception
-    '                MsgBox("ERR")
+    '                VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
     '            End Try
     '    End Select
     'End Sub

Aviso/usrcntlAktDetails.vb

@@ -1527,7 +1527,7 @@ Public Class usrcntlAktDetails
             ' ArrowDown_ShowHide() 'Anzeigeproblem, wenn Aviso minimiert wird! --> Jetzt bei Timer!
 
         Catch ex As Exception
-            MsgBox(ex.Message & ex.StackTrace)
+            VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
         End Try
     End Sub
 
@@ -1547,7 +1547,7 @@ Public Class usrcntlAktDetails
                         End If
                     Next
                 Catch ex As Exception
-                    MsgBox("ERR")
+                    VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
                 End Try
         End Select
     End Sub