@@ -, +, @@
---
koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt | 4 +++-
opac/opac-user.pl | 4 ++++
2 files changed, 7 insertions(+), 1 deletion(-)
--- a/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt
+++ a/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt
@@ -281,7 +281,9 @@ Using this account is not recommended because some parts of Koha will not functi
Fines:
[% IF ( ISSUE.charges ) %]
- Yes
+ Yes (Item overdue or lost)
+ [% ELSIF ( ISSUE.rentalfines ) %]
+ Yes (Rental fees)
[% ELSE %]
No
[% END %]
--- a/opac/opac-user.pl
+++ a/opac/opac-user.pl
@@ -188,6 +188,7 @@ if ($issues){
my ( $total , $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber );
my $charges = 0;
+ my $rentalfines = 0;
foreach my $ac (@$accts) {
if ( $ac->{'itemnumber'} == $issue->{'itemnumber'} ) {
$charges += $ac->{'amountoutstanding'}
@@ -196,9 +197,12 @@ if ($issues){
if $ac->{'accounttype'} eq 'FU';
$charges += $ac->{'amountoutstanding'}
if $ac->{'accounttype'} eq 'L';
+ $rentalfines += $ac->{'amountoutstanding'}
+ if $ac->{'accounttype'} eq 'Rent';
}
}
$issue->{'charges'} = $charges;
+ $issue->{'rentalfines'} = $rentalfines;
my $marcrecord = GetMarcBiblio( $issue->{'biblionumber'} );
$issue->{'subtitle'} = GetRecordValue('subtitle', $marcrecord, GetFrameworkCode($issue->{'biblionumber'}));
# check if item is renewable
--
|