use strict;
use Date::Calc qw/Today Date_to_Days/;
+use C4::Dates qw/format_date/;
use Date::Manip qw/UnixDate/;
use C4::Circulation;
use C4::Context;
push @args, $dateduefrom;
}
if(not ($datedueto or $dateduefrom)){
- $strsthissues .= " AND date_due > NOW() ";
+ $strsthissues .= " AND date_due < NOW() ";
}
my $sthissues = $dbh->prepare($strsthissues);
my $sthbor = $dbh->prepare($strsth);
my @issues = ();
while(my $issuedata = $sthissues->fetchrow_hashref()){
+ $issuedata->{date_due} = format_date($issuedata->{date_due});
+ $issuedata->{issuedate} = format_date($issuedata->{issuedate});
push @issues, $issuedata;
}
$borrower->{overdues} = \@issues;