Index: openacs-4/packages/recruiting/www/admin/view-one-candidate.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/recruiting/www/admin/view-one-candidate.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/recruiting/www/admin/view-one-candidate.tcl 1 Aug 2002 21:18:09 -0000 1.3 +++ openacs-4/packages/recruiting/www/admin/view-one-candidate.tcl 1 Aug 2002 22:14:37 -0000 1.4 @@ -35,14 +35,28 @@ set possible_ratings [db_string get_num_criteria {}] table::setTitle interviews "Interviews for this candidate" -table::setColumnHeadings interviews [list "Interviewer" "Ratings"] +table::setColumnHeadings interviews [list \ + "Interviewer" \ + "Ratings" \ + "Average Rating" \ + "Recommends Hiring" +] + +table::setColumnAlignment interviews [list left left center center] + table::setExportVars interviews [export_vars candidate_id] db_foreach get_interviews {} { - table::addUnsortedRow interviews [list "$last_name, $first_names" "$num_ratings out of $possible_ratings" "(view ratings)"] + table::addUnsortedRow interviews [list \ + "$last_name, $first_names" \ + "$num_ratings out of $possible_ratings" \ + "[db_string get_average_rating {}]" \ + "[db_string get_should_hire_p {}]" \ + "(view ratings)"] } if_no_rows { table::addUnsortedRow interviews [list "No Interviews assigned. (assign one)"] } +table::addUnsortedRow interviews [list "" "" "" "" "(view average ratings)"] table::setTitle options "Options" table::addUnsortedRow options [list "Edit Information"]