X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FForm.pm;h=0c291dabe09e4d39af37235677306d3d7b005ed4;hb=5c5d0641f55504c2e9ed860633caba14d313981d;hp=d0a4157b4a66bb7d4ee10f2fc5833bbcd631688b;hpb=7edc9f8c5eeec5fd24ccd709efa62f928ab66350;p=kivitendo-erp.git

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