edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ausfschub

Browse Source
This commit is contained in:
d.breimaier
2026-01-16 15:14:47 +01:00
parent d00edda180
commit b5f2fc96fb
1 changed files with 3 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
VERAG_PROG_ALLGEMEIN/Classes/cAufschubKonten.vb
View File

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