Index: openacs-4/packages/ecommerce/www/admin/orders/items-add-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/orders/items-add-3.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/ecommerce/www/admin/orders/items-add-3.tcl 31 Jan 2002 22:43:54 -0000 1.3 +++ openacs-4/packages/ecommerce/www/admin/orders/items-add-3.tcl 26 May 2002 04:36:50 -0000 1.4 @@ -1,53 +1,51 @@ -# /www/[ec_url_concat [ec_url] /admin]/orders/items-add-3.tcl ad_page_contract { - Add items, Cont. + Add items, Cont. - @author Eve Andersson (eveander@arsdigita.com) - @creation-date Summer 1999 - @cvs-id items-add-3.tcl,v 3.2.6.3 2000/08/16 21:19:21 seb Exp - @author ported by Jerry Asher (jerry@theashergroup.com) + @author Eve Andersson (eveander@arsdigita.com) + @creation-date Summer 1999 + @author ported by Jerry Asher (jerry@theashergroup.com) + @author revised by Bart Teeuwisse + @revision-date April 2002 + } { - order_id:integer,notnull - product_id:integer,notnull - color_choice - size_choice - style_choice + order_id:integer,notnull + product_id:integer,notnull + color_choice + size_choice + style_choice } ad_require_permission [ad_conn package_id] admin -doc_body_append "[ad_admin_header "Add Items, Cont."] +doc_body_append " + [ad_admin_header "Add Items, Cont."] -

Add Items, Cont.

+

Add Items, Cont.

-[ad_admin_context_bar [list "../" "Ecommerce([ec_system_name])"] [list "index" "Orders"] [list "one?order_id=$order_id" "One Order"] "Add Items, Cont."] + [ad_admin_context_bar [list "../" "Ecommerce([ec_system_name])"] [list "index" "Orders"] [list "one?order_id=$order_id" "One Order"] "Add Items, Cont."] -
-" +
" set item_id [db_nextval ec_item_id_sequence] -set user_id [db_string user_id_select "select user_id from ec_orders where order_id=:order_id"] +set user_id [db_string user_id_select " + select user_id + from ec_orders + where order_id=:order_id"] set lowest_price_and_price_name [ec_lowest_price_and_price_name_for_an_item $product_id $user_id ""] -doc_body_append "
-[export_form_vars order_id product_id color_choice size_choice style_choice item_id] - -
-This is the price that this user would normally receive for this product. -Make modifications as needed: - -
- - ([ad_parameter -package_id [ec_id] Currency ecommerce]) -
- -
- -
- -
-
- -[ad_admin_footer] -" +doc_body_append " +
+ [export_form_vars order_id product_id color_choice size_choice style_choice item_id] +
+

This is the price that this user would normally receive for this product. Make modifications as needed:

+
+ + ([ad_parameter -package_id [ec_id] Currency ecommerce]) +
+
+
+ +
+
+ [ad_admin_footer]"