";
+
+ if (isteacher()) {
+ if (isset($_REQUEST['student'])) {
+ $student = $_REQUEST['student'];
+ }
+ if (!isset($student)) {
+ $student = -1;
+ }
+ }
+ else {
+ $student = $USER->id;
+ }
+
+ $grade_menu = grade_get_grades_menu();
+
+ print_header("$course->shortname", "$course->fullname", $grade_menu,"", "", true, grade_preferences_button(), $loggedinas);
+ grade_preferences_menu();
+ grade_set_uncategorized();
+
+
+/// We are in editing mode. First, process any inputs there may be.
+
+ if ($data = data_submitted()) {
+ // make sure it is safe to process data
+ if (!empty($USER->id)) {
+ if (!confirm_sesskey()) {
+ error(get_string('confirmsesskeybad', 'error'));
+ }
+ }
+
+ if (!empty($data->nonmembersadd)) { /// Add people to a grade_item
+ if (!empty($data->nonmembers) and !empty($data->grade_itemid)) {
+ $grade_itemmodified = false;
+ foreach ($data->nonmembers as $userid) {
+ $record->courseid = $course->id;
+ $record->grade_itemid = $data->grade_itemid;
+ $record->userid = $userid;
+ if (!record_exists('grade_exceptions','courseid',$course->id,'grade_itemid',$data->grade_itemid,'userid',$userid)) {
+ if (!insert_record('grade_exceptions', $record)) {
+ notify(get_string('addexceptionerror','grades').$userid.':'.$data->grade_itemid);
+ }
+ }
+ $grade_itemmodified = true;
+ }
+ }
+ $selectedgrade_item = $data->grade_itemid;
+
+ } else if (!empty($data->membersremove)) { /// Remove selected people from a particular grade_item
+
+ if (!empty($data->members) and !empty($data->grade_itemid)) {
+ foreach ($data->members as $userid) {
+ delete_records('grade_exceptions', 'userid', $userid, "grade_itemid", $data->grade_itemid, 'course', $course->id);
+ }
+ }
+ $selectedgrade_item = $data->grade_itemid;
+ }
+ }
+ if (isset($selectedgrade_item)) {
+ clean_param($selectedgrade_item, PARAM_CLEAN);
+ }
+
+/// Calculate data ready to create the editing interface
+
+ $strgrade_itemnonmembers = get_string('grade_itemnonmembers','grades');
+ $strgrade_itemmembersselected = get_string('grade_itemmembersselected','grades');
+ $strgrade_itemremovemembers = get_string('grade_itemremovemembers','grades');
+ $strgrade_iteminfomembers = get_string('grade_iteminfomembers','grades');
+ $strgrade_itemadd = get_string('grade_itemadd','grades');
+ $strgrade_itemremove = get_string('grade_itemremove','grades');
+ $strgrade_iteminfo = get_string('grade_iteminfo','grades');
+ $strgrade_iteminfopeople = get_string('grade_iteminfopeople','grades');
+ $strgrade_itemrandomassign = get_string('grade_itemrandomassign','grades');
+ $strgrade_itemaddusers = get_string('grade_itemaddusers','grades');
+ $strgrade_items = get_string('grade_items','grades');
+ $courseid = $course->id;
+ $listgrade_items = array();
+ $listmembers = array();
+ $nonmembers = array();
+ $grade_items = array();
+ $grade_items = get_records('grade_item', 'courseid', $course->id);
+ $grade_itemcount = count($grade_items);
+
+ // we need to create a multidimensional array keyed by grade_itemid with all_students at each level
+ if (isset($grade_items)) {
+ foreach($grade_items as $grade_item) {
+ $nonmembers[$grade_item->id] = array();
+ if ($students = get_course_students($course->id)) {
+ foreach ($students as $student) {
+ $nonmembers[$grade_item->id][$student->id] = fullname($student, true);
+ }
+ unset($students);
+ }
+ }
+ }
+
+
+ if ($grade_items) {
+ foreach ($grade_items as $grade_item) {
+ $modname = get_record('modules', 'id', $grade_item->modid);
+ $itemname = get_record($modname->name, 'id', $grade_item->cminstance, 'course', $course->id);
+ $grade_item->name = $itemname->name;
+ $countusers = 0;
+ $listmembers[$grade_item->id] = array();
+ if ($grade_itemexceptions = grade_get_grade_item_exceptions($grade_item->id)) {
+ foreach ($grade_itemexceptions as $grade_itemexception) {
+ $listmembers[$grade_item->id][$grade_itemexception->userid] = $nonmembers[$grade_item->id][$grade_itemexception->userid];
+ unset($nonmembers[$grade_item->id][$grade_itemexception->userid]);
+ $countusers++;
+ }
+ }
+ $listgrade_items[$grade_item->id] = $grade_item->name." ($countusers)";
+ if (!isset($grade_item->name)) {
+ // these were items that have since been deleted
+ unset($listgrade_items[$grade_item->id]);
+ delete_records('grade_item', 'id', $grade_item->id);
+ }
+ natcasesort($listmembers[$grade_item->id]);
+ natcasesort($nonmembers[$grade_item->id]);
+ }
+ natcasesort($listgrade_items);
+ }
+
+ if (empty($selectedgrade_item)) { // Choose the first group by default
+ $selectedgrade_item = array_shift(array_keys($listgrade_items));
+ }
+
+ include('exceptions.html');
+
+ print_footer($course);
+ exit;
+
+function grade_get_grade_item_exceptions($id) {
+ global $CFG;
+ global $course;
+
+ $sql = "SELECT ge.id, ge.userid FROM {$CFG->prefix}grade_exceptions ge, {$CFG->prefix}user_students us WHERE us.course=$course->id AND grade_itemid=$id AND ge.userid = us.userid AND us.course=ge.courseid";
+ $grade_exceptions = get_records_sql($sql);
+ return $grade_exceptions;
+}
+
+?>
diff --git a/grade/index.php b/grade/index.php
new file mode 100644
index 00000000000..ae86e415d45
--- /dev/null
+++ b/grade/index.php
@@ -0,0 +1,192 @@
+id);
+
+ if (! $course = get_record("course", "id", $id)) {
+ error(get_string('incorrectcourseid', 'grades'));
+ }
+
+ if (!isset($USER->editing)) {
+ $USER->editing = false;
+ }
+
+ $editing = false;
+
+ if (isteacheredit($course->id)) {
+ if (isset($edit)) {
+ if ($edit == "on") {
+ $USER->editing = true;
+ } else if ($edit == "off") {
+ $USER->editing = false;
+ }
+ }
+
+ $editing = $USER->editing;
+ }
+
+ // if the user set new prefs make sure they happen now
+ if ($action == 'set_grade_preferences') {
+ grade_set_grade_preferences();
+ }
+
+ $preferences = grade_get_preferences();
+
+ // we want this in it's own window
+ if ($action == 'stats') {
+ grade_stats();
+ exit();
+ }
+ elseif ($action == 'excel') {
+ grade_download_excel();
+ exit();
+ }
+ elseif ($action == 'text') {
+ grade_download_text();
+ exit();
+ }
+
+ $loggedinas = user_login_string($course, $USER);
+
+ if (isteacher($course->id)) {
+ if (isset($_REQUEST['student'])) {
+ $student = clean_param($_REQUEST['student'], PARAM_CLEAN);
+ }
+ else if (!isset($student)) {
+ $student = -1;
+ }
+ }
+ else {
+ $student = $USER->id;
+ }
+
+ $grade_menu = grade_get_grades_menu();
+
+ print_header($course->shortname, $course->fullname, $grade_menu,"", "", true, grade_preferences_button(), $loggedinas);
+ grade_preferences_menu();
+ grade_set_uncategorized();
+
+ if (isteacher($course->id)) {
+ switch ($action) {
+ case "cats":
+ grade_set_categories();
+ break;
+ case "insert_category":
+ grade_insert_category();
+ grade_set_categories();
+ break;
+ case "assign_categories":
+ grade_assign_categories();
+ grade_set_categories();
+ break;
+ case "set_grade_weights":
+ grade_set_grade_weights();
+ grade_display_grade_weights();
+ break;
+ case "weights":
+ grade_display_grade_weights();
+ break;
+ case "grades":
+ if ($preferences->use_advanced == 1) {
+ grade_view_all_grades($student);
+ }
+ else {
+ // all the grades will be in the 'uncategorized' category
+ grade_view_category_grades($student);
+ }
+ break;
+ case "vcats":
+ grade_view_category_grades($student);
+ break;
+ case "prefs":
+ grade_display_grade_preferences();
+ break;
+ case "set_grade_preferences":
+ grade_display_grade_preferences();
+ break;
+ case "letters":
+ grade_display_letter_grades();
+ break;
+ case "set_letter_grades":
+ grade_set_letter_grades();
+ grade_display_letter_grades();
+ break;
+ case "delete_category":
+ grade_delete_category();
+ // re-run set_uncategorized as they may have deleted a category that had items in it
+ grade_set_uncategorized();
+ grade_set_categories();
+ break;
+ case "view_student_grades":
+ grade_view_student_grades();
+ break;
+ case "view_student_category_grades":
+ grade_view_student_category_grades();
+ break;
+ default:
+ if ($preferences->use_advanced == 1) {
+ grade_view_all_grades($student);
+ }
+ else {
+ grade_view_category_grades($student);
+ }
+ } // end switch
+ } // end if isTeacher
+ else {
+ if ($preferences->show_weighted || $preferences->show_points || $preferences->show_points)
+ {
+ // teacher has set to show student something
+ $student = $USER->id;
+ switch ($action) {
+ case "view_student_category_grades":
+ grade_view_student_category_grades();
+ break;
+ case "view_student_grades":
+ if ($preferences->use_advanced == 1) {
+ grade_view_student_grades();
+ }
+ else {
+ grade_view_student_category_grades();
+ }
+ break;
+ case "vcats":
+ grade_view_category_grades($student);
+ break;
+ default:
+ if ($preferences->use_advanced == 1) {
+ grade_view_student_grades($student);
+ }
+ else {
+ grade_view_student_category_grades();
+ }
+ break;
+ } // end switch
+ } // end if display something
+ else {
+ error(get_string('gradebookhiddenerror','grades'));
+ }
+ } // end else (!teacher)
+
+ print_footer($course);
+
+
+?>
diff --git a/grade/lib.php b/grade/lib.php
new file mode 100644
index 00000000000..904cfab89ac
--- /dev/null
+++ b/grade/lib.php
@@ -0,0 +1,2944 @@
+dirroot.'/course/lib.php');
+
+
+
+$UNCATEGORIZED = 'Uncategorized';
+
+//******************************************************************
+// SQL FUNCTIONS
+//******************************************************************
+
+function grade_get_category_weight($course, $category) {
+ global $CFG;
+ $sql = "SELECT id, weight, drop_x_lowest, bonus_points, hidden, c.id cat_id
+ FROM {$CFG->prefix}grade_category c
+ WHERE c.courseid=$course
+ AND c.name='$category'";
+ $temp = get_record_sql($sql);
+ return $temp;
+}
+
+function grade_get_grade_items($course) {
+ global $CFG;
+ $sql = "SELECT i.id, c.name as cname, i.modid, mm.name as modname, i.cminstance, c.hidden, cm.visible, i.sort_order
+ FROM {$CFG->prefix}grade_item i,
+ {$CFG->prefix}grade_category c,
+ {$CFG->prefix}course_modules cm,
+ {$CFG->prefix}modules mm
+ WHERE c.id=i.category
+ AND i.courseid=c.courseid
+ AND c.courseid=$course
+ AND cm.course=c.courseid
+ AND cm.module=mm.id
+ AND i.modid=mm.id
+ AND cm.instance=i.cminstance";
+ $temp = get_records_sql($sql);
+ return $temp;
+}
+
+function grade_get_module_link($course, $cminstance, $modid) {
+ global $CFG;
+ $sql = "SELECT cm.id FROM {$CFG->prefix}course_modules cm, {$CFG->prefix}modules mm, {$CFG->prefix}grade_item i
+ WHERE i.modid='".$modid."'
+ AND i.modid=mm.id
+ AND cm.instance = i.cminstance
+ AND i.cminstance=".$cminstance."
+ AND i.courseid=cm.course AND cm.module=mm.id AND i.courseid=$course";
+ $temp = get_record_sql($sql);
+ return $temp;
+}
+
+function grade_get_grade_letter($course, $grade) {
+ global $CFG;
+ $sql = "SELECT id, letter FROM {$CFG->prefix}grade_letter WHERE courseid=$course AND grade_high >= $grade AND grade_low <= $grade";
+ $temp = get_record_sql($sql);
+ return $temp;
+}
+
+function grade_get_exceptions($course) {
+ global $CFG;
+ $sql = "SELECT e.id, e.userid, gi.cminstance, gi.modid, c.name as catname, mm.name as modname
+ FROM {$CFG->prefix}grade_exceptions e,
+ {$CFG->prefix}grade_item gi,
+ {$CFG->prefix}grade_category c,
+ {$CFG->prefix}course_modules cm,
+ {$CFG->prefix}modules mm
+ WHERE e.courseid=$course
+ AND gi.id = e.grade_itemid
+ AND c.id = gi.category
+ AND cm.course=c.courseid
+ AND cm.module=mm.id
+ AND gi.modid=mm.id";
+
+ $temp = get_records_sql($sql);
+ return $temp;
+}
+
+function grade_letters_set($course) {
+ global $CFG;
+ $sql = "SELECT * FROM {$CFG->prefix}grade_letter WHERE courseid=$course";
+ $letters_set = get_records_sql($sql);
+ if ($letters_set) {
+ return true;
+ }
+ else {
+ return false;
+ }
+}
+
+function grade_get_users_by_group($course, $group) {
+ global $CFG;
+ $sql = "SELECT userid FROM {$CFG->prefix}groups_members WHERE courseid=$course AND groupid = $group";
+ $members = get_records_sql($sql);
+ if ($members) {
+ foreach($members as $member) {
+ $group->$userid = true;
+ }
+ return $group;
+ }
+ else {
+ return NULL;
+ }
+}
+
+//******************************************************************
+// END SQL FUNCTIONS
+//******************************************************************
+
+function grade_get_formatted_grades() {
+ global $CFG;
+ global $course;
+ global $preferences;
+ $i = 1;
+ $grades = grade_get_grades();
+ if (isset($grades)) {
+ // iterate through all students
+ foreach($grades as $cur_category=>$grade_category) {
+ // $cur_category holds the value of the current category name
+ // $grade_category holds an array of all the mod types that are in this category
+ if (isset($grade_category)) {
+ foreach($grade_category as $cur_mod=>$mod_category) {
+ // $cur_mod is the id of the current moodle module type
+ // $mod_category holds the grades for $cur_mod (current mod type)
+ $module_info = get_record('modules', 'id', $cur_mod);
+ $cur_modname = $module_info->name;
+ if (isset($mod_category)) {
+ foreach($mod_category as $cur_cminstance=>$students_grade) {
+ // $cur_cminstance is the course module instance for the cur_mod
+ $instance = get_record($cur_modname, 'id',$cur_cminstance, 'course',$course->id);
+ // it's necessary to check if the name is blank because some mods don't clean up the grades when the instance is deleted
+ // this is a bug. as it is plausible that some item could get created and have old data from a previous mod laying around
+ if ($instance->name != '') {
+ // duplicate grade item name, the user should know better than to name to things by the same name, but to make sure grades don't disappear lets modify the name slightly
+ if (isset($all_categories["$cur_category"]["$instance->name"])) {
+ $instance->name= $instance->name.' *'.$i.'*';
+ }
+
+ if (isset($students_grade->grades) && $students_grade->grades != '') {
+ foreach($students_grade->grades as $student=>$grade) {
+ // add an entry for any student that has a grade
+ $grades_by_student["$student"]["$cur_category"]["$instance->name"]['grade'] = $grade;
+ $grades_by_student["$student"]["$cur_category"]["$instance->name"]['sort_order'] = $students_grade->sort_order;
+
+ if (!isset($grades_by_student["$student"]["$cur_category"]['stats'])) {
+ $grades_by_student["$student"]["$cur_category"]['stats'] = array();
+ }
+
+ if (!isset($grades_by_student["$student"]["$cur_category"]['stats']['points'])) {
+ $grades_by_student["$student"]["$cur_category"]['stats']['points'] = $grade;
+ }
+ else {
+ $grades_by_student["$student"]["$cur_category"]['stats']['points'] = $grades_by_student["$student"]["$cur_category"]['stats']['points'] + $grade;
+ }
+
+ // This next block just creates a comma seperated list of all grades for the category
+ if (isset($grades_by_student["$student"]["$cur_category"]['stats']['allgrades'])) {
+ $grades_by_student["$student"]["$cur_category"]['stats']['allgrades'] .= ','.$grade;
+ }
+ else {
+ $grades_by_student["$student"]["$cur_category"]['stats']['allgrades'] = $grade;
+ }
+ }
+ }
+ // set up a list of all categories and assignments (adjusting things for extra credit where necessary)
+ $all_categories["$cur_category"]["$instance->name"]['hidden'] = $students_grade->hidden;
+ $all_categories["$cur_category"]["$instance->name"]['sort_order'] = $students_grade->sort_order;
+
+ $all_categories["$cur_category"]["$instance->name"]['extra_credit'] = $students_grade->extra_credit;
+
+ if ($all_categories["$cur_category"]["$instance->name"]['extra_credit'] != 1) {
+ $all_categories["$cur_category"]["$instance->name"]['maxgrade'] = $students_grade->maxgrade;
+ }
+ else {
+ $all_categories["$cur_category"]["$instance->name"]['maxgrade'] = 0;
+ }
+ $all_categories["$cur_category"]["$instance->name"]['scale_grade'] = $students_grade->scale_grade;
+ if ($students_grade->scale_grade != 0) {
+ $all_categories["$cur_category"]["$instance->name"]['scaled_max'] = round($all_categories["$cur_category"]["$instance->name"]['maxgrade']/$students_grade->scale_grade);
+ }
+ else {
+ // avoids divide by zero... scale_grade shouldn't be set to 0 anyway
+ $all_categories["$cur_category"]["$instance->name"]['scaled_max'] = $all_categories["$cur_category"]["$instance->name"]['maxgrade'];
+ $all_categories["$cur_category"]["$instance->name"]['scale_grade'] = 1.0;
+ }
+ if (! isset($all_categories["$cur_category"]['stats']) ) {
+ $all_categories["$cur_category"]['stats'] = array();
+ }
+ $all_categories["$cur_category"]["$instance->name"]['grade_against'] = $all_categories["$cur_category"]["$instance->name"]['scaled_max'];
+ if (!isset($all_categories["$cur_category"]['stats']['weight'])) {
+ $weight = grade_get_category_weight($course->id, $cur_category);
+ $all_categories["$cur_category"]['stats']['weight'] = $weight->weight;
+ }
+
+ $all_categories["$cur_category"]["$instance->name"]['cminstance'] = $cur_cminstance;
+ $all_categories["$cur_category"]["$instance->name"]['modid'] = $cur_mod;
+ $modname = get_record('modules','id',$cur_mod);
+ $all_categories["$cur_category"]["$instance->name"]['modname'] = $modname->name;
+
+ // get bonus points and drop the x lowest
+ $drop = get_record('grade_category', 'courseid', $course->id, 'name', $cur_category);
+ $all_categories["$cur_category"]['stats']['drop'] = $drop->drop_x_lowest;
+ $all_categories["$cur_category"]['stats']['bonus_points'] = $drop->bonus_points;
+ }
+ }
+ }
+ }
+ }
+ }
+
+ // set the students name under student_data (this has the added bonus of creating an entry for students who do not have any grades)
+ $students = get_course_students($course->id);
+ if (isset($students) && $students) {
+ foreach ($students as $userid => $student) {
+ $grades_by_student["$userid"]['student_data']['firstname'] = $student->firstname;
+ $grades_by_student["$userid"]['student_data']['lastname'] = $student->lastname;
+ $grades_by_student["$userid"]['student_data']['email'] = $student->email;
+ if (isset($student->location)) {
+ $grades_by_student["$userid"]['student_data']['location'] = $student->location;
+ }
+ $grades_by_student["$userid"]['student_data']['department'] = $student->department;
+ $grades_by_student["$userid"]['student_data']['idnumber'] = $student->idnumber;
+ }
+ }
+
+ // unset any item that has a "" for a name at this point this inludes instructors who have grades or any student formerly enrolled.
+ if (isset($grades_by_student)) {
+ foreach ($grades_by_student as $student => $assignments) {
+ if (!isset($grades_by_student["$student"]['student_data']['firstname']) && !isset($grades_by_student["$student"]['student_data']['lastname'])) {
+ unset($grades_by_student["$student"]);
+ }
+ }
+ }
+
+
+ // set the totalpoints for each category taking into account drop_x_lowest
+ // also set the number of grade items for the category to make calculating grades for students who have not taken anything easier
+ foreach($all_categories as $category => $assignments) {
+ $dropcount = 0;
+ $all_categories["$category"]['stats']['totalpoints'] = 0;
+ $all_categories["$category"]['stats']['grade_items'] = 0;
+ if (isset($assignments)) {
+ foreach($assignments as $assignment=>$grade) {
+ if ($assignment != 'stats') {
+ if ($dropcount < $all_categories["$category"]['stats']['drop']) {
+ // skip a grade in the total
+ $dropcount++;
+ }
+ else {
+ // make sure the current assignment is not extra credit and then add it to the totalpoints
+ if ($all_categories["$category"][$assignment]['extra_credit'] != 1) {
+ $all_categories["$category"]['stats']['totalpoints'] = $all_categories["$category"]['stats']['totalpoints'] + $assignments["$assignment"]['grade_against'];
+ $all_categories["$category"]['stats']['grade_items'] = $all_categories["$category"]['stats']['grade_items'] + 1;
+ }
+ }
+ }
+ }
+ }
+ }
+
+ if (isset($_REQUEST['group'])) {
+ $group = clean_param($_REQUEST['group'], PARAM_INT);
+ }
+ // if the user has selected a group to view by get the group members
+ if (isset($group) && $group != 0) {
+ $groupmembers = get_group_users($group);
+ }
+
+ // this next block catches any students who do not have a grade for any item in a particular category
+ foreach($all_categories as $category => $main_category) {
+ // make sure each student has an entry for each category
+ if (isset($grades_by_student)) {
+ foreach($grades_by_student as $student=>$categories) {
+ if ( (isset($groupmembers) && isset($groupmembers[$student])) || !isset($groupmembers)) {
+ $grades_by_student["$student"]["$category"]['stats']['totalpoints'] = $main_category['stats']['totalpoints'];
+ $grades_by_student["$student"]["$category"]['stats']['weight'] = $main_category['stats']['weight'];
+ $grades_by_student["$student"]["$category"]['stats']['grade_items'] = $main_category['stats']['grade_items'];
+ if (!isset($grades_by_student["$student"]["$category"]['stats']['points'])) {
+ $grades_by_student["$student"]["$category"]['stats']['points'] = '-';
+ }
+ else {
+ // points are set... see if the current category is using drop the x lowest and do so
+ if ($main_category['stats']['drop'] != 0) {
+ $grades_by_student["$student"]["$category"]['stats']['allgrades'] = grade_drop_lowest($grades_by_student["$student"]["$category"]['stats']['allgrades'], $main_category['stats']['drop'], $main_category['stats']['grade_items']);
+ if ($grades_by_student["$student"]["$category"]['stats']['points'] != '-') {
+ $cat_points = 0;
+ $count_grades = explode(',',$grades_by_student["$student"]["$category"]['stats']['allgrades']);
+ foreach($count_grades as $grade) {
+ $cat_points = $cat_points + $grade;
+ }
+ $grades_by_student["$student"]["$category"]['stats']['points'] = $cat_points;
+ }
+ }
+ }
+
+ // add any bonus points for the category
+ if ($all_categories["$category"]['stats']['bonus_points'] != 0) {
+ $grades_by_student["$student"]["$category"]['stats']['points'] = $grades_by_student["$student"]["$category"]['stats']['points'] + $all_categories["$category"]['stats']['bonus_points'];
+ }
+
+ foreach($main_category as $assignment => $items) {
+ if ($assignment != 'stats') {
+ if(!isset($grades_by_student["$student"]["$category"]["$assignment"]['maxgrade'])) {
+ $grades_by_student["$student"]["$category"]["$assignment"]['maxgrade'] = $all_categories["$category"]["$assignment"]['grade_against'];
+ }
+ if(!isset($grades_by_student["$student"]["$category"]["$assignment"]['grade'])) {
+ $grades_by_student["$student"]["$category"]["$assignment"]['grade'] = '-';
+ $grades_by_student["$student"]["$category"]["$assignment"]['sort_order'] = $all_categories["$category"]["$assignment"]['sort_order'];
+ }
+ }
+ }
+ } // end groupmember if
+ else {
+ // unset grade since they are not in the selected group.
+ unset($grades_by_student["$student"]);
+ }
+ }
+ }
+ }
+
+ // set the total coursepoints
+ $all_categories['stats']['weight'] = 0;
+ $all_categories['stats']['totalpoints'] = 0;
+ foreach($all_categories as $category => $info) {
+ if ($category != 'stats') {
+ $all_categories['stats']['weight'] = $all_categories['stats']['weight'] + $all_categories["$category"]['stats']['weight'];
+ $all_categories['stats']['totalpoints'] = $all_categories['stats']['totalpoints'] + $all_categories["$category"]['stats']['totalpoints'];
+ }
+ }
+
+ // set each individuals total points by category so we can then exclude some grades if set to use exceptions
+ if (isset($grades_by_student)) {
+ foreach($grades_by_student as $student => $categories) {
+ foreach($all_categories as $category => $assignments) {
+ if ($category != 'stats') {
+ $grades_by_student["$student"]["$category"]['stats']['totalpoints'] = $all_categories["$category"]['stats']['totalpoints'];
+ }
+ }
+ $grades_by_student["$student"]['student_data']['totalpoints'] = $all_categories['stats']['totalpoints'];
+ }
+ }
+
+ // take into account any excluded grade_items
+ $strexcluded = get_string('excluded', 'grades');
+ $exceptions = grade_get_exceptions($course->id);
+ if (isset($exceptions) && $exceptions) {
+ foreach($exceptions as $exception) {
+ if (isset($grades_by_student["$exception->userid"])) {
+ if ($grades_by_student["$exception->userid"]["$exception->catname"]) {
+ $assgn = get_record($exception->modname, 'id', $exception->cminstance, 'course', $course->id);
+ $grades_by_student["$exception->userid"]['student_data']['totalpoints'] = $grades_by_student["$exception->userid"]['student_data']['totalpoints'] - $all_categories["$exception->catname"]["$assgn->name"]['maxgrade'];
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['totalpoints'] = $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['totalpoints'] - $all_categories["$exception->catname"]["$assgn->name"]['grade_against'];
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['grade_items'] = $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['grade_items'] - 1;
+ if ($grades_by_student["$exception->userid"]["$exception->catname"]['stats']['grade_items'] < 0) {
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['grade_items'] = 0;
+ }
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['points'] = $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['points'] - $grades_by_student["$exception->userid"]["$exception->catname"]["$assgn->name"]['grade'];
+ $grades_by_student["$exception->userid"]["$exception->catname"]["$assgn->name"]['maxgrade'] = $strexcluded;
+ $grades_by_student["$exception->userid"]["$exception->catname"]["$assgn->name"]['grade'] = $strexcluded;
+ // see if they are excluded entirely from a category
+ if ($grades_by_student["$exception->userid"]["$exception->catname"]['stats']['totalpoints'] == 0) {
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['totalpoints'] = $strexcluded;
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['percent'] = $strexcluded;
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['points'] = $strexcluded;
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['weight'] = $strexcluded;
+ $grades_by_student["$exception->userid"]["$exception->catname"]['stats']['weighted'] = $strexcluded;
+ }
+ }
+ }
+ else {
+ // the user had exceptions, but was unenrolled from the course... we could delete it here, but we will leave it because the user may be re-added to the course
+ }
+ }
+ }
+
+ if (isset($grades_by_student)) {
+ foreach($grades_by_student as $student => $categories) {
+ $grades_by_student["$student"]['student_data']['points'] = '-';
+ $grades_by_student["$student"]['student_data']['totalpoints'] = 0;
+ $grades_by_student["$student"]['student_data']['weight'] = 0;
+ $grades_by_student["$student"]['student_data']['weighted'] = 0;
+ foreach($categories as $category => $assignments) {
+ if ($category != 'student_data') {
+ // set the student's total points earned
+ if ($grades_by_student["$student"]["$category"]['stats']['points'] != $strexcluded) {
+ if ($grades_by_student["$student"]["$category"]['stats']['points'] != '-') {
+ $grades_by_student["$student"]['student_data']['points'] = $grades_by_student["$student"]['student_data']['points'] + $grades_by_student["$student"]["$category"]['stats']['points'];
+ }
+ $grades_by_student["$student"]['student_data']['totalpoints'] = $grades_by_student["$student"]['student_data']['totalpoints'] + $grades_by_student["$student"]["$category"]['stats']['totalpoints'];
+ }
+
+ // set percents and weights for each assignment
+ foreach($assignments as $assignment => $info) {
+ if ($assignment != 'stats') {
+ if ($grades_by_student["$student"]["$category"]["$assignment"]['grade'] != $strexcluded) {
+ if ($grades_by_student["$student"]["$category"]["$assignment"]['maxgrade'] != 0) {
+ $grades_by_student["$student"]["$category"]["$assignment"]['percent'] = round($grades_by_student["$student"]["$category"]["$assignment"]['grade']/$grades_by_student["$student"]["$category"]["$assignment"]['maxgrade']*100,2);
+ }
+ else {
+ $grades_by_student["$student"]["$category"]["$assignment"]['percent'] = 0;
+ }
+ if ($grades_by_student["$student"]["$category"]['stats']['totalpoints'] != 0) {
+ $grades_by_student["$student"]["$category"]["$assignment"]['weight'] = round($all_categories["$category"]['stats']['weight']*($grades_by_student["$student"]["$category"]["$assignment"]['maxgrade']/$grades_by_student["$student"]["$category"]['stats']['totalpoints']),2);
+ }
+ else {
+ $grades_by_student["$student"]["$category"]["$assignment"]['weight'] = 0.00;
+ }
+ if ($grades_by_student["$student"]["$category"]["$assignment"]['weight'] != 0) {
+ $grades_by_student["$student"]["$category"]["$assignment"]['weighted'] = round($grades_by_student["$student"]["$category"]["$assignment"]['percent']*$grades_by_student["$student"]["$category"]["$assignment"]['weight']/100,2);
+ }
+ else {
+ // should only be here if this is extra credit
+ $grades_by_student["$student"]["$category"]["$assignment"]['weighted'] = 0.00;
+ }
+ }
+ else {
+ $grades_by_student["$student"]["$category"]["$assignment"]['percent'] = $strexcluded;
+ $grades_by_student["$student"]["$category"]["$assignment"]['weight'] = $strexcluded;
+ $grades_by_student["$student"]["$category"]["$assignment"]['weighted'] = $strexcluded;
+ }
+ }
+ }
+ // set the percent and weight per category
+ if ($grades_by_student["$student"]["$category"]['stats']['totalpoints'] != 0 ) {
+ $grades_by_student["$student"]["$category"]['stats']['percent'] = round($grades_by_student["$student"]["$category"]['stats']['points']/$grades_by_student["$student"]["$category"]['stats']['totalpoints']*100,2);
+ $grades_by_student["$student"]["$category"]['stats']['weighted'] = round($grades_by_student["$student"]["$category"]['stats']['points']/$grades_by_student["$student"]["$category"]['stats']['totalpoints']*$grades_by_student["$student"]["$category"]['stats']['weight'],2);
+ }
+ else {
+ if ($grades_by_student["$student"]["$category"]['stats']['totalpoints'] != $strexcluded) {
+ $grades_by_student["$student"]["$category"]['stats']['percent'] = 0.00;
+ $grades_by_student["$student"]["$category"]['stats']['weighted'] = 0.00;
+ }
+ }
+
+ // set students overall weight (this is what percent they will be graded against)
+ if ($grades_by_student["$student"]["$category"]['stats']['weight'] != $strexcluded) {
+ $grades_by_student["$student"]['student_data']['weight'] = $grades_by_student["$student"]['student_data']['weight'] + $grades_by_student["$student"]["$category"]['stats']['weight'];
+ }
+
+ // set the students total categories towards point total we have to defer the percent calculation until we know what total weight they should be graded against since they may
+ // be excluded from a whole category.
+ if ($all_categories["$category"]['stats']['totalpoints'] != 0) {
+ $grades_by_student["$student"]['student_data']['weighted'] = $grades_by_student["$student"]['student_data']['weighted'] + $grades_by_student["$student"]["$category"]['stats']['weighted'];
+ }
+ }
+
+
+ }
+
+ // set the percent and weight overall
+ if ($grades_by_student["$student"]['student_data']['totalpoints'] != 0 && $grades_by_student["$student"]['student_data']['totalpoints'] != $strexcluded) {
+ $grades_by_student["$student"]['student_data']['percent'] = round($grades_by_student["$student"]['student_data']['points']/$grades_by_student["$student"]['student_data']['totalpoints']*100,2);
+ if ($grades_by_student["$student"]['student_data']['weight'] != 0) {
+ $grades_by_student["$student"]['student_data']['weighted'] = round($grades_by_student["$student"]['student_data']['weighted']/$grades_by_student["$student"]['student_data']['weight']*100,2);
+ }
+ else {
+ $grades_by_student["$student"]['student_data']['weighted'] = 0.00;
+ }
+ }
+ else if ($grades_by_student["$student"]['student_data']['totalpoints'] == 0) {
+ $grades_by_student["$student"]['student_data']['percent'] = 0.00;
+ }
+
+ }
+ }
+
+ if (isset($grades_by_student)) {
+ $sort = optional_param('sort','default');
+
+ switch ($sort) {
+ case 'highgrade_category':
+ uasort($grades_by_student, 'grade_sort_by_highgrade_category');
+ break;
+ case 'highgrade_category_asc':
+ uasort($grades_by_student, 'grade_sort_by_highgrade_category_asc');
+ break;
+ case 'highgrade':
+ {
+ if ($preferences->use_weighted_for_letter == 1) {
+ uasort($grades_by_student, 'grade_sort_by_weighted');
+ }
+ else {
+ uasort($grades_by_student, 'grade_sort_by_percent');
+ }
+ break;
+ }
+ case 'points':
+ uasort($grades_by_student, 'grade_sort_by_points');
+ break;
+ case 'points_asc':
+ uasort($grades_by_student, 'grade_sort_by_points_asc');
+ break;
+ case 'weighted':
+ uasort($grades_by_student, 'grade_sort_by_weighted');
+ break;
+ case 'weighted_asc':
+ uasort($grades_by_student, 'grade_sort_by_weighted_asc');
+ break;
+ case 'percent':
+ uasort($grades_by_student, 'grade_sort_by_percent');
+ break;
+ case 'percent_asc':
+ uasort($grades_by_student, 'grade_sort_by_percent_asc');
+ break;
+ case 'highgrade_asc':
+ {
+ if ($preferences->use_weighted_for_letter == 1) {
+ uasort($grades_by_student, 'grade_sort_by_weighted_asc');
+ }
+ else {
+ uasort($grades_by_student, 'grade_sort_by_percent_asc');
+ }
+ break;
+ }
+ case 'firstname':
+ uasort($grades_by_student, 'grade_sort_by_firstname');
+ break;
+ default:
+ uasort($grades_by_student, 'grade_sort_by_lastname');
+ }
+ }
+ else {
+ $grades_by_student = 0;
+ }
+ //print_object($grades_by_student);
+ //print_object($all_categories);
+ $retval = array($grades_by_student, $all_categories);
+ }
+ else {
+ $retval = array(0,0);
+ // print "
Could not find any graded items for this course.
";
+ }
+ return $retval;
+}
+
+function grade_drop_lowest($grades, $drop, $total) {
+ // drops the lowest $drop numbers from the comma seperated $grades making sure that if $grades has
+ // fewer items than $total that we don't drop too many
+ $grade_array = explode(',',$grades);
+
+ $actually_drop = (count($grade_array) - $total);
+ if ($actually_drop > 0) {
+ rsort($grade_array);
+
+ for($i=0; $i < (count($grade_array) - $actually_drop); $i++) {
+ $ret_grades["$i"] = $grade_array["$i"];
+ }
+ if ($ret_grades) {
+ $grades = implode(',',$ret_grades);
+ }
+ else {
+ // set grades to 0... they decided to drop too many
+ $grades = 0;
+ }
+ }
+ return $grades;
+}
+
+function grade_get_grades() {
+ global $CFG;
+ global $course;
+ $mods = grade_get_grade_items($course->id);
+ $preferences = grade_get_preferences();
+
+ if ($mods) {
+ foreach ($mods as $mod) {
+ // hidden is a gradebook setting for an assignment and visible is a course_module setting
+ if (($mod->hidden != 1 && $mod->visible==1) or (isteacher($course->id) && $preferences->show_hidden==1)) {
+ $libfile = "$CFG->dirroot/mod/$mod->modname/lib.php";
+ if (file_exists($libfile)) {
+ require_once($libfile);
+ $gradefunction = $mod->modname."_grades";
+ if ($grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"] = $gradefunction($mod->cminstance)) {
+ // added grades for particular mod
+ // now get the grade_item modifiers ie. scale_grade and extra credit
+ $scale_grade = get_record('grade_item', 'courseid', $course->id, 'cminstance', $mod->cminstance, 'modid', $mod->modid);
+
+ if (isset($scale_grade)) {
+ $grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->scale_grade = $scale_grade->scale_grade;
+ $grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->extra_credit = $scale_grade->extra_credit;
+ }
+ else {
+ $grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->scale_grade = 1.00;
+ $grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->extra_credit = 0;
+ }
+
+ if ($mod->hidden != 1 && $mod->visible==1) {
+ $grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->hidden = 0;
+ }
+ else {
+ $grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->hidden = 1;
+ }
+
+ $grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->sort_order = $scale_grade->sort_order;
+
+ // I don't think this should be necessary but it appears that the forum doesn't follow the grades API properly it returns blank or NULL when it
+ // should return a value for maxgrade according to the moodle API... so if it doesn't want to give us a grade let's not use it.
+ // this happens when grading is set to a non-numeric for a forum ie. uses "seperate and connected ways of knowing"
+ if ($grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->maxgrade == '')
+ {
+ $grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]->maxgrade = 100;
+ //unset($grades["$mod->cname"]["$mod->modid"]["$mod->cminstance"]);
+ }
+ }
+ else {
+ // delete this item from the grade_item table since it was deleted through the mod interface
+ delete_records('grade_item', 'modid', $mods->modid, 'courseid', $course->id);
+ }
+ }
+ else {
+ //print "
Could not find lib file for $mod->modid
";
+ }
+ }
+ }
+ }
+ else {
+ // Do something here for no grades
+ //print "
No grades returned. It appears that there are no items with grades for this course.
";
+ }
+ if (isset($grades)) {
+ return $grades;
+ }
+ else {
+ return NULL;
+ }
+}
+
+function grade_set_uncategorized() {
+ // this function checks to see if any mods have not been assigned a category and sets them to uncategorized.
+ global $CFG;
+ global $course;
+ global $UNCATEGORIZED;
+ $uncat = $UNCATEGORIZED;
+
+ $uncat_id = get_record('grade_category', 'courseid', $course->id, 'name', $uncat);
+
+ if (!$uncat_id) {
+ // insert the uncategorized category
+ $temp->name=$uncat;
+ $temp->courseid=$course->id;
+ $temp->drop_x_lowest = 0;
+ $temp->bonus_points = 0;
+ $temp->hidden = 0;
+ $temp->weight = 100.00;
+
+ insert_record('grade_category', $temp);
+ $uncat_id = get_record('grade_category', 'courseid', $course->id, 'name', $uncat);
+ if (!$uncat_id) {
+ error(get_string('errornocategorizedid','grades'));
+ exit(0);
+ }
+ }
+
+
+ /// Collect modules data
+ get_all_mods($course->id, $mods, $modnames, $modnamesplural, $modnamesused);
+ $itemcount = 0;
+
+ // this will let us establish the order for gradebook item display
+ $sort = 0;
+
+ /// Search through all the modules, pulling out grade data
+ $sections = get_all_sections($course->id); // Sort everything the same as the course
+ for ($i=0; $i<=$course->numsections; $i++) {
+ if (isset($sections["$i"])) { // should always be true
+ $section = $sections["$i"];
+ if ($section->sequence) {
+ $sectionmods = explode(",", $section->sequence);
+ foreach ($sectionmods as $sectionmod) {
+ if (isset($mods["$sectionmod"])) {
+ $mod = $mods["$sectionmod"];
+ $instance = get_record("$mod->modname", "id", "$mod->instance");
+ $libfile = "$CFG->dirroot/mod/$mod->modname/lib.php";
+ if (file_exists($libfile)) {
+ require_once($libfile);
+ $gradefunction = $mod->modname."_grades";
+ if (function_exists($gradefunction)) { // Skip modules without grade function
+ if ($modgrades = $gradefunction($mod->instance)) {
+ $itemcount++;
+ //modgrades contains student information with associated grade
+ //print "modname: $mod->modname id: $mod->id course: $mod->course ";
+ // get instance name from db.
+ $instance = get_record($mod->modname, 'id', $mod->instance);
+ // see if the item is already in the category table and if it is call category select with the id so it is selected
+ get_record('modules', 'name', $mod->modname);
+ $item = get_record('grade_item', 'courseid', $course->id, 'modid', $mod->module, 'cminstance', $mod->instance);
+ if (!$item) {
+ // set the item to uncategorized in grade_item
+ $item->courseid = $course->id;
+ $item->category = $uncat_id->id;
+ $item->modid = $mod->module;
+ $item->cminstance = $mod->instance;
+ $item->id = insert_record('grade_item', $item);
+ }
+ else if ($item->category == 0) {
+ // this catches any errors where they may have some wierd category set
+ set_field('grade_item', 'category', $uncat_id->id, 'id', $item->id);
+ }
+ set_field('grade_item', 'sort_order', $sort, 'id', $item->id);
+ $sort++;
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+}
+
+// sorting functions for grades
+function grade_sort_by_lastname($x,$y)
+{
+ //$grades_by_student["$student->userid"]['student_data']['firstname'] = $student->firstname;
+ //$grades_by_student["$student->userid"]['student_data']['lastname'] = $student->lastname;
+ if (strnatcasecmp($x['student_data']['lastname'],$y['student_data']['lastname']) == 0) {
+ return strnatcasecmp($x['student_data']['firstname'],$y['student_data']['firstname']);
+ }
+ else {
+ return strnatcasecmp($x['student_data']['lastname'],$y['student_data']['lastname']);
+ }
+}
+
+function grade_sort_by_firstname($x,$y)
+{
+ //$grades_by_student["$student->userid"]['student_data']['firstname'] = $student->firstname;
+ //$grades_by_student["$student->userid"]['student_data']['lastname'] = $student->lastname;
+ if (strnatcasecmp($x['student_data']['firstname'],$y['student_data']['firstname']) == 0) {
+ return strnatcasecmp($x['student_data']['lastname'],$y['student_data']['lastname']);
+ }
+ else {
+ return strnatcasecmp($x['student_data']['firstname'],$y['student_data']['firstname']);
+ }
+}
+
+function grade_sort_by_points($x,$y) {
+ if ($x['student_data']['points'] == $y['student_data']['points']) {
+ return grade_sort_by_lastname($x,$y);
+ }
+ else {
+ if ($x['student_data']['points'] > $y['student_data']['points'])
+ return -1;
+ else
+ return 1;
+ }
+}
+
+function grade_sort_by_points_asc($x,$y) {
+ if ($x['student_data']['points'] == $y['student_data']['points']) {
+ return grade_sort_by_lastname($x,$y);
+ }
+ else {
+ if ($x['student_data']['points'] < $y['student_data']['points'])
+ return -1;
+ else
+ return 1;
+ }
+}
+
+function grade_sort_by_weighted($x,$y) {
+ if ($x['student_data']['weighted'] == $y['student_data']['weighted']) {
+ return grade_sort_by_lastname($x,$y);
+ }
+ else {
+ if ($x['student_data']['weighted'] > $y['student_data']['weighted'])
+ return -1;
+ else
+ return 1;
+ }
+}
+
+function grade_sort_by_percent($x,$y) {
+ if ($x['student_data']['percent'] == $y['student_data']['percent']) {
+ return grade_sort_by_lastname($x,$y);
+ }
+ else {
+ if ($x['student_data']['percent'] > $y['student_data']['percent'])
+ return -1;
+ else
+ return 1;
+ }
+}
+
+function grade_sort_by_percent_asc($x,$y) {
+ if ($x['student_data']['percent'] == $y['student_data']['percent']) {
+ return grade_sort_by_lastname($x,$y);
+ }
+ else {
+ if ($x['student_data']['percent'] < $y['student_data']['percent'])
+ return -1;
+ else
+ return 1;
+ }
+}
+
+function grade_sort_by_weighted_asc($x,$y) {
+ if ($x['student_data']['weighted'] == $y['student_data']['weighted']) {
+ return grade_sort_by_lastname($x,$y);
+ }
+ else {
+ if ($x['student_data']['weighted'] < $y['student_data']['weighted'])
+ return -1;
+ else
+ return 1;
+ }
+}
+
+function grade_sort_by_highgrade_category($x,$y) {
+ global $cview;
+
+ if(!$cview) {
+ $cview = optional_param('cview');
+ }
+
+ if ($x["$cview"]['stats']['points'] == $y["$cview"]['stats']['points']) {
+ return grade_sort_by_lastname($x,$y);
+ }
+ else {
+ return ($y["$cview"]['stats']['points'] - $x["$cview"]['stats']['points']);
+ }
+}
+
+function grade_sort_by_highgrade_category_asc($x,$y) {
+ global $cview;
+
+ if(!$cview)
+ $cview = optional_param('cview');
+
+ if ($x["$cview"]['stats']['points'] == $y["$cview"]['stats']['points']) {
+ return grade_sort_by_lastname($x,$y);
+ }
+ else {
+ return ($x["$cview"]['stats']['points'] - $y["$cview"]['stats']['points']);
+ }
+}
+
+
+
+function grade_get_preferences() {
+ global $course;
+ global $CFG;
+ // Get the preferences for the course.
+ $preferences = get_record('grade_preferences', 'courseid', $course->id);
+ if (!$preferences) {
+ // set the default preferences (could proably just insert a record with the course id since the defaults are set in db... maybe cross db issues though? ie. postgress, oracle etc.
+ $new_prefs['use_advanced'] = 0;
+ $new_prefs['display_weighted']=0;
+ $new_prefs['display_points']=1;
+ $new_prefs['display_percent']=1;
+ $new_prefs['display_letter_grade']=0;
+ $new_prefs['use_weighted_for_letter']=0;
+ $new_prefs['reprint_headers']=0;
+ $new_prefs['display_weighted_student']=0;
+ $new_prefs['display_points_student']=1;
+ $new_prefs['display_percent_student']=0;
+ $new_prefs['display_letter_grade_student']=0;
+ $new_prefs['show_hidden']=1;
+ $new_prefs['courseid']=$course->id;
+ insert_record('grade_preferences', $new_prefs);
+ $preferences = get_record('grade_preferences', 'courseid', $course->id);
+ }
+ if (($preferences->display_weighted == 1 && isteacher($course->id)) || ($preferences->display_weighted_student == 1 && !isteacher($course->id))) {
+ $preferences->show_weighted = true;
+ }
+ else {
+ $preferences->show_weighted = false;
+ }
+
+ if (($preferences->display_points == 1 && isteacher($course->id)) || ($preferences->display_points_student == 1 && !isteacher($course->id))) {
+ $preferences->show_points = true;
+ }
+ else {
+ $preferences->show_points = false;
+ }
+
+ if (($preferences->display_percent == 1 && isteacher($course->id)) || ($preferences->display_percent_student == 1 && !isteacher($course->id))) {
+ $preferences->show_percent = true;
+ }
+ else {
+ $preferences->show_percent = false;
+ }
+ if (($preferences->display_letter_grade == 1 && isteacher($course->id)) || ($preferences->display_letter_grade_student == 1 && !isteacher($course->id))) {
+ $preferences->show_letter_grade = true;
+ }
+ else {
+ $preferences->show_letter_grade = false;
+ }
+ return $preferences;
+}
+
+function grade_preferences_menu() {
+ global $course;
+ global $action;
+ global $USER;
+ global $group;
+
+ if (isteacher($course->id) && $USER->editing) {
+
+ if (!isset($action)) {
+ $action = $_REQUEST['action'];
+ }
+
+ // remap some actions to simplify later code
+ switch ($action) {
+ case 'prefs':
+ case 'set_grade_preferences':
+ $curaction = 'prefs';
+ break;
+ case 'cats':
+ case 'vcats':
+ case 'insert_category':
+ case 'assign_categories':
+ case 'delete_category':
+ $curaction = 'cats';
+ break;
+ case 'set_grade_weights':
+ case 'weights':
+ $curaction = 'weights';
+ break;
+ case 'letters':
+ case 'set_letter_grades':
+ $curaction = 'letters';
+ break;
+ case 'view_student_grades':
+ case 'view_student_category_grades':
+ case 'grades':
+ $curaction = 'grades';
+ break;
+
+ default:
+ $curaction = 'prefs';
+ }
+
+ $strsetpreferences = get_string('setpreferences','grades');
+ $strsetcategories = get_string('setcategories','grades');
+ $strsetweights = get_string('setweights','grades');
+ $strsetgradeletters = get_string('setgradeletters','grades');
+ $strviewgrades = get_string('viewgrades','grades');
+ $strgradeexceptions = get_string('gradeexceptions','grades');
+
+
+ print '
';
+ }
+
+ foreach($categories as $category => $items) {
+ if ($category == $cview) {
+ // make sure that the grades come out in the same order
+ foreach($item_order as $order=>$assignment)
+ {
+ if ($assignment != 'stats') {
+ if ($first == 0) {
+ $colcount++;
+ $link_id = grade_get_module_link($course->id, $all_categories[$category][$assignment]['cminstance'], $all_categories[$category][$assignment]['modid']);
+
+ $link = $CFG->wwwroot.'/mod/'.$all_categories[$category][$assignment]['modname'].'/view.php?id='.$link_id->id;
+ if ($all_categories[$category][$assignment]['hidden'] == 0) {
+ $header .= '
';
+ }
+ }
+ }
+}
+
+function grade_display_grade_weights() {
+// get all categories with weights
+// then set and display that entry.
+ global $CFG;
+ global $course;
+ global $USER;
+
+ $categories = get_records('grade_category', 'courseid', $course->id);
+ if ($categories) {
+ print '
';
+ }
+ }
+ else {
+ /// maybe this should just do the default population of the categories instead?
+ print ''.get_string('setcategorieserror','grades').'';
+ }
+ print '
';
+ print '
'.get_string('dropxlowestwarning','grades').'
';
+}
+
+function grade_set_categories() {
+ global $CFG;
+ global $course;
+ global $USER;
+
+
+ /// Collect modules data
+ get_all_mods($course->id, $mods, $modnames, $modnamesplural, $modnamesused);
+
+ print '
