ausfschub

VERAG_PROG_ALLGEMEIN/Classes/cAufschubKonten.vb

@@ -186,8 +186,6 @@ Public Class cAufschubKonten
         End If
 
 
-
-
         Dim SaldoString As String =
             "	SELECT
     SUM(Betrag) AS GesamtSicherheitsSaldo
@@ -198,7 +196,7 @@ Public Class cAufschubKonten
             WHEN gs_art = 'CLOSE' THEN gs_sicherheitsbetrag
         END AS Betrag
     FROM tblGesamtsicherheit
-    WHERE gs_standort = '" & brgakto_gs_standort & "'" & StichtagSQLGesamtsicherheit & " AND ISNULL(gs_ReferenzAenderung,0) = 0
+    WHERE gs_standort = '" & brgakto_gs_standort & "'" & StichtagSQLGesamtsicherheit & " AND ISNULL(gs_ReferenzAenderung,0) = 0 
 
         UNION ALL
 
@@ -210,8 +208,8 @@ Public Class cAufschubKonten
     FROM tblGesamtsicherheitsPositionen
     WHERE gsp_gsnr IN (
         SELECT gs_gsnr
-        FROM tblGesamtsicherheit
-        WHERE gs_standort = '" & brgakto_gs_standort & "'" & StichtagSQLGesamtsicherheit & " AND ISNULL(gs_ReferenzAenderung,0) = 0 )) x;"
+        From tblGesamtsicherheit
+        Where gs_standort = '" & brgakto_gs_standort & "'" & StichtagSQLGesamtsicherheit & " AND ISNULL(gs_ReferenzAenderung,0) = 0 )" & StichtagSQLGesamtsicherheitsPositionen & " ) x;"
 
         Dim dt As New DataTable
         Dim mrn As Double = 0