general_comments_delete_messages (public)

 general_comments_delete_messages -package_id package_id

Defined in packages/general-comments/tcl/general-comments-procs.tcl

Deletes all comments belonging to specified package.

Switches:
-package_id
(required)

Partial Call Graph (max 5 caller/called nodes):
%3 test_link_tests link_tests (test xowiki) general_comments_delete_messages general_comments_delete_messages test_link_tests->general_comments_delete_messages test_xowiki_test_cases xowiki_test_cases (test xowiki) test_xowiki_test_cases->general_comments_delete_messages content::item::delete content::item::delete (public) general_comments_delete_messages->content::item::delete db_list db_list (public) general_comments_delete_messages->db_list xowiki::before-uninstantiate xowiki::before-uninstantiate (public) xowiki::before-uninstantiate->general_comments_delete_messages

Testcases:
xowiki_test_cases, link_tests
Source code:
    foreach comment_id [db_list get_comments {
        select comment_id
        from general_comments c,
             acs_objects o
        where c.comment_id = o.object_id
          and o.package_id = :package_id
    }] {
        content::item::delete -item_id $comment_id
    }
Generic XQL file:
packages/general-comments/tcl/general-comments-procs.xql

PostgreSQL XQL file:
packages/general-comments/tcl/general-comments-procs-postgresql.xql

Oracle XQL file:
packages/general-comments/tcl/general-comments-procs-oracle.xql

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