From: G. Richardson <information@kivitendo-premium.de>
Date: Tue, 5 Jul 2016 14:36:13 +0000 (+0200)
Subject: Bericht Debitorenbuchungen - Gutschriften < 1€ erkennen
X-Git-Tag: release-3.5.4~2220
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/95c1cef5c74c6f51445ac3974d1a6b2b88554192

Bericht Debitorenbuchungen - Gutschriften < 1€ erkennen

Die Prüfung auf amount < 0 wurde nach dem format_amount aufgerufen,
dadurch wurden Beträge von z.B. -0,77 nicht als Gutschriften erkannt.
Die amount-Prüfung wird jetzt nach dem format-amount aufgerufen.
---

diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl
index c02842ffc..822e7660f 100644
--- a/bin/mozilla/ar.pl
+++ b/bin/mozilla/ar.pl
@@ -1119,8 +1119,6 @@ sub ar_transactions {
     $subtotals{marge_percent} = $subtotals{netamount} ? ($subtotals{marge_total} * 100 / $subtotals{netamount}) : 0;
     $totals{marge_percent}    = $totals{netamount}    ? ($totals{marge_total}    * 100 / $totals{netamount}   ) : 0;
 
-    map { $ar->{$_} = $form->format_amount(\%myconfig, $ar->{$_}, 2) } qw(netamount tax amount paid due marge_total marge_percent);
-
     my $is_storno  = $ar->{storno} &&  $ar->{storno_id};
     my $has_storno = $ar->{storno} && !$ar->{storno_id};
 
@@ -1131,6 +1129,8 @@ sub ar_transactions {
       $ar->{invoice}    ? $locale->text("Invoice (one letter abbreviation)") :
                           $locale->text("AR Transaction (abbreviation)");
 
+    map { $ar->{$_} = $form->format_amount(\%myconfig, $ar->{$_}, 2) } qw(netamount tax amount paid due marge_total marge_percent);
+
     $ar->{direct_debit} = $ar->{direct_debit} ? $::locale->text('yes') : $::locale->text('no');
 
     my $row = { };