Index: openacs-4/packages/recruiting/www/admin/view-ratings.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/recruiting/www/admin/view-ratings.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/recruiting/www/admin/view-ratings.tcl 2 Aug 2002 16:48:26 -0000 1.2 +++ openacs-4/packages/recruiting/www/admin/view-ratings.tcl 9 Aug 2002 20:30:51 -0000 1.3 @@ -18,24 +18,24 @@ db_1row get_interviewer_info {} -table::setTitle ratings "$interviewer_name\'s ratings for $candidate_info(first_name) $candidate_info(last_name)" -table::setColumnHeadings ratings [list "Criteria" "Rating"] -table::setColumnAlignment ratings [list left center] -table::setExportVars ratings [export_vars interview_id] +ui::table::set_title ratings "$interviewer_name\'s ratings for $candidate_info(first_name) $candidate_info(last_name)" +ui::table::set_column_headings ratings [list "Criteria" "Rating"] +ui::table::set_column_alignment ratings [list left center] +ui::table::set_export_vars ratings [export_vars interview_id] db_foreach get_ratings {} { - table::addSortableRow ratings [list "$criteria_name (view all $criteria_name ratings)
$description" "$rating"] + ui::table::add_sortable_row ratings [list "$criteria_name (view all $criteria_name ratings)
$description" "$rating"] } if_no_rows { - table::addSortableRow ratings [list "$interviewer_name has not made any ratings for $candidate_info(first_name) $candidate_info(last_name)"] + ui::table::add_sortable_row ratings [list "$interviewer_name has not made any ratings for $candidate_info(first_name) $candidate_info(last_name)"] } -table::setTitle summary "Summary Info" -table::addUnsortedRow summary [list "Interviewed by:" "$interviewer_name
$interviewer_email"] -table::addUnsortedRow summary [list "Average rating:" [db_string get_average_rating {}]] -table::addUnsortedRow summary [list "Hiring suggestion:" [db_string get_should_hire_p {}]] +ui::table::set_title summary "Summary Info" +ui::table::add_unsorted_row summary [list "Interviewed by:" "$interviewer_name
$interviewer_email"] +ui::table::add_unsorted_row summary [list "Average rating:" [db_string get_average_rating {}]] +ui::table::add_unsorted_row summary [list "Hiring suggestion:" [db_string get_should_hire_p {}]] -table::setTitle comments "Comments" -table::addUnsortedRow comments [list $interview_info(comment)] +ui::table::set_title comments "Comments" +ui::table::add_unsorted_row comments [list $interview_info(comment)] set context_bar [list \ [list "../" "Recruiting"] \ @@ -45,3 +45,10 @@ "Interview Ratings"] ad_return_template + + + + + + +