Fix zu Bug 1775: Wechselkurs in Einkaufrechnung kann nicht eingegeben werden

Auch Zahlenformatierung repariert, wenn man das Datum von einem mit vorhandenem
Wechselkurs in eines ohne wechselt (Ver- und Einkauf).

diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl
index 2ace9a7b434c58c380b4e810f8846f4376b0887b..25831b2eafd03097f6b8bea670ff9f32b81515c1 100644 (file)
--- a/bin/mozilla/ir.pl
+++ b/bin/mozilla/ir.pl
@@ -463,10 +463,11 @@ sub update {
 
   $main::auth->assert('vendor_invoice_edit');
 
-#  map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } qw(exchangerate creditlimit creditremaining);
-
   &check_name('vendor');
 
+  if (!$form->{forex}) {        # read exchangerate from input field (not hidden)
+    $form->{exchangerate} = $form->parse_amount(\%myconfig, $form->{exchangerate});
+  }
   $form->{forex}        = $form->check_exchangerate(\%myconfig, $form->{currency}, $form->{invdate}, 'sell');
   $form->{exchangerate} = $form->{forex} if $form->{forex};
 

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index bcbf10782185b2b95d43bb6f44d04e5f020cb899..f438f1c9bdbaf5ca593bd4da814526351d525eb5 100644 (file)
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -485,8 +485,6 @@ sub update {
 
   my ($recursive_call) = @_;
 
-  $form->{exchangerate} = $form->parse_amount(\%myconfig, $form->{exchangerate}) unless $recursive_call;
-
   $form->{print_and_post} = 0         if $form->{second_run};
   my $taxincluded         = $form->{taxincluded} ? "checked" : '';
   $form->{update} = 1;
@@ -495,6 +493,9 @@ sub update {
 
   $form->{taxincluded} ||= $taxincluded;
 
+  if (!$form->{forex}) {        # read exchangerate from input field (not hidden)
+    $form->{exchangerate} = $form->parse_amount(\%myconfig, $form->{exchangerate}) unless $recursive_call;
+  }
   $form->{forex}        = $form->check_exchangerate(\%myconfig, $form->{currency}, $form->{invdate}, 'buy');
   $form->{exchangerate} = $form->{forex} if $form->{forex};
 

diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl
index 40a9b4e024ac31f32836d09006a7babf77953927..aa6df6d615f3a909f62a764e982ed4969463ddac 100644 (file)
--- a/bin/mozilla/oe.pl
+++ b/bin/mozilla/oe.pl
@@ -536,11 +536,13 @@ sub update {
 
   set_headings($form->{"id"} ? "edit" : "add");
 
-  map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } qw(exchangerate) unless $recursive_call;
   $form->{update} = 1;
 
   &check_name($form->{vc});
 
+  if (!$form->{forex}) {        # read exchangerate from input field (not hidden)
+    map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } qw(exchangerate) unless $recursive_call;
+  }
   my $buysell           = 'buy';
   $buysell              = 'sell' if ($form->{vc} eq 'vendor');
   $form->{forex}        = $form->check_exchangerate(\%myconfig, $form->{currency}, $form->{transdate}, $buysell);

diff --git a/doc/changelog b/doc/changelog
index c19e8c4c1f2c3dfee9f427cd89678ac00b7af73b..e85c85e23ae1f62e8bf62f0f93f5f640460e830a 100644 (file)
--- a/doc/changelog
+++ b/doc/changelog
@@ -87,6 +87,7 @@
   - Bugfix 1752: Rechnung -> Druckvorschau ignoriert Änderung des Steuersatz beim Beleg
   - Bugfix 1708: Fehlender Übertrag der Lieferadresse von Angebot -> Auftragsbestätigung
   - Bugfix 1648: bebuchte Konten sollten nicht in Überschriften umgewandelt werden können
+  - Bugfix 1775: Wechselkurs in Einkaufrechnung kann nicht eingegeben werden
 
 
 2011-06-15 - Release 2.6.3