Index: openacs-4/packages/dotlrn-ecommerce/www/admin/ecommerce/invoice-payment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/ecommerce/invoice-payment.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn-ecommerce/www/admin/ecommerce/invoice-payment.tcl	17 Aug 2005 16:48:00 -0000	1.4
+++ openacs-4/packages/dotlrn-ecommerce/www/admin/ecommerce/invoice-payment.tcl	18 Aug 2005 14:29:40 -0000	1.5
@@ -336,18 +336,20 @@
     ad_script_abort
 }
 
-doc_body_append "
-[ad_admin_header "Invoice Payment"]
+# doc_body_append "
+# [ad_admin_header "Invoice Payment"]
 
-<h2>Invoice Payment</h2>
+# <h2>Invoice Payment</h2>
 
-[ad_context_bar [list "../" "Ecommerce([ec_system_name])"] [list "index" "Orders"] "One Order"]
+# [ad_context_bar [list "../" "Ecommerce([ec_system_name])"] [list "index" "Orders"] "One Order"]
 
-<hr>
+# <hr>
 
-<h3>Invoice Payment</h3>
+# <h3>Invoice Payment</h3>
 
-[eval [template::adp_compile -string [subst {
-    <formtemplate id=\"checkout\"></formtemplate>
-}]]]
-[ad_admin_footer]"
+# [eval [template::adp_compile -string [subst {
+#     <formtemplate id=\"checkout\"></formtemplate>
+# }]]]
+# [ad_admin_footer]"
+
+set context [list [list index Orders] [list one?order_id=$order_id "One Order"] "Invoice Payment"]
\ No newline at end of file