Index: openacs-4/packages/calendar/www/admin/cal-item-permissions-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/cal-item-permissions-oracle.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/cal-item-permissions-oracle.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,40 @@
+
+
+
+ oracle8.1.6
+
+
+
+
+ select acs_object.name(:party_id)
+ from dual
+
+
+
+
+
+
+
+
+ select acs_object.name(party_id)
+ as pretty_name,
+ party_id
+ from parties
+
+
+
+
+
+
+
+
+ select unique(grantee_id) as party_id,
+ acs_object.name(grantee_id) as name
+ from acs_permissions
+ where object_id = :cal_item_id
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/cal-item-permissions-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/cal-item-permissions-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/cal-item-permissions-postgresql.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,40 @@
+
+
+
+ postgresql7.1
+
+
+
+
+ select acs_object__name(:party_id)
+ from dual
+
+
+
+
+
+
+
+
+ select acs_object__name(party_id)
+ as pretty_name,
+ party_id
+ from parties
+
+
+
+
+
+
+
+
+ select unique(grantee_id) as party_id,
+ acs_object__name(grantee_id) as name
+ from acs_permissions
+ where object_id = :cal_item_id
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/cal-item-permissions.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/cal-item-permissions.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/cal-item-permissions.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,28 @@
+
+
+
+
+
+
+ select unique(child_privilege) as privilege
+ from acs_privilege_hierarchy
+ where child_privilege like 'cal_item%'
+
+
+
+
+
+
+
+
+ select privilege
+ from acs_object_party_privilege_map
+ where party_id = :party_id
+ and object_id = :cal_item_id
+ and privilege like '%cal_item%'
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/calendar-permissions-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/calendar-permissions-oracle.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/calendar-permissions-oracle.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,28 @@
+
+
+
+ oracle8.1.6
+
+
+
+
+ select acs_object.name(:party_id)
+ from dual
+
+
+
+
+
+
+
+
+ select acs_object.name(party_id)
+ as pretty_name,
+ party_id
+ from parties
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/calendar-permissions-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/calendar-permissions-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/calendar-permissions-postgresql.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,28 @@
+
+
+
+ postgresql7.1
+
+
+
+
+ select acs_object__name(:party_id)
+ from dual
+
+
+
+
+
+
+
+
+ select acs_object__name(party_id)
+ as pretty_name,
+ party_id
+ from parties
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/calendar-permissions.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/calendar-permissions.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/calendar-permissions.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,28 @@
+
+
+
+
+
+
+ select unique(child_privilege) as privilege
+ from acs_privilege_hierarchy
+ where child_privilege like 'calendar%'
+
+
+
+
+
+
+
+
+ select privilege
+ from acs_object_party_privilege_map
+ where object_id = :calendar_id
+ and party_id = :party_id
+ and privilege like '%calendar%'
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/calendar-preferences-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/calendar-preferences-oracle.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/calendar-preferences-oracle.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,46 @@
+
+
+
+ oracle8.1.6
+
+
+
+
+ select acs_object.name(:party_id)
+ from dual
+
+
+
+
+
+
+
+
+
+ select unique(object_id) as calendar_id,
+ calendar.name(object_id) as calendar_name,
+ calendar.show_p(object_id, :party_id) as show_p
+ from acs_object_party_privilege_map
+ where calendar.readable_p(object_id, :party_id) = 't'
+ and party_id = :party_id
+ and acs_object_util.object_type_p(object_id, 'calendar') = 't'
+ and calendar.private_p(object_id) = 'f'
+
+ union
+
+ select cal_item.on_which_calendar(object_id) as calendar_id,
+ calendar.name(cal_item.on_which_calendar(object_id)) as calendar_name,
+ calendar.show_p(cal_item.on_which_calendar(object_id), :party_id) as show_p
+ from acs_object_party_privilege_map
+ where privilege = 'cal_item_read'
+ and party_id = :party_id
+ and acs_object_util.object_type_p(object_id, 'cal_item') = 't'
+ and calendar.private_p(cal_item.on_which_calendar(object_id)) = 'f'
+
+
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/calendar-preferences-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/calendar-preferences-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/calendar-preferences-postgresql.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,46 @@
+
+
+
+ postgresql7.1
+
+
+
+
+ select acs_object__name(:party_id)
+ from dual
+
+
+
+
+
+
+
+
+
+ select unique(object_id) as calendar_id,
+ calendar__name(object_id) as calendar_name,
+ calendar__show_p(object_id, :party_id) as show_p
+ from acs_object_party_privilege_map
+ where calendar__readable_p(object_id, :party_id) = 't'
+ and party_id = :party_id
+ and acs_object_util__object_type_p(object_id, 'calendar') = 't'
+ and calendar__private_p(object_id) = 'f'
+
+ union
+
+ select cal_item__on_which_calendar(object_id) as calendar_id,
+ calendar__name(cal_item__on_which_calendar(object_id)) as calendar_name,
+ calendar__show_p(cal_item__on_which_calendar(object_id), :party_id) as show_p
+ from acs_object_party_privilege_map
+ where privilege = 'cal_item_read'
+ and party_id = :party_id
+ and acs_object_util__object_type_p(object_id, 'cal_item') = 't'
+ and calendar__private_p(cal_item__on_which_calendar(object_id)) = 'f'
+
+
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/index-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/index-oracle.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/index-oracle.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,24 @@
+
+
+
+ oracle8.1.6
+
+
+
+
+ select calendar_id,
+ calendar_name
+ from calendars
+ where owner_id = :user_id
+ and acs_permission.permission_p(
+ calendar_id,
+ :user_id,
+ 'calendar_admin'
+ ) = 't'
+ order by calendar_name
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/index-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/index-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/index-postgresql.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,24 @@
+
+
+
+ postgresql7.1
+
+
+
+
+ select calendar_id,
+ calendar_name
+ from calendars
+ where owner_id = :user_id
+ and acs_permission__permission_p(
+ calendar_id,
+ :user_id,
+ 'calendar_admin'
+ ) = 't'
+ order by calendar_name
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/one-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/one-oracle.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/one-oracle.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,18 @@
+
+
+
+ oracle8.1.6
+
+
+
+
+ select unique(grantee_id) as party_id,
+ acs_object.name(grantee_id) as name
+ from acs_permissions
+ where object_id = :calendar_id
+
+
+
+
+
+
Index: openacs-4/packages/calendar/www/admin/one-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/admin/Attic/one-postgresql.xql,v
diff -u
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/calendar/www/admin/one-postgresql.xql 5 Sep 2001 05:48:18 -0000 1.1
@@ -0,0 +1,18 @@
+
+
+
+ postgresql7.1
+
+
+
+
+ select unique(grantee_id) as party_id,
+ acs_object__name(grantee_id) as name
+ from acs_permissions
+ where object_id = :calendar_id
+
+
+
+
+
+