Lines 42-49
my ( $template, $librarian, $cookie, $flags ) = get_template_and_user(
Link Here
|
42 |
|
42 |
|
43 |
my $schema = Koha::Database->new()->schema(); |
43 |
my $schema = Koha::Database->new()->schema(); |
44 |
|
44 |
|
45 |
my $barcode = $cgi->param('barcode') // ''; |
45 |
my $barcode = $cgi->param('barcode') // ''; |
46 |
my $unseen = $cgi->param('unseen') || 0; |
46 |
my $unseen = $cgi->param('unseen') || 0; |
47 |
$barcode = barcodedecode($barcode) if $barcode; |
47 |
$barcode = barcodedecode($barcode) if $barcode; |
48 |
my $override_limit = $cgi->param('override_limit'); |
48 |
my $override_limit = $cgi->param('override_limit'); |
49 |
my $override_holds = $cgi->param('override_holds'); |
49 |
my $override_holds = $cgi->param('override_holds'); |
Lines 67-73
if ($barcode) {
Link Here
|
67 |
$patron = $checkout->patron; |
67 |
$patron = $checkout->patron; |
68 |
|
68 |
|
69 |
$balance = $patron->account->balance; |
69 |
$balance = $patron->account->balance; |
70 |
my $amountlimit = C4::Context->preference("noissuescharge"); |
70 |
my $amountlimit = C4::Context->preference("OPACFineNoRenewals"); |
71 |
|
71 |
|
72 |
if ( ( $patron->is_debarred || q{} ) lt dt_from_string()->ymd() ) { |
72 |
if ( ( $patron->is_debarred || q{} ) lt dt_from_string()->ymd() ) { |
73 |
my $can_renew; |
73 |
my $can_renew; |
Lines 96-106
if ($barcode) {
Link Here
|
96 |
} |
96 |
} |
97 |
|
97 |
|
98 |
if ( $balance > $amountlimit ) { |
98 |
if ( $balance > $amountlimit ) { |
99 |
$error = "too_much_debt"; |
99 |
$error = "too_much_debt"; |
100 |
$can_renew = 0; |
100 |
$can_renew = 0; |
101 |
if($override_debt){ |
101 |
if ($override_debt) { |
102 |
$can_renew = 1; |
102 |
$can_renew = 1; |
103 |
$error = undef; |
103 |
$error = undef; |
104 |
} |
104 |
} |
105 |
} |
105 |
} |
106 |
|
106 |
|