From 41250b507beff4ad9f5ca76c24e7bd7a4cdb8713 Mon Sep 17 00:00:00 2001 From: Philip Reetz Date: Wed, 28 Dec 2005 13:06:38 +0000 Subject: [PATCH] Bei spaeteren Buchungen zu einem Beleg wurde immer der volle Rechnungsbetrag benutzt --- SL/DATEV.pm | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/SL/DATEV.pm b/SL/DATEV.pm index c2549dc7f..f53e9fcc9 100644 --- a/SL/DATEV.pm +++ b/SL/DATEV.pm @@ -648,8 +648,14 @@ sub kne_buchungsexport { 'ß' => 'sz'); for (my $i = 0; $i < $trans_lines; $i++) { - if (abs($transaction->[$i]->{'umsatz'}) > abs($umsatz)) { - $umsatz = $transaction->[$i]->{'umsatz'}; + if ($trans_lines == 2) { + if (abs($transaction->[$i]->{'amount'}) > abs($umsatz)) { + $umsatz = $transaction->[$i]->{'amount'}; + } + } else { + if (abs($transaction->[$i]->{'umsatz'}) > abs($umsatz)) { + $umsatz = $transaction->[$i]->{'umsatz'}; + } } if ($transaction->[$i]->{'datevautomatik'}) { $datevautomatik = 1; -- 2.20.1