summaryrefslogtreecommitdiff
path: root/LedgerSMB
diff options
context:
space:
mode:
authortetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2007-11-14 04:23:51 +0000
committertetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2007-11-14 04:23:51 +0000
commitc366b783a65dfdd7dadb105962ae0807cddaa6b9 (patch)
tree3e1f59b9dde6b174e9e1601559da1d8b18fa7c2f /LedgerSMB
parent44fe65cb76ce565733833209d653e68cdee6649b (diff)
Fixing bug 1831410
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1867 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
-rw-r--r--LedgerSMB/AM.pm3
1 files changed, 2 insertions, 1 deletions
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 ) {