X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/6715bd15b37ae88ce51576d9319a0c653d8bd824..69822fd215cb15e1bb017f1af6f0a185f62a31e2:/SL/AP.pm

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;
   }