Revision d5c1e4fa
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/ir.pl | ||
|---|---|---|
| 1049 | 1049 |
($form->{AP}) = split /--/, $form->{AP};
|
| 1050 | 1050 |
($form->{AP_paid}) = split /--/, $form->{AP_paid};
|
| 1051 | 1051 |
if (IR->post_payment(\%myconfig, \%$form)){
|
| 1052 |
|
|
| 1053 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
|
| 1052 |
if (!exists $form->{addition} && $form->{id} ne "") {
|
|
| 1054 | 1053 |
# saving the history |
| 1055 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
| 1054 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
| 1056 | 1055 |
$form->{addition} = "PAYMENT POSTED";
|
| 1057 | 1056 |
$form->{what_done} = $form->{currency} . qq| | . $form->{paid} . qq| | . $locale->text("POSTED");
|
| 1058 | 1057 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1059 |
# /saving the history |
|
| 1060 |
$form->redirect($locale->text(' Payment posted!'));
|
|
| 1058 |
# /saving the history |
|
| 1061 | 1059 |
} |
| 1060 |
|
|
| 1061 |
$form->redirect($locale->text('Payment posted!'));
|
|
| 1062 | 1062 |
} |
| 1063 |
$form->error($locale->text('Cannot post payment!'));
|
|
| 1064 | 1063 |
|
| 1064 |
$form->error($locale->text('Cannot post payment!'));
|
|
| 1065 | 1065 |
|
| 1066 | 1066 |
$lxdebug->leave_sub(); |
| 1067 | 1067 |
} |
Auch abrufbar als: Unified diff
Kosmetik.