apm::get_package_descendent_options (public)

 apm::get_package_descendent_options package_key

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

Get a list of pretty name, package key pairs for all packages which are descendents of the given package key.

Parameters:
package_key (required)
The parent package's key.
Returns:
a list of pretty name, package key pairs suitable for use in a template select widget.

Partial Call Graph (max 5 caller/called nodes):
%3 packages/acs-subsite/www/admin/index.tcl packages/acs-subsite/ www/admin/index.tcl apm::get_package_descendent_options apm::get_package_descendent_options packages/acs-subsite/www/admin/index.tcl->apm::get_package_descendent_options packages/acs-subsite/www/admin/subsite-convert-type.tcl packages/acs-subsite/ www/admin/subsite-convert-type.tcl packages/acs-subsite/www/admin/subsite-convert-type.tcl->apm::get_package_descendent_options apm_package_descendents apm_package_descendents (public) apm::get_package_descendent_options->apm_package_descendents db_list_of_lists db_list_of_lists (public) apm::get_package_descendent_options->db_list_of_lists

Testcases:
No testcase defined.
Source code:
    set in_clause '[join [::apm_package_descendents $package_key] ',']'
    return [db_list_of_lists get {}]
Generic XQL file:
<fullquery name="apm::get_package_descendent_options.get">
    <querytext>
      select pretty_name, package_key
      from apm_package_types
      where implements_subsite_p = 't'
        and package_key in ($in_clause)
      order by pretty_name
    </querytext>
</fullquery>
packages/acs-tcl/tcl/apm-procs.xql

PostgreSQL XQL file:
packages/acs-tcl/tcl/apm-procs-postgresql.xql

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

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