X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/fa5d2a24fc338e4c50951bbf3946b2b9a9f99ec2..faf42bec5d778fa8d35ad30a4c90e803d675753b:/SL/DB/Helper/PriceTaxCalculator.pm diff --git a/SL/DB/Helper/PriceTaxCalculator.pm b/SL/DB/Helper/PriceTaxCalculator.pm index 2a81586fc..d0412c2bb 100644 --- a/SL/DB/Helper/PriceTaxCalculator.pm +++ b/SL/DB/Helper/PriceTaxCalculator.pm @@ -96,7 +96,9 @@ sub _calculate_item { my $num_dec = max 2, _num_decimal_places($item->sellprice); - # don't include rounded discount into sellprice + $item->discount(0) if !$item->discount; + + # don't include rounded discount into sellprice for calculation # any time the sellprice is multiplied with qty discount has to be considered as part of the multiplication my $sellprice = $item->sellprice; @@ -161,10 +163,12 @@ sub _calculate_item { $data->{last_incex_chart_id} = $chart->id if $data->{is_sales}; + my $item_sellprice = _round($sellprice * (1 - $item->discount), $num_dec); + push @{ $data->{items} }, { linetotal => $linetotal, linetotal_cost => $linetotal_cost, - sellprice => $sellprice, + sellprice => $item_sellprice, tax_amount => $tax_amount, taxkey_id => $taxkey->id, };