trdinin, syska

2026-04-09 17:44:30 +02:00
parent 968f77f8b3
commit 3f637bed33
2 changed files with 40 additions and 29 deletions
--- a/VERAG_PROG_ALLGEMEIN/Schnittstellen/cSyska_Interface.vb
+++ b/VERAG_PROG_ALLGEMEIN/Schnittstellen/cSyska_Interface.vb
@@ -364,10 +364,6 @@ Public Class cSyska_Interface

        For Each r In dt.Rows

-            If r("Buchungstext").ToString.Contains("26000033") Then
-                Dim test As String = ""
-            End If
-
            Dim curDifferenzbetrag As Double = 0
            If r("WährungFremd") Is DBNull.Value Then
                curDifferenzbetrag = Math.Round(If(r("RechnungsbetragLokal") < 0, 0 - r("RechnungsbetragLokal"), r("RechnungsbetragLokal")), 2)