diff --git a/Koha/Account.pm b/Koha/Account.pm index 304d0e2743..eeb87a546c 100644 --- a/Koha/Account.pm +++ b/Koha/Account.pm @@ -423,6 +423,11 @@ sub balance { my $lines = Koha::Account->new({ patron_id => $patron_id })->outstanding_debits; +It returns the debit lines with outstanding amounts for the patron. + +In scalar context, it returns a Koha::Account::Lines iterator. In list context, it will +return a list of Koha::Account::Line objects. + =cut sub outstanding_debits { @@ -440,6 +445,11 @@ sub outstanding_debits { my $lines = Koha::Account->new({ patron_id => $patron_id })->outstanding_credits; +It returns the credit lines with outstanding amounts for the patron. + +In scalar context, it returns a Koha::Account::Lines iterator. In list context, it will +return a list of Koha::Account::Line objects. + =cut sub outstanding_credits {