From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 5 Mar 2007 16:15:53 +0000 (+0000)
Subject: Einkaufsrechnungen: Vor dem Stornieren die Daten aus der Datenbank holen und nicht... 
X-Git-Tag: release-2.4.3^2~628
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=379aa61a9855bd34637fd438cb2e2f2247129b68;p=kivitendo-erp.git

Einkaufsrechnungen: Vor dem Stornieren die Daten aus der Datenbank holen und nicht die aktuellen Formulardaten für das Storno benutzen.
---

diff --git a/SL/IR.pm b/SL/IR.pm
index dc582efb5..553e7828f 100644
--- a/SL/IR.pm
+++ b/SL/IR.pm
@@ -100,6 +100,8 @@ sub post_invoice {
     ? $exchangerate
     : $form->parse_amount($myconfig, $form->{exchangerate});
 
+  $form->{exchangerate} = 1 unless ($form->{exchangerate} * 1);
+
   for my $i (1 .. $form->{rowcount}) {
     $form->{"qty_$i"} = $form->parse_amount($myconfig, $form->{"qty_$i"});
     
diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl
index e088def44..f5fd32f58 100644
--- a/bin/mozilla/ir.pl
+++ b/bin/mozilla/ir.pl
@@ -976,6 +976,10 @@ sub storno {
     $form->error($locale->text("Invoice has already been storno'd!"));
   }
 
+  invoice_links();
+  prepare_invoice();
+  relink_accounts();
+
   $form->{storno_id} = $form->{id};
   $form->{storno} = 1;
   $form->{id} = "";