Index: openacs-4/packages/ecommerce/www/admin/products/offer-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/products/offer-add.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ecommerce/www/admin/products/offer-add.tcl	20 Apr 2001 20:51:14 -0000	1.1
+++ openacs-4/packages/ecommerce/www/admin/products/offer-add.tcl	29 Jan 2002 00:11:46 -0000	1.2
@@ -169,7 +169,7 @@
 doc_body_append "</table>
 "
 
-set offer_id [db_string offer_id_select "select ec_offer_sequence.nextval from dual"]
+set offer_id [db_nextval ec_offer_sequence]
 
 doc_body_append "<form method=post action=offer-add-2>
 [export_form_vars offer_id product_id retailer_id price shipping stock_status shipping_unavailable_p offer_begins offer_ends special_offer_p special_offer_html]