diff --git a/initATLASAufschubkonten/cWorker_Verwahrung.vb b/initATLASAufschubkonten/cWorker_Verwahrung.vb index f317ea7..e9145d2 100644 --- a/initATLASAufschubkonten/cWorker_Verwahrung.vb +++ b/initATLASAufschubkonten/cWorker_Verwahrung.vb @@ -1058,7 +1058,9 @@ Anzeige: Else Dim sicherheitsbetrag_temp As Double = IIf(differenz > 0, Math.Abs(differenz), 0) - corrWarenwert = sicherheitsbetrag_temp * 100 / CDbl(gsrightRow("gs_zollsatz")) + Dim zollsatz As Double = If(IsDBNull(gsrightRow("gs_zollsatz")), 0, CDbl(gsrightRow("gs_zollsatz"))) + corrWarenwert = If(zollsatz <> 0, sicherheitsbetrag_temp * 100 / zollsatz, 0) + End If