oacs_dav::impl::content_revision::delete (private)

 oacs_dav::impl::content_revision::delete

Defined in packages/oacs-dav/tcl/oacs-dav-procs.tcl

DELETE DAV method for generic content revision

Author:
Dave Bauer

Partial Call Graph (max 5 caller/called nodes):
%3 AcsSc.dav.delete.content_revision AcsSc.dav.delete.content_revision (private) oacs_dav::impl::content_revision::delete oacs_dav::impl::content_revision::delete AcsSc.dav.delete.content_revision->oacs_dav::impl::content_revision::delete db_exec_plsql db_exec_plsql (public) oacs_dav::impl::content_revision::delete->db_exec_plsql oacs_dav::conn oacs_dav::conn (public) oacs_dav::impl::content_revision::delete->oacs_dav::conn tdav::check_lock tdav::check_lock oacs_dav::impl::content_revision::delete->tdav::check_lock tdav::delete_props tdav::delete_props oacs_dav::impl::content_revision::delete->tdav::delete_props tdav::remove_lock tdav::remove_lock oacs_dav::impl::content_revision::delete->tdav::remove_lock

Testcases:
No testcase defined.
Source code:
    set package_id [oacs_dav::conn package_id]
    set user_id [oacs_dav::conn user_id]
    set peer_addr [oacs_dav::conn peeraddr]
    set item_id [oacs_dav::conn item_id]
    set uri [oacs_dav::conn uri]
    if {"unlocked" ne [tdav::check_lock $uri] } {
        return [list 423]
    }
    if {[catch {db_exec_plsql delete_item ""} errmsg]} {
        set response [list 500]
    } else {
        set response [list 204]
        tdav::delete_props $uri
        tdav::remove_lock $uri
    }
    return $response
Generic XQL file:
packages/oacs-dav/tcl/oacs-dav-procs.xql

PostgreSQL XQL file:
<fullquery name="oacs_dav::impl::content_revision::delete.delete_item">
    <querytext>
      select content_item__delete (
      :item_id
      )
    </querytext>
</fullquery>
packages/oacs-dav/tcl/oacs-dav-procs-postgresql.xql

Oracle XQL file:
<fullquery name="oacs_dav::impl::content_revision::delete.delete_item">
    <querytext>
	begin
		content_item.del (
                	item_id => :item_id
	      );
	end;
    </querytext>
</fullquery>
packages/oacs-dav/tcl/oacs-dav-procs-oracle.xql

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