From 976d31ec6ee0f2013e3707dc0904369ee1e7764f Mon Sep 17 00:00:00 2001
From: Darrell Ulm <darrellulm@kohavmware>
Date: Wed, 22 Jul 2009 10:06:53 -0400
Subject: [PATCH] Bug#: 3230 Penny fine, needs fixed, just a round off. Please

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
---
 C4/Members.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/C4/Members.pm b/C4/Members.pm
index 3f225447b4..26f1273cec 100644
--- a/C4/Members.pm
+++ b/C4/Members.pm
@@ -1131,9 +1131,9 @@ sub GetMemberAccountRecords {
 	        $data->{title} = $biblio->{title};
         $acctlines[$numlines] = $data;
         $numlines++;
-        $total += int(100 * $data->{'amountoutstanding'}); # convert float to integer to avoid round-off errors
+        $total += int(1000 * $data->{'amountoutstanding'}); # convert float to integer to avoid round-off errors
     }
-    $total /= 100;
+    $total /= 1000;
     $sth->finish;
     return ( $total, \@acctlines,$numlines);
 }
-- 
2.39.5