Index: openacs-4/packages/survey/tcl/survey-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/tcl/survey-procs-postgresql.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/survey/tcl/survey-procs-postgresql.xql	30 Nov 2002 17:50:15 -0000	1.4
+++ openacs-4/packages/survey/tcl/survey-procs-postgresql.xql	9 Jan 2003 01:38:48 -0000	1.5
@@ -44,6 +44,15 @@
     </querytext>
 </fullquery>
 
+<fullquery name="get_survey_info.n_completed">
+<querytext>
+    		    select count(distinct survey_response__initial_user_id(response_id))
+                    from 
+		    survey_responses
+		    where survey_id=:survey_id
+</querytext>
+</fullquery>
+
 <fullquery name="survey_copy.survey_create">
 <querytext>
         select survey__new (