From: Rolf Fluehmann Date: Wed, 8 Jan 2014 09:32:00 +0000 (+0100) Subject: fixed fix #1795.(exchange) X-Git-Tag: release-3.1.0beta1~22^2~22^2~19^2~4 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=96b0d77f1ab14caba1eb246b19c6eb38846ae44c;p=kivitendo-erp.git fixed fix #1795.(exchange) --- diff --git a/SL/IR.pm b/SL/IR.pm index b3c99b829..e5e02f5be 100644 --- a/SL/IR.pm +++ b/SL/IR.pm @@ -210,7 +210,7 @@ sub post_invoice { # update parts table by setting lastcost to current price, don't allow negative values by using abs $query = qq|UPDATE parts SET lastcost = ? WHERE id = ?|; - @values = (abs($fxsellprice / $basefactor), conv_i($form->{"id_$i"})); + @values = (abs($fxsellprice * $form->{exchangerate} / $basefactor), conv_i($form->{"id_$i"})); do_query($form, $dbh, $query, @values); # check if we sold the item already and