bug_tracker::bug::delete (public)

 bug_tracker::bug::delete bug_id

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

Delete a Bug Tracker bug. This should only ever be run when un-instantiating a project!

Parameters:

bug_id

Author:

Mark Aufflick

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    # Probably not necessary if developers follow the instructions in the
    # header comment ...
    cache_flush -bug_id $bug_id

    set case_id [db_string get_case_id {}]
    db_exec_plsql delete_bug_case {}

    content::item::delete -item_id $bug_id

Generic XQL file:

<fullquery name="bug_tracker::bug::delete.get_case_id">
    <querytext>
        select case_id
        from   workflow_cases
        where  object_id = :bug_id
    </querytext>
</fullquery>

packages/bug-tracker/tcl/bug-procs.xql

PostgreSQL XQL file:

<fullquery name="bug_tracker::bug::delete.delete_bug_case">
    <querytext> 
      select workflow_case_pkg__delete(:case_id);
    </querytext>
</fullquery>

packages/bug-tracker/tcl/bug-procs-postgresql.xql

Oracle XQL file:

<fullquery name="bug_tracker::bug::delete.delete_bug_case">
    <querytext> 
        begin
             workflow_case_pkg.delete(:case_id);
        end;
     </querytext>
</fullquery>

packages/bug-tracker/tcl/bug-procs-oracle.xql