From 8743f0c4b1d982ff2edb60ba41747ad6928b0f9c Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 3 May 2022 15:59:18 +0200 Subject: [PATCH] Filter out inactive accounts and document kinds --- MultiTool.Common/Winline/WinlineData.vb | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/MultiTool.Common/Winline/WinlineData.vb b/MultiTool.Common/Winline/WinlineData.vb index f640336..6a84ff3 100644 --- a/MultiTool.Common/Winline/WinlineData.vb +++ b/MultiTool.Common/Winline/WinlineData.vb @@ -182,7 +182,8 @@ Namespace Winline [c260] -- GLN FROM [{pMandator.Server}].[{pMandator.Database}].[dbo].[v050] WHERE - c139 IS NULL + c139 IS NULL -- Kontentyp + AND c105 IS NULL -- Inaktiv AND mesocomp = '{pMandator.Id}' AND mesoyear = {oYear}" Dim oTable = Await Database.GetDatatableAsync(oSQL) @@ -270,6 +271,7 @@ Namespace Winline [c001] LIKE 'Werk%(VK)' OR [c001] LIKE 'Werk%(WK)' ) + AND c129 IS NULL -- Inaktiv AND [mesocomp] = '{pMandator.Id}' AND [mesoyear] = {oYear}" Dim oTable As DataTable = Await Database.GetDatatableAsync(oSQL) Dim oKinds As New List(Of DocumentKind)