Revision f909691a
Von Jan Büren vor fast 2 Jahren hinzugefügt
| bin/mozilla/ir.pl | ||
|---|---|---|
| 825 | 825 |
$form->{invnumber} = "Storno zu " . $form->{invnumber};
|
| 826 | 826 |
$form->{rowcount}++;
|
| 827 | 827 |
$form->{employee_id} = $employee_id;
|
| 828 |
|
|
| 829 | 828 |
$form->{form_validity_token} = SL::DB::ValidityToken->create(scope => SL::DB::ValidityToken::SCOPE_PURCHASE_INVOICE_POST())->token;
|
| 830 | 829 |
|
| 830 |
# post expects the field as user input |
|
| 831 |
$form->{exchangerate} = $form->format_amount(\%myconfig, $form->{exchangerate});
|
|
| 831 | 832 |
post(); |
| 832 | 833 |
$main::lxdebug->leave_sub(); |
| 833 | 834 |
|
| ... | ... | |
| 850 | 851 |
|
| 851 | 852 |
$form->{"converted_from_invoice_id_$_"} = delete $form->{"invoice_id_$_"} for 1 .. $form->{"rowcount"};
|
| 852 | 853 |
|
| 854 |
$form->{exchangerate} = $form->check_exchangerate(\%myconfig, $form->{currency}, $form->{invdate}, 'sell');
|
|
| 853 | 855 |
$form->{useasnew} = 1;
|
| 854 | 856 |
&display_form; |
| 855 | 857 |
|
| bin/mozilla/is.pl | ||
|---|---|---|
| 1374 | 1374 |
$form->{"converted_from_invoice_id_$_"} = delete $form->{"invoice_id_$_"} for 1 .. $form->{"rowcount"};
|
| 1375 | 1375 |
|
| 1376 | 1376 |
$form->{form_validity_token} = SL::DB::ValidityToken->create(scope => SL::DB::ValidityToken::SCOPE_SALES_INVOICE_POST())->token;
|
| 1377 |
|
|
| 1377 |
# post expects the field as user input |
|
| 1378 |
$form->{exchangerate} = $form->format_amount(\%myconfig, $form->{exchangerate});
|
|
| 1379 |
$form->{script} = 'is.pl';
|
|
| 1378 | 1380 |
post(); |
| 1379 | 1381 |
$main::lxdebug->leave_sub(); |
| 1380 | 1382 |
} |
Auch abrufbar als: Unified diff
Workflows Einkauf- und Verkaufsrechnung