X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/4c996a3d4df205f272f6c6cb86c1cdfec1ade49d..b2d558c6112d8752db47a2d8e1bae4030da9a7bf:/SL/BP.pm

diff --git a/SL/BP.pm b/SL/BP.pm
index e77695426..e1e0b82e9 100644
--- a/SL/BP.pm
+++ b/SL/BP.pm
@@ -180,8 +180,10 @@ sub get_spoolfiles {
     $query .= " AND lower(a.quonumber) LIKE '$quonumber'";
   }
 
-  #  $query .= " AND a.transdate >= '$form->{transdatefrom}'" if $form->{transdatefrom};
-  #  $query .= " AND a.transdate <= '$form->{transdateto}'" if $form->{transdateto};
+  if ($form->{type} =~ /(invoice|sales_order|sales_quotation)$/) {
+    $query .= " AND a.transdate >= '$form->{transdatefrom}'" if $form->{transdatefrom};
+    $query .= " AND a.transdate <= '$form->{transdateto}'" if $form->{transdateto};
+  }
 
   my @a = (transdate, $invnumber, name);
   my $sortorder = join ', ', $form->sort_columns(@a);