2007-07-13 07:05:04 +00:00
|
|
|
<?php // $Id$
|
2007-10-10 06:34:20 +00:00
|
|
|
|
|
|
|
///////////////////////////////////////////////////////////////////////////
|
|
|
|
// //
|
|
|
|
// NOTICE OF COPYRIGHT //
|
|
|
|
// //
|
|
|
|
// Moodle - Modular Object-Oriented Dynamic Learning Environment //
|
|
|
|
// http://moodle.com //
|
|
|
|
// //
|
|
|
|
// Copyright (C) 1999 onwards Martin Dougiamas http://moodle.com //
|
|
|
|
// //
|
|
|
|
// This program is free software; you can redistribute it and/or modify //
|
|
|
|
// it under the terms of the GNU General Public License as published by //
|
|
|
|
// the Free Software Foundation; either version 2 of the License, or //
|
|
|
|
// (at your option) any later version. //
|
|
|
|
// //
|
|
|
|
// This program is distributed in the hope that it will be useful, //
|
|
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of //
|
|
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
|
|
|
|
// GNU General Public License for more details: //
|
|
|
|
// //
|
|
|
|
// http://www.gnu.org/copyleft/gpl.html //
|
|
|
|
// //
|
|
|
|
///////////////////////////////////////////////////////////////////////////
|
2007-07-11 05:07:39 +00:00
|
|
|
/**
|
2007-07-13 07:05:04 +00:00
|
|
|
* File containing the grade_report class.
|
|
|
|
* @package gradebook
|
2007-07-11 05:07:39 +00:00
|
|
|
*/
|
2007-07-13 07:05:04 +00:00
|
|
|
|
|
|
|
require_once($CFG->libdir.'/gradelib.php');
|
|
|
|
|
|
|
|
/**
|
|
|
|
* An abstract class containing variables and methods used by all or most reports.
|
|
|
|
* @abstract
|
|
|
|
* @package gradebook
|
|
|
|
*/
|
|
|
|
class grade_report {
|
|
|
|
/**
|
|
|
|
* The courseid.
|
|
|
|
* @var int $courseid
|
|
|
|
*/
|
|
|
|
var $courseid;
|
|
|
|
|
2007-09-06 10:19:24 +00:00
|
|
|
/**
|
|
|
|
* The course.
|
|
|
|
* @var object $course
|
|
|
|
*/
|
|
|
|
var $course;
|
|
|
|
|
2007-07-17 06:09:03 +00:00
|
|
|
/** Grade plugin return tracking object.
|
|
|
|
var $gpr;
|
|
|
|
|
2007-07-13 07:05:04 +00:00
|
|
|
/**
|
|
|
|
* The context.
|
|
|
|
* @var int $context
|
|
|
|
*/
|
|
|
|
var $context;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* The grade_tree object.
|
|
|
|
* @var object $gtree
|
|
|
|
*/
|
|
|
|
var $gtree;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* User preferences related to this report.
|
2007-07-17 18:46:21 +00:00
|
|
|
* @var array $prefs
|
2007-07-13 07:05:04 +00:00
|
|
|
*/
|
2007-07-17 18:46:21 +00:00
|
|
|
var $prefs = array();
|
2007-07-13 07:05:04 +00:00
|
|
|
|
|
|
|
/**
|
|
|
|
* The roles for this report.
|
|
|
|
* @var string $gradebookroles
|
|
|
|
*/
|
|
|
|
var $gradebookroles;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* base url for sorting by first/last name.
|
|
|
|
* @var string $baseurl
|
|
|
|
*/
|
|
|
|
var $baseurl;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* base url for paging.
|
|
|
|
* @var string $pbarurl
|
|
|
|
*/
|
|
|
|
var $pbarurl;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Current page (for paging).
|
|
|
|
* @var int $page
|
|
|
|
*/
|
|
|
|
var $page;
|
|
|
|
|
2007-07-13 19:02:40 +00:00
|
|
|
/**
|
|
|
|
* Array of cached language strings (using get_string() all the time takes a long time!).
|
|
|
|
* @var array $lang_strings
|
|
|
|
*/
|
|
|
|
var $lang_strings = array();
|
|
|
|
|
2007-07-20 09:34:35 +00:00
|
|
|
//// GROUP VARIABLES (including SQL)
|
|
|
|
|
|
|
|
/**
|
|
|
|
* The current group being displayed.
|
|
|
|
* @var int $currentgroup
|
|
|
|
*/
|
|
|
|
var $currentgroup;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* A HTML select element used to select the current group.
|
|
|
|
* @var string $group_selector
|
|
|
|
*/
|
|
|
|
var $group_selector;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* An SQL fragment used to add linking information to the group tables.
|
|
|
|
* @var string $groupsql
|
|
|
|
*/
|
|
|
|
var $groupsql;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* An SQL constraint to append to the queries used by this object to build the report.
|
|
|
|
* @var string $groupwheresql
|
|
|
|
*/
|
|
|
|
var $groupwheresql;
|
|
|
|
|
|
|
|
|
2007-07-13 07:05:04 +00:00
|
|
|
/**
|
|
|
|
* Constructor. Sets local copies of user preferences and initialises grade_tree.
|
|
|
|
* @param int $courseid
|
2007-07-17 06:09:03 +00:00
|
|
|
* @param object $gpr grade plugin return tracking object
|
2007-07-13 07:05:04 +00:00
|
|
|
* @param string $context
|
|
|
|
* @param int $page The current page being viewed (when report is paged)
|
|
|
|
*/
|
2007-07-17 06:09:03 +00:00
|
|
|
function grade_report($courseid, $gpr, $context, $page=null) {
|
2007-09-06 10:19:24 +00:00
|
|
|
global $CFG, $COURSE;
|
2007-07-13 07:05:04 +00:00
|
|
|
|
2007-09-27 02:29:46 +00:00
|
|
|
if (!$CFG->gradebookroles) {
|
2007-09-28 20:12:43 +00:00
|
|
|
error ('no roles defined in admin->appearance->graderoles');
|
2007-09-27 02:29:46 +00:00
|
|
|
}
|
2007-09-28 20:12:43 +00:00
|
|
|
|
2007-09-27 02:29:46 +00:00
|
|
|
|
2007-07-25 19:57:47 +00:00
|
|
|
$this->courseid = $courseid;
|
2007-09-06 10:19:24 +00:00
|
|
|
if ($this->courseid == $COURSE->id) {
|
|
|
|
$this->course = $COURSE;
|
|
|
|
} else {
|
|
|
|
$this->course = get_record('course', 'id', $this->courseid);
|
|
|
|
}
|
2007-09-19 15:37:46 +00:00
|
|
|
|
2007-07-25 19:57:47 +00:00
|
|
|
$this->gpr = $gpr;
|
|
|
|
$this->context = $context;
|
|
|
|
$this->page = $page;
|
2007-07-13 07:05:04 +00:00
|
|
|
|
|
|
|
// roles to be displayed in the gradebook
|
|
|
|
$this->gradebookroles = $CFG->gradebookroles;
|
|
|
|
|
2007-07-25 19:57:47 +00:00
|
|
|
// init gtree in child class
|
2007-07-11 05:07:39 +00:00
|
|
|
}
|
|
|
|
|
2007-07-13 07:05:04 +00:00
|
|
|
/**
|
|
|
|
* Given the name of a user preference (without grade_report_ prefix), locally saves then returns
|
|
|
|
* the value of that preference. If the preference has already been fetched before,
|
|
|
|
* the saved value is returned. If the preference is not set at the User level, the $CFG equivalent
|
|
|
|
* is given (site default).
|
2007-07-17 14:53:10 +00:00
|
|
|
* @static (Can be called statically, but then doesn't benefit from caching)
|
2007-07-13 07:05:04 +00:00
|
|
|
* @param string $pref The name of the preference (do not include the grade_report_ prefix)
|
2007-07-18 14:54:35 +00:00
|
|
|
* @param int $objectid An optional itemid or categoryid to check for a more fine-grained preference
|
2007-07-13 07:05:04 +00:00
|
|
|
* @return mixed The value of the preference
|
|
|
|
*/
|
2007-07-18 14:54:35 +00:00
|
|
|
function get_pref($pref, $objectid=null) {
|
2007-07-13 07:05:04 +00:00
|
|
|
global $CFG;
|
2007-07-17 14:53:10 +00:00
|
|
|
$fullprefname = 'grade_report_' . $pref;
|
2007-07-11 05:07:39 +00:00
|
|
|
|
2007-07-17 18:46:21 +00:00
|
|
|
$retval = null;
|
|
|
|
|
2007-07-25 15:04:31 +00:00
|
|
|
if (!isset($this) OR get_class($this) != 'grade_report') {
|
2007-07-18 14:54:35 +00:00
|
|
|
if (!empty($objectid)) {
|
|
|
|
$retval = get_user_preferences($fullprefname . $objectid, grade_report::get_pref($pref));
|
2007-07-16 19:46:54 +00:00
|
|
|
} else {
|
2007-07-17 18:46:21 +00:00
|
|
|
$retval = get_user_preferences($fullprefname, $CFG->$fullprefname);
|
2007-07-16 19:46:54 +00:00
|
|
|
}
|
2007-07-17 14:53:10 +00:00
|
|
|
} else {
|
2007-07-18 14:54:35 +00:00
|
|
|
if (empty($this->prefs[$pref.$objectid])) {
|
2007-07-17 18:46:21 +00:00
|
|
|
|
2007-07-18 14:54:35 +00:00
|
|
|
if (!empty($objectid)) {
|
|
|
|
$retval = get_user_preferences($fullprefname . $objectid);
|
2007-07-17 18:46:21 +00:00
|
|
|
if (empty($retval)) {
|
|
|
|
// No item pref found, we are returning the global preference
|
|
|
|
$retval = $this->get_pref($pref);
|
2007-07-18 14:54:35 +00:00
|
|
|
$objectid = null;
|
2007-07-17 18:46:21 +00:00
|
|
|
}
|
2007-07-17 14:53:10 +00:00
|
|
|
} else {
|
2007-07-17 18:46:21 +00:00
|
|
|
$retval = get_user_preferences($fullprefname, $CFG->$fullprefname);
|
2007-07-17 14:53:10 +00:00
|
|
|
}
|
2007-07-18 14:54:35 +00:00
|
|
|
$this->prefs[$pref.$objectid] = $retval;
|
2007-07-17 18:46:21 +00:00
|
|
|
} else {
|
2007-07-18 14:54:35 +00:00
|
|
|
$retval = $this->prefs[$pref.$objectid];
|
2007-07-17 14:53:10 +00:00
|
|
|
}
|
2007-07-13 07:05:04 +00:00
|
|
|
}
|
2007-07-17 18:46:21 +00:00
|
|
|
|
|
|
|
return $retval;
|
2007-07-13 07:05:04 +00:00
|
|
|
}
|
2007-07-16 19:46:54 +00:00
|
|
|
|
2007-07-13 07:05:04 +00:00
|
|
|
/**
|
2007-07-17 14:53:10 +00:00
|
|
|
* Uses set_user_preferences() to update the value of a user preference. If 'default' is given as the value,
|
|
|
|
* the preference will be removed in favour of a higher-level preference.
|
|
|
|
* @static
|
2007-07-13 07:05:04 +00:00
|
|
|
* @param string $pref_name The name of the preference.
|
|
|
|
* @param mixed $pref_value The value of the preference.
|
2007-07-16 19:46:54 +00:00
|
|
|
* @param int $itemid An optional itemid to which the preference will be assigned
|
2007-07-13 07:05:04 +00:00
|
|
|
* @return bool Success or failure.
|
|
|
|
* TODO print visual feedback
|
|
|
|
*/
|
2007-07-17 14:53:10 +00:00
|
|
|
function set_pref($pref, $pref_value='default', $itemid=null) {
|
2007-07-16 19:46:54 +00:00
|
|
|
$fullprefname = 'grade_report_' . $pref;
|
2007-07-17 14:53:10 +00:00
|
|
|
if ($pref_value == 'default') {
|
|
|
|
return unset_user_preference($fullprefname.$itemid);
|
|
|
|
} else {
|
|
|
|
return set_user_preference($fullprefname.$itemid, $pref_value);
|
2007-07-13 07:05:04 +00:00
|
|
|
}
|
2007-07-11 05:07:39 +00:00
|
|
|
}
|
|
|
|
|
2007-07-13 07:05:04 +00:00
|
|
|
/**
|
|
|
|
* Handles form data sent by this report for this report. Abstract method to implement in all children.
|
|
|
|
* @abstract
|
|
|
|
* @param array $data
|
|
|
|
* @return mixed True or array of errors
|
|
|
|
*/
|
|
|
|
function process_data($data) {
|
|
|
|
// Implement in children classes
|
|
|
|
}
|
2007-07-11 05:07:39 +00:00
|
|
|
|
2007-07-13 07:05:04 +00:00
|
|
|
/**
|
|
|
|
* Processes a single action against a category, grade_item or grade.
|
|
|
|
* @param string $target Sortorder
|
|
|
|
* @param string $action Which action to take (edit, delete etc...)
|
|
|
|
* @return
|
|
|
|
*/
|
|
|
|
function process_action($target, $action) {
|
2007-07-24 21:20:29 +00:00
|
|
|
//implement if needed
|
2007-07-13 07:05:04 +00:00
|
|
|
}
|
|
|
|
|
2007-07-13 19:02:40 +00:00
|
|
|
/**
|
|
|
|
* First checks the cached language strings, then returns match if found, or uses get_string()
|
|
|
|
* to get it from the DB, caches it then returns it.
|
|
|
|
* @param string $strcode
|
|
|
|
* @param string $section Optional language section
|
|
|
|
* @return string
|
|
|
|
*/
|
|
|
|
function get_lang_string($strcode, $section=null) {
|
|
|
|
if (empty($this->lang_strings[$strcode])) {
|
|
|
|
$this->lang_strings[$strcode] = get_string($strcode, $section);
|
|
|
|
}
|
|
|
|
return $this->lang_strings[$strcode];
|
|
|
|
}
|
|
|
|
|
2007-07-16 19:46:54 +00:00
|
|
|
/**
|
|
|
|
* Computes then returns the percentage value of the grade value within the given range.
|
|
|
|
* @param float $gradeval
|
|
|
|
* @param float $grademin
|
|
|
|
* @param float $grademx
|
|
|
|
* @return float $percentage
|
|
|
|
*/
|
|
|
|
function grade_to_percentage($gradeval, $grademin, $grademax) {
|
|
|
|
if ($grademin >= $grademax) {
|
|
|
|
debugging("The minimum grade ($grademin) was higher than or equal to the maximum grade ($grademax)!!! Cannot proceed with computation.");
|
|
|
|
}
|
|
|
|
$offset_value = $gradeval - $grademin;
|
|
|
|
$offset_max = $grademax - $grademin;
|
|
|
|
$factor = 100 / $offset_max;
|
|
|
|
$percentage = $offset_value * $factor;
|
|
|
|
return $percentage;
|
|
|
|
}
|
2007-07-18 11:34:55 +00:00
|
|
|
|
|
|
|
/**
|
2007-09-19 15:37:46 +00:00
|
|
|
* Fetches and returns an array of grade letters indexed by their grade boundaries, as stored in course item settings or site preferences.
|
2007-07-18 11:34:55 +00:00
|
|
|
* @return array
|
|
|
|
*/
|
|
|
|
function get_grade_letters() {
|
2007-09-19 15:37:46 +00:00
|
|
|
global $COURSE;
|
|
|
|
$context = get_context_instance(CONTEXT_COURSE, $COURSE->id);
|
2007-10-04 17:09:34 +00:00
|
|
|
return grade_get_letters($context);
|
2007-07-18 11:34:55 +00:00
|
|
|
}
|
2007-07-20 09:34:35 +00:00
|
|
|
|
|
|
|
/**
|
|
|
|
* Fetches and returns a count of all the users that will be shown on this page.
|
2007-10-27 22:05:58 +00:00
|
|
|
* @param boolean $groups include groups limit
|
2007-07-20 09:34:35 +00:00
|
|
|
* @return int Count of users
|
|
|
|
*/
|
2007-10-27 22:05:58 +00:00
|
|
|
function get_numusers($groups=true) {
|
2007-07-20 09:34:35 +00:00
|
|
|
global $CFG;
|
|
|
|
|
2007-10-27 22:05:58 +00:00
|
|
|
$groupsql = "";
|
|
|
|
$groupwheresql = "";
|
|
|
|
if ($groups) {
|
|
|
|
$groupsql = $this->groupsql;
|
|
|
|
$groupwheresql = $this->groupsqlwhere;
|
|
|
|
}
|
|
|
|
|
2007-07-20 09:34:35 +00:00
|
|
|
$countsql = "SELECT COUNT(DISTINCT u.id)
|
|
|
|
FROM {$CFG->prefix}grade_grades g RIGHT OUTER JOIN
|
|
|
|
{$CFG->prefix}user u ON u.id = g.userid
|
|
|
|
LEFT JOIN {$CFG->prefix}role_assignments ra ON u.id = ra.userid
|
2007-10-27 22:05:58 +00:00
|
|
|
$groupsql
|
2007-07-20 09:34:35 +00:00
|
|
|
WHERE ra.roleid in ($this->gradebookroles)
|
2007-10-27 22:05:58 +00:00
|
|
|
$groupwheresql
|
2007-07-20 09:34:35 +00:00
|
|
|
AND ra.contextid ".get_related_contexts_string($this->context);
|
|
|
|
return count_records_sql($countsql);
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Sets up this object's group variables, mainly to restrict the selection of users to display.
|
|
|
|
*/
|
|
|
|
function setup_groups() {
|
|
|
|
global $CFG;
|
|
|
|
|
|
|
|
/// find out current groups mode
|
2007-09-06 10:19:24 +00:00
|
|
|
$this->group_selector = groups_print_course_menu($this->course, $this->pbarurl, true);
|
|
|
|
$this->currentgroup = groups_get_course_group($this->course);
|
2007-07-20 09:34:35 +00:00
|
|
|
|
|
|
|
if ($this->currentgroup) {
|
|
|
|
$this->groupsql = " LEFT JOIN {$CFG->prefix}groups_members gm ON gm.userid = u.id ";
|
|
|
|
$this->groupwheresql = " AND gm.groupid = $this->currentgroup ";
|
|
|
|
}
|
|
|
|
}
|
2007-08-01 14:08:50 +00:00
|
|
|
|
|
|
|
/**
|
|
|
|
* Returns an arrow icon inside an <a> tag, for the purpose of sorting a column.
|
|
|
|
* @param string $direction
|
|
|
|
* @param string $sort_link
|
|
|
|
* @param string HTML
|
|
|
|
*/
|
|
|
|
function get_sort_arrow($direction='move', $sort_link=null) {
|
2007-08-06 08:10:37 +00:00
|
|
|
$matrix = array('up' => 'asc', 'down' => 'desc', 'move' => 'desc');
|
2007-08-01 14:08:50 +00:00
|
|
|
$strsort = $this->get_lang_string('sort' . $matrix[$direction]);
|
|
|
|
$arrow = print_arrow($direction, $strsort, true);
|
|
|
|
$html = '<a href="'.$sort_link .'">' . $arrow . '</a>';
|
|
|
|
return $html;
|
|
|
|
}
|
2007-07-11 05:07:39 +00:00
|
|
|
}
|
2007-07-13 07:05:04 +00:00
|
|
|
?>
|