|
Lines 1236-1242
sub GetMemberAccountBalance {
Link Here
|
| 1236 |
push( @not_fines, @$man_inv_types ); |
1236 |
push( @not_fines, @$man_inv_types ); |
| 1237 |
} |
1237 |
} |
| 1238 |
|
1238 |
|
| 1239 |
my $other_charges = |
1239 |
my $fines = |
| 1240 |
Koha::Database->new()->schema->resultset('AccountDebit')->search( |
1240 |
Koha::Database->new()->schema->resultset('AccountDebit')->search( |
| 1241 |
{ |
1241 |
{ |
| 1242 |
borrowernumber => $borrowernumber, |
1242 |
borrowernumber => $borrowernumber, |
|
Lines 1246-1253
sub GetMemberAccountBalance {
Link Here
|
| 1246 |
|
1246 |
|
| 1247 |
return ( |
1247 |
return ( |
| 1248 |
$borrower->account_balance(), |
1248 |
$borrower->account_balance(), |
| 1249 |
$borrower->account_balance() - $other_charges, |
1249 |
$fines, |
| 1250 |
$other_charges |
1250 |
$borrower->account_balance() - $fines |
| 1251 |
); |
1251 |
); |
| 1252 |
} |
1252 |
} |
| 1253 |
|
1253 |
|