X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2e4e2ba959344a6db630b5b9e9c6f8b93c666fc2..0dfb1453080f4bcd515bff166f35d5577a08b75b:/SL/DO.pm diff --git a/SL/DO.pm b/SL/DO.pm index 7d3a5e61d..21f93d813 100644 --- a/SL/DO.pm +++ b/SL/DO.pm @@ -145,6 +145,16 @@ sub transactions { push @values, conv_date($form->{transdateto}); } + if($form->{reqdatefrom}) { + push @where, qq|dord.reqdate >= ?|; + push @values, conv_date($form->{reqdatefrom}); + } + + if($form->{reqdateto}) { + push @where, qq|dord.reqdate <= ?|; + push @values, conv_date($form->{reqdateto}); + } + if (@where) { $query .= " WHERE " . join(" AND ", map { "($_)" } @where); }