Index: openacs-4/packages/notifications/tcl/notification-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-procs.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/notifications/tcl/notification-procs.xql	1 Aug 2002 12:56:16 -0000	1.6
+++ openacs-4/packages/notifications/tcl/notification-procs.xql	25 Feb 2003 10:07:13 -0000	1.7
@@ -52,6 +52,26 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="notification::new.select_notification_requests">
+        <querytext>
+            select user_id, interval_id, delivery_method_id, format
+            from   notification_requests
+            where  type_id = :type_id
+            and    object_id = :object_id
+        </querytext>
+    </fullquery>
+
+    <fullquery name="notification::new.select_notified">
+        <querytext>
+            select user_id, 
+                   interval_id, 
+                   delivery_method_id
+            from   notification_requests
+            where  type_id = :type_id
+            and    object_id = :object_id
+        </querytext>
+    </fullquery>
+
     <fullquery name="notification::delete.delete_mappings">
         <querytext>
             delete