Revision c389a0e6
Von Tamino Steinert vor fast 2 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
| 257 | 257 |
my $record_item = $record->id && $record->items ? $record->items->[$i-1] : _make_record_item($i); |
| 258 | 258 |
|
| 259 | 259 |
# undo formatting |
| 260 |
$main::lxdebug->dump(0, "TST: before parse_amount", $form->{"sellprice_$i"});
|
|
| 260 | 261 |
map { $form->{"${_}_$i"} = $form->parse_amount(\%myconfig, $form->{"${_}_$i"}) }
|
| 261 | 262 |
qw(qty discount sellprice lastcost price_new price_old) |
| 262 | 263 |
unless ($form->{simple_save});
|
| 264 |
$main::lxdebug->dump(0, "TST: after parse_amount", $form->{"sellprice_$i"});
|
|
| 263 | 265 |
|
| 264 | 266 |
if ($form->{"prices_$i"} && ($form->{"new_pricegroup_$i"} != $form->{"old_pricegroup_$i"})) {
|
| 265 | 267 |
$form->{"sellprice_$i"} = $form->{"price_new_$i"};
|
| ... | ... | |
| 474 | 476 |
push @hidden_vars, qw(invoice_id converted_from_orderitems_id converted_from_delivery_order_items_id converted_from_invoice_id); |
| 475 | 477 |
} |
| 476 | 478 |
if ($::form->{type} =~ /credit_note/) {
|
| 477 |
push @hidden_vars, qw(invoice_id converted_from_invoice_id); |
|
| 479 |
push @hidden_vars, qw(invoice_id converted_from_invoice_id converted_from_reclamation_items_id);
|
|
| 478 | 480 |
} |
| 479 | 481 |
if ($is_delivery_order) {
|
| 480 | 482 |
map { $form->{"${_}_${i}"} = $form->format_amount(\%myconfig, $form->{"${_}_${i}"}) } qw(sellprice discount lastcost);
|
| ... | ... | |
| 831 | 833 |
stock_out stock_in has_sernumber reqdate orderitems_id |
| 832 | 834 |
active_price_source active_discount_source delivery_order_items_id |
| 833 | 835 |
invoice_id converted_from_orderitems_id |
| 834 |
converted_from_delivery_order_items_id converted_from_invoice_id); |
|
| 836 |
converted_from_delivery_order_items_id converted_from_invoice_id |
|
| 837 |
converted_from_reclamation_items_id); |
|
| 835 | 838 |
|
| 836 | 839 |
my $ic_cvar_configs = CVar->get_configs(module => 'IC'); |
| 837 | 840 |
push @flds, map { "ic_cvar_$_->{name}" } @{ $ic_cvar_configs };
|
Auch abrufbar als: Unified diff
Workflow: sales_reclamation → credit_note