Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
// This file is part of Moodle - http://moodle.org/
3
//
4
// Moodle is free software: you can redistribute it and/or modify
5
// it under the terms of the GNU General Public License as published by
6
// the Free Software Foundation, either version 3 of the License, or
7
// (at your option) any later version.
8
//
9
// Moodle is distributed in the hope that it will be useful,
10
// but WITHOUT ANY WARRANTY; without even the implied warranty of
11
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
// GNU General Public License for more details.
13
//
14
// You should have received a copy of the GNU General Public License
15
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16
 
17
/**
18
 * Redirects the user to either a questionnaire or to the questionnaire report
19
 *
20
 * @package   mod_questionnaire
21
 * @copyright 2013 onwards Joseph Rézeau  email moodle@rezeau.org
22
 * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
23
 **/
24
 
25
/**
26
 * Require config.php
27
 */
28
require_once("../../config.php");
29
require_once($CFG->dirroot.'/mod/questionnaire/questionnaire.class.php');
30
 
31
$id = required_param('id', PARAM_INT);
32
$cm = get_coursemodule_from_id('questionnaire', $id, 0, false, MUST_EXIST);
33
if (! $questionnaire = $DB->get_record("questionnaire", array("id" => $cm->instance))) {
34
    throw new \moodle_exception('invalidcoursemodule', 'mod_questionnaire');
35
}
36
$course = $DB->get_record('course', array('id' => $cm->course), '*', MUST_EXIST);
37
require_login($course, false, $cm);
38
$PAGE->set_url('/mod/questionnaire/grade.php', array('id' => $cm->id));
39
 
40
if (has_capability('mod/questionnaire:readallresponseanytime', context_module::instance($cm->id))) {
41
    redirect('report.php?instance='.$questionnaire->id);
42
} else {
43
    redirect('view.php?id='.$cm->id);
44
}