Index: openacs-4/packages/dotlrn/www/admin/users-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/Attic/users-oracle.xql,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/dotlrn/www/admin/users-oracle.xql 10 Dec 2001 23:58:31 -0000 1.1 +++ openacs-4/packages/dotlrn/www/admin/users-oracle.xql 12 Jan 2002 09:27:16 -0000 1.2 @@ -1,12 +1,21 @@ -oracle8.1.6 + oracle8.1.6 - - -select user_id, first_names, last_name, email, type, case when dotlrn_full_user_rels.rel_id is NULL then 't' else 'f' end as limited_access_p, acs_permission.permission_p(:dotlrn_package_id, user_id, 'read_private_data') as read_private_data_p from dotlrn_users, dotlrn_full_user_rels where dotlrn_users.rel_id= dotlrn_full_user_rels.rel_id(+) order by last_name - - - + + + select user_id, + first_names, + last_name, + email, + type, + case when dotlrn_full_user_rels.rel_id is null then 't' else 'f' end as limited_access_p, + acs_permission.permission_p(:dotlrn_package_id, user_id, 'read_private_data') as read_private_data_p, + acs_permission.permission_p(acs.magic_object_id('security_context_root'), user_id, 'admin') as site_wide_admin_p + from dotlrn_users, dotlrn_full_user_rels + where dotlrn_users.rel_id = dotlrn_full_user_rels.rel_id(+) + order by last_name + +