From: Philip Reetz Date: Mon, 11 May 2009 11:25:27 +0000 (+0000) Subject: Bug #956 behoben: Fehlerhafte Berechnung Betriebsergebnis bei BestVerdFUE X-Git-Tag: release-2.6.0rc1~99 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=72d93b0b6cbca4fc4dabb116f20c1b88a22fde88;p=kivitendo-erp.git Bug #956 behoben: Fehlerhafte Berechnung Betriebsergebnis bei BestVerdFUE --- diff --git a/SL/RP.pm b/SL/RP.pm index 0b0000eac..72bbcffd3 100644 --- a/SL/RP.pm +++ b/SL/RP.pm @@ -1645,7 +1645,7 @@ sub bwa { } my @periods = qw(jetzt kumm); - my @gesamtleistung = qw(1 2 3); + my @gesamtleistung = qw(1 3); my @gesamtkosten = qw (10 11 12 13 14 15 16 17 18 19 20); my @ergebnisse = qw (rohertrag betriebrohertrag betriebsergebnis neutraleraufwand neutralerertrag ergebnisvorsteuern ergebnis gesamtleistung gesamtkosten); @@ -1668,6 +1668,8 @@ sub bwa { foreach my $item (@gesamtleistung) { $form->{ "$key" . "gesamtleistung" } += $form->{$item}{$key}; } + $form->{ "$key" . "gesamtleistung" } -= $form->{2}{$key}; + foreach my $item (@gesamtkosten) { $form->{ "$key" . "gesamtkosten" } += $form->{$item}{$key}; }