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 -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>
 
Index: openacs-4/packages/survey/www/admin/view-text-responses-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/view-text-responses-oracle.xql,v
diff -u -r1.2.4.1 -r1.2.4.2
--- openacs-4/packages/survey/www/admin/view-text-responses-oracle.xql	24 Aug 2004 21:42:33 -0000	1.2.4.1
+++ openacs-4/packages/survey/www/admin/view-text-responses-oracle.xql	25 Aug 2004 17:22:02 -0000	1.2.4.2
@@ -4,11 +4,12 @@
 
 <fullquery name="all_responses_to_question">      
     <querytext>
-       select
-          $column_name as response,
+
+      select
+          $column_name as response, initial_user_id,
           person.name(initial_user_id) as respondent_name,
           o.creation_date as submission_date,
-          o.creation_user,
+          initial_user_id as creation_user,
           o.creation_ip as ip_address
         from
           survey_responses_latest r,
@@ -17,7 +18,7 @@
         where
           qr.response_id = r.response_id
           and qr.question_id = :question_id
-          and o.object_id = initial_user_id
+          and o.object_id = r.response_id
         order by submission_date
 
       </querytext>
Index: openacs-4/packages/survey/www/admin/view-text-responses.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/view-text-responses.adp,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/survey/www/admin/view-text-responses.adp	22 May 2003 15:15:06 -0000	1.4
+++ openacs-4/packages/survey/www/admin/view-text-responses.adp	25 Aug 2004 17:22:02 -0000	1.4.4.1
@@ -4,7 +4,7 @@
 
 <property name="title">#survey.lt_survey_name_Responses_1#</property>
 <property name="context_bar">@context_bar;noquote@</property>
-@question_text@
+@question_text@ 
 <hr />
 <if @responses:rowcount@ eq 0>
 	<em>#survey.No_Responses#</em>