Index: openacs-4/packages/ecommerce/www/admin/customer-service/customer-search.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/customer-service/customer-search.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/ecommerce/www/admin/customer-service/customer-search.tcl 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/ecommerce/www/admin/customer-service/customer-search.tcl 26 Aug 2001 23:46:28 -0000 1.2 @@ -53,13 +53,14 @@ -set sql "select unique o.user_id, u.first_names, u.last_name, u.email -from ec_orders o, cc_users u -where o.user_id=u.user_id -and o.order_state not in ('void','in_basket') -and sysdate - o.confirmed_date <= :days -and :amount <= (select sum(i.price_charged) from ec_items i where i.order_id=o.order_id and (i.item_state is null or i.item_state not in ('void','received_back'))) -" +#set sql "select unique o.user_id, u.first_names, u.last_name, u.email +#from ec_orders o, cc_users u +#where o.user_id=u.user_id +#and o.order_state not in ('void','in_basket') +#and sysdate - o.confirmed_date <= :days +#and :amount <= (select sum(i.price_charged) from ec_items i where i.order_id=o.order_id and (i.item_state is null or i.item_state not in ('void','received_back'))) +#" +set sql [db_map user_id_sql] set user_id_list [list] db_foreach get_user_ids_from_search $sql { @@ -84,4 +85,4 @@ db_release_unused_handles -doc_return 200 text/html $doc_body \ No newline at end of file +doc_return 200 text/html $doc_body