SF.net SVN: ledger-smb:[5991] branches/1.3

[..hidden..]

Revision: 5991
          http://sourceforge.net/p/ledger-smb/code/5991
Author:   einhverfr
Date:     2013-08-30 04:08:59 +0000 (Fri, 30 Aug 2013)
Log Message:
-----------
merging is_zero fix from trunk

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

Modified: branches/1.3/Changelog
===================================================================
--- branches/1.3/Changelog	2013-08-30 04:04:53 UTC (rev 5990)
+++ branches/1.3/Changelog	2013-08-30 04:08:59 UTC (rev 5991)
@@ -7,6 +7,7 @@
 * Fixed error in logs about failed login during initial login (Chris T, 858)
 * Updated gnome2 stylesheet (Pongracz I)
 * Updated Hungarian translation (Pongracz I)
+* Fixed is_zero error on inventory activity report (Chris T)
 
 
 Changelog for 1.3.34

Modified: branches/1.3/LedgerSMB/Form.pm
===================================================================
--- branches/1.3/LedgerSMB/Form.pm	2013-08-30 04:04:53 UTC (rev 5990)
+++ branches/1.3/LedgerSMB/Form.pm	2013-08-30 04:08:59 UTC (rev 5991)
@@ -1085,6 +1085,8 @@
     for (0 .. $#names){
         #   numeric            float4/real
         if ($types[$_] == 3 or $types[$_] ==2) {
+            $arrayref->[$_] ||= 0 if defined $arrayref;
+            $hashref->{$names[$_]} ||=0 if defined $hashref;
             $arrayref->[$_] = Math::BigFloat->new($arrayref->[$_]) 
               if defined $arrayref;
             $hashref->{$names[$_]} = Math::BigFloat->new($hashref->{$names[$_]})

Modified: branches/1.3/LedgerSMB.pm
===================================================================
--- branches/1.3/LedgerSMB.pm	2013-08-30 04:04:53 UTC (rev 5990)
+++ branches/1.3/LedgerSMB.pm	2013-08-30 04:08:59 UTC (rev 5991)
@@ -845,6 +845,7 @@
     while ( my $ref = $sth->fetchrow_hashref('NAME_lc') ) {
 	for (0 .. $#names){
             #   numeric            float4/real
+            $ref->{$names[$_]} ||=0;
             if ($types[$_] == 3 or $types[$_] == 2) {
                 $ref->{$names[$_]} = Math::BigFloat->new($ref->{$names[$_]});
             }

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


------------------------------------------------------------------------------
Learn the latest--Visual Studio 2012, SharePoint 2013, SQL 2012, more!
Discover the easy way to master current and previous Microsoft technologies
and advance your career. Get an incredible 1,500+ hours of step-by-step
tutorial videos with LearnDevNow. Subscribe today and save!
http://pubads.g.doubleclick.net/gampad/clk?id=58040911&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits