faq_maintaner_p

one of the documented procedures in this installation of the ACS
Usage:
faq_maintaner_p   db   faq_id
What it does:
checks whether the user has the right to mantain this faq
Defined in: /web/philip/tcl/faq-defs.tcl

Source code:



    set selection [ns_db 1row $db "
    select faq_id, scope, group_id
    from faqs
    where faq_id=$faq_id"]
    
    set_variables_after_query
    
    switch $scope {
	public {
	    set id 0
	}
	group {
	    set id $group_id
	}
    }
    
    set authorization_status [ad_scope_authorization_status $db $scope admin group_admin none $id]

    if { $authorization_status=="authorized" } {
	return 1
    } else {
	return 0
    }


philg@mit.edu