MDM-Sammelrechnung IDS Prüfung erweitert, Fakt.

This commit is contained in:
2025-02-20 09:04:34 +01:00
parent d0048c512d
commit 5d03008258
4 changed files with 14 additions and 6 deletions

View File

@@ -4057,7 +4057,7 @@ Public Class frmMDMDatenverarbetiung
pruefData_IDS = True
Try
Dim RechnenWertNichtEingetragen As Integer = CInt((New SQL).getValueTxtBySql("select count(*) from [tblIDSTransactionsNew] WHERE cast(YearMonthDay as Date) = '" & DateTimePicker2.Text & "' AND tblIDSTransactionsNew.[UStVAn_ID] is null AND [Rechenwert] is null ", "FMZOLL"))
Dim RechnenWertNichtEingetragen As Integer = CInt((New SQL).getValueTxtBySql("select count(*) from [tblIDSTransactionsNew] WHERE cast(YearMonthDay as Date) = '" & DateTimePicker2.Text & "' AND tblIDSTransactionsNew.[UStVAn_ID] is null AND [Rechenwert] is null and CustomerCode not in (60004479,60025994) ", "FMZOLL")) 'Verag360 und VeragAG
If RechnenWertNichtEingetragen > 0 Then
pruefData_IDS = False