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

(-)a/members/printfeercpt.pl (-3 / +2 lines)
Lines 27-33 use warnings; Link Here
27
27
28
use C4::Auth;
28
use C4::Auth;
29
use C4::Output;
29
use C4::Output;
30
use C4::Dates qw/format_date/;
30
use Koha::DateUtils;
31
use CGI qw ( -utf8 );
31
use CGI qw ( -utf8 );
32
use C4::Members;
32
use C4::Members;
33
use C4::Branch;
33
use C4::Branch;
Lines 89-95 for (my $i=0;$i<$numaccts;$i++){ Link Here
89
    if($accts->[$i]{'amountoutstanding'} <= 0){
89
    if($accts->[$i]{'amountoutstanding'} <= 0){
90
        $accts->[$i]{'amountoutstandingcredit'} = 1;
90
        $accts->[$i]{'amountoutstandingcredit'} = 1;
91
    }
91
    }
92
    my %row = ( 'date'              => format_date($accts->[$i]{'date'}),
92
    my %row = ( 'date'              => output_pref({ dt => dt_from_string( $accts->[$i]{'date'} ), dateonly => 1 }),
93
                'amountcredit' => $accts->[$i]{'amountcredit'},
93
                'amountcredit' => $accts->[$i]{'amountcredit'},
94
                'amountoutstandingcredit' => $accts->[$i]{'amountoutstandingcredit'},
94
                'amountoutstandingcredit' => $accts->[$i]{'amountoutstandingcredit'},
95
                'toggle' => $accts->[$i]{'toggle'},
95
                'toggle' => $accts->[$i]{'toggle'},
96
- 

Return to bug 13813