apm_package_id_from_key (public)

 apm_package_id_from_key package_key

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

Parameters:
package_key
Returns:
The package id of the instance of the package. 0 if no instance exists, error if several instances exist.

Partial Call Graph (max 5 caller/called nodes):
%3 test_acs_mail_lite_inbound_procs_check acs_mail_lite_inbound_procs_check (test acs-mail-lite) apm_package_id_from_key apm_package_id_from_key test_acs_mail_lite_inbound_procs_check->apm_package_id_from_key test_acs_object_procs_test acs_object_procs_test (test acs-tcl) test_acs_object_procs_test->apm_package_id_from_key test_locale__test_system_package_setting locale__test_system_package_setting (test acs-lang) test_locale__test_system_package_setting->apm_package_id_from_key test_logout_from_everywhere logout_from_everywhere (test acs-tcl) test_logout_from_everywhere->apm_package_id_from_key test_parameter__check_procs parameter__check_procs (test acs-tcl) test_parameter__check_procs->apm_package_id_from_key apm_package_id_from_key_not_cached apm_package_id_from_key_not_cached (private) apm_package_id_from_key->apm_package_id_from_key_not_cached util_memoize util_memoize (public) apm_package_id_from_key->util_memoize acs::test::url acs::test::url (public) acs::test::url->apm_package_id_from_key acs_mail_lite::bounce_address acs_mail_lite::bounce_address (private) acs_mail_lite::bounce_address->apm_package_id_from_key acs_mail_lite::check_bounces acs_mail_lite::check_bounces (private) acs_mail_lite::check_bounces->apm_package_id_from_key acs_mail_lite::get_package_id acs_mail_lite::get_package_id (private) acs_mail_lite::get_package_id->apm_package_id_from_key acs_mail_lite::imap_check_incoming acs_mail_lite::imap_check_incoming (private) acs_mail_lite::imap_check_incoming->apm_package_id_from_key

Testcases:
locale__test_system_package_setting, acs_mail_lite_inbound_procs_check, parameter_register_test, parameter__check_procs, acs_object_procs_test, logout_from_everywhere
Source code:
    set var ::apm::package_id_from_key($package_key)
    if {[info exists $var]} {return [set $var]}
    set result [util_memoize [list apm_package_id_from_key_not_cached $package_key]]
    #set result [ns_cache_eval ns:memoize apm_package_id_from_key_$package_key [list apm_package_id_from_key_not_cached $package_key]]
    if {$result != 0} {
        set $var $result
    }
    return $result
Generic XQL file:
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: