install::xml::action::add-subsite-member (public)

 install::xml::action::add-subsite-member node

Defined in packages/acs-tcl/tcl/install-procs.tcl

Add a member to a subsites application group.

Parameters:
node (required)

Testcases:
No testcase defined.
Source code:
    set member_state [apm_attribute_value -default "" $node member-state]

    set group_id [::install::xml::object_id::application-group $node]

    set user_nodes [xml_node_get_children [lindex $node 0]]

    foreach node $user_nodes {
        if {[xml_node_get_name $node] ne "user"} {
            error "Unknown xml element \"[xml_node_get_name $node]\""
        }

        set user_id [::install::xml::object_id::object $node]

        group::add_member -user_id $user_id  -group_id $group_id  -member_state $member_state  -no_perm_check
    }

    return
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: