Index: openacs-4/packages/ecommerce/www/admin/customer-service/interaction-summary.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/customer-service/interaction-summary.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ecommerce/www/admin/customer-service/interaction-summary.adp 24 Aug 2008 11:12:48 -0000 1.1 @@ -0,0 +1,10 @@ + + @title;noquote@ + @context;noquote@ +

@title@

+ +

Customer: @customer_html;noquote@

+

+

+@interaction_summary_html;noquote@ +
Index: openacs-4/packages/ecommerce/www/admin/customer-service/interaction-summary.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/customer-service/interaction-summary.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/ecommerce/www/admin/customer-service/interaction-summary.tcl 9 Mar 2004 00:59:47 -0000 1.3 +++ openacs-4/packages/ecommerce/www/admin/customer-service/interaction-summary.tcl 24 Aug 2008 11:12:48 -0000 1.4 @@ -15,31 +15,17 @@ ad_require_permission [ad_conn package_id] admin -set page_title "Interaction Summary" -append doc_body "[ad_admin_header $page_title] -

$page_title

+set title "Interaction Summary" +set context [list [list index "Customer Service"] $title] -[ad_context_bar [list "../index.tcl" "Ecommerce([ec_system_name])"] [list "index.tcl" "Customer Service Administration"] $page_title] - -
- -Customer: -" - - - +set customer_html "" if { [info exists user_id] } { - append doc_body "Registered user: [db_string get_full_name "select first_names || ' ' || last_name from cc_users where user_id=:user_id"]" + append customer_html "Registered user: [db_string get_full_name "select first_names || ' ' || last_name from cc_users where user_id=:user_id"]" } else { - append doc_body "[ec_user_identification_summary $user_identification_id]" + append customer_html "[ec_user_identification_summary $user_identification_id]" } -append doc_body "

-

-" - if { [info exists user_id] } { - set sql "select a.issue_id, a.action_id, a.interaction_id, a.action_details, a.follow_up_required, i.customer_service_rep, i.interaction_date, to_char(i.interaction_date,'YYYY-MM-DD HH24:MI:SS') as full_interaction_date, i.interaction_originator, i.interaction_type, reps.first_names || ' ' || reps.last_name as rep_name from ec_customer_service_actions a, ec_customer_serv_interactions i, ec_user_identification id, users reps where a.interaction_id=i.interaction_id @@ -59,57 +45,25 @@ set old_interaction_id "" set action_counter 0 +set interaction_summary_html "" db_foreach get_interaction_summary $sql { incr action_counter - - if { [string compare $interaction_id $old_interaction_id] != 0 } { - append doc_body "

-
- - [ec_formatted_full_date $full_interaction_date]
- + append interaction_summary_html "
+ -
[ec_formatted_full_date $full_interaction_date]
Rep$rep_name
Originator$interaction_originator
Via$interaction_type
- -
- " + " } - - append doc_body "

+ append interaction_summary_html "
- - " + \n" if { ![empty_string_p $follow_up_required] } { - append doc_body " - " + append interaction_summary_html "\n" } - append doc_body "
Issue ID: $issue_id
-
- Details: -
- [ec_display_as_html $action_details] -
-
-

Details:[ec_display_as_html $action_details]

-
- Follow-up Required: -
- [ec_display_as_html $follow_up_required] -
-
-

Follow-up Required: [ec_display_as_html $follow_up_required]

- " - + append interaction_summary_html "" set old_interaction_id $interaction_id } -append doc_body "

-[ad_admin_footer] -" - - -doc_return 200 text/html $doc_body \ No newline at end of file