Index: openacs-4/packages/calendar/tcl/calendar-community-core-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/Attic/calendar-community-core-procs.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/tcl/calendar-community-core-procs.xql	15 Oct 2001 21:08:43 -0000	1.1
@@ -0,0 +1,12 @@
+<?xml version="1.0"?>
+<queryset>
+
+<fullquery name="cc_member_of_groups.get_all_party_ids">      
+    <querytext>
+    select   group_id 
+    from     group_member_index
+    where    member_id = :member_id
+    </querytext>
+</fullquery>
+ 
+</queryset>
Index: openacs-4/packages/calendar/www/cal-monthview-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/Attic/cal-monthview-oracle.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/cal-monthview-oracle.xql	15 Oct 2001 21:08:43 -0000	1.1
@@ -0,0 +1,56 @@
+<?xml version="1.0"?>
+
+<queryset>
+   <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
+
+<fullquery name="get_monthly_items">      
+      <querytext>
+      
+	select   to_char(start_date, 'j') as start_date,
+        	 nvl(e.name, a.name) as name,
+         	 nvl(e.description, a.description) as description,
+         	 e.event_id as item_id
+	from     acs_activities a,
+	         acs_events e,
+        	 timespans s,
+	         time_intervals t
+	where    e.timespan_id = s.timespan_id
+	and      s.interval_id = t.interval_id
+	and      e.activity_id = a.activity_id
+	and      e.event_id
+	in       (
+        	 select  cal_item_id
+	         from    cal_items
+	         where   on_which_calendar = :calendar_id
+        	 )
+	
+      </querytext>
+</fullquery>
+
+ 
+<fullquery name="get_monthly_items">      
+      <querytext>
+      
+	select   to_char(start_date, 'j') as start_date,
+	         nvl(e.name, a.name) as name,
+	         nvl(e.description, a.description) as description,
+	         e.event_id as item_id
+	from     acs_activities a,
+	         acs_events e,
+	         timespans s,
+	         time_intervals t
+	where    e.timespan_id = s.timespan_id
+	and      s.interval_id = t.interval_id
+	and      e.activity_id = a.activity_id
+	and      e.event_id
+	in       (
+	         select  cal_item_id
+	         from    cal_items
+	         where   on_which_calendar = :calendar_id
+         )
+	
+      </querytext>
+</fullquery>
+
+ 
+</queryset>