AutorÃa | Ultima modificación | Ver Log |
<?php// This file is part of Moodle - http://moodle.org///// Moodle 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 3 of the License, or// (at your option) any later version.//// Moodle 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.//// You should have received a copy of the GNU General Public License// along with Moodle. If not, see <http://www.gnu.org/licenses/>.use mod_quiz\local\reports\attempts_report_table;use mod_quiz\quiz_attempt;/*** This is a table subclass for displaying the quiz responses report.** @copyright 2008 Jean-Michel Vedrine* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later*/class quiz_last_responses_table extends attempts_report_table {/*** Constructor* @param stdClass $quiz* @param context $context* @param string $qmsubselect* @param quiz_responses_options $options* @param \core\dml\sql_join $groupstudentsjoins* @param \core\dml\sql_join $studentsjoins* @param array $questions* @param moodle_url $reporturl*/public function __construct($quiz, $context, $qmsubselect, quiz_responses_options $options,\core\dml\sql_join $groupstudentsjoins, \core\dml\sql_join $studentsjoins, $questions, $reporturl) {parent::__construct('mod-quiz-report-responses-report', $quiz, $context,$qmsubselect, $options, $groupstudentsjoins, $studentsjoins, $questions, $reporturl);}public function build_table() {if (!$this->rawdata) {return;}$this->strtimeformat = str_replace(',', ' ', get_string('strftimedatetime'));parent::build_table();}public function col_sumgrades($attempt) {if ($attempt->state != quiz_attempt::FINISHED) {return '-';}$grade = quiz_rescale_grade($attempt->sumgrades, $this->quiz);if ($this->is_downloading()) {return $grade;}$gradehtml = '<a href="review.php?q=' . $this->quiz->id . '&attempt=' .$attempt->attempt . '">' . $grade . '</a>';return $gradehtml;}public function data_col($slot, $field, $attempt) {if ($attempt->usageid == 0) {return '-';}$value = $this->field_from_extra_data($attempt, $slot, $field);if (is_null($value)) {$summary = '-';} else {$summary = trim($value);}if ($this->is_downloading() && $this->is_downloading() != 'html') {return $summary;}$summary = s($summary);if ($this->is_downloading() || $field != 'responsesummary') {return $summary;}return $this->make_review_link($summary, $attempt, $slot);}/*** Column text from the extra data loaded in load_extra_data(), before html formatting etc.** @param stdClass $attempt* @param int $slot* @param string $field* @return string*/protected function field_from_extra_data($attempt, $slot, $field) {if (!isset($this->lateststeps[$attempt->usageid][$slot])) {return '-';}return $this->lateststeps[$attempt->usageid][$slot]->$field;}public function other_cols($colname, $attempt) {if (preg_match('/^question(\d+)$/', $colname, $matches)) {return $this->data_col($matches[1], 'questionsummary', $attempt);} else if (preg_match('/^response(\d+)$/', $colname, $matches)) {return $this->data_col($matches[1], 'responsesummary', $attempt);} else if (preg_match('/^right(\d+)$/', $colname, $matches)) {return $this->data_col($matches[1], 'rightanswer', $attempt);} else {return parent::other_cols($colname, $attempt);}}protected function requires_extra_data() {return true;}protected function is_latest_step_column($column) {if (preg_match('/^(?:question|response|right)([0-9]+)/', $column, $matches)) {return $matches[1];}return false;}/*** Get any fields that might be needed when sorting on date for a particular slot.* @param int $slot the slot for the column we want.* @param string $alias the table alias for latest state information relating to that slot.* @return string sql fragment to alias fields.*/protected function get_required_latest_state_fields($slot, $alias) {global $DB;return $DB->sql_order_by_text("{$alias}.questionsummary") . " AS question{$slot}," . $DB->sql_order_by_text("{$alias}.rightanswer") . " AS right{$slot}," . $DB->sql_order_by_text("{$alias}.responsesummary") . " AS response{$slot}";}}