Lines 29-34
use C4::Debug;
Link Here
|
29 |
use Text::CSV_XS; |
29 |
use Text::CSV_XS; |
30 |
use Koha::DateUtils; |
30 |
use Koha::DateUtils; |
31 |
use DateTime; |
31 |
use DateTime; |
|
|
32 |
use DateTime::Format::MySQL; |
32 |
|
33 |
|
33 |
my $input = new CGI; |
34 |
my $input = new CGI; |
34 |
my $order = $input->param('order') || ''; |
35 |
my $order = $input->param('order') || ''; |
Lines 321-328
if ($noreport) {
Link Here
|
321 |
$template->param(sql=>$strsth); |
322 |
$template->param(sql=>$strsth); |
322 |
my $sth=$dbh->prepare($strsth); |
323 |
my $sth=$dbh->prepare($strsth); |
323 |
$sth->execute( |
324 |
$sth->execute( |
324 |
($dateduefrom ? output_pref({ dt => $dateduefrom, dateformat => 'iso' }) : ()), |
325 |
($dateduefrom ? DateTime::Format::MySQL->format_datetime($dateduefrom) : ()), |
325 |
($datedueto ? output_pref({ dt => $datedueto, dateformat => 'iso' }) : ()), |
326 |
($datedueto ? DateTime::Format::MySQL->format_datetime($datedueto) : ()), |
326 |
); |
327 |
); |
327 |
|
328 |
|
328 |
my @overduedata; |
329 |
my @overduedata; |
329 |
- |
|
|