Lines 46-56
my $data = GetMember( 'borrowernumber' => $borrowernumber );
Link Here
|
46 |
|
46 |
|
47 |
my ( $total, $accts, $numaccts ) = GetMemberAccountRecords($borrowernumber); |
47 |
my ( $total, $accts, $numaccts ) = GetMemberAccountRecords($borrowernumber); |
48 |
foreach my $accountline (@$accts) { |
48 |
foreach my $accountline (@$accts) { |
49 |
$accountline->{amount} = sprintf( '%.2f', $accountline->{amount} ) |
|
|
50 |
if ( $accountline->{amount} ) ; |
51 |
$accountline->{amountoutstanding} = sprintf( '%.2f', $accountline->{amountoutstanding} ) |
52 |
if ( $accountline->{amountoutstanding} ); |
53 |
|
54 |
if ( $accountline->{accounttype} ne 'F' |
49 |
if ( $accountline->{accounttype} ne 'F' |
55 |
&& $accountline->{accounttype} ne 'FU' ) |
50 |
&& $accountline->{accounttype} ne 'FU' ) |
56 |
{ |
51 |
{ |
Lines 59-66
foreach my $accountline (@$accts) {
Link Here
|
59 |
} |
54 |
} |
60 |
|
55 |
|
61 |
our $totalprice = 0; |
56 |
our $totalprice = 0; |
62 |
my $total_format = ''; |
|
|
63 |
$total_format = sprintf( "%.2f", $total ) if ($total); |
64 |
|
57 |
|
65 |
my $holds_rs = Koha::Holds->search( |
58 |
my $holds_rs = Koha::Holds->search( |
66 |
{ borrowernumber => $borrowernumber }, |
59 |
{ borrowernumber => $borrowernumber }, |
Lines 72-78
$template->param(
Link Here
|
72 |
borrowernumber => $borrowernumber, |
65 |
borrowernumber => $borrowernumber, |
73 |
|
66 |
|
74 |
accounts => $accts, |
67 |
accounts => $accts, |
75 |
totaldue => $total_format, |
68 |
totaldue => $total, |
76 |
|
69 |
|
77 |
issues => build_issue_data( GetPendingIssues($borrowernumber) ), |
70 |
issues => build_issue_data( GetPendingIssues($borrowernumber) ), |
78 |
totalprice => $totalprice, |
71 |
totalprice => $totalprice, |
79 |
- |
|
|