verwahrung

2026-08-12 16:23:51 +02:00
parent b6f6f94739
commit 33134abe1c
1 changed files with 3 additions and 1 deletions
--- 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