Revision b8fd8fee
Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
| 235 | 235 |
$decimalplaces = max 2, length $1; |
| 236 | 236 |
|
| 237 | 237 |
$price_factor = $price_factors{$form->{"price_factor_id_$i"}} || 1;
|
| 238 |
$discount = $form->round_amount($form->{"sellprice_$i"} * $form->{"discount_$i"} / 100, $decimalplaces);
|
|
| 239 |
$linetotal = $form->round_amount(($form->{"sellprice_$i"} - $discount) / $price_factor, $decimalplaces);
|
|
| 240 |
$linetotal = $form->round_amount($linetotal * $form->{"qty_$i"}, 2);
|
|
| 238 |
$discount = $form->round_amount($form->{"qty_$i"} * $form->{"sellprice_$i"} * $form->{"discount_$i"} / 100 / $price_factor, 2);
|
|
| 239 |
$linetotal = $form->round_amount($form->{"qty_$i"} * $form->{"sellprice_$i"} * (100 - $form->{"discount_$i"}) / 100 / $price_factor, 2);
|
|
| 241 | 240 |
|
| 242 | 241 |
$column_data{runningnumber} = $cgi->textfield(-name => "runningnumber_$i", -size => 5, -value => $i); # HuT
|
| 243 | 242 |
$column_data{partnumber} = $cgi->textfield(-name => "partnumber_$i", -size => 12, -value => $form->{"partnumber_$i"});
|
Auch abrufbar als: Unified diff
Den Preisfaktor nicht vor dem Runden des Einzelpreises einbeziehen, sonst kommen stark verfaelschte Ergebnisse heraus. Berechnung von Zeilensumme und Rabatt in io.pl mit OE.pm abgeglichen.