From b6133a726fa261cb97f2c105ea4a93161609d6ca Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 6 Aug 2007 08:38:21 +0000
Subject: [PATCH] =?utf8?q?Artikelauswahl=20in=20Einkaufs-=20und=20Verkaufs?=
 =?utf8?q?masken:=20bei=20mehreren=20gefundenen=20Artikeln=20den=20Preisfa?=
 =?utf8?q?ktor=20ber=C3=BCcksichtigen=20und=20den=20Verkaufs-/Einkaufsprei?=
 =?utf8?q?s=20dadurch=20teilen.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 bin/mozilla/io.pl | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index bb3d2054b..cf552026d 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -694,9 +694,10 @@ sub select_item {
 
     map { $ref->{$_} =~ s/\"/&quot;/g } qw(partnumber description unit);
 
-    #sk tradediscount
-    $ref->{sellprice} =
-      $form->round_amount($ref->{sellprice} * (1 - $form->{tradediscount}), 2);
+    my $display_sellprice  = $ref->{sellprice} * (1 - $form->{tradediscount});
+    $display_sellprice    /= $ref->{price_factor} if ($ref->{price_factor});
+    $display_sellprice     = $form->format_amount(\%myconfig, $display_sellprice, 2);
+
     $column_data{ndx} =
       qq|<td><input name="ndx" class="radio" type="radio" value="$i" $checked></td>|;
     $column_data{partnumber} =
@@ -705,7 +706,7 @@ sub select_item {
       qq|<td><input name="new_description_$i" type="hidden" value="$ref->{description}">$ref->{description}</td>|;
     $column_data{sellprice} =
       qq|<td align="right"><input name="new_sellprice_$i" type="hidden" value="$ref->{sellprice}">|
-      . $form->format_amount(\%myconfig, $ref->{sellprice}, 2, "&nbsp;")
+      . $display_sellprice
       . qq|</td>|;
     $column_data{onhand} =
       qq|<td align="right"><input name="new_onhand_$i" type="hidden" value="$ref->{onhand}">|
-- 
2.20.1