SF.net SVN: ledger-smb: [1995] branches/1.2/bin/aa.pl

[..hidden..]

Revision: 1995
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=1995&view=rev
Author:   einhverfr
Date:     2007-12-20 23:13:22 -0800 (Thu, 20 Dec 2007)

Log Message:
-----------
correcting 1794077:  Tax not included in subtotal in ar/ap transaction screens.

Modified Paths:
--------------
    branches/1.2/bin/aa.pl

Modified: branches/1.2/bin/aa.pl
===================================================================
--- branches/1.2/bin/aa.pl	2007-12-21 07:12:36 UTC (rev 1994)
+++ branches/1.2/bin/aa.pl	2007-12-21 07:13:22 UTC (rev 1995)
@@ -649,12 +649,14 @@
 	</tr>
 |;
     }
-
     foreach $item ( split / /, $form->{taxaccounts} ) {
 
+	if($form->{"calctax_$item"}){
+             $form->{invtotal} += $form->{"tax_$item"};
+	}
         $form->{"calctax_$item"} =
           ( $form->{"calctax_$item"} ) ? "checked" : "";
-
+         
         $form->{"tax_$item"} =
           $form->format_amount( \%myconfig, $form->{"tax_$item"}, 2 );
         print qq|


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.