Index: openacs-4/packages/acs-subsite/tcl/attribute-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/attribute-procs-oracle.xql,v diff -u -r1.6 -r1.6.2.1 --- openacs-4/packages/acs-subsite/tcl/attribute-procs-oracle.xql 5 Jul 2018 11:12:28 -0000 1.6 +++ openacs-4/packages/acs-subsite/tcl/attribute-procs-oracle.xql 8 Jan 2020 17:48:15 -0000 1.6.2.1 @@ -2,28 +2,7 @@ oracle8.1.6 - - - - - select nvl(a.column_name, a.attribute_name) as name, - a.pretty_name, a.attribute_id, a.datatype, - v.enum_value, v.pretty_name as value_pretty_name - from acs_object_type_attributes a, - acs_enum_values v, - (select t.object_type, level as type_level - from acs_object_types t - start with t.object_type = :start_with - connect by prior t.object_type = t.supertype) t - where a.object_type = :object_type - and a.attribute_id = v.attribute_id(+) - and t.object_type = a.ancestor_type $storage_clause - order by type_level, a.sort_order - - - - begin acs_attribute.drop_attribute(:object_type, :attribute_name); end;