Lines 145-150
sub add_credit {
Link Here
|
145 |
my $note = $body->{note}; |
145 |
my $note = $body->{note}; |
146 |
my $library_id = $body->{library_id}; |
146 |
my $library_id = $body->{library_id}; |
147 |
|
147 |
|
|
|
148 |
if ( C4::Context->preference("RequirePaymentType") && !defined($payment_type) ) { |
149 |
Koha::Exceptions::Account::PaymentTypeRequired->throw(); |
150 |
} |
151 |
|
148 |
my $credit = $account->add_credit( |
152 |
my $credit = $account->add_credit( |
149 |
{ |
153 |
{ |
150 |
amount => $amount, |
154 |
amount => $amount, |
151 |
- |
|
|