|
Lines 55-60
sub pay {
Link Here
|
| 55 |
|
55 |
|
| 56 |
my $account = Koha::Account->new( { patron_id => $borrowernumber } ); |
56 |
my $account = Koha::Account->new( { patron_id => $borrowernumber } ); |
| 57 |
|
57 |
|
|
|
58 |
# Bug 16899: Add ability to disallow overpayments for SIP |
| 58 |
if ($disallow_overpayment) { |
59 |
if ($disallow_overpayment) { |
| 59 |
return { ok => 0 } if $account->balance < $amt; |
60 |
return { ok => 0 } if $account->balance < $amt; |
| 60 |
} |
61 |
} |
| 61 |
- |
|
|