|
Lines 423-428
sub balance {
Link Here
|
| 423 |
|
423 |
|
| 424 |
my $lines = Koha::Account->new({ patron_id => $patron_id })->outstanding_debits; |
424 |
my $lines = Koha::Account->new({ patron_id => $patron_id })->outstanding_debits; |
| 425 |
|
425 |
|
|
|
426 |
It returns the debit lines with outstanding amounts for the patron. |
| 427 |
|
| 428 |
In scalar context, it returns a Koha::Account::Lines iterator. In list context, it will |
| 429 |
return a list of Koha::Account::Line objects. |
| 430 |
|
| 426 |
=cut |
431 |
=cut |
| 427 |
|
432 |
|
| 428 |
sub outstanding_debits { |
433 |
sub outstanding_debits { |
|
Lines 439-444
sub outstanding_debits {
Link Here
|
| 439 |
|
444 |
|
| 440 |
my $lines = Koha::Account->new({ patron_id => $patron_id })->outstanding_credits; |
445 |
my $lines = Koha::Account->new({ patron_id => $patron_id })->outstanding_credits; |
| 441 |
|
446 |
|
|
|
447 |
It returns the credit lines with outstanding amounts for the patron. |
| 448 |
|
| 449 |
In scalar context, it returns a Koha::Account::Lines iterator. In list context, it will |
| 450 |
return a list of Koha::Account::Line objects. |
| 451 |
|
| 442 |
=cut |
452 |
=cut |
| 443 |
|
453 |
|
| 444 |
sub outstanding_credits { |
454 |
sub outstanding_credits { |
| 445 |
- |
|
|