SF.net SVN: ledger-smb:[3964] branches/1.3/LedgerSMB/Form.pm

[..hidden..]

Revision: 3964
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3964&view=rev
Author:   tshvr
Date:     2011-11-06 13:14:15 +0000 (Sun, 06 Nov 2011)
Log Message:
-----------
amounts should become bigfloat on exit from db

Modified Paths:
--------------
    branches/1.3/LedgerSMB/Form.pm

Modified: branches/1.3/LedgerSMB/Form.pm
===================================================================
--- branches/1.3/LedgerSMB/Form.pm	2011-11-05 22:41:46 UTC (rev 3963)
+++ branches/1.3/LedgerSMB/Form.pm	2011-11-06 13:14:15 UTC (rev 3964)
@@ -2531,6 +2531,7 @@
 
         # store amounts in {acc_trans}{$key} for multiple accounts
         while ( my $ref = $sth->fetchrow_hashref('NAME_lc') ) {
+            $self->db_parse_numeric(sth=>$sth, hashref=>$ref);#tshvr
             $ref->{exchangerate} =
               $self->get_exchangerate( $dbh, $self->{currency},
                 $ref->{transdate}, $fld );

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