Index: openacs-4/packages/survey/www/admin/one-respondent-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/one-respondent-oracle.xql,v
diff -u -N -r1.2 -r1.2.4.1
--- openacs-4/packages/survey/www/admin/one-respondent-oracle.xql	10 Oct 2003 14:41:45 -0000	1.2
+++ openacs-4/packages/survey/www/admin/one-respondent-oracle.xql	25 Aug 2004 17:22:02 -0000	1.2.4.1
@@ -6,12 +6,16 @@
  
 <fullquery name="get_responses">      
       <querytext>
-      select response_id, case when initial_response_id is NULL then 'T' else 'F' end as original_p, nvl(initial_response_id,response_id) as initial_response, creation_date 
-from survey_responses, acs_objects
+
+     select response_id, case when initial_response_id is NULL then 'T' else 'F' e\
+nd as original_p, nvl(initial_response_id,response_id) as initial_response, creatio\
+n_date
+ from survey_responses, acs_objects
 where response_id = object_id
-and creation_user = :user_id
+and survey_response.initial_user_id(response_id) = :user_id
 and survey_id=:survey_id
-order by creation_date desc
+order by nvl(initial_response_id,response_id) desc, creation_date desc
+
       </querytext>
 </fullquery>