Index: openacs-4/packages/dotlrn-ecommerce/lib/summary-for-customer.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/summary-for-customer.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-ecommerce/lib/summary-for-customer.tcl 3 Aug 2005 22:39:32 -0000 1.3 +++ openacs-4/packages/dotlrn-ecommerce/lib/summary-for-customer.tcl 11 Aug 2005 01:56:47 -0000 1.4 @@ -75,7 +75,7 @@ set options "$options; " } - template::multirow append items $quantity $product_name $options $price_name [ec_pretty_price $price_charged [ad_parameter -package_id [ec_id] Currency ecommerce]] + template::multirow append items $quantity $section_name $options $price_name [ec_pretty_price $price_charged [ad_parameter -package_id [ec_id] Currency ecommerce]] } if { ![empty_string_p $confirmed_date] } { @@ -98,3 +98,20 @@ #foreach i {price shipping gift_certificate tax subtotal total balance} { # set $i [ec_pretty_price [set $i] $currency] #} + +set payment_method [db_string payment_method { + select method + from dotlrn_ecommerce_transactions + where order_id = :order_id +} -default cc] + +set payment_method [ad_decode $payment_method \ + cc "[_ dotlrn-ecommerce.Credit_Card]" \ + check "[_ dotlrn-ecommerce.Check]" \ + internal_account "[_ dotlrn-ecommerce.Internal_Account]" \ + cash "[_ dotlrn-ecommerce.Cash]" \ + invoice "[_ dotlrn-ecommerce.Invoice]" \ + scholarship "[_ dotlrn-ecommerce.Scholarship]" \ + lockbox "[_ dotlrn-ecommerce.Lock_Box]" \ + "[_ dotlrn-ecommerce.Credit_Card]" + ]