site_node::get_node_id_from_object_id (public)

 site_node::get_node_id_from_object_id -object_id object_id

Defined in packages/acs-tcl/tcl/site-nodes-procs.tcl

Switches:

-object_id

(required)

Returns:

the site node id associated with the given object_id

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

Testcases:

No testcase defined.

Source code:

    set urls [get_url_from_object_id -object_id $object_id]
    if {[llength $urls] == 0} {
        set url ""
    } else {
        if {[llength $urls] > 1} {
            ad_log warning "get_node_id_from_object_id for object $object_id returns [llength $urls] URLs, first one is returned"
        }
        set url [lindex $urls 0]
    }
    if { $url ne "" } {
        return [get_node_id -url $url]
    } else {
        return {}
    }

Generic XQL file:

packages/acs-tcl/tcl/site-nodes-procs.xql

PostgreSQL XQL file:

packages/acs-tcl/tcl/site-nodes-procs-postgresql.xql

Oracle XQL file:

packages/acs-tcl/tcl/site-nodes-procs-oracle.xql