|
Lines 151-157
if ($add) {
Link Here
|
| 151 |
|
151 |
|
| 152 |
unless ($failed) { |
152 |
unless ($failed) { |
| 153 |
try { |
153 |
try { |
| 154 |
$patron->account->add_debit( |
154 |
my $line = $patron->account->add_debit( |
| 155 |
{ |
155 |
{ |
| 156 |
amount => $amount, |
156 |
amount => $amount, |
| 157 |
description => $desc, |
157 |
description => $desc, |
|
Lines 170-178
if ($add) {
Link Here
|
| 170 |
} |
170 |
} |
| 171 |
|
171 |
|
| 172 |
if ( $add eq 'save and pay' ) { |
172 |
if ( $add eq 'save and pay' ) { |
| 173 |
print $input->redirect( |
173 |
my $url = sprintf( |
| 174 |
"/cgi-bin/koha/members/pay.pl?borrowernumber=$borrowernumber" |
174 |
'/cgi-bin/koha/members/paycollect.pl?borrowernumber=%s&pay_individual=1&debit_type_code=%s&amount=%s&amountoutstanding=%s&description=%s&itemnumber=%s&accountlines_id=%s', |
|
|
175 |
$borrowernumber, |
| 176 |
$line->debit_type_code, |
| 177 |
sprintf('%.2f', $line->amount), |
| 178 |
sprintf('%.2f', $line->amountoutstanding), |
| 179 |
$line->description, |
| 180 |
$line->itemnumber, |
| 181 |
$line->id |
| 175 |
); |
182 |
); |
|
|
183 |
|
| 184 |
print $input->redirect($url); |
| 176 |
} |
185 |
} |
| 177 |
else { |
186 |
else { |
| 178 |
print $input->redirect( |
187 |
print $input->redirect( |
| 179 |
- |
|
|