xo::db::sql::apm proc update_package (public)
xo::db::sql::apm update_package [ -dbn dbn ] -package_key package_key \ [ -pretty_name pretty_name ] [ -pretty_plural pretty_plural ] \ [ -package_uri package_uri ] [ -package_type package_type ] \ [ -initial_install_p initial_install_p ] \ [ -singleton_p singleton_p ] \ [ -implements_subsite_p implements_subsite_p ] \ [ -inherit_templates_p inherit_templates_p ] \ [ -spec_file_path spec_file_path ] \ [ -spec_file_mtime spec_file_mtime ]
Defined in packages/xotcl-core/tcl/05-db-procs.tcl
Automatically generated method
- Switches:
- -dbn
(optional)- -package_key
(required)- -pretty_name
(optional)- -pretty_plural
(optional)- -package_uri
(optional)- -package_type
(optional)- -initial_install_p
(optional)- -singleton_p
(optional)- -implements_subsite_p
(defaults to"f"
) (optional)- -inherit_templates_p
(defaults to"f"
) (optional)- -spec_file_path
(optional)- -spec_file_mtime
(optional)- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: #function_args: {PACKAGE_KEY {}} {PRETTY_NAME null} {PRETTY_PLURAL null} {PACKAGE_URI null} {PACKAGE_TYPE null} {INITIAL_INSTALL_P null} {SINGLETON_P null} {IMPLEMENTS_SUBSITE_P f} {INHERIT_TEMPLATES_P f} {SPEC_FILE_PATH null} {SPEC_FILE_MTIME null} foreach var [list PACKAGE_KEY PRETTY_NAME PRETTY_PLURAL PACKAGE_URI PACKAGE_TYPE INITIAL_INSTALL_P SINGLETON_P IMPLEMENTS_SUBSITE_P INHERIT_TEMPLATES_P SPEC_FILE_PATH SPEC_FILE_MTIME] { set varname [string tolower $var] if {[info exists $varname]} { set $var [set $varname] set _$var :$var } else { set _$var null } } set sql " select apm__update_package($_PACKAGE_KEY, $_PRETTY_NAME, $_PRETTY_PLURAL, $_PACKAGE_URI, $_PACKAGE_TYPE, $_INITIAL_INSTALL_P, $_SINGLETON_P, $_IMPLEMENTS_SUBSITE_P, $_INHERIT_TEMPLATES_P, $_SPEC_FILE_PATH, $_SPEC_FILE_MTIME) " db_with_handle -dbn $dbn db { #ns_log notice "--sql=$sql" return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ] }XQL Not present: Generic, PostgreSQL, Oracle