subsite::util::object_type_path_list (public)

 subsite::util::object_type_path_list object_type [ ancestor_type ]

Defined in packages/acs-subsite/tcl/subsite-procs.tcl

Parameters:
object_type
ancestor_type (defaults to "acs_object")
Returns:
the object type hierarchy for the given object type from ancestor_type to object_type

Partial Call Graph (max 5 caller/called nodes):
%3 packages/acs-subsite/www/admin/parties/new.tcl packages/acs-subsite/ www/admin/parties/new.tcl subsite::util::object_type_path_list subsite::util::object_type_path_list packages/acs-subsite/www/admin/parties/new.tcl->subsite::util::object_type_path_list packages/acs-subsite/www/admin/parties/one.tcl packages/acs-subsite/ www/admin/parties/one.tcl packages/acs-subsite/www/admin/parties/one.tcl->subsite::util::object_type_path_list db_list db_list (public) subsite::util::object_type_path_list->db_list

Testcases:
No testcase defined.
Source code:
    return [db_list select_object_type_path {
        with recursive type_path as (
                                     select object_type, supertype
                                     from acs_object_types
                                     where object_type = :object_type

                                     union all

                                     select t.object_type, t.supertype
                                     from acs_object_types t,
                                          type_path p
                                     where t.object_type = p.supertype
                                       and p.object_type <> :ancestor_type
                                     )
        select object_type from type_path
    }]
XQL Not present:
Generic
PostgreSQL XQL file:
packages/acs-subsite/tcl/subsite-procs-postgresql.xql

Oracle XQL file:
packages/acs-subsite/tcl/subsite-procs-oracle.xql

[ hide source ] | [ make this the default ]
Show another procedure: