Index: openacs-4/contrib/packages/survey/www/respond.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/survey/www/Attic/respond.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/survey/www/respond.xql	19 Sep 2003 16:48:03 -0000	1.1
+++ openacs-4/contrib/packages/survey/www/respond.xql	26 Jan 2004 15:39:41 -0000	1.2
@@ -1,6 +1,16 @@
 <?xml version="1.0"?>
 <queryset>
 
+<fullquery name="count_responses">      
+      <querytext>
+	select count(*) as number_of_responses, max(response_id) as max_response_id from survey_responses, acs_objects	
+	where survey_id=:survey_id
+	and creation_user=:user_id
+	and object_id=response_id
+	and initial_response_id is null
+      </querytext>
+</fullquery>
+
 <fullquery name="survey_exists">      
       <querytext>
 	    select 1 from surveys where survey_id = :survey_id