im_print_employee

im_print_employee   person   rowspan

print function for org chart

Source code:

    set user_id [fst $person]
    set employee_name [snd $person]
    set currently_employed_p [thd $person]
    set job_title [lindex $person 3]
    if { $currently_employed_p == "t" } {
	if { $rowspan>=2 } {
	    return "<a href=/intranet/users/view?[export_url_vars user_id]>$employee_name</a><br><i>$job_title</i>\n"
	} else {
	    return "<a href=/intranet/users/view?[export_url_vars user_id]>$employee_name</a><br>\n"
	}
    } else {
	return "<i>Position Vacant</i>"
    }