From f2d7c61f7c967ceac07542fe0b48287875dd6a7d Mon Sep 17 00:00:00 2001
From: Thomas Kasulke <t.kasulke@linet-services.de>
Date: Fri, 27 Apr 2007 10:49:15 +0000
Subject: [PATCH] Anpassung der Anzeige, dass keine stornierten Rechnungen mehr
 angezeigt werden

---
 SL/AP.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/SL/AP.pm b/SL/AP.pm
index f5c1e7370..3f1818bdc 100644
--- a/SL/AP.pm
+++ b/SL/AP.pm
@@ -415,7 +415,7 @@ sub ap_transactions {
     qq|LEFT JOIN employee e ON (a.employee_id = e.id) | .
     qq|LEFT JOIN project pr ON (a.globalproject_id = pr.id) |;
 
-  my $where;
+  my $where = qq| WHERE storno != true |;
   my @values;
 
   if ($form->{vendor_id}) {
@@ -466,7 +466,7 @@ sub ap_transactions {
   }
 
   if ($where) {
-    substr($where, 0, 4) = "WHERE";
+#     substr($where, 0, 4) = "WHERE";
     $query .= $where;
   }
 
-- 
2.20.1