diff --git a/members/printfeercpt.pl b/members/printfeercpt.pl index 8ffc49ff7c..6d4d75a62d 100755 --- a/members/printfeercpt.pl +++ b/members/printfeercpt.pl @@ -27,11 +27,11 @@ use warnings; use C4::Auth; use C4::Output; -use C4::Dates qw/format_date/; use CGI qw ( -utf8 ); use C4::Members; use C4::Branch; use C4::Accounts; +use Koha::DateUtils; my $input=new CGI; @@ -89,7 +89,7 @@ for (my $i=0;$i<$numaccts;$i++){ if($accts->[$i]{'amountoutstanding'} <= 0){ $accts->[$i]{'amountoutstandingcredit'} = 1; } - my %row = ( 'date' => format_date($accts->[$i]{'date'}), + my %row = ( 'date' => output_pref({ dt => dt_from_string( $accts->[$i]{'date'} ), dateformat => 'iso', dateonly => 1 }), 'amountcredit' => $accts->[$i]{'amountcredit'}, 'amountoutstandingcredit' => $accts->[$i]{'amountoutstandingcredit'}, 'toggle' => $accts->[$i]{'toggle'},