From: Joachim Zach <info@ceos-gmbh.de>
Date: Wed, 3 Nov 2010 11:03:11 +0000 (+0100)
Subject: Wechselkurs wird falsch ausgelesen
X-Git-Tag: release-2.6.2beta1~89^2~2^2
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=a2f07c159111d089b8f5ea139bec46a8624ba4c4;p=kivitendo-erp.git

Wechselkurs wird falsch ausgelesen

Es hat sich herausgestellt, dass der Fehler nicht in der Formatierung lag. Das
Procedere ist wie folgt: Bei post_invoice wird geprüft, ob ein
Wechselkurseintrag für das fragliche Datum existiert:

Ja   -> diese Zahl wird genommen.
Nein -> $form->{exchangerate} wird als lokalisierter Eingabestring
        interpretiert und in eine Zahl konvertiert.

Fehlerhaft war die Abfrage: Es wurde $form->{transdate} statt $form->{invdate}
genommen. $form->{transdate} wird vom Aufrufer (in is.pl) aber vor dem Aufruf
nicht gesetzt, weshalb die Abfrage immer den "Nein"-Fall produzierte.
---

diff --git a/SL/IS.pm b/SL/IS.pm
index e5b403675..53de890e7 100644
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -561,7 +561,7 @@ sub post_invoice {
   if ($form->{currency} eq $defaultcurrency) {
     $form->{exchangerate} = 1;
   } else {
-    $exchangerate = $form->check_exchangerate($myconfig, $form->{currency}, $form->{transdate}, 'buy');
+    $exchangerate = $form->check_exchangerate($myconfig, $form->{currency}, $form->{invdate}, 'buy');
   }
 
   $form->{exchangerate} =