From dc4955db17a064b87464b960d479e46f910622ce Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 7 Nov 2023 10:02:04 +0100 Subject: [PATCH] Only process active articles --- MultiTool.Common/Winline/WinlineData.vb | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/MultiTool.Common/Winline/WinlineData.vb b/MultiTool.Common/Winline/WinlineData.vb index e6d0ad8..6f0fa99 100644 --- a/MultiTool.Common/Winline/WinlineData.vb +++ b/MultiTool.Common/Winline/WinlineData.vb @@ -89,7 +89,8 @@ Namespace Winline [c075] -- EAN FROM [{pMandator.Server}].[{pMandator.Database}].[dbo].[v021] WHERE - mesocomp = '{pMandator.Id}' AND mesoyear = {oYear}" + c038 IS NULL -- Nur Aktive Artikel + AND mesocomp = '{pMandator.Id}' AND mesoyear = {oYear}" Dim oTable = Await Database.GetDatatableAsync(oSQL) Dim oArticles As New List(Of Article) @@ -531,7 +532,7 @@ Namespace Winline FROM [{pMandator.Database}].[dbo].[v021] WHERE [c075] = '{pEAN}' - AND [c038] IS NULL -- Aktiv + AND [c038] IS NULL -- Nur Aktive Artikel AND [mesocomp] = '{pMandator.Id}' AND [mesoyear] = {oYear}" Dim oTable As DataTable = Database.GetDatatable(oSQL) @@ -636,6 +637,7 @@ Namespace Winline [c123] -- Ersatzartikelnummer FROM [{pMandator.Database}].[dbo].[v021] WHERE [c011] = '{pArticleNumber}' + AND c038 IS NULL -- Nur Aktive Artikel AND [mesocomp] = '{pMandator.Id}' AND [mesoyear] = {oYear}" Dim oTable As DataTable = Database.GetDatatable(oSQL)