bug_tracker::set_default_keyword (public)

 bug_tracker::set_default_keyword [ -package_id package_id ] \
    -parent_id parent_id -keyword_id keyword_id

Defined in packages/bug-tracker/tcl/bug-tracker-procs.tcl

Set the default keyword for a given type (parent)

Switches:
-package_id (optional)
-parent_id (required)
-keyword_id (required)

Partial Call Graph (max 5 caller/called nodes):
%3 bug_tracker::install_keywords_setup bug_tracker::install_keywords_setup (public) bug_tracker::set_default_keyword bug_tracker::set_default_keyword bug_tracker::install_keywords_setup->bug_tracker::set_default_keyword packages/bug-tracker/www/admin/category-set-default.tcl packages/bug-tracker/ www/admin/category-set-default.tcl packages/bug-tracker/www/admin/category-set-default.tcl->bug_tracker::set_default_keyword ad_conn ad_conn (public) bug_tracker::set_default_keyword->ad_conn bug_tracker::get_default_keyword_flush bug_tracker::get_default_keyword_flush (public) bug_tracker::set_default_keyword->bug_tracker::get_default_keyword_flush db_dml db_dml (public) bug_tracker::set_default_keyword->db_dml

Testcases:
No testcase defined.
Source code:
    if { $package_id eq "" } {
        set package_id [ad_conn package_id]
    }

    db_dml delete_existing {
        delete
        from   bt_default_keywords
        where  project_id = :package_id
        and    parent_id = :parent_id
    }

    db_dml insert_new {
        insert into bt_default_keywords (project_id, parent_id, keyword_id)
        values (:package_id, :parent_id, :keyword_id)
    }
    get_default_keyword_flush -package_id $package_id -parent_id $parent_id
Generic XQL file:
packages/bug-tracker/tcl/bug-tracker-procs.xql

PostgreSQL XQL file:
packages/bug-tracker/tcl/bug-tracker-procs-postgresql.xql

Oracle XQL file:
packages/bug-tracker/tcl/bug-tracker-procs-oracle.xql

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