Revision 1e251313
Von Moritz Bunkus vor etwa 17 Jahren hinzugefügt
bin/mozilla/oe.pl | ||
---|---|---|
403 | 403 |
"all" => 0, |
404 | 404 |
"old_id" => \@old_project_ids |
405 | 405 |
}, |
406 |
"employees" => "ALL_EMPLOYEES", |
|
407 |
"salesmen" => "ALL_SALESMEN", |
|
408 |
"taxzones" => "ALL_TAXZONES", |
|
409 |
"payments" => "ALL_PAYMENTS", |
|
410 |
"currencies" => "ALL_CURRENCIES", |
|
411 |
$vc => "ALL_" . uc($vc)); |
|
406 |
"employees" => "ALL_EMPLOYEES", |
|
407 |
"salesmen" => "ALL_SALESMEN", |
|
408 |
"taxzones" => "ALL_TAXZONES", |
|
409 |
"payments" => "ALL_PAYMENTS", |
|
410 |
"currencies" => "ALL_CURRENCIES", |
|
411 |
$vc => "ALL_" . uc($vc), |
|
412 |
"price_factors" => "ALL_PRICE_FACTORS"); |
|
412 | 413 |
|
413 | 414 |
my %labels; |
414 | 415 |
my @values = (undef); |
... | ... | |
1162 | 1163 |
map { $form->{"${_}_$i"} = $form->{item_list}[0]{$_} } keys %{ $form->{item_list}[0] }; |
1163 | 1164 |
$form->{payment_id} = $form->{"part_payment_id_$i"} if $form->{"part_payment_id_$i"} ne ""; |
1164 | 1165 |
|
1166 |
$form->{"marge_price_factor_$i"} = $form->{item_list}->[0]->{price_factor}; |
|
1167 |
|
|
1165 | 1168 |
($sellprice || $form->{"sellprice_$i"}) =~ /\.(\d+)/; |
1166 | 1169 |
$decimalplaces = max 2, length $1; |
1167 | 1170 |
|
Auch abrufbar als: Unified diff
Preisfatkoren implementiert.