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

Zinsnachberechnung, etc.

Browse Source
This commit is contained in:
d.breimaier
2025-10-13 14:59:52 +02:00
parent efa761d74d
commit cd81ff6d90
14 changed files with 2079 additions and 558 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
VERAG_PROG_ALLGEMEIN/Classes/cMDMZinsberechnung.vb
View File

@@ -168,7 +168,7 @@ Public Class cMDMZinsberechnung
End Function
Public Shared Function GET_NICHTABGERECHNETE_ZB(ByRef dt As DataTable, von As Date, bis As Date, KundenNr As Integer) As Boolean
Public Shared Function GET_NICHTABGERECHNETE_ZB(ByRef dt As DataTable, KundenNr As Integer) As Boolean
Try
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
@@ -179,21 +179,12 @@ Public Class cMDMZinsberechnung
FROM
tblMDM_Zinsberechnung
WHERE
belegDatum BETWEEN @von AND @bis
AND kundenNr = @KundenNr
kundenNr = @KundenNr
AND zinsbetrag <> 0
AND verrechnet is null
GROUP BY
tblIDSTransactionsNew.KdNrVERAG,
tblIDSTransactionsNew.[YearMonthDay],
ISNULL(tblIDSTransactionsNew.[OBONumber],
ISNULL(tblIDSTransactionsNew.[VRNumber], tblIDSTransactionsNew.[Paymentsummarynumber]))
ORDER BY
belegDatum", conn)
cmd.Parameters.AddWithValue("@von", von)
cmd.Parameters.AddWithValue("@bis", bis)
cmd.Parameters.AddWithValue("@KundenNr", KundenNr)
Dim dr = cmd.ExecuteReader()