Lines 257-262
if ($patron) {
Link Here
|
257 |
$template->param("returnbeforeexpiry" => 1); |
257 |
$template->param("returnbeforeexpiry" => 1); |
258 |
} |
258 |
} |
259 |
} |
259 |
} |
|
|
260 |
|
260 |
$template->param( |
261 |
$template->param( |
261 |
overduecount => $overdues->count, |
262 |
overduecount => $overdues->count, |
262 |
issuecount => $issues->count, |
263 |
issuecount => $issues->count, |
Lines 473-479
if ( $patron ) {
Link Here
|
473 |
$noissues = 1; |
474 |
$noissues = 1; |
474 |
} |
475 |
} |
475 |
my $account = $patron->account; |
476 |
my $account = $patron->account; |
476 |
if( ( my $owing = $account->non_issues_charges ) > 0 ) { |
477 |
my $account_lines = $account->outstanding_debits; |
|
|
478 |
my $total = $account_lines->total_outstanding; |
479 |
|
480 |
$template->param( |
481 |
total => $total, |
482 |
); |
483 |
if( ( my $owing = $total ) > 0 ) { |
477 |
my $noissuescharge = C4::Context->preference("noissuescharge") || 5; # FIXME If noissuescharge == 0 then 5, why?? |
484 |
my $noissuescharge = C4::Context->preference("noissuescharge") || 5; # FIXME If noissuescharge == 0 then 5, why?? |
478 |
$noissues ||= ( not C4::Context->preference("AllowFineOverride") and ( $owing > $noissuescharge ) ); |
485 |
$noissues ||= ( not C4::Context->preference("AllowFineOverride") and ( $owing > $noissuescharge ) ); |
479 |
$template->param( |
486 |
$template->param( |