site_node::new (public)

 site_node::new -name name -parent_id parent_id \
    [ -directory_p directory_p ] [ -pattern_p pattern_p ]

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

Create a new site node

Switches:

-name (required)

-parent_id (required)

-directory_p (optional, defaults to "t")

-pattern_p (optional, defaults to "t")

Returns:

node_id

Testcases:

ad_context_bar, site_node_closest_ancestor_package

Source code:

    set var_list [list  [list name $name]  [list parent_id $parent_id]  [list directory_p $directory_p]  [list pattern_p $pattern_p]]

    set node_id [package_instantiate_object -var_list $var_list site_node]
    return $node_id

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