ustv, etc.

2025-04-11 16:08:43 +02:00
parent 329621d2d8
commit 2759792f0b
6 changed files with 94 additions and 78 deletions
--- a/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cMDMFunctionsAllgemein.vb
@@ -427,7 +427,7 @@ Public Class cMDMFunctionsAllgemein
                Dim dtIDSENeut As DataTable = sql.loadDgvBySql(sqlFMZollDatenNEU, "FMZOLL")

                For Each r As DataRow In dtIDSENeut.Rows
-                    Dim UST_org = CDbl(r.Item("UST_EUR"))
+                    Dim UST_org = CDbl(r.Item("Vorschaubetrag"))
                    If UST_org <> 0 Then
                        summeNeueSchnittstelle += UST_org
                    End If