From: Philip Reetz <p.reetz@linet-services.de>
Date: Fri, 4 Nov 2005 08:57:30 +0000 (+0000)
Subject: Fehler bei negativen Umsaetzen behoben
X-Git-Tag: release-2.4.0^2~482
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=5d1cdfab06b2c2db1cf4b8aa8d7c5b9b628f70f7;p=kivitendo-erp.git

Fehler bei negativen Umsaetzen behoben
---

diff --git a/SL/DATEV.pm b/SL/DATEV.pm
index c202e05e2..e48b4db2f 100644
--- a/SL/DATEV.pm
+++ b/SL/DATEV.pm
@@ -651,7 +651,7 @@ sub kne_buchungsexport {
         }
       }
 
-      $umsatzsumme += $umsatz;
+      $umsatzsumme += abs($umsatz);
 
       # Umwandlung von Umlauten und Sonderzeichen in erlaubte Zeichen bei Textfeldern
       foreach $umlaut (keys(%umlaute)) {
@@ -696,6 +696,7 @@ sub kne_buchungsexport {
         $blockcount++;
         $total_bytes = ($blockcount) * 256;
       }
+      $umsatz = abs($umsatz);
       $vorzeichen = ($umsatz > 0) ? "+" : "-";
       $buchungssatz .= $vorzeichen . &formatumsatz($umsatz, 0);
       $remaining_bytes = $total_bytes - length($buchungssatz . $header);