SF.net SVN: ledger-smb:[4353] trunk

[..hidden..]

Revision: 4353
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4353&view=rev
Author:   einhverfr
Date:     2012-02-23 13:19:14 +0000 (Thu, 23 Feb 2012)
Log Message:
-----------
It is now possible to create a customer account in 1.4 though the schema will change a bit.  Necessary for testing

Modified Paths:
--------------
    trunk/LedgerSMB/PGNumber.pm
    trunk/sql/modules/Company.sql

Modified: trunk/LedgerSMB/PGNumber.pm
===================================================================
--- trunk/LedgerSMB/PGNumber.pm	2012-02-23 13:03:09 UTC (rev 4352)
+++ trunk/LedgerSMB/PGNumber.pm	2012-02-23 13:19:14 UTC (rev 4353)
@@ -145,7 +145,7 @@
     } 
     bless $pgnum, $self;
     $pgnum->bmul(-1) if $negate;
-    die 'LedgerSMB::PGNumber Invalid Number' if $pgnum->is_nan() or (!defined $newval);
+    die 'LedgerSMB::PGNumber Invalid Number' if $pgnum->is_nan();
     return $pgnum;
 }
 

Modified: trunk/sql/modules/Company.sql
===================================================================
--- trunk/sql/modules/Company.sql	2012-02-23 13:03:09 UTC (rev 4352)
+++ trunk/sql/modules/Company.sql	2012-02-23 13:19:14 UTC (rev 4353)
@@ -316,6 +316,9 @@
     eca entity_credit_account;
     iter int;
 BEGIN
+     IF in_tax_ids = '{}' THEN
+         RETURN NULL;
+     END IF;
      SELECT * FROM entity_credit_account into eca WHERE id = in_credit_id;
 
      IF eca.entity_class = 1 then

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