Index: openacs-4/packages/dotlrn/www/admin/user-edit-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user-edit-oracle.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/dotlrn/www/admin/user-edit-oracle.xql	10 Dec 2001 23:58:31 -0000	1.1
+++ openacs-4/packages/dotlrn/www/admin/user-edit-oracle.xql	8 Feb 2002 20:50:57 -0000	1.2
@@ -3,10 +3,20 @@
 <queryset>
 <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
-<fullquery name="select_user_info">
-<querytext>
-select first_names, last_name, email, type_id, 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 user_id=:user_id and dotlrn_users.rel_id= dotlrn_full_user_rels.rel_id(+)
-</querytext>
-</fullquery>
+  <fullquery name="select_user_info">
+    <querytext>
+      select dotlrn_users.id,
+             dotlrn_users.first_names,
+             dotlrn_users.last_name,
+             dotlrn_users.email,
+             dotlrn_users.type,
+             case when dotlrn_full_user_rels.rel_id is null then 'limited' else 'full' end as access_level,
+             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.user_id = :user_id
+      and dotlrn_users.rel_id = dotlrn_full_user_rels.rel_id(+)
+    </querytext>
+  </fullquery>
 
 </queryset>