Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 0e68056c

Von Kivitendo Admin vor etwa 10 Jahren hinzugefügt

  • ID 0e68056cbc17b531266c16454f3a74ae1e57dea6
  • Vorgänger 71233175
  • Nachfolger 3270e883

Rundung bei Debitorenbuchung, Kreditorenbuchung und Dialogbuchung

Zwei neue Hilfsfunktionen für Form eingeführt die von ap/ar/gl genutzt
werden:

  • calculate_tax wird zur Berechnung der Steuer bei
    • update in ar, ap und gl
    • post_transaction in AR.pm und AP.pm innerhalb von calculate_arap
  • calculate_arap berechnet netamount, amount und totaltax anhand einer
    vorhandenen $form in ar/ap, und formatiert und rundet die amount_$i and
    tax_$i in der $form.

Das Ziel war es, daß diese drei Belege mit den gleichen Formeln zur
Steuerberechnung bei Steuer inkl./exkl. arbeiten. Ein Vorteil im
Vergleich zur Einkaufs- und Verkaufsrechnung ist, daß es hier keine
Positionen/Mengen/Rabatte/etc gibt, sondern direkt Werte auf Konten
bebucht werden, man muß nur Währungskurse berücksichtigen und beim
Schreiben in die Datenbank auf die Vorzeichen achten. Einkaufs- und
Verkaufsrechnungen werden hiervon nicht beeinflußt.

Vor allem bei der Einstellung "MwSt. inkl" wird die Steuer nun immer auf
zwei Stellen gerundet in die Datenbank geschrieben, und nicht (wie
bisher in manchen Fällen) mit 5 Nachkommastellen, was zu mehreren Bugs
geführt hat.

Es gibt einen neuen Test t/form/arap.t der die Berechnungen dieser
beiden Funktionen testet, nicht aber das eigentliche Buchen der Belege.

Mit diesem Commit sollten für zukünftige Buchungen folgende Bugs behoben
sein:

1691 - Rundung bei Berichten bei Buchungen mit MwSt inkl.
2029 - Rundungsfehler bei Dialogbuchung
2033 - Unterschiede in Rundungen durch taxincluded
2094 - Rundungsprobleme in Kreditorenbuchungen: Cent "kippt" bei Zahlungseinbuchung
2435 - Rundungsfehler in Kreditorenbuchungen (Netto vs. Brutto)

Dieser Commit greift in die Eingeweide von Uraltcode ein, wo die
diversen Stellen alle mal mit copy&paste entstanden und dann langsam
divergiert sind, hat also hohes Fehlerpotential. Es lohnt sich, den
DATEV-Check anzuschalten.

Unterschiede anzeigen:

bin/mozilla/gl.pl
594 594
        } else {
595 595
          $credittax = 1;
596 596
        }
597
        if ($form->{taxincluded}) {
598
          $form->{"tax_$i"} = $amount / ($rate + 1) * $rate;
599
        } else {
600
          $form->{"tax_$i"} = $amount * $rate;
601
        }
602
      } else {
603
        $form->{"tax_$i"} = 0;
604
      }
597
      };
598
      my ($tmpnetamount,$tmpdiff);
599
      ($tmpnetamount,$form->{"tax_$i"},$tmpdiff) = $form->calculate_tax($amount,$rate,$form->{taxincluded} *= 1,2);
605 600

  
606 601
      for (@flds) { $a[$j]->{$_} = $form->{"${_}_$i"} }
607 602
      $count++;
......
1067 1062
      } else {
1068 1063
        $credittax = 1;
1069 1064
      }
1070
      if ($form->{taxincluded}) {
1071
        $form->{"tax_$i"} = $amount / ($rate + 1) * $rate;
1072
        if ($debitcredit) {
1073
          $form->{"debit_$i"} = $form->{"debit_$i"} - $form->{"tax_$i"};
1074
        } else {
1075
          $form->{"credit_$i"} = $form->{"credit_$i"} - $form->{"tax_$i"};
1076
        }
1065

  
1066
      my ($tmpnetamount,$tmpdiff);
1067
      ($tmpnetamount,$form->{"tax_$i"},$tmpdiff) = $form->calculate_tax($amount,$rate,$form->{taxincluded} *= 1,2);
1068
      if ($debitcredit) {
1069
        $form->{"debit_$i"} = $tmpnetamount;
1077 1070
      } else {
1078
        $form->{"tax_$i"} = $amount * $rate;
1071
        $form->{"credit_$i"} = $tmpnetamount;
1079 1072
      }
1073

  
1080 1074
    } else {
1081 1075
      $form->{"tax_$i"} = 0;
1082 1076
    }

Auch abrufbar als: Unified diff