From 658cfd354abae0cb07cc4a1238b2974eecfa1329 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Mon, 9 Jan 2012 17:41:23 +0100
Subject: [PATCH] =?utf8?q?Bestimmung=20der=20Menge=20der=20Kunden=20muss?=
 =?utf8?q?=20auch=20ung=C3=BCltige=20ber=C3=BCcksichtigen.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Fix zu Bug 1730
---
 SL/Form.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SL/Form.pm b/SL/Form.pm
index d0a4157b4..0c291dabe 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -2521,7 +2521,7 @@ sub all_vc {
 
   $table = $table eq "customer" ? "customer" : "vendor";
 
-  my $query = qq|SELECT count(*) FROM $table|;
+  my $query = qq|SELECT count(*) FROM $table WHERE NOT obsolete|;
   my ($count) = selectrow_query($self, $dbh, $query);
 
   # build selection list
-- 
2.20.1