Index: openacs-4/packages/survey/tcl/survey-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey/tcl/survey-procs-oracle.xql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/survey/tcl/survey-procs-oracle.xql 4 Nov 2002 02:42:46 -0000 1.2 +++ openacs-4/packages/survey/tcl/survey-procs-oracle.xql 30 Nov 2002 17:50:15 -0000 1.3 @@ -79,24 +79,21 @@ - - - select r.initial_response_id, r.responding_user_id, r.response_id, + + + select r.initial_response_id, r.responding_user_id, r.response_id, u.first_names || ' ' || u.last_name as user_name, edit_p, o.creation_date as response_date - from (select survey_response.initial_user_id(response_id) as respon\ -ding_user_id, - survey_response.initial_response_id(response_id) as initial_r\ -esponse_id, - response_id, (case when initial_response_id is NULL then 'f' \ -else 't' end) as edit_p + from (select survey_response.initial_user_id(response_id) as responding_user_id, + survey_response.initial_response_id(response_id) as initial_response_id, + response_id, (case when initial_response_id is NULL then 'f' else 't' end) as edit_p from survey_responses) r, acs_objects o, cc_users u where r.response_id=:response_id and r.responding_user_id = u.user_id and r.response_id = o.object_id - - + +