Index: openacs-4/packages/acs-subsite/www/index-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/Attic/index-postgresql.xql,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/index-postgresql.xql 18 Apr 2001 21:36:49 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/index-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.2 @@ -1,23 +1,20 @@ - - postgresql - 7.1 - +postgresql7.1 - - - select acs_object__name(:package_id) - - + + + select acs_object__name(:package_id) from dual + + - - + + select site_node__url(n.node_id) as url, acs_object__name(n.object_id) as name from site_nodes n where n.parent_id = :node_id and n.object_id is not null - - + + Index: openacs-4/packages/acs-subsite/www/admin/index-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/Attic/index-postgresql.xql,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/admin/index-postgresql.xql 19 Apr 2001 16:37:59 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/admin/index-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.2 @@ -1,18 +1,15 @@ - - postgresql - 7.1 - +postgresql7.1 - - + + select site_node__url(node_id) as acs_admin_url, instance_name from site_nodes s, apm_packages p where s.object_id = p.package_id and p.package_key = 'acs-admin' limit 1 - - + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/auto-mount-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/Attic/auto-mount-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/auto-mount-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,14 @@ + + +postgresql7.1 + + + + select site_node__url(s.node_id) as return_url + from site_nodes s, apm_packages p + where s.object_id = p.package_id + and s.node_id = :node_id + + + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/delete-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/Attic/delete-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/delete-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,11 @@ + + +postgresql7.1 + + + + select site_node__delete(:node_id) + + + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/delete.tcl,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/admin/site-map/delete.tcl 13 Mar 2001 22:59:26 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/admin/site-map/delete.tcl 22 Apr 2001 16:13:15 -0000 1.2 @@ -21,7 +21,7 @@ }] } - db_dml node_delete { + db_exec_plsql node_delete { begin site_node.delete(:node_id); end; Index: openacs-4/packages/acs-subsite/www/admin/site-map/index-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/index-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/index-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,74 @@ + + +postgresql7.1 + + + + select node_id, name, directory_p, tree_level(tree_sortkey) as level, + acs_object__name(object_id) as obj_name, + acs_permission__permission_p(object_id, :user_id, 'admin') as admin_p + from site_nodes + where tree_sortkey like (select tree_sortkey from site_nodes where node_id = :root_id) || '%' + order by level desc + + + + + +select site_node__node_id('/', null) + + + + + +select package_id, + package_key, + apm_package_type__num_parameters(package_key) as parameter_count, + node_id, url, parent_url, name, root_p, mylevel - 1 as mylevel, object_id, + object_name, directory_p, parent_id, n_children, + (select case when acs_permission__permission_p(object_id, :user_id, 'admin') = 't' then 1 else 0 end) as object_admin_p +from apm_packages p right outer join ( + select node_id, site_node__url(node_id) as url, + site_node__url(parent_id) as parent_url, + name, + (select count(*) + from site_nodes + where parent_id = n.node_id) as n_children, + case when node_id = site_node__node_id('/', null) then 1 else 0 end as root_p, + tree_level(tree_sortkey) as mylevel, + object_id, + acs_object__name(object_id) as object_name, + directory_p, + parent_id + from site_nodes n + where (object_id is null or + acs_permission__permission_p(object_id, :user_id, 'read') = 't') and + tree_sortkey like (select tree_sortkey from site_nodes where node_id = coalesce(:root_id, site_node__node_id('/', null))) || '%' and + (parent_id is null or parent_id in ([join $expand ", "]))) site_map + on site_map.object_id = p.package_id + + + + + + select package_key, pretty_name + from apm_package_types + where not (apm_package__singleton_p(package_key) = 1 and + apm_package__num_instances(package_key) >= 1) + order by pretty_name + + + + + + select package_id, ap.package_key, acs_object__name(package_id) as instance_name, + apm_package_type__num_parameters(ap.package_key) as parameter_count + from apm_packages ap, apm_package_types + where ap.package_key = apm_package_types.package_key + and package_type = 'apm_service' + and (acs_permission__permission_p(package_id, :user_id, 'read') = 't' or + acs_permission__permission_p(package_id, acs__magic_object_id('the_public'), 'read') = 't') + + + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/instance-delete-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/Attic/instance-delete-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/instance-delete-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,27 @@ + + +postgresql7.1 + + + + select case when count(*) = 0 then 0 else 1 end + from apm_packages p, site_nodes s + where package_id = :package_id + and p.package_id = s.object_id + + + + + + select apm_package__delete(:package_id) + + + + + + select case when count(*) = 0 then 0 else 1 end from apm_packages + where package_id = :package_id + + + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/mount-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/mount-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/mount-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,55 @@ + + +postgresql7.1 + + + + select site_node__url(:node_id) from dual + + + + + + select package_id, acs_object__name(package_id) as name + from + apm_packages + where (acs_permission__permission_p(package_id, :user_id, 'read') = 't' or + acs_permission__permission_p(package_id, acs__magic_object_id('the_public'), 'read') = 't') + and apm_package__singleton_p(package_key) = 0 + and not exists (select 1 + from site_nodes + where object_id = package_id) + order by name + + + + + + select package_id, acs_object__name(package_id) as name + from + apm_packages + where (acs_permission__permission_p(package_id, :user_id, 'read') = 't' or + acs_permission__permission_p(package_id, acs__magic_object_id('the_public'), 'read') = 't') + and exists (select 1 + from site_nodes + where object_id = package_id) + order by name + + + + + + select package_id, acs_object__name(package_id) as name + from + apm_packages + where (acs_permission__permission_p(package_id, :user_id, 'read') = 't' or + acs_permission__permission_p(package_id, acs__magic_object_id('the_public'), 'read') = 't') + and apm_package__singleton_p(package_key) = 1 + and not exists (select 1 + from site_nodes + where object_id = package_id) + order by name + + + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/new-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/Attic/new-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/new-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,39 @@ + + +postgresql7.1 + + + + select case when count(*) = 0 then 0 else 1 end + from site_nodes + where name = :name + and parent_id = :parent_id + and node_id <> :new_node_id + + + + + + + select site_node__new ( + :new_node_id, + :parent_id, + :name, + null, + :directory_p, + :pattern_p, + :user_id, + :ip_address + ) + + + + + + select case when count(*) = 0 then 0 else 1 end + from site_nodes + where node_id = :new_node_id + + + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/package-new-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/Attic/package-new-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/package-new-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,13 @@ + + +postgresql7.1 + + + + select case when count(*) = 0 then 0 else 1 end + from apm_packages + where package_id = :new_package_id + + + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/parameter-set-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/Attic/parameter-set-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/parameter-set-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,13 @@ + + +postgresql7.1 + + + + select package_key, acs_object__name(package_id) as instance_name + from apm_packages + where package_id = :package_id + + + + Index: openacs-4/packages/acs-subsite/www/admin/site-map/unmounted-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/unmounted-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/admin/site-map/unmounted-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,35 @@ + + +postgresql7.1 + + + + select package_id, acs_object__name(package_id) as name + from + apm_packages + where (acs_permission__permission_p(package_id, :user_id, 'read') = 't' or + acs_permission__permission_p(package_id, acs__magic_object_id('the_public'), 'read') = 't') + and apm_package__singleton_p(package_key) = 0 + and not exists (select 1 + from site_nodes + where object_id = package_id) + order by name + + + + + + select package_id, acs_object__name(package_id) as name + from + apm_packages + where (acs_permission__permission_p(package_id, :user_id, 'read') = 't' or + acs_permission__permission_p(package_id, acs__magic_object_id('the_public'), 'read') = 't') + and apm_package__singleton_p(package_key) = 1 + and not exists (select 1 + from site_nodes + where object_id = package_id) + order by name + + + + Index: openacs-4/packages/acs-subsite/www/permissions/grant-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/Attic/grant-2-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/permissions/grant-2-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,11 @@ + + +postgresql7.1 + + + + select acs_permission__grant_permission(:object_id, :party_id, :privilege) + + + + Index: openacs-4/packages/acs-subsite/www/permissions/grant-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/Attic/grant-2.tcl,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/permissions/grant-2.tcl 13 Mar 2001 22:59:26 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/permissions/grant-2.tcl 22 Apr 2001 16:13:15 -0000 1.2 @@ -13,7 +13,7 @@ ad_require_permission $object_id admin -db_dml grant { +db_exec_plsql grant { begin acs_permission.grant_permission(:object_id, :party_id, :privilege); end; Index: openacs-4/packages/acs-subsite/www/permissions/grant-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/Attic/grant-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/permissions/grant-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,18 @@ + + +postgresql7.1 + + + +select acs_object__name(:object_id) from dual + + + + + + select party_id, acs_object__name(party_id) as name + from parties + + + + Index: openacs-4/packages/acs-subsite/www/permissions/index-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/index-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/permissions/index-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,15 @@ + + +postgresql7.1 + + + + select o.object_id, acs_object__name(o.object_id) as name + from acs_objects o, acs_object_party_privilege_map map + where map.object_id = o.object_id + and map.party_id = :user_id + and map.privilege = 'admin' + + + + Index: openacs-4/packages/acs-subsite/www/permissions/one-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/one-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/permissions/one-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,58 @@ + + +postgresql7.1 + + + +select acs_object__name(:object_id) from dual + + + + + + select grantee_id, grantee_name, privilege + from (select grantee_id, acs_object__name(grantee_id) as grantee_name, + privilege, 1 as counter + from acs_permissions_all + where object_id = :object_id + union all + select grantee_id, acs_object__name(grantee_id) as grantee_name, + privilege, -1 as counter + from acs_permissions + where object_id = :object_id) dummy + group by grantee_id, grantee_name, privilege + having sum(counter) > 0 + + + + + + select grantee_id, acs_object__name(grantee_id) as grantee_name, + privilege + from acs_permissions + where object_id = :object_id + + + + + + select acs_object__name(context_id) + from acs_objects + where object_id = :object_id + + + + + + select object_id as c_object_id,acs_object__name(object_id) as c_name + from acs_objects o + where context_id = :object_id + and exists (select 1 + from acs_object_party_privilege_map + where object_id = o.object_id + and party_id = :user_id + and privilege = 'admin') + + + + Index: openacs-4/packages/acs-subsite/www/permissions/revoke-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/Attic/revoke-2-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/permissions/revoke-2-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,11 @@ + + +postgresql7.1 + + + + select acs_permission__revoke_permission(:object_id, :party_id, :privilege) + + + + Index: openacs-4/packages/acs-subsite/www/permissions/revoke-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/revoke-2.tcl,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/permissions/revoke-2.tcl 13 Mar 2001 22:59:26 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/permissions/revoke-2.tcl 22 Apr 2001 16:13:15 -0000 1.2 @@ -18,7 +18,7 @@ foreach item $revoke_list { set party_id [lindex $item 0] set privilege [lindex $item 1] - db_dml revoke { + db_exec_plsql revoke { begin acs_permission.revoke_permission(:object_id, :party_id, :privilege); end; Index: openacs-4/packages/acs-subsite/www/permissions/revoke-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/Attic/revoke-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/permissions/revoke-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,18 @@ + + +postgresql7.1 + + + +select acs_object__name(:object_id) +from dual + + + + + +select acs_object__name(:party_id) from dual + + + + Index: openacs-4/packages/acs-subsite/www/permissions/revoke.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/revoke.tcl,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/permissions/revoke.tcl 13 Mar 2001 22:59:26 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/permissions/revoke.tcl 22 Apr 2001 16:13:15 -0000 1.2 @@ -32,7 +32,7 @@ foreach item $revoke_list { set party_id [lindex $item 0] set privilege [lindex $item 1] - doc_body_append "
  • [db_string name {select acs_object.name(:party_id) from dual}]
    • \n" + doc_body_append "
  • [db_string party_name {select acs_object.name(:party_id) from dual}]
    • \n" } doc_body_append " Index: openacs-4/packages/acs-subsite/www/permissions/toggle-inherit-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/Attic/toggle-inherit-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/permissions/toggle-inherit-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,13 @@ + + +postgresql7.1 + + + + update acs_objects + set security_inherit_p = case when security_inherit_p = 't' then 'f' else 't' end + where object_id = :object_id + + + + Index: openacs-4/packages/acs-subsite/www/pvt/alerts-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/pvt/Attic/alerts-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/pvt/alerts-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,39 @@ + + +postgresql7.1 + + + +select first_names, last_name, email, url from persons, parties where persons.person_id = parties.party_id and party_id =:user_id + + + + + + select bea.valid_p, bea.frequency, bea.keywords, bt.topic, bea.rowid + from bboard_email_alerts bea, bboard_topics bt + where bea.user_id = :user_id + and bea.topic_id = bt.topic_id + order by bea.frequency + + + + + + select cea.valid_p, + ad.domain, + cea.alert_id, + cea.expires, + cea.frequency, + cea.alert_type, + cea.category, + cea.keywords + from classified_email_alerts cea, ad_domains ad + where user_id = :user_id + and ad.domain_id = cea.domain_id + and sysdate <= expires + order by expires desc + + + + Index: openacs-4/packages/acs-subsite/www/pvt/home-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/pvt/Attic/home-postgresql.xql,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/pvt/home-postgresql.xql 19 Apr 2001 16:38:02 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/pvt/home-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.2 @@ -1,28 +1,26 @@ - - postgresql - 7.1 - +postgresql7.1 - - + + select first_names, last_name, email, url, coalesce(screen_name,'&lt; none set up &gt;') as screen_name - from cc_users + from cc_users where user_id=:user_id - - + + - - + + select cr.publish_date, coalesce(cr.title,'your portrait') as portrait_title from cr_revisions cr, cr_items ci, acs_rels a where cr.revision_id = ci.live_revision and ci.item_id = a.object_id_two and a.object_id_one = :user_id and a.rel_type = 'user_portrait_rel' - - + + + Index: openacs-4/packages/acs-subsite/www/pvt/toggle-dont-spam-me-p-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/pvt/toggle-dont-spam-me-p-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/pvt/toggle-dont-spam-me-p-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,11 @@ + + +postgresql7.1 + + + +update user_preferences set dont_spam_me_p = util__logical_negation(dont_spam_me_p) where user_id = :user_id + + + + Index: openacs-4/packages/acs-subsite/www/pvt/unsubscribe-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/pvt/Attic/unsubscribe-2-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/pvt/unsubscribe-2-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,20 @@ + + +postgresql7.1 + + + +select rel_id +from group_member_map +where group_id = acs__magic_object_id('registered_users') + and member_id = :user_id + + + + + + select membership_rel__deleted(:rel_id); + + + + Index: openacs-4/packages/acs-subsite/www/pvt/unsubscribe-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/pvt/Attic/unsubscribe-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/pvt/unsubscribe-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,13 @@ + + +postgresql7.1 + + + +select no_alerts_until, acs_user__receives_alerts_p(:user_id) as on_vacation_p +from users +where user_id = :user_id + + + + Index: openacs-4/packages/acs-subsite/www/shared/community-member-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/community-member-postgresql.xql,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/shared/community-member-postgresql.xql 19 Apr 2001 16:38:05 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/shared/community-member-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.2 @@ -1,18 +1,15 @@ - - postgresql - 7.1 - +postgresql7.1 - - - select at.pretty_name, at.pretty_plural, a.creation_date, acs_object__name(a.object_id) as object_name + + +select at.pretty_name, at.pretty_plural, a.creation_date, acs_object__name(a.object_id) as object_name from acs_objects a, acs_object_types at where a.object_type = at.object_type and a.creation_user = :user_id order by object_name, creation_date - - + + Index: openacs-4/packages/acs-subsite/www/shared/whos-online-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/Attic/whos-online-postgresql.xql,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/shared/whos-online-postgresql.xql 22 Apr 2001 16:13:15 -0000 1.1 @@ -0,0 +1,14 @@ + + +postgresql7.1 + + + +select user_id, first_names, last_name, email +from cc_users +where last_visit > now() - '[ad_parameter LastVisitUpdateInterval "" 600] seconds'::interval +order by upper(last_name), upper(first_names), upper(email) + + + +