Index: openacs-4/packages/invoices/www/invoice-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/invoice-ae.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/invoices/www/invoice-ae.tcl	11 Oct 2005 15:23:29 -0000	1.6
+++ openacs-4/packages/invoices/www/invoice-ae.tcl	14 Oct 2005 06:25:03 -0000	1.7
@@ -355,7 +355,7 @@
 
 	# foreach offer_id: check if there's an item that's not billed -> status new, else status billed
 	foreach offer_id $offer_ids {
-	    db_0or1row check_offer_status {}
+	    set unbilled_items [db_string check_offer_status {} -default 0]
 
 	    if {$unbilled_items == 0} {
 		# all offer items billed