[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
SF.net SVN: ledger-smb:[3930] branches/1.3/LedgerSMB/AA.pm
- Subject: SF.net SVN: ledger-smb:[3930] branches/1.3/LedgerSMB/AA.pm
- From: ..hidden..
- Date: Wed, 26 Oct 2011 13:42:02 +0000
Revision: 3930
http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3930&view=rev
Author: tshvr
Date: 2011-10-26 13:42:01 +0000 (Wed, 26 Oct 2011)
Log Message:
-----------
non dot numberformat parse first
Modified Paths:
--------------
branches/1.3/LedgerSMB/AA.pm
Modified: branches/1.3/LedgerSMB/AA.pm
===================================================================
--- branches/1.3/LedgerSMB/AA.pm 2011-10-26 13:30:38 UTC (rev 3929)
+++ branches/1.3/LedgerSMB/AA.pm 2011-10-26 13:42:01 UTC (rev 3930)
@@ -127,6 +127,8 @@
my $accno;
# add taxes
foreach $accno (@taxaccounts) {
+ #tshvr HV parse first or problem at aa.pl create_links $form->{"${akey}_$form->{acc_trans}{$key}->[$i-1]->{accno}"}=$form->{acc_trans}{$key}->[ $i - 1 ]->{amount} * $ml; 123,45 * -1 gives 123 !!
+ $form->{"tax_$accno"}=$form->parse_amount($myconfig,$form->{"tax_$accno"});
$form->{"tax_$accno"} *= -1 if $form->{reverse};
$fxtax += $tax{fxamount}{$accno} = $form->{"tax_$accno"};
$tax += $tax{fxamount}{$accno};
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.