Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/sql/oracle/ecommerce-create.sql.sans.acs.objects'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/sql/oracle/ecommerce-plsql.sql.txt'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/sql/oracle/ecommerce.sql.txt'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.3 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/tcl/cybercash-emulator-procs.tcl.for.testing'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.5 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/tcl/ec-style-procs.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.4 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/tcl/ecommerce-styles-procs.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/tcl/ecommerce-styles-procs.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/ecommerce/www/account.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/account.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/account.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,23 @@ + +Your account +Your Account + +
+ + +

Your Order History

+ + + + @purchased_gift_certificates@ + + @mailing_lists@ + +
Index: openacs-4/packages/ecommerce/www/address-2.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/Attic/address-2.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-2.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,32 @@ + + + + Your Shipping Address Has Been Stored + checkout {Select Shipping Address} +

Your Shipping Address Has Been Stored

+ + + Enter Your Billing Address Has Been Store + + checkout {Select Billing Address} + +

Your Billing Address Has Been Stored

+ + +
+ + + + +
+ @formatted_address@ +
+ +

+

+ @hidden_form_vars@ + +
+

+ +
Index: openacs-4/packages/ecommerce/www/address-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-2.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-2.tcl 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,121 @@ +ad_page_contract { + @param address_id:optional + @param address_type + @param attn + @param line1 + @param line2:optional + @param city + @param usps_abbrev + @param zip_code + @param phone + @param phone_time:optional + @param action + + @author + @creation-date + @author ported by Jerry Asher (jerry@theashergroup.com) + @author revised by Bart Teeuwisse + @revision-date April 2002 + +} { + address_type + address_id:optional + attn + line1 + line2:optional + city + usps_abbrev + zip_code + phone + phone_time:optional + action +} + +set possible_exception_list [list [list attn name] [list line1 address] [list city city] [list usps_abbrev state] [list zip_code "zip code"] [list phone "telephone number"]] +set exception_count 0 +set exception_text "" + +foreach possible_exception $possible_exception_list { + if { ![info exists [lindex $possible_exception 0]] || [empty_string_p [set [lindex $possible_exception 0]]] } { + incr exception_count + append exception_text "
  • You forgot to enter your [lindex $possible_exception 1]." + } +} + +if { $exception_count > 0 } { + ad_return_complaint $exception_count $exception_text + return +} + +# We need them to be logged in + +set user_id [ad_verify_and_get_user_id] +if {$user_id == 0} { + set return_url "[ad_conn url]?[export_entire_form_as_url_vars]" + ad_returnredirect "/register?[export_url_vars return_url]" + return +} + +# Make sure they have an in_basket order unless they are ordering a +# gift certificate, otherwise they've probably gotten here by pushing +# Back, so return them to index.tcl + +set user_session_id [ec_get_user_session_id] +set order_id [db_string get_order_id " + select order_id + from ec_orders + where user_session_id = :user_session_id + and order_state = 'in_basket'" -default ""] +if { $action != "https://www.7-sisters.com:8443/store/gift-certificate-billing" } { + if { [empty_string_p $order_id] } { + + # They probably got here by pushing "Back", so just redirect + # them to index.tcl + + ad_returnredirect index.tcl + return + } +} + +if { [info exists address_id] && $address_id != "" } { + + # This is an existing address that has been edited. + + db_transaction { + db_dml update_address " + update ec_addresses + set attn=:attn, line1=:line1, line2=:line2, city=:city, usps_abbrev=:usps_abbrev, zip_code=:zip_code, phone=:phone, phone_time=:phone_time + where address_id = :address_id" + db_dml set_shipping_on_order " + update ec_orders + set shipping_address = :address_id + where order_id = :order_id" + } + db_release_unused_handles + +} else { + + # This is a new address which requires an address_id. + + set address_id [db_nextval ec_address_id_sequence] + db_transaction { + db_dml insert_new_address " + insert into ec_addresses + (address_id, user_id, address_type, attn, line1, line2, city, usps_abbrev, zip_code, country_code, phone, phone_time) + values + (:address_id, :user_id, 'shipping', :attn, :line1,:line2,:city,:usps_abbrev,:zip_code,'US',:phone,:phone_time)" + db_dml set_shipping_on_order " + update ec_orders + set shipping_address = :address_id + where order_id = :order_id" + } +} + +set formatted_address [ec_display_as_html [ec_pretty_mailing_address_from_args $line1 $line2 $city $usps_abbrev $zip_code "US" \ + "" $attn $phone $phone_time]] +set hidden_form_vars "" +set form_set [ns_getform] +for {set i 0} {$i < [ns_set size $form_set]} {incr i} { + set [ns_set key $form_set $i] [ns_set value $form_set $i] + append hidden_form_vars "[export_form_vars [ns_set key $form_set $i]]" +} Index: openacs-4/packages/ecommerce/www/address-2.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-2.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-2.xql 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,39 @@ + + + + + + + select order_id + from ec_orders + where user_session_id=:user_session_id + and order_state='in_basket' + + + + + + update ec_addresses + set attn=:attn, line1=:line1, line2=:line2, city=:city, usps_abbrev=:usps_abbrev, zip_code=:zip_code, phone=:phone, phone_time=:phone_time + where address_id=:address_id + + + + + + insert into ec_addresses + (address_id, user_id, address_type, attn, line1, line2, city, usps_abbrev, zip_code, country_code, phone, phone_time) + values + (:address_id, :user_id, :address_type, :attn, :line1,:line2,:city,:usps_abbrev,:zip_code,'US',:phone,:phone_time) + + + + + + update ec_orders + set shipping_address=:address_id + where order_id=:order_id + + + + Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/www/address-delete.tcl'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/ecommerce/www/address-international-2.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/Attic/address-international-2.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-international-2.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,32 @@ + + + + Your Shipping Address Has Been Stored + checkout {Select Shipping Address} +

    Your Shipping Address Has Been Stored

    +     + + Enter Your Billing Address Has Been Store + + checkout {Select Billing Address} + +

    Your Billing Address Has Been Stored

    +     + +
    + + + + +
    + @formatted_address@ +
    + +

    +

    + @hidden_form_vars@ + +
    +

    + +
    Index: openacs-4/packages/ecommerce/www/address-international-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-international-2.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-international-2.tcl 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,116 @@ +ad_page_contract { + @param attn + @param line1 + @param line2:optional + @param city + @param full_state_name:optional + @param zip_code:optional + @param country_code + @param phone + @param phone_time:optional + @param action + + @author + @creation-date + @author ported by Jerry Asher (jerry@theashergroup.com) + @author revised by Bart Teeuwisse + @revision-date April 2002 + +} { + address_type + address_id:optional + attn:notnull + line1:notnull + line2:optional + city:notnull + full_state_name:optional + zip_code:optional + country_code:notnull + phone + phone_time:optional + action +} + +set possible_exception_list [list [list attn name] [list line1 address] [list city city] [list country_code country] [list phone "telephone number"]] +set exception_count 0 +set exception_text "" + +foreach possible_exception $possible_exception_list { + if { ![info exists [lindex $possible_exception 0]] || [empty_string_p [set [lindex $possible_exception 0]]] } { + incr exception_count + append exception_text "
  • You forgot to enter your [lindex $possible_exception 1].
    • " + } +} + +if { $exception_count > 0 } { + ad_return_complaint $exception_count $exception_text + return +} + +# We need them to be logged in + +set user_id [ad_verify_and_get_user_id] +if {$user_id == 0} { + set return_url "[ad_conn url]?[export_entire_form_as_url_vars]" + ad_returnredirect "/register?[export_url_vars return_url]" + return +} + +# Make sure they have an in_basket order, otherwise they've probably +# gotten here by pushing Back, so return them to index.tcl + +set user_session_id [ec_get_user_session_id] +set order_id [db_string get_order_id "select order_id from ec_orders where user_session_id=:user_session_id and order_state='in_basket'" -default ""] +if { [empty_string_p $order_id] } { + + # Then they probably got here by pushing "Back", so just redirect + # them to index.tcl + + ad_returnredirect index.tcl + return +} + +if { [info exists address_id] && $address_id != "" } { + + # This is an existing address that has been edited. + + db_transaction { + db_dml update_address " + update ec_addresses + set attn = :attn, line1 = :line1, line2 = :line2, + city = :city, full_state_name = :full_state_name, zip_code = :zip_code, country_code = :country_code, phone = :phone, phone_time = :phone_time + where address_id = :address_id" + db_dml set_shipping_on_order " + update ec_orders + set shipping_address = :address_id + where order_id = :order_id" + } + db_release_unused_handles +} else { + + # This is a new address which requires an address_id. + + set address_id [db_nextval ec_address_id_sequence] + + db_transaction { + db_dml insert_new_address " + insert into ec_addresses + (address_id, user_id, address_type, attn, line1, line2, city, full_state_name, zip_code, country_code, phone, phone_time) + values + (:address_id, :user_id, 'shipping', :attn, :line1,:line2,:city,:full_state_name,:zip_code,:country_code,:phone,:phone_time)" + db_dml update_order_shipping_address " + update ec_orders + set shipping_address=:address_id + where order_id=:order_id" + } + db_release_unused_handles +} + +set formatted_address [ec_display_as_html [ec_pretty_mailing_address_from_args $line1 $line2 $city "" $zip_code $country_code \ + $full_state_name $attn $phone $phone_time]] +set hidden_form_vars "" +set form_set [ns_getform] +for {set i 0} {$i < [ns_set size $form_set]} {incr i} { + set [ns_set key $form_set $i] [ns_set value $form_set $i] + append hidden_form_vars "[export_form_vars [ns_set key $form_set $i]]" +} Index: openacs-4/packages/ecommerce/www/address-international-2.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-international-2.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-international-2.xql 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,48 @@ + + + + + + + select order_id + from ec_orders + where user_session_id=:user_session_id + and order_state='in_basket' + + + + + + update ec_addresses + set attn = :attn, line1 = :line1, line2 = :line2, + city = :city, full_state_name = :full_state_name, zip_code = :zip_code, country_code = :country_code, phone = :phone, phone_time = :phone_time + where address_id = :address_id + + + + + + update ec_orders + set shipping_address=:address_id + where order_id=:order_id + + + + + + insert into ec_addresses + (address_id, user_id, address_type, attn, line1, line2, city, full_state_name, zip_code, country_code, phone, phone_time) + values + (:address_id, :user_id, :address_type, :attn, :line1,:line2,:city,:full_state_name,:zip_code,:country_code,:phone,:phone_time) + + + + + + update ec_orders + set shipping_address=:address_id + where order_id=:order_id + + + + Index: openacs-4/packages/ecommerce/www/address-international.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-international.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-international.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,66 @@ + +Enter Your Address + + + checkout {Select Shipping Address} +

    Enter Your Shipping Address

    +     + + + checkout {Select Billing Address} + +

    Enter Your Billing Address

    +     + +
    + @hidden_form_vars@ +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    Name
    Addressvalue="@line1@">
    2nd line (optional)value="@line2@">>
    Cityvalue="@city@">
    Province or Regionvalue="@full_state_name@">
    Zip Codevalue="@zip_code@">
    Country@country_widget@
    Phone + value="@phone@"> + checked + + >day     + checked + + > evening +
    +
    +
    + +
    +
    Index: openacs-4/packages/ecommerce/www/address-international.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-international.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-international.tcl 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,65 @@ +ad_page_contract { + @param address_type + @param usca_p:optional + @param address_id:optional + + @author + @creation-date + @author ported by Jerry Asher (jerry@theashergroup.com) + @author revised by Bart Teeuwisse + @revision-date April 2002 + +} { + address_type + usca_p:optional + address_id:optional +} + +# we need them to be logged in + +set user_id [ad_verify_and_get_user_id] +if {$user_id == 0} { + set return_url "[ad_conn url]" + ad_returnredirect "/register?[export_url_vars return_url]" + return +} + +# user session tracking + +set user_session_id [ec_get_user_session_id] +ec_create_new_session_if_necessary + +# Retrieve the saved address with address_id. + +if { [info exists address_id] } { + db_0or1row shipping_address " + select * + from ec_addresses + where address_id=:address_id" + set country_widget [ec_country_widget $country_code] +} else { + set country_widget [ec_country_widget] + + set attn [ad_quotehtml [db_string get_full_name " + select first_names || ' ' || last_name as name + from cc_users + where user_id=:user_id"]] +} + +# Get the location from which delete-address was called. + +set header_set [ns_conn headers] +set action [ns_set get [ns_conn headers] Referer] + +# Get the form vars that were passed on delete-address so that they +# can be passed back to the calling url. gift-certificate-billing has +# a bunch of form vars that should not be lost. + +set hidden_form_vars "[export_form_vars action]" +set form_set [ns_getform] +for {set i 0} {$i < [ns_set size $form_set]} {incr i} { + set [ns_set key $form_set $i] [ns_set value $form_set $i] + append hidden_form_vars "[export_form_vars [ns_set key $form_set $i]]" +} + +db_release_unused_handles Index: openacs-4/packages/ecommerce/www/address-international.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address-international.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address-international.xql 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,13 @@ + + + + + + + select first_names || ' ' || last_name as name + from cc_users + where user_id=:user_id + + + + Index: openacs-4/packages/ecommerce/www/address.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,59 @@ + + + + Enter Your Shipping Address + checkout {Select Shipping Address} +

    Enter Your Shipping Address

    +     + + Enter Your Billing Address + + checkout {Select Billing Address} + +

    Enter Your Billing Address

    +     + +
    + @hidden_form_vars@ +
    + + + + + + + + + + + + + + + + + + + + + + + + + +
    Name
    Addressvalue="@line1@">
    2nd line (optional)value="@line2@">>
    Cityvalue="@city@">  State @state_widget@
    Zipvalue="@zip_code@">
    Phone + value="@phone@"> + checked + + >day     + checked + + > evening +
    +
    +
    + +
    +
    Index: openacs-4/packages/ecommerce/www/address.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address.tcl 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,84 @@ +ad_page_contract { + @param address_type + @param usca_p:optional + @param address_id:optional + + @author + @creation-date + @author ported by Jerry Asher (jerry@theashergroup.com) + @author revised by Bart Teeuwisse + @revision-date April 2002 + +} { + address_type + usca_p:optional + address_id:optional +} + +ec_redirect_to_https_if_possible_and_necessary + +# we need them to be logged in + +set user_id [ad_verify_and_get_user_id] +if {$user_id == 0} { + set return_url "[ad_conn url]" + ad_returnredirect "/register?[export_url_vars return_url]" + return +} + +# Retrieve the saved address with address_id. + +if { [info exists address_id] } { + db_0or1row select_address " + select attn, line1, line2, city, usps_abbrev, zip_code, phone, country_code, full_state_name, phone_time + from ec_addresses + where address_id=:address_id" + + # Redirect to the international address form if the address is + # outside the United States. + + if { ![string equal $country_code "US"] } { + ad_returnredirect "address-international?[export_url_vars address_id address_type]" + } + + if { [info exists usps_abbrev] } { + set state_widget [state_widget $usps_abbrev] + } +} else { + + # Retrieve the default name. + + set attn [db_string get_full_name " + select first_names || ' ' || last_name as name + from cc_users + where user_id=:user_id"] + +} +if { ![info exists state_widget] } { + set state_widget [state_widget] +} + +# User session tracking + +set user_session_id [ec_get_user_session_id] +ec_create_new_session_if_necessary +ec_log_user_as_user_id_for_this_session + +# Get the location from which delete-address was called. + +set header_set [ns_conn headers] +set action [ns_set get [ns_conn headers] Referer] + +# Get the form vars that were passed on delete-address so that they +# can be passed back to the calling url. gift-certificate-billing has +# a bunch of form vars that should not be lost. + +set hidden_form_vars "[export_form_vars action]" +set form_set [ns_getform] +for {set i 0} {$i < [ns_set size $form_set]} {incr i} { + set [ns_set key $form_set $i] [ns_set value $form_set $i] + append hidden_form_vars "[export_form_vars [ns_set key $form_set $i]]" +} + +set user_name_with_quotes_escaped [ad_quotehtml $attn] +db_release_unused_handles Index: openacs-4/packages/ecommerce/www/address.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/address.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/address.xql 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,21 @@ + + + + + + + select first_names || ' ' || last_name as name + from cc_users + where user_id=:user_id + + + + + + select attn, line1, line2, city, usps_abbrev, zip_code, phone, country_code, full_state_name, phone_time + from ec_addresses + where address_id=:address_id + + + + Index: openacs-4/packages/ecommerce/www/billing.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/billing.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/billing.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,116 @@ + +Completing Your Order +checkout {Select Billing Address} + +

    Select Your Billing Address

    + +
    + +

    Please choose your billing address.

    + +
    + + +

    You can select an address listed below or enter a new address.

    + + +     + + + + + + + + + + + + + + +

    You can select your shipping address listed below or enter a new address.

    + + +     + + + + + + + + + + + + + + +
    + @billing_addresses.formatted@ + + + + + + + +
    +
    + @billing_addresses.use@ + +
    +     		+
    + @billing_addresses.edit@ + +
    +     		+
    + @billing_addresses.delete@ + +
    +
    +
    +   +
    + @shipping_addresses.formatted@ + + + + + +
    +
    + + @shipping_addresses.use@ + +
    +
    +
    +   +
    +
    + + + + + + + +
    +
    + @hidden_form_vars@ + +
    +     		+ or + +
    + @hidden_form_vars@ + +
    +
    + +
    Index: openacs-4/packages/ecommerce/www/billing.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/billing.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/billing.tcl 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,140 @@ +ad_page_contract { + + Present the available billing addresses of the visitor. + + @param usca_p User session started or not + + @author Bart Teeuwisse + @creation-date April 2002 + +} { + usca_p:optional +} + +ec_redirect_to_https_if_possible_and_necessary + +# we need them to be logged in + +set user_id [ad_verify_and_get_user_id] +if {$user_id == 0} { + set return_url "[ad_conn url]" + ad_returnredirect "/register?[export_url_vars return_url]" + return +} + +# user sessions: +# 1. get user_session_id from cookie +# 2. if user has no session (i.e. user_session_id=0), attempt to set it if it hasn't been +# attempted before +# 3. if it has been attempted before, give them message that we can't do shopping carts +# without cookies + +set user_session_id [ec_get_user_session_id] +ec_create_new_session_if_necessary [export_url_vars address_id] + +# Make sure they have an in_basket order, otherwise they've probably +# gotten here by pushing Back, so return them to index.tcl + +set success_p [db_0or1row get_order_id_and_order_owner " + select order_id, user_id as order_owner + from ec_orders + where user_session_id=:user_session_id + and order_state='in_basket' "] +if { ! $success_p } { + + # No rows came back, so they probably got here by pushing "Back", + # so just redirect them to index.tcl + + ad_returnredirect [ec_url]index.tcl + return +} + +if { $order_owner != $user_id } { + + # make sure the order belongs to this user_id (why? because + # before this point there was no personal information associated + # with the order (so it was fine to go by user_session_id), but + # now there is, and we don't want someone messing with their + # user_session_id cookie and getting someone else's order) + + # If they get here, either they managed to skip past checkout.tcl, + # or they messed w/their user_session_id cookie; + + ad_returnredirect [ec_securelink [ec_url]checkout.tcl] + return +} + +# make sure there's something in their shopping cart, otherwise +# redirect them to their shopping cart which will tell them that it's +# empty. + +if { [db_string get_ec_item_count " + select count(*) + from ec_items + where order_id=:order_id"] == 0 } { + ad_returnredirect [ec_url]shopping-cart + return +} + +# Make sure there is an address for this order, otherwise they've +# probably gotten here via url surgery, so redirect them to +# checkout.tcl + +set address_id [db_string get_address_id " + select shipping_address + from ec_orders + where order_id=:order_id" -default ""] +if { [empty_string_p $address_id] } { + + # No shipping address is needed if the order only consists of soft + # goods not requiring shipping. + + if {[db_0or1row shipping_avail " + select p.no_shipping_avail_p, count (*) + from ec_items i, ec_products p + where i.product_id = p.product_id + and p.no_shipping_avail_p = 'f' + and i.order_id = :order_id + group by no_shipping_avail_p"]} { + ad_returnredirect [ec_securelink [ec_url]checkout] + return + } +} + +# Everything is ok now; the user has a non-empty in_basket order and +# an address associated with it, so now get the other necessary +# information + +set address_type "billing" + +# Present all saved addresses + +template::query get_billing_addresses billing_addresses multirow " + select address_id + from ec_addresses + where user_id=:user_id + and address_type = 'billing'" -eval { + + set row(formatted) [ec_display_as_html [ec_pretty_mailing_address_from_ec_addresses $row(address_id)]] + set address_id $row(address_id) + set row(delete) "[export_form_vars address_id]" + set row(edit) "[export_form_vars address_id address_type]" + set row(use) "[export_form_vars address_id]" +} + +# Offer the shipping address if no billing addresses on file. + +if {[template::multirow size billing_addresses] == 0} { + template::query get_shipping_addresses shipping_addresses multirow " + select shipping_address as address_id + from ec_orders + where order_id = :order_id + and shipping_address is not null" -eval { + + set row(formatted) [ec_display_as_html [ec_pretty_mailing_address_from_ec_addresses $row(address_id)]] + set row(use) "[export_form_vars address_id]" + } +} +set hidden_form_vars [export_form_vars address_type] + +db_release_unused_handles Index: openacs-4/packages/ecommerce/www/category-browse-subcategory.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/category-browse-subcategory.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/category-browse-subcategory.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,32 @@ + +@the_category_name@ +@the_category_id@ + +
    +

    @the_category_name@

    + + + + + + + + + +
    +

    Browse:

    +
      + @subcategories@ +
    +     		+

    We recommend:

    + @recommendations@ +
    + +

    @category_name@ > @subcategory_name@ products:

    + @products@ + + @prev_link@ @separator@ @next_link@ +
    + +

    Add yourself to the @the_category_name@ mailing list!

    Index: openacs-4/packages/ecommerce/www/category-browse-subsubcategory.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/category-browse-subsubcategory.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/category-browse-subsubcategory.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,24 @@ + +@the_category_name@ +@the_category_id@ + +
    +

    @the_category_name@

    + + + + + + +
    +

    We recommend:

    + @recommendations@ +
    + +

    @category_name@ > @subcategory_name@ > @subsubcategory_name@ products:

    + @products@ + + @prev_link@ @separator@ @next_link@ +
    + +

    Add yourself to the @the_category_name@ mailing list!

    Index: openacs-4/packages/ecommerce/www/category-browse.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/category-browse.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/category-browse.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,32 @@ + +@the_category_name@ +@the_category_id@ + +
    +

    @the_category_name@

    + + + + + + + + + +
    +

    Browse:

    +
      + @subcategories@ +
    +     		+

    We recommend:

    + @recommendations@ +
    + +

    @category_name@ products:

    + @products@ + + @prev_link@ @separator@ @next_link@ +
    + +

    Add yourself to the @the_category_name@ mailing list!

    Index: openacs-4/packages/ecommerce/www/checkout-2.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/checkout-2.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/checkout-2.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,27 @@ + +Completing Your Order +checkout {Verify Order} + +

    Check Your Order

    + +
    + Verify the items you desire +

    Please verify that the items and quantities shown below are correct. Put a 0 (zero) in the + Quantity field to remove a particular item from your order.

    + +
    + + + + + + + @rows_of_items@ +
    Quantity
    + +

    @tax_exempt_options@

    + +
    + +
    +
    Index: openacs-4/packages/ecommerce/www/checkout-3.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/checkout-3.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/checkout-3.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,19 @@ + +Please Confirm Your Order +checkout {Confirm Order} + +

    Please Confirm Your Order

    + +
    + +
    +

    Push Submit to send us your order! +

    + + @order_summary@ + +

    Push Submit to send us your order! +

    +
    + +
    Index: openacs-4/packages/ecommerce/www/checkout.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/checkout.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/checkout.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,91 @@ + +Completing Your Order +checkout {Select Shipping Address} + +

    Select Your Shipping Address

    + +
    + + +

    Please choose your shipping address.

    + +
    + + +

    You can select an address listed below or enter a new address.

    +     + + + + + + + + + + + + + + +
    + @addresses.formatted@ + + + + + + + +
    +
    + @addresses.use@ + +
    +     		+
    + @addresses.edit@ + +
    +     		+
    + @addresses.delete@ + +
    +
    +
    +   +
    +
    + + + + + + + +
    +
    + @hidden_form_vars@ + +
    +     		+ or + +
    + @hidden_form_vars@ + +
    +
    +     + +

    Your order does not need a shipping address

    +
    + @hidden_form_vars@ +
    + +
    +
    +     + +
    Index: openacs-4/packages/ecommerce/www/credit-card-correction.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/credit-card-correction.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/credit-card-correction.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,62 @@ + +Sorry, We Were Unable to Authorize Your Credit Card + +

    Sorry, We Were Unable to Authorize Your Credit Card

    + +
    + +

    At this time we are unable to receive authorization to charge + your credit card. Please check the number and the expiration + date and try again or use a different credit card.

    + + + + + + + + +
    + @formatted_address@ + + +
    + + + +
    +     + +
    + + + +
    +     +     		+ +
    + + + + + + + + + + + + + + + +
    Credit card number:
    Type:@ec_creditcard_widget@ +
    + +
    +
    Expires:@ec_expires_widget@
    +
    +
    + +
    Index: openacs-4/packages/ecommerce/www/default-ec-master.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/Attic/default-ec-master.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/default-ec-master.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,15 @@ + + + @title@ + @header_stuff@ + + + @top_links@ + + <%= [ec_navbar @navbar@] %> + + + @footer@ + @ds_link@ + + Index: openacs-4/packages/ecommerce/www/default-ec-master.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/Attic/default-ec-master.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/default-ec-master.tcl 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,91 @@ +# Set basic attributes and provide the logical defaults for variables that +# aren't provided by the slave page. +# +# Author: Bart Teeuwisse +# Creation Date: April 2002 +# + +# Pull out the package_id of the subsite closest to our current node + +set pkg_id [site_node_closest_ancestor_package "acs-subsite"] + +# See if we have the parameter in the closest acs-subsite package to +# override this file in favor of the site-specific master + +set have_site_master_p [ad_parameter -package_id $pkg_id UseSiteSpecificMaster dummy "0"] +if {$have_site_master_p} { + ad_return_template "/www/site-specific-master" +} + +# fall back on defaults for title and header_stuff + +if [template::util::is_nil title] { + set title [ad_parameter SystemName -default [ad_system_name]] +} else { + set title "[ad_parameter SystemName -default [ad_system_name]] : $title" +} +if ![info exists header_stuff] { + set header_stuff {} +} +if [template::util::is_nil navbar] { + set navbar "none" +} +if [template::util::is_nil footer] { + set footer [ec_footer] +} + +set top_links "" +if { [string compare $navbar "Shopping Cart"] == 0 } { + lappend top_links "Shopping Cart" +} else { + lappend top_links "Shopping Cart" +} + +if { [string compare $navbar "Your Account"] == 0 } { + lappend top_links "Your Account" +} else { + lappend top_links "Your Account" +} + +if { [string compare $navbar "Home"] == 0 } { + lappend top_links "[ec_system_name] Home" +} else { + lappend top_links "[ec_system_name] Home" +} + +if {[ad_permission_p [ad_conn package_id] admin]} { + lappend top_links "[ec_system_name] Administration" +} + +set top_links " + + + + + +
    [ec_header_image] + [join $top_links " | "] +
    " + +# Attributes + +# template::multirow create attribute key value +# template::multirow append \ +# attribute bgcolor [ad_parameter -package_id $pkg_id bgcolor dummy "white"] +# template::multirow append \ +# attribute text [ad_parameter -package_id $pkg_id textcolor dummy "black"] + +if { [info exists prefer_text_only_p] + && $prefer_text_only_p == "f" + && [ad_graphics_site_available_p] } { + template::multirow append attribute background \ + [ad_parameter -package_id $pkg_id background dummy "/graphics/bg.gif"] +} + +# Developer-support + +if { [llength [namespace eval :: info procs ds_link]] == 1 } { + set ds_link "[ds_link]" +} else { + set ds_link "" +} Index: openacs-4/packages/ecommerce/www/delete-address.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/Attic/delete-address.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/delete-address.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,22 @@ + + +

    The address has been removed

    + +
    + + + + +
    + @deleted_address@ +
    + +

    +

    + @hidden_form_vars@ + +
    +

    + +
    + Index: openacs-4/packages/ecommerce/www/delete-address.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/delete-address.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/delete-address.tcl 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,48 @@ +ad_page_contract { + + Set the ecommerce address with ID address_id to deleted so that + it will no longer be available. + + @param address_id + + @author Bart Teeuwisse + @creation-date April 2002 +} { + address_id +} + +# Can't remove the address from the database as old orders might refer +# to the address. By setting the address_type to 'deleted' the +# address will no longer be available for shipping. While still in the +# database the user can't use the address any more. + +db_dml delete_address " + update ec_addresses + set address_type = 'deleted' + where address_id = :address_id" + +db_1row select_address " + select * + from ec_addresses + where address_id = :address_id" + +set deleted_address [ec_display_as_html [ec_pretty_mailing_address_from_args $line1 $line2 $city $usps_abbrev $zip_code $country_code \ + $full_state_name $attn $phone $phone_time]] + +# Get the location from which delete-address was called. + +set header_set [ns_conn headers] +set action [ns_set get [ns_conn headers] Referer] + +# Get the form vars that were passed on delete-address so that they +# can be passed back to the calling url. gift-certificate-billing has +# a bunch of form vars that should not be lost. + +set hidden_form_vars "" +set form_set [ns_getform] +for {set i 0} {$i < [ns_set size $form_set]} {incr i} { + set [ns_set key $form_set $i] [ns_set value $form_set $i] + append hidden_form_vars "[export_form_vars [ns_set key $form_set $i]]" +} + +db_release_unused_handles Index: openacs-4/packages/ecommerce/www/delete-address.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/delete-address.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/delete-address.xql 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,13 @@ + + + + + + + update ec_addresses + set address_type='deleted' + where address_id=:address_id + + + + Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/www/delete-shipping-address.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/ecommerce/www/delete-shipping-address.xql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/ecommerce/www/gift-certificate-billing.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-billing.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-billing.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,76 @@ + +Completing Your Order + +

    Select Your Billing Address

    + +
    + +

    Please enter your billing address.

    + +
    + + + + + + + + + + + + + + + +
    + @addresses.formatted@ + + + + + + + +
    +
    + @addresses.use@ + +
    +     		+
    + @addresses.edit@ + +
    +     		+
    + @addresses.delete@ + +
    +
    +
    +   +
    +
    + + + + + + + +
    +
    + @hidden_form_vars@ + +
    +     		+ or + +
    + @hidden_form_vars@ + +
    +
    + +
    Index: openacs-4/packages/ecommerce/www/gift-certificate-billing.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-billing.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-billing.tcl 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,109 @@ +ad_page_contract { + + Present the available billing addresses of the visitor. + + @param usca_p User session started or not + + @author Bart Teeuwisse + @creation-date April 2002 + +} { + certificate_to:optional + certificate_from:optional + certificate_message:optional + amount:notnull + recipient_email:notnull,email +} -properties { + addresses:multirow +} + +ec_redirect_to_https_if_possible_and_necessary + +# User must be logged in + +set user_id [ad_verify_and_get_user_id] +if {$user_id == 0} { + set return_url "[ad_conn url]" + ad_returnredirect "/register?[export_url_vars return_url]" + return +} + +# Error checking + +set exception_count 0 +set exception_text "" + +if { [string length $certificate_message] > 200 } { + incr exception_count + append exception_text " +
  • + The message you entered was too long. It needs to contain fewer than 200 characters (the current length is [string length $certificate_message] characters). +
    • " +} + +if { [string length $certificate_to] > 100 } { + incr exception_count + append exception_text " +
  • + What you entered in the \"To\" field is too long. It needs to contain fewer than 100 characters (the current length is [string length $certificate_to] characters). +
    • " +} + +if { [string length $certificate_from] > 100 } { + incr exception_count + append exception_text " +
  • + What you entered in the \"From\" field is too long. It needs to contain fewer than 100 characters (the current length is [string length $certificate_from] characters). +
    • " +} + +if { [string length $recipient_email] > 100 } { + incr exception_count + append exception_text " +
  • + The recipient email address you entered is too long. It needs to contain fewer than 100 characters (the current length is [string length $recipient_email] characters). +
    • " +} + +if { $amount < [ad_parameter -package_id [ec_id] MinGiftCertificateAmount ecommerce] } { + incr exception_count + append exception_text " +
  • + The amount needs to be at least [ec_pretty_price [ad_parameter -package_id [ec_id] MinGiftCertificateAmount ecommerce]] +
    • " +} elseif { $amount > [ad_parameter -package_id [ec_id] MaxGiftCertificateAmount ecommerce] } { + incr exception_count + append exception_text " +
  • + The amount cannot be higher than [ec_pretty_price [ad_parameter -package_id [ec_id] MaxGiftCertificateAmount ecommerce]] +
    • " +} + +if { $exception_count > 0 } { + ad_return_complaint $exception_count $exception_text + return +} + +set saved_addresses " + You can select an address listed below or enter a new address. + " + +# Present all saved addresses + +set address_type "billing" + +template::query get_user_addresses addresses multirow " + select address_id, attn, line1, line2, city, usps_abbrev, zip_code, phone, country_code, full_state_name, phone_time, address_type + from ec_addresses + where user_id=:user_id + and address_type in ('billing')" -eval { + + set row(formatted) [ec_display_as_html [ec_pretty_mailing_address_from_args $row(line1) $row(line2) $row(city) $row(usps_abbrev) $row(zip_code) $row(country_code) \ + $row(full_state_name) $row(attn) $row(phone) $row(phone_time)]] + set address_id $row(address_id) + set row(delete) "[export_form_vars address_id certificate_to certificate_from certificate_message amount recipient_email]" + set row(edit) "[export_form_vars address_id address_type certificate_to certificate_from certificate_message amount recipient_email]" + set row(use) "[export_form_vars address_id certificate_to certificate_from certificate_message amount recipient_email]" +} + +set hidden_form_vars [export_form_vars address_type certificate_to certificate_from certificate_message amount recipient_email] Index: openacs-4/packages/ecommerce/www/gift-certificate-claim.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-claim.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-claim.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,22 @@ + +Claim a Gift Certificate + +

    Claim a Gift Certificate

    + +
    + +
    +

    If you've received a gift certificate, enter the claim check + below in order to put the funds into your gift certificate + account.

    + +

    If you've entered it before, you don't need to do so again. + The funds are already in your account.

    + +

    Claim Check:

    + + + +
    + + Index: openacs-4/packages/ecommerce/www/gift-certificate-finalize-order.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-finalize-order.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-finalize-order.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,7 @@ + +@title@ + +

    @title@

    + +@page@ + Index: openacs-4/packages/ecommerce/www/gift-certificate-order-2.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-order-2.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-order-2.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,38 @@ + +Your Gift Certificate Order + +

    Your Gift Certificate Order

    + +
    +
      +
    1. +
    + + + + + + + + + + +
    To: (optional) 
    From: (optional) 
    + +
  • +

    Please enter the message you want to appear on the gift certificate: (optional)

    + +

    (maximum 200 characters)

    +
    • +
  • +

    Gift certificate amount: + (in @currency@, between @minimum_amount@ and @maximum_amount@)

    +
    • +
  • +

    Recipient's email address:

    +
    • + +
    + +
    + Index: openacs-4/packages/ecommerce/www/gift-certificate-order-3.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-order-3.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-order-3.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,27 @@ + +Payment Info + +

    Payment Info

    + +
    + @hidden_form_variables@ +
    + + + + + + + + + + + + + +
    Credit card number:
    Type:@ec_creditcard_widget@
    Expires:@ec_expires_widget@
    +
    +
    + +
    +
    Index: openacs-4/packages/ecommerce/www/gift-certificate-order-4.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-order-4.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-order-4.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,80 @@ + +Please Confirm Your Gift Certificate Order + +

    Please Confirm Your Gift Certificate Order

    + +
    +
    + @hidden_form_variables@ + Push Submit to send us your order! +
    + + + + + + + + + @to_row@ + @from_row@ + @message_row@ + + + + + + + + + + + + + + + + + + + + + + + + +
    + Your email address: + + @user_email@

    +
    + Your Gift Certificate Order: +
    + Will be sent to: + + @recipient_email@

    +
    + Subtotal: + + @formatted_amount@ +
    + Shipping: + + @zero_in_the_correct_currency@ +
    + Tax: + + @zero_in_the_correct_currency@ +
    + ----------- + + ----------- +
    + Total Due: + + @formatted_amount@ +
    +
    + Push Submit to send us your order! +
    +
    \ No newline at end of file Index: openacs-4/packages/ecommerce/www/gift-certificate-order.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-order.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-order.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,29 @@ + +Gift Certificates + +

    Gift Certificates

    + +
    +

    The perfect gift for anyone, gift certificates can be used to to + buy anything at @system_name@!

    +

    Order a Gift Certificate!

    +

    About Gift Certificates

    +
      +
    • + Gift certificates are sent to the recipient via email shortly + after you place your order. +
      • +
    • + Any unused balance will be put in the recipient's gift + certificate account. +
      • +
    • + Gift certificates expire @expiration_time@ from date of + purchase. +
      • +
    • + You can purchase a gift certificate for any amount between + @minimum_amount@ and @maximum_amount@. +
      • +
    +
    \ No newline at end of file Index: openacs-4/packages/ecommerce/www/gift-certificate-thank-you.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate-thank-you.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate-thank-you.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,16 @@ + +Thank You For Your Gift Certificate Order + +

    Thank You For Your Gift Certificate Order

    + +
    +

    The lucky recipient will be notified by email shortly!

    + +
    Index: openacs-4/packages/ecommerce/www/gift-certificate.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/gift-certificate.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/gift-certificate.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,8 @@ + +Your Gift Certificate + +

    Your Gift Certificate

    + +
    + @gift_certificate_summary@ +
    \ No newline at end of file Index: openacs-4/packages/ecommerce/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/index.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/index.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,32 @@ + +Welcome +Home + +
    + + Welcome back @user_name@!   If you're not @user_name@, click here + + + Welcome! + + + @search_widget@ + + +

    We recommend:

    + @recommendations_if_there_are_any@ +     + + +

    Products:

    + @products@ +     + + @prev_link@ @separator@ @next_link@ + + +

    + Order a Gift Certificate! +

    +     +
    Index: openacs-4/packages/ecommerce/www/mailing-list-add-2.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/mailing-list-add-2.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/mailing-list-add-2.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,9 @@ + +You've been added to the @mailing_list_name@ mailing list! + +

    You've been added to the @mailing_list_name@ mailing list!

    + +
    + To remove yourself anytime, go to @remove_link@ + @continue_shopping_options@ +
    Index: openacs-4/packages/ecommerce/www/mailing-list-add.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/mailing-list-add.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/mailing-list-add.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,14 @@ + +Add yourself to the @mailing_list_name@ mailing list! + +

    Add yourself to the @mailing_list_name@ mailing list!

    + +
    + We think that you are @user_name@. If not, please log in. Otherwise, +
    + @hidden_form_variables@ +
    + +
    +
    +
    Index: openacs-4/packages/ecommerce/www/mailing-list-remove.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/mailing-list-remove.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/mailing-list-remove.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,12 @@ + +You've been removed from the @mailing_list_name@ mailing list + +

    You've been removed from the @mailing_list_name@ mailing list

    + +
    +

    To re-add yourself anytime, go to @re_add_link@

    +

    To see your other subscriptions (if any), return to @back_to_account_link@.

    + @continue_shopping_options@ +
    + + Index: openacs-4/packages/ecommerce/www/order.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/order.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/order.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,8 @@ + +Your Order + +

    Your Order

    + +
    + @order_summary@ +
    \ No newline at end of file Index: openacs-4/packages/ecommerce/www/payment.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/payment.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/payment.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,60 @@ + +Payment Info +checkout {Enter Payment Info} + +

    Payment Info

    + +
    + +

    Your order will not be complete until you have confirmed the + total in the next step. <%= [ec_system_name] %> will not charge your + card without your confirmation of the total.

    + +
    + + +

    Your gift certificate balance covers the total cost of your + order. No need to enter any payment information!

    +     + + +

    Your gift certificate balance takes care of + @certificate_amount@ of your order! Please enter credit card + information to pay for the rest.

    +     +     + + +

    Click here to claim a + new gift certificate

    + + +

    Since we already have a credit card on file for you, you + can just click on the button next to it to use it for this + order.

    +

    @old_cards_to_choose_from@

    +

    Or enter a new credit card for billing:

    +

    If you're using a new card, please enter the full credit card number below.

    +     + + + + + + + + + + + + + +
    Credit card number:
    Type:@ec_creditcard_widget@
    Expires:@ec_expires_widget@
    +     + +
    + +
    + +
    +
    Index: openacs-4/packages/ecommerce/www/product-search.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/product-search.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/product-search.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,11 @@ + +@category_name@ + +

    @category_name@:

    + +
    + @search_results@ +
    + + + Index: openacs-4/packages/ecommerce/www/product.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/product.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/product.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,5 @@ + +@product_name@ +@category_id@ + +@formatted_product@ Index: openacs-4/packages/ecommerce/www/review-submit-2.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/review-submit-2.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/review-submit-2.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,20 @@ + +Check Your Review + +

    Check your review of @product_name@

    + +
    +
    + @hidden_form_variables@ +

    Here is your review the way it will appear:

    +
    +

    @review_as_it_will_appear@

    +
    +

    If this isn't the way you want it to look, please back up using + your browser and edit your review. Submissions become the + property of @system_name@.

    +
    + +
    +
    +
    \ No newline at end of file Index: openacs-4/packages/ecommerce/www/review-submit-3.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/review-submit-3.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/review-submit-3.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,20 @@ + +Thank you for your review of @product_name@ + +

    Thank you for your review of @product_name@

    + +
    + +

    Your review has been received. Thanks for sharing your + thoughts with us! It can take a few days for your review to + appear on our web site. If your review has not appeared on our + site and you would like to know why, please send an email to @system_owner_email@.

    +     + +

    Your review has been received. Thanks for sharing your + thoughts with us! Your review is now viewable from the + @product_name page@.

    +     +

    Return to the item you just reviewed.

    +
    Index: openacs-4/packages/ecommerce/www/review-submit.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/review-submit.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/review-submit.adp 26 May 2002 05:09:57 -0000 1.1 @@ -0,0 +1,24 @@ + +Write your own review of $product_name + +

    Write your own review of @product_name@

    + +
    + +
      +
    1. +

      What is your rating of this product?

      + @rating_widget@ +
      2. +

    2. Please enter a headline for your review:

      + +
      3. +
    3. +

      Enter your review below: (maximum of 1,000 words)

      +