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 274-280 Using this account is not recommended because some parts of Koha will not functi Link Here
274
                                                    <td class="fines">
274
                                                    <td class="fines">
275
                                                        <span class="tdlabel">Fines:</span>
275
                                                        <span class="tdlabel">Fines:</span>
276
                                                        [% IF ( ISSUE.charges ) %]
276
                                                        [% IF ( ISSUE.charges ) %]
277
                                                            Yes
277
                                                            Yes (Item overdue or lost)
278
                                                        [% ELSIF ( ISSUE.rentalfines ) %]
279
                                                            Yes (Rental fees)
278
                                                        [% ELSE %]
280
                                                        [% ELSE %]
279
                                                            No
281
                                                            No
280
                                                        [% END %]
282
                                                        [% END %]
(-)a/opac/opac-user.pl (-1 / +4 lines)
Lines 186-191 if ($issues){ Link Here
186
186
187
        my ( $total , $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber );
187
        my ( $total , $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber );
188
        my $charges = 0;
188
        my $charges = 0;
189
        my $rentalfines = 0;
189
        foreach my $ac (@$accts) {
190
        foreach my $ac (@$accts) {
190
            if ( $ac->{'itemnumber'} == $issue->{'itemnumber'} ) {
191
            if ( $ac->{'itemnumber'} == $issue->{'itemnumber'} ) {
191
                $charges += $ac->{'amountoutstanding'}
192
                $charges += $ac->{'amountoutstanding'}
Lines 194-202 if ($issues){ Link Here
194
                  if $ac->{'accounttype'} eq 'FU';
195
                  if $ac->{'accounttype'} eq 'FU';
195
                $charges += $ac->{'amountoutstanding'}
196
                $charges += $ac->{'amountoutstanding'}
196
                  if $ac->{'accounttype'} eq 'L';
197
                  if $ac->{'accounttype'} eq 'L';
198
                $rentalfines += $ac->{'amountoutstanding'}
199
                  if $ac->{'accounttype'} eq 'Rent';
197
            }
200
            }
198
        }
201
        }
199
        $issue->{'charges'} = $charges;
202
        $issue->{'charges'} = $charges;
203
        $issue->{'rentalfines'} = $rentalfines;
200
        my $marcrecord = GetMarcBiblio( $issue->{'biblionumber'} );
204
        my $marcrecord = GetMarcBiblio( $issue->{'biblionumber'} );
201
        $issue->{'subtitle'} = GetRecordValue('subtitle', $marcrecord, GetFrameworkCode($issue->{'biblionumber'}));
205
        $issue->{'subtitle'} = GetRecordValue('subtitle', $marcrecord, GetFrameworkCode($issue->{'biblionumber'}));
202
        # check if item is renewable
206
        # check if item is renewable
203
- 

Return to bug 15738