Index: openacs-4/packages/acs-subsite/www/admin/group-types/one-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/group-types/one-oracle.xql,v
diff -u -N
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-subsite/www/admin/group-types/one-oracle.xql	20 Nov 2022 04:38:50 -0000	1.4.2.3
@@ -0,0 +1,32 @@
+<?xml version="1.0"?>
+
+<queryset>
+   <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
+
+<fullquery name="attributes_select">      
+      <querytext>
+    with group_hierarchy(object_type,pretty_name,type_level) as (
+       select object_type, pretty_name, 1 as type_level
+       from acs_object_types
+       where object_type = 'group'
+
+       union all
+
+       select t.object_type, t.pretty_name, h.type_level + 1 as type_level
+       from acs_object_types t,
+            group_hierarchy h
+       where t.supertype = h.object_type
+    )
+    select a.attribute_id,
+           a.pretty_name,
+           a.ancestor_type,
+           t.pretty_name as ancestor_pretty_name
+      from acs_object_type_attributes a,
+           group_hierarchy t
+     where a.object_type = :group_type
+       and t.object_type = a.ancestor_type
+    order by type_level
+      </querytext>
+</fullquery>
+
+</queryset>