ad_registration_finite_state_machine_admin_links

one of the documented procedures in this installation of the ACS
Usage:
ad_registration_finite_state_machine_admin_links   user_state   user_id
What it does:
Returns the admininistation links to change the user's state in the user_state finite state machine.
Defined in: /web/philip/packages/acs-core/admin-procs.tcl

Source code:


    set user_finite_state_links [list]
    switch $user_state {
	"authorized" { 
	    lappend user_finite_state_links "<a target=approve href=delete?[export_url_vars user_id]>ban or delete</a>"
	}
	"deleted" {
	    lappend user_finite_state_links "<a target=approve href=undelete?[export_url_vars user_id]>undelete</a>"
	    lappend user_finite_state_links "<a target=approve href=reject?[export_url_vars user_id]>ban</a>"
	}
	"need_email_verification_and_admin_approv" {
	    lappend user_finite_state_links "<a  target=approve href=approve?[export_url_vars user_id]>approve</a>"
	    lappend user_finite_state_links "<a  target=approve href=reject?[export_url_vars user_id]>reject</a>"
	}
	"need_admin_approv" {
	    lappend user_finite_state_links "<a target=approve href=approve?[export_url_vars user_id]>approve</a>"
	    lappend user_finite_state_links "<a target=approve href=reject?[export_url_vars user_id]>reject</a>"
	}
	"need_email_verification" {
            lappend user_finite_state_links "<a target=approve href=approve-email?[export_url_vars user_id]>approve email</a>"
	    lappend user_finite_state_links "<a target=approve href=reject?[export_url_vars user_id]>reject</a>"
	}
	"rejected" {
	    lappend user_finite_state_links "<a  target=approve href=approve?[export_url_vars user_id]>approve</a>"
	}
	"banned" {
	    lappend user_finite_state_links "<a target=approve href=unban?[export_url_vars user_id]>unban</a>"
	}
    }
    return $user_finite_state_links


philg@mit.edu