Index: openacs-4/packages/calendar/tcl/calendar-display-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/Attic/calendar-display-procs-postgresql.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/calendar/tcl/calendar-display-procs-postgresql.xql 25 Mar 2002 15:16:53 -0000 1.1
+++ openacs-4/packages/calendar/tcl/calendar-display-procs-postgresql.xql 14 May 2002 05:06:29 -0000 1.2
@@ -107,6 +107,38 @@
+
+
+ select to_char(start_date, 'HH24') as start_hour,
+ to_char(start_date, 'HH:MIpm') as pretty_start_date,
+ to_char(end_date, 'HH:MIpm') as pretty_end_date,
+ coalesce(e.name, a.name) as name,
+ coalesce(e.status_summary, a.status_summary) as status_summary,
+ e.event_id as item_id,
+ recurrence_id,
+ (select type from cal_item_types where item_type_id= cal_items.item_type_id) as item_type
+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 start_date between
+ to_date(:start_date,:date_format) and
+ to_date(:end_date,:date_format)
+and e.event_id
+in (
+ select cal_item_id
+ from cal_items
+ where on_which_calendar = :calendar_id
+ )
+order by $sort_by
+
+
+
+
+
select to_char(start_date, 'HH24') as start_hour,