View | Details | Raw Unified | Return to bug 14916
Collapse All | Expand All

(-)a/circ/overdue.pl (-5 / +5 lines)
Lines 27-33 use CGI qw(-oldstyle_urls -utf8); Link Here
27
use C4::Auth;
27
use C4::Auth;
28
use C4::Branch;
28
use C4::Branch;
29
use C4::Debug;
29
use C4::Debug;
30
use C4::Dates qw/format_date format_date_in_iso/;
31
use Text::CSV_XS;
30
use Text::CSV_XS;
32
use Koha::DateUtils;
31
use Koha::DateUtils;
33
use DateTime;
32
use DateTime;
Lines 43-50 my $branchfilter = $input->param('branch') || ''; Link Here
43
my $homebranchfilter    = $input->param('homebranch') || '';
42
my $homebranchfilter    = $input->param('homebranch') || '';
44
my $holdingbranchfilter = $input->param('holdingbranch') || '';
43
my $holdingbranchfilter = $input->param('holdingbranch') || '';
45
my $op              = $input->param('op') || '';
44
my $op              = $input->param('op') || '';
46
my $dateduefrom = format_date_in_iso($input->param( 'dateduefrom' )) || '';
45
my $dateduefrom = '';
47
my $datedueto   = format_date_in_iso($input->param( 'datedueto' )) || '';
46
$dateduefrom = output_pref({ dt => dt_from_string( $input->param( 'dateduefrom' ) ), dateformat => 'iso', dateonly => 1 }) if ( $input->param( 'dateduefrom' ) );
47
my $datedueto = '';
48
$datedueto = output_pref({ dt => dt_from_string( $input->param( 'datedueto' ) ), dateformat => 'iso', dateonly => 1 }) if ( $input->param( 'datedueto' ) );
48
# FIXME This is a kludge to include times
49
# FIXME This is a kludge to include times
49
if ($datedueto) {
50
if ($datedueto) {
50
    $datedueto .= ' 23:59';
51
    $datedueto .= ' 23:59';
Lines 348-354 if ($noreport) { Link Here
348
            barcode                => $data->{barcode},
349
            barcode                => $data->{barcode},
349
            cardnumber             => $data->{cardnumber},
350
            cardnumber             => $data->{cardnumber},
350
            itemnum                => $data->{itemnumber},
351
            itemnum                => $data->{itemnumber},
351
            issuedate              => format_date($data->{issuedate}),
352
            issuedate              => output_pref({ dt => dt_from_string( $data->{issuedate} ), dateonly => 1 }),
352
            borrowertitle          => $data->{borrowertitle},
353
            borrowertitle          => $data->{borrowertitle},
353
            surname                => $data->{surname},
354
            surname                => $data->{surname},
354
            firstname              => $data->{firstname},
355
            firstname              => $data->{firstname},
355
- 

Return to bug 14916