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.2 -r1.3
--- openacs-4/packages/notifications/tcl/notification-procs.xql	29 May 2002 05:12:01 -0000	1.2
+++ openacs-4/packages/notifications/tcl/notification-procs.xql	30 May 2002 06:26:09 -0000	1.3
@@ -1,6 +1,18 @@
 <?xml version="1.0"?>
 <queryset>
 
+<fullquery name="notification::get_interval_id.select_interval_id">
+<querytext>
+select interval_id from notification_intervals where name= :name
+</querytext>
+</fullquery>
+
+<fullquery name="notification::get_delivery_method_id.select_delivery_method_id">
+<querytext>
+select delivery_method_id from notification_delivery_methods where short_name= :name
+</querytext>
+</fullquery>
+
 <fullquery name="notification::get_all_intervals.select_all_intervals">
 <querytext>
 select name, interval_id from