Index: openacs-4/packages/calendar/tcl/cal-item-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/cal-item-procs.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/calendar/tcl/cal-item-procs.xql	23 Feb 2002 21:11:29 -0000	1.3
+++ openacs-4/packages/calendar/tcl/cal-item-procs.xql	14 May 2002 05:06:29 -0000	1.4
@@ -12,6 +12,12 @@
       </querytext>
 </fullquery>
 
+<fullquery name="cal_item_update.select_recurrence_id">
+<querytext>
+select recurrence_id from acs_events where event_id= :cal_item_id
+</querytext>
+</fullquery>
+
 <fullquery name="cal_item_update.update_activity">
     <querytext>
     update acs_activities 
@@ -38,5 +44,42 @@
            )
     </querytext>
 </fullquery>
+
+<fullquery name="cal_item_edit_recurrence.select_recurrence_id">
+<querytext>
+select recurrence_id from acs_events where event_id= :event_id
+</querytext>
+</fullquery>
+
+<fullquery name="cal_item_edit_recurrence.recurrence_activities_update">
+    <querytext>
+    update acs_activities 
+    set    name = :name,
+           description = :description
+    where  activity_id
+    in     (
+           select activity_id
+           from   acs_events
+           where  recurrence_id = :recurrence_id
+           )
+    </querytext>
+</fullquery>
+
+<fullquery name="cal_item_edit_recurrence.recurrence_events_update">
+    <querytext>
+    update acs_events set
+    name= :name, description= :description
+    where recurrence_id= :recurrence_id
+    </querytext>
+</fullquery>
+
+
+<fullquery name="cal_item_edit_recurrence.recurrence_items_update">
+    <querytext>
+    update cal_items set
+    item_type_id= :item_type_id
+    where cal_item_id in (select event_id from acs_events where recurrence_id= :recurrence_id)
+    </querytext>
+</fullquery>
  
 </queryset>