[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

SF.net SVN: ledger-smb: [591] trunk/LedgerSMB/IR.pm



Revision: 591
          http://svn.sourceforge.net/ledger-smb/?rev=591&view=rev
Author:   tetragon
Date:     2006-11-13 23:37:31 -0800 (Mon, 13 Nov 2006)

Log Message:
-----------
Fix variable call for vendor invoices with tax included

Modified Paths:
--------------
    trunk/LedgerSMB/IR.pm

Modified: trunk/LedgerSMB/IR.pm
===================================================================
--- trunk/LedgerSMB/IR.pm	2006-11-14 07:02:35 UTC (rev 590)
+++ trunk/LedgerSMB/IR.pm	2006-11-14 07:37:31 UTC (rev 591)
@@ -35,6 +35,7 @@
 use LedgerSMB::Tax;
 use LedgerSMB::PriceMatrix;
 use LedgerSMB::Sysconfig;
+use Math::BigFloat;
 
 
 sub post_invoice {
@@ -227,7 +228,7 @@
 					..hidden.., $form, $linetotal, 1);
 
 				$form->{"sellprice_$i"} 
-					-= $amount / $form{"qty_$i"};
+					-= $amount / $form->{"qty_$i"};
 			} else {
 				$tax += $amount = Tax::calculate_taxes(
 					..hidden.., $form, $linetotal, 0);


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