Index: openacs-4/packages/simple-survey/www/admin/view-text-responses-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/view-text-responses-oracle.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/simple-survey/www/admin/view-text-responses-oracle.xql 2 Jul 2001 21:46:55 -0000 1.1
@@ -0,0 +1,26 @@
+
+
+
+
+
+
+select
+ $column_name as response,
+ person.name(o.creation_user) as respondent_name,
+ o.creation_date as submission_date,
+ o.creation_ip as ip_address
+from
+ survsimp_responses r,
+ survsimp_question_responses qr,
+ acs_objects o
+where
+ qr.response_id = r.response_id
+ and qr.question_id = :question_id
+ and o.object_id = qr.response_id
+ order by submission_date
+
+
+
+
+
+
Index: openacs-4/packages/simple-survey/www/admin/view-text-responses-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/view-text-responses-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/simple-survey/www/admin/view-text-responses-postgresql.xql 2 Jul 2001 21:46:55 -0000 1.1
@@ -0,0 +1,26 @@
+
+
+
+
+
+
+select
+ $column_name as response,
+ person__name(o.creation_user) as respondent_name,
+ o.creation_date as submission_date,
+ o.creation_ip as ip_address
+from
+ survsimp_responses r,
+ survsimp_question_responses qr,
+ acs_objects o
+where
+ qr.response_id = r.response_id
+ and qr.question_id = :question_id
+ and o.object_id = qr.response_id
+ order by submission_date
+
+
+
+
+
+
Index: openacs-4/packages/simple-survey/www/admin/view-text-responses.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/view-text-responses.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/simple-survey/www/admin/view-text-responses.tcl 20 Apr 2001 20:51:22 -0000 1.1
+++ openacs-4/packages/simple-survey/www/admin/view-text-responses.tcl 2 Jul 2001 21:46:55 -0000 1.2
@@ -40,19 +40,18 @@
db_foreach all_responses_to_question "
select
$column_name as response,
- u.user_id,
- first_names || ' ' || last_name as respondent_name,
- submission_date,
- ip_address
+ person.name(o.creation_user) as respondent_name,
+ o.creation_date as submission_date,
+ o.creation_ip as ip_address
from
survsimp_responses r,
survsimp_question_responses qr,
- users u
+ acs_objects o
where
qr.response_id = r.response_id
- and u.user_id = r.user_id
and qr.question_id = :question_id
-order by r.submission_date" {
+ and o.object_id = qr.response_id
+ order by submission_date" {
append results "
$response
Index: openacs-4/packages/simple-survey/www/admin/view-text-responses.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/view-text-responses.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/simple-survey/www/admin/view-text-responses.xql 15 Jun 2001 01:06:40 -0000 1.1
+++ openacs-4/packages/simple-survey/www/admin/view-text-responses.xql 2 Jul 2001 21:46:55 -0000 1.2
@@ -20,26 +20,4 @@
-
-
-
-select
- $column_name as response,
- u.user_id,
- first_names || ' ' || last_name as respondent_name,
- submission_date,
- ip_address
-from
- survsimp_responses r,
- survsimp_question_responses qr,
- users u
-where
- qr.response_id = r.response_id
- and u.user_id = r.user_id
- and qr.question_id = :question_id
-order by r.submission_date
-
-
-
-