View | Details | Raw Unified | Return to bug 15738
Collapse All | Expand All

(-)a/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-user.tt (-1 / +3 lines)
Lines 281-287 Using this account is not recommended because some parts of Koha will not functi Link Here
281
                                                    <td class="fines">
281
                                                    <td class="fines">
282
                                                        <span class="tdlabel">Fines:</span>
282
                                                        <span class="tdlabel">Fines:</span>
283
                                                        [% IF ( ISSUE.charges ) %]
283
                                                        [% IF ( ISSUE.charges ) %]
284
                                                            Yes
284
                                                            Yes (Item overdue or lost)
285
                                                        [% ELSIF ( ISSUE.rentalfines ) %]
286
                                                            Yes (Rental fees)
285
                                                        [% ELSE %]
287
                                                        [% ELSE %]
286
                                                            No
288
                                                            No
287
                                                        [% END %]
289
                                                        [% END %]
(-)a/opac/opac-user.pl (-1 / +4 lines)
Lines 188-193 if ($issues){ Link Here
188
188
189
        my ( $total , $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber );
189
        my ( $total , $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber );
190
        my $charges = 0;
190
        my $charges = 0;
191
        my $rentalfines = 0;
191
        foreach my $ac (@$accts) {
192
        foreach my $ac (@$accts) {
192
            if ( $ac->{'itemnumber'} == $issue->{'itemnumber'} ) {
193
            if ( $ac->{'itemnumber'} == $issue->{'itemnumber'} ) {
193
                $charges += $ac->{'amountoutstanding'}
194
                $charges += $ac->{'amountoutstanding'}
Lines 196-204 if ($issues){ Link Here
196
                  if $ac->{'accounttype'} eq 'FU';
197
                  if $ac->{'accounttype'} eq 'FU';
197
                $charges += $ac->{'amountoutstanding'}
198
                $charges += $ac->{'amountoutstanding'}
198
                  if $ac->{'accounttype'} eq 'L';
199
                  if $ac->{'accounttype'} eq 'L';
200
                $rentalfines += $ac->{'amountoutstanding'}
201
                  if $ac->{'accounttype'} eq 'Rent';
199
            }
202
            }
200
        }
203
        }
201
        $issue->{'charges'} = $charges;
204
        $issue->{'charges'} = $charges;
205
        $issue->{'rentalfines'} = $rentalfines;
202
        my $marcrecord = GetMarcBiblio( $issue->{'biblionumber'} );
206
        my $marcrecord = GetMarcBiblio( $issue->{'biblionumber'} );
203
        $issue->{'subtitle'} = GetRecordValue('subtitle', $marcrecord, GetFrameworkCode($issue->{'biblionumber'}));
207
        $issue->{'subtitle'} = GetRecordValue('subtitle', $marcrecord, GetFrameworkCode($issue->{'biblionumber'}));
204
        # check if item is renewable
208
        # check if item is renewable
205
- 

Return to bug 15738