acs_community_member_admin_link (public)

 acs_community_member_admin_link -user_id user_id [ -label label ]

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

Switches:
-user_id (required)
-label (optional)
Returns:
the HTML link of the community member page of a particular admin user.

Partial Call Graph (max 5 caller/called nodes):
%3 test_user_links_api user_links_api (test acs-tcl) acs_community_member_admin_link acs_community_member_admin_link test_user_links_api->acs_community_member_admin_link acs_community_member_admin_url acs_community_member_admin_url (public) acs_community_member_admin_link->acs_community_member_admin_url acs_user::get_element acs_user::get_element (public) acs_community_member_admin_link->acs_user::get_element person::person_p person::person_p (public) acs_community_member_admin_link->person::person_p

Testcases:
user_links_api
Source code:
    if {$label eq ""} {
        set label [expr {[person::person_p -party_id $user_id] ?
                         [acs_user::get_element  -user_id $user_id -element name] : $user_id}]
    }
    set href [acs_community_member_admin_url -user_id $user_id]
    return [subst {<a href="[ns_quotehtml $href]">$label</a>}]
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: