[gnue] r6928 - trunk/gnue-packages/supply-chain/billing

[kilo]

Author: kilo
Date: 2005-02-01 02:15:45 -0600 (Tue, 01 Feb 2005)
New Revision: 6928

Modified:
   trunk/gnue-packages/supply-chain/billing/billing.gcd
Log:
Who asked for dirty reads???

Modified: trunk/gnue-packages/supply-chain/billing/billing.gcd
===================================================================
--- trunk/gnue-packages/supply-chain/billing/billing.gcd        2005-01-31 
19:21:51 UTC (rev 6927)
+++ trunk/gnue-packages/supply-chain/billing/billing.gcd        2005-02-01 
08:15:45 UTC (rev 6928)
@@ -209,9 +209,9 @@
     <procedure name="newNumber" type="string(20)" >
       invoices = find('BILLING_Head', {}, ['BILLING_number'], 
['BILLING_number'])
 
-      if len(invoices):
+      try:
         newNum = str(int(invoices[-1].BILLING_number) + 1).zfill(5)
-      else:
+      except:
         newNum = '00001'    #First invoice...
 
       return newNum
@@ -258,7 +258,7 @@
       self.reverted = False
 
       sellerList = find('BILLING_Company', {'BILLING_code': '1'}, [], [])
-      if len(sellerList):
+      if sellerList:
         self.seller = sellerList[0]
         print 'BILLING_Head::OnInit - Seller is %s' % self.seller.BILLING_name
     </procedure>