ad_administrator_p

ad_administrator_p   db   { user_id "" }

Returns 1 if the user is part of the site-wide administration group. 0 otherwise.

Source code:

    if [empty_string_p $user_id] {
	set user_id [ad_verify_and_get_user_id $db]
    }

    set ad_group_member_p [database_to_tcl_string $db "select ad_group_member_p($user_id, system_administrator_group_id) from dual"]

    return [ad_decode $ad_group_member_p "t" 1 0]