Fixed Bug 327.
authorUdo Spallek <info@wissensvermittlung.com>
Sat, 18 Mar 2006 13:04:46 +0000 (13:04 +0000)
committerUdo Spallek <info@wissensvermittlung.com>
Sat, 18 Mar 2006 13:04:46 +0000 (13:04 +0000)
SL/AP.pm

index 3d7b840..0d13229 100644 (file)
--- a/SL/AP.pm
+++ b/SL/AP.pm
@@ -116,12 +116,14 @@ sub post_transaction {
     } else {
       if (!$form->{"korrektur_$i"}) {
         $form->{"tax_$i"} = $form->{"amount_$i"} * $form->{"taxrate_$i"};
+      } else {
+        $tax = $form->{"tax_$i"};
       }
       $form->{"tax_$i"} =
         $form->round_amount($form->{"tax_$i"} * $form->{exchangerate}, 2);
       $form->{netamount} += $form->{"amount_$i"};
     }
-    $form->{total_tax} += $form->{"tax_$i"};
+    $form->{total_tax} += $form->{"tax_$i"} * -1;
   }
 
   # adjust paidaccounts if there is no date in the last row