im_late_project_reports

one of the documented procedures in this installation of the ACS
Usage:
im_late_project_reports   db   user_id   { html_p "t" }   { number_days "7" }
What it does:
Returns either a text or html block describing late project reports
Defined in: /web/philip/tcl/intranet-defs.tcl

Source code:


    set return_string ""

    foreach { group_name group_id } [im_list_late_project_report_groups_for_user $db $user_id $number_days] {
	if {$html_p == "t"} {
	    append return_string "<li><b>Late project report:</b> <a href=[im_url_stub]/projects/report-add?[export_url_vars group_id]>$group_name</a>"
	} else {
	    append return_string "$group_name: 
  [im_url]/projects/report-add.tcl?[export_url_vars group_id]

"
	}
	
    }
    return $return_string


philg@mit.edu