X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FIR.pm;h=edf55f16a978361715f8ac839a6783558e0003b2;hb=17f2de0a4b8f2fea0b5140d16d345e8ea180c077;hp=3b7f415f43b2527cf7b59a51831d29a5dd328030;hpb=94802c79cda890c12128a83bc931cb342aed470c;p=kivitendo-erp.git diff --git a/SL/IR.pm b/SL/IR.pm index 3b7f415f4..edf55f16a 100644 --- a/SL/IR.pm +++ b/SL/IR.pm @@ -83,7 +83,7 @@ sub post_invoice { if ($form->{currency} eq $defaultcurrency) { $form->{exchangerate} = 1; } else { - $exchangerate = $form->check_exchangerate($myconfig, $form->{currency}, $form->{transdate}, 'sell'); + $exchangerate = $form->check_exchangerate($myconfig, $form->{currency}, $form->{invdate}, 'sell'); } $form->{exchangerate} = $exchangerate || $form->parse_amount($myconfig, $form->{exchangerate}); @@ -207,9 +207,9 @@ sub post_invoice { next if $payments_only; - # update parts table + # 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 = ($form->{"sellprice_$i"}, conv_i($form->{"id_$i"})); + @values = (abs($form->{"sellprice_$i"}), conv_i($form->{"id_$i"})); do_query($form, $dbh, $query, @values); # check if we sold the item already and