From c366b783a65dfdd7dadb105962ae0807cddaa6b9 Mon Sep 17 00:00:00 2001
From: tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Wed, 14 Nov 2007 04:23:51 +0000
Subject: Fixing bug 1831410

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1867 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/AM.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/LedgerSMB/AM.pm b/LedgerSMB/AM.pm
index 34e22615..60d584a0 100644
--- a/LedgerSMB/AM.pm
+++ b/LedgerSMB/AM.pm
@@ -1391,9 +1391,10 @@ sub recurring_transactions {
     my %e = ();
     my %p = ();
 
-    while ( my $ref = $sth->fetchrow_hashref(NAME_lc) ) {
+    while ( my $ref = $sth->fetchrow_hashref('NAME_lc') ) {
 
         $ref->{exchangerate} ||= 1;
+        $form->db_parse_numeric(sth => $sth, hashref => $ref);
 
         if ( $ref->{id} != $id ) {
 
-- 
cgit v1.2.3