]> wagnertech.de Git - mfinanz.git/blobdiff - SL/OE.pm
Angebote/Aufträge: Beim "als neu Speichern" Wechselkurs richtig übernehmen.
[mfinanz.git] / SL / OE.pm
index 1e6a47c6207b4f422663360b5d014db89195eecf..f192c1d101bda7154c80ca504abd0bb959945c77 100644 (file)
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -653,7 +653,10 @@ SQL
     $exchangerate = $form->check_exchangerate($myconfig, $form->{currency}, $form->{transdate}, ($form->{vc} eq 'customer') ? 'buy' : 'sell');
   }
 
-  $form->{exchangerate} = $exchangerate || $form->parse_amount($myconfig, $form->{exchangerate});
+  # from inputfield (exchangerate) or hidden (forex)
+  my $exchangerate_from_form = $form->{forex} || $form->parse_amount($myconfig, $form->{exchangerate});
+
+  $form->{exchangerate} = $exchangerate || $exchangerate_from_form;
 
   my $quotation = $form->{type} =~ /_order$/ ? 'f' : 't';