From: Sven Schöling <s.schoeling@linet-services.de>
Date: Wed, 18 Jul 2007 14:38:21 +0000 (+0000)
Subject: Storno Bugfix. paid wurde unter bestimmten Bedingungen nicht richtig gesetzt.
X-Git-Tag: release-2.6.0beta1~563
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=c2715187a71c1ed09e14e71677b261e98e1e9fad;p=kivitendo-erp.git

Storno Bugfix. paid wurde unter bestimmten Bedingungen nicht richtig gesetzt.
---

diff --git a/SL/AP.pm b/SL/AP.pm
index b5e252096..66020933c 100644
--- a/SL/AP.pm
+++ b/SL/AP.pm
@@ -765,7 +765,7 @@ sub storno {
   $storno_row->{invnumber}  = 'Storno-' . $storno_row->{invnumber};
   $storno_row->{amount}    *= -1;
   $storno_row->{netamount} *= -1;
-  $storno_row->{paid}       = $storno_amount->{amount};
+  $storno_row->{paid}       = $storno_row->{amount};
 
   delete @$storno_row{qw(itime mtime)};
 
diff --git a/SL/AR.pm b/SL/AR.pm
index 79653a757..5fc6032a9 100644
--- a/SL/AR.pm
+++ b/SL/AR.pm
@@ -635,7 +635,7 @@ sub storno {
   $storno_row->{invnumber}  = 'Storno-' . $storno_row->{invnumber};
   $storno_row->{amount}    *= -1;
   $storno_row->{netamount} *= -1;
-  $storno_row->{paid}       = $storno_amount->{amount};
+  $storno_row->{paid}       = $storno_row->{amount};
 
   delete @$storno_row{qw(itime mtime)};