From 7791fb2e1d90b7ff1c25d0096c18a85a1aee2972 Mon Sep 17 00:00:00 2001
From: tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Thu, 29 Nov 2007 21:40:18 +0000
Subject: More number format fixes

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1923 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/IC.pm | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

(limited to 'LedgerSMB/IC.pm')

diff --git a/LedgerSMB/IC.pm b/LedgerSMB/IC.pm
index 1f016394..f20cabf0 100644
--- a/LedgerSMB/IC.pm
+++ b/LedgerSMB/IC.pm
@@ -84,7 +84,8 @@ sub get_part {
         $sth->execute( $form->{id} ) || $form->dberror($query);
 
         $form->{assembly_rows} = 0;
-        while ( my $ref = $sth->fetchrow_hashref(NAME_lc) ) {
+        while ( my $ref = $sth->fetchrow_hashref('NAME_lc') ) {
+            $form->db_parse_numeric(sth => $sth, hashref => $ref);
             $form->{assembly_rows}++;
             foreach my $key ( keys %{$ref} ) {
                 $form->{"${key}_$form->{assembly_rows}"} = $ref->{$key};
@@ -114,7 +115,7 @@ sub get_part {
             $sth = $dbh->prepare($query);
             $sth->execute( $form->{id} ) || $form->dberror($query);
 
-            while ( $ref = $sth->fetchrow_hashref(NAME_lc) ) {
+            while ( $ref = $sth->fetchrow_hashref('NAME_lc') ) {
                 push @{ $form->{makemodels} }, $ref;
             }
             $sth->finish;
@@ -172,7 +173,8 @@ sub get_part {
         $sth = $dbh->prepare($query);
         $sth->execute( $form->{id} ) || $form->dberror($query);
 
-        while ( $ref = $sth->fetchrow_hashref(NAME_lc) ) {
+        while ( $ref = $sth->fetchrow_hashref('NAME_lc') ) {
+            $form->db_parse_numeric(sth => $sth, hashref => $ref);
             push @{ $form->{vendormatrix} }, $ref;
         }
         $sth->finish;
@@ -193,7 +195,8 @@ sub get_part {
         $sth = $dbh->prepare($query);
         $sth->execute( $form->{id} ) || $form->dberror($query);
 
-        while ( $ref = $sth->fetchrow_hashref(NAME_lc) ) {
+        while ( $ref = $sth->fetchrow_hashref('NAME_lc') ) {
+            $form->db_parse_numeric(sth => $sth, hashref => $ref);
             push @{ $form->{customermatrix} }, $ref;
         }
         $sth->finish;
-- 
cgit v1.2.3