From 04d9e8f45b9007a66b92744284b948d9a92f280a Mon Sep 17 00:00:00 2001 From: Andreas Luxbauer Date: Tue, 12 May 2026 09:13:51 +0200 Subject: [PATCH] IDS MDM IT Veg --- MailSender/MAILSender.vb | 18 ++++++------------ 1 file changed, 6 insertions(+), 12 deletions(-) diff --git a/MailSender/MAILSender.vb b/MailSender/MAILSender.vb index c10ef15..73fd86b 100644 --- a/MailSender/MAILSender.vb +++ b/MailSender/MAILSender.vb @@ -3418,17 +3418,11 @@ Module Mail ' --- SQL 1x laden: alle Monate / Datenquellen --- Dim sqlstr As String = "SELECT * FROM ( - SELECT - COUNT(*) AS Anzahl, - 'IDS' AS Datenquelle, - MONTH(t.YearMonthDay) AS [Month], - YEAR(t.YearMonthDay) AS [Year] - FROM tblIDSTransactionsNew t - INNER JOIN tbl_IDS_Länder l ON t.OutletCountryCode = l.OutletCountryCode - INNER JOIN tbl_IDS_Produkte p ON t.ProductTypeCode = p.ProductTypeCode - WHERE YEAR(t.YearMonthDay) = " & yearVal & " - GROUP BY MONTH(t.YearMonthDay), YEAR(t.YearMonthDay) - + SELECT count(*) as Anzahl, 'IDS' as Datenquelle, Month(tblIDSTransactionsNew_details.YearMonthDay) as Month,Year(tblIDSTransactionsNew_details.YearMonthDay) as Year + FROM tblIDSTransactionsNew_details + WHERE Year(tblIDSTransactionsNew_details.YearMonthDay) = " & yearVal & " + GROUP BY Month(tblIDSTransactionsNew_details.YearMonthDay),Year(tblIDSTransactionsNew_details.YearMonthDay) + UNION ALL SELECT @@ -3437,7 +3431,7 @@ Module Mail MONTH([Transaction date]) AS [Month], YEAR([Transaction date]) AS [Year] FROM [VERAG].[dbo].[tblMautbericht] - WHERE YEAR([Transaction date]) = " & yearVal & " + WHERE YEAR([Transaction date]) = " & yearVal & " and Datenquelle not in ('IDS') GROUP BY Datenquelle, MONTH([Transaction date]), YEAR([Transaction date]) ) AS temp ORDER BY Datenquelle, temp.[Year], temp.[Month];"