Index: openacs-4/packages/assessment/www/asm-admin/send-mail.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/send-mail.xql,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/assessment/www/asm-admin/send-mail.xql	7 Oct 2007 22:36:54 -0000	1.2
+++ openacs-4/packages/assessment/www/asm-admin/send-mail.xql	29 May 2018 17:54:36 -0000	1.3
@@ -24,4 +24,26 @@
 	</querytext>
     </fullquery>
 
+    <partialquery name="responded">
+	<querytext>
+ 		select parties.email
+            from parties
+            where
+                parties.party_id in (
+		select s.subject_id
+		from as_sessions s, cr_revisions r
+		where s.assessment_id = r.revision_id
+		and s.completed_datetime is not null
+		and r.item_id = :assessment_id)
+	</querytext>
+    </partialquery>
+    
+    <partialquery name="list_of_user_ids">
+	<querytext>
+ 	  select parties.email
+            from parties
+            where parties.party_id in ([template::util::tcl_to_sql_list $user_ids])
+	</querytext>
+    </partialquery>    
+
 </queryset>