mirror of
https://github.com/moodle/moodle.git
synced 2025-01-19 14:27:22 +01:00
70c6c0ad70
- Removed $course parameter from build_navigation() - Updated all calls to build_navigation() Author: Matt Clarkson <mattc@catalyst.net.nz> Committer: Matt Clarkson <mattc@catalyst.net.nz>
447 lines
17 KiB
PHP
447 lines
17 KiB
PHP
<?php // $Id$
|
|
|
|
require_once("../../config.php");
|
|
require_once("lib.php");
|
|
|
|
// Check that all the parameters have been provided.
|
|
|
|
$id = required_param('id', PARAM_INT); // Course Module ID
|
|
$action = optional_param('action', '', PARAM_ALPHA); // What to look at
|
|
$qid = optional_param('qid', 0, PARAM_RAW); // Question IDs comma-separated list
|
|
$student = optional_param('student', 0, PARAM_INT); // Student ID
|
|
$notes = optional_param('notes', '', PARAM_RAW); // Save teachers notes
|
|
|
|
$qids = explode(',', $qid);
|
|
$qids = clean_param($qids, PARAM_INT);
|
|
$qid = implode (',', $qids);
|
|
|
|
if (! $cm = get_coursemodule_from_id('survey', $id)) {
|
|
error("Course Module ID was incorrect");
|
|
}
|
|
|
|
if (! $course = get_record("course", "id", $cm->course)) {
|
|
error("Course is misconfigured");
|
|
}
|
|
|
|
require_login($course->id, false);
|
|
|
|
$context = get_context_instance(CONTEXT_MODULE, $cm->id);
|
|
|
|
require_capability('mod/survey:readresponses', $context);
|
|
|
|
if (! $survey = get_record("survey", "id", $cm->instance)) {
|
|
error("Survey ID was incorrect");
|
|
}
|
|
|
|
if (! $template = get_record("survey", "id", $survey->template)) {
|
|
error("Template ID was incorrect");
|
|
}
|
|
|
|
$showscales = ($template->name != 'ciqname');
|
|
|
|
|
|
$strreport = get_string("report", "survey");
|
|
$strsurvey = get_string("modulename", "survey");
|
|
$strsurveys = get_string("modulenameplural", "survey");
|
|
$strsummary = get_string("summary", "survey");
|
|
$strscales = get_string("scales", "survey");
|
|
$strquestion = get_string("question", "survey");
|
|
$strquestions = get_string("questions", "survey");
|
|
$strdownload = get_string("download", "survey");
|
|
$strallscales = get_string("allscales", "survey");
|
|
$strallquestions = get_string("allquestions", "survey");
|
|
$strselectedquestions = get_string("selectedquestions", "survey");
|
|
$strseemoredetail = get_string("seemoredetail", "survey");
|
|
$strnotes = get_string("notes", "survey");
|
|
|
|
add_to_log($course->id, "survey", "view report", "report.php?id=$cm->id", "$survey->id", $cm->id);
|
|
|
|
if ($course->id != SITEID) {
|
|
$navigation = "<a href=\"../../course/view.php?id=$course->id\">$course->shortname</a> ->
|
|
<a href=\"index.php?id=$course->id\">$strsurveys</a> ->
|
|
<a href=\"view.php?id=$cm->id\">".format_string($survey->name,true)."</a> -> ";
|
|
} else {
|
|
$navigation = "<a href=\"index.php?id=$course->id\">$strsurveys</a> ->
|
|
<a href=\"view.php?id=$cm->id\">".format_string($survey->name,true)."</a> -> ";
|
|
}
|
|
|
|
$crumbs[] = array('name' => $strsurveys, 'link' => "index.php?id=$course->id", 'type' => 'activity');
|
|
$crumbs[] = array('name' => format_string($survey->name), 'link' => "view.php?id=$cm->id", 'type' => 'activityinstance');
|
|
$crumbs[] = array('name' => $strreport, 'link' => '', 'type' => 'title');
|
|
$navigation = build_navigation($crumbs);
|
|
|
|
print_header("$course->shortname: ".format_string($survey->name), $course->fullname, $navigation,
|
|
"", "", true,
|
|
update_module_button($cm->id, $course->id, $strsurvey), navmenu($course, $cm));
|
|
|
|
/// Check to see if groups are being used in this survey
|
|
if ($groupmode = groupmode($course, $cm)) { // Groups are being used
|
|
$menuaction = $action == "student" ? "students" : $action;
|
|
$currentgroup = setup_and_print_groups($course, $groupmode,
|
|
"report.php?id=$cm->id&action=$menuaction&qid=$qid");
|
|
} else {
|
|
$currentgroup = 0;
|
|
}
|
|
|
|
if ($currentgroup) {
|
|
$users = get_group_users($currentgroup);
|
|
} else {
|
|
$users = get_course_users($course->id);
|
|
}
|
|
|
|
print_simple_box_start("center");
|
|
if ($showscales) {
|
|
echo "<a href=\"report.php?action=summary&id=$id\">$strsummary</a>";
|
|
echo " <a href=\"report.php?action=scales&id=$id\">$strscales</a>";
|
|
echo " <a href=\"report.php?action=questions&id=$id\">$strquestions</a>";
|
|
echo " <a href=\"report.php?action=students&id=$id\">$course->students</a>";
|
|
if (has_capability('mod/survey:download', $context)) {
|
|
echo " <a href=\"report.php?action=download&id=$id\">$strdownload</a>";
|
|
}
|
|
if (empty($action)) {
|
|
$action = "summary";
|
|
}
|
|
} else {
|
|
echo "<a href=\"report.php?action=questions&id=$id\">$strquestions</a>";
|
|
echo " <a href=\"report.php?action=students&id=$id\">$course->students</a>";
|
|
if (has_capability('mod/survey:download', $context)) {
|
|
echo " <a href=\"report.php?action=download&id=$id\">$strdownload</a>";
|
|
}
|
|
if (empty($action)) {
|
|
$action = "questions";
|
|
}
|
|
}
|
|
print_simple_box_end();
|
|
|
|
print_spacer(30,30);
|
|
|
|
|
|
/// Print the menu across the top
|
|
|
|
$virtualscales = false;
|
|
|
|
switch ($action) {
|
|
|
|
case "summary":
|
|
print_heading($strsummary);
|
|
|
|
if (survey_count_responses($survey->id, $currentgroup)) {
|
|
echo "<div class='reportsummary'><a href=\"report.php?action=scales&id=$id\">";
|
|
survey_print_graph("id=$id&group=$currentgroup&type=overall.png");
|
|
echo "</a></div>";
|
|
} else {
|
|
notify(get_string("nobodyyet","survey"));
|
|
}
|
|
break;
|
|
|
|
case "scales":
|
|
print_heading($strscales);
|
|
|
|
if (! $results = survey_get_responses($survey->id, $currentgroup) ) {
|
|
notify(get_string("nobodyyet","survey"));
|
|
|
|
} else {
|
|
|
|
$questions = get_records_list("survey_questions", "id", $survey->questions);
|
|
$questionorder = explode(",", $survey->questions);
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
$question = $questions[$val];
|
|
if ($question->type < 0) { // We have some virtual scales. Just show them.
|
|
$virtualscales = true;
|
|
break;
|
|
}
|
|
}
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
$question = $questions[$val];
|
|
if ($question->multi) {
|
|
if (!empty($virtualscales) && $question->type > 0) { // Don't show non-virtual scales if virtual
|
|
continue;
|
|
}
|
|
echo "<p class=\"centerpara\"><a title=\"$strseemoredetail\" href=\"report.php?action=questions&id=$id&qid=$question->multi\">";
|
|
survey_print_graph("id=$id&qid=$question->id&group=$currentgroup&type=multiquestion.png");
|
|
echo "</a></p><br />";
|
|
}
|
|
}
|
|
}
|
|
|
|
break;
|
|
|
|
case "questions":
|
|
|
|
if ($qid) { // just get one multi-question
|
|
$questions = get_records_list("survey_questions", "id", $qid);
|
|
$questionorder = explode(",", $qid);
|
|
|
|
if ($scale = get_records("survey_questions", "multi", "$qid")) {
|
|
$scale = array_pop($scale);
|
|
print_heading("$scale->text - $strselectedquestions");
|
|
} else {
|
|
print_heading($strselectedquestions);
|
|
}
|
|
|
|
} else { // get all top-level questions
|
|
$questions = get_records_list("survey_questions", "id", $survey->questions);
|
|
$questionorder = explode(",", $survey->questions);
|
|
|
|
print_heading($strallquestions);
|
|
}
|
|
|
|
if (! $results = survey_get_responses($survey->id, $currentgroup) ) {
|
|
notify(get_string("nobodyyet","survey"));
|
|
|
|
} else {
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
$question = $questions[$val];
|
|
if ($question->type < 0) { // We have some virtual scales. DON'T show them.
|
|
$virtualscales = true;
|
|
break;
|
|
}
|
|
}
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
$question = $questions[$val];
|
|
|
|
if ($question->type < 0) { // We have some virtual scales. DON'T show them.
|
|
continue;
|
|
}
|
|
$question->text = get_string($question->text, "survey");
|
|
|
|
if ($question->multi) {
|
|
echo "<h3>$question->text:</h3>";
|
|
|
|
$subquestions = get_records_list("survey_questions", "id", $question->multi);
|
|
$subquestionorder = explode(",", $question->multi);
|
|
foreach ($subquestionorder as $key => $val) {
|
|
$subquestion = $subquestions[$val];
|
|
if ($subquestion->type > 0) {
|
|
echo "<p class=\"centerpara\">";
|
|
echo "<a title=\"$strseemoredetail\" href=\"report.php?action=question&id=$id&qid=$subquestion->id\">";
|
|
survey_print_graph("id=$id&qid=$subquestion->id&group=$currentgroup&type=question.png");
|
|
echo "</a></p>";
|
|
}
|
|
}
|
|
} else if ($question->type > 0 ) {
|
|
echo "<p class=\"centerpara\">";
|
|
echo "<a title=\"$strseemoredetail\" href=\"report.php?action=question&id=$id&qid=$question->id\">";
|
|
survey_print_graph("id=$id&qid=$question->id&group=$currentgroup&type=question.png");
|
|
echo "</a></p>";
|
|
|
|
} else {
|
|
$table = NULL;
|
|
$table->head = array($question->text);
|
|
$table->align = array ("left");
|
|
|
|
$contents = '<table cellpadding="15" width="100%">';
|
|
|
|
if ($aaa = survey_get_user_answers($survey->id, $question->id, $currentgroup, "sa.time ASC")) {
|
|
foreach ($aaa as $a) {
|
|
$contents .= "<tr>";
|
|
$contents .= '<td class="fullnamecell">'.fullname($a).'</td>';
|
|
$contents .= '<td valign="top">'.$a->answer1.'</td>';
|
|
$contents .= "</tr>";
|
|
}
|
|
}
|
|
$contents .= "</table>";
|
|
|
|
$table->data[] = array($contents);
|
|
|
|
print_table($table);
|
|
print_spacer(30);
|
|
}
|
|
}
|
|
}
|
|
|
|
break;
|
|
|
|
case "question":
|
|
if (!$question = get_record("survey_questions", "id", $qid)) {
|
|
error("Question doesn't exist");
|
|
}
|
|
$question->text = get_string($question->text, "survey");
|
|
|
|
$answers = explode(",", get_string($question->options, "survey"));
|
|
|
|
print_heading("$strquestion: $question->text");
|
|
|
|
|
|
$strname = get_string("name", "survey");
|
|
$strtime = get_string("time", "survey");
|
|
$stractual = get_string("actual", "survey");
|
|
$strpreferred = get_string("preferred", "survey");
|
|
$strdateformat = get_string("strftimedatetime");
|
|
|
|
$table = NULL;
|
|
$table->head = array("", $strname, $strtime, $stractual, $strpreferred);
|
|
$table->align = array ("left", "left", "left", "left", "right");
|
|
$table->size = array (35, "", "", "", "");
|
|
|
|
if ($aaa = survey_get_user_answers($survey->id, $question->id, $currentgroup)) {
|
|
foreach ($aaa as $a) {
|
|
if ($a->answer1) {
|
|
$answer1 = "$a->answer1 - ".$answers[$a->answer1 - 1];
|
|
} else {
|
|
$answer1 = " ";
|
|
}
|
|
if ($a->answer2) {
|
|
$answer2 = "$a->answer2 - ".$answers[$a->answer2 - 1];
|
|
} else {
|
|
$answer2 = " ";
|
|
}
|
|
|
|
$table->data[] = array(
|
|
print_user_picture($a->userid, $course->id, $a->picture, false, true, true),
|
|
"<a href=\"report.php?id=$id&action=student&student=$a->userid\">".fullname($a)."</a>",
|
|
userdate($a->time),
|
|
$answer1, $answer2);
|
|
|
|
}
|
|
}
|
|
|
|
print_table($table);
|
|
|
|
break;
|
|
|
|
case "students":
|
|
|
|
print_heading(get_string("analysisof", "survey", "$course->students"));
|
|
|
|
if (! $results = survey_get_responses($survey->id, $currentgroup) ) {
|
|
notify(get_string("nobodyyet","survey"));
|
|
} else {
|
|
survey_print_all_responses($cm->id, $results, $course->id);
|
|
}
|
|
|
|
break;
|
|
|
|
case "student":
|
|
if (!$user = get_record("user", "id", $student)) {
|
|
error("Student doesn't exist");
|
|
}
|
|
|
|
print_heading(get_string("analysisof", "survey", fullname($user)));
|
|
|
|
if ($notes != '' and confirm_sesskey()) {
|
|
if (survey_get_analysis($survey->id, $user->id)) {
|
|
if (! survey_update_analysis($survey->id, $user->id, $notes)) {
|
|
notify("An error occurred while saving your notes. Sorry.");
|
|
} else {
|
|
notify(get_string("savednotes", "survey"));
|
|
}
|
|
} else {
|
|
if (! survey_add_analysis($survey->id, $user->id, $notes)) {
|
|
notify("An error occurred while saving your notes. Sorry.");
|
|
} else {
|
|
notify(get_string("savednotes", "survey"));
|
|
}
|
|
}
|
|
}
|
|
|
|
echo "<p <p class=\"centerpara\">";
|
|
print_user_picture($user->id, $course->id, $user->picture, true);
|
|
echo "</p>";
|
|
|
|
$questions = get_records_list("survey_questions", "id", $survey->questions);
|
|
$questionorder = explode(",", $survey->questions);
|
|
|
|
if ($showscales) {
|
|
// Print overall summary
|
|
echo "<p <p class=\"centerpara\">>";
|
|
survey_print_graph("id=$id&sid=$student&type=student.png");
|
|
echo "</p>";
|
|
|
|
// Print scales
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
$question = $questions[$val];
|
|
if ($question->type < 0) { // We have some virtual scales. Just show them.
|
|
$virtualscales = true;
|
|
break;
|
|
}
|
|
}
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
$question = $questions[$val];
|
|
if ($question->multi) {
|
|
if ($virtualscales && $question->type > 0) { // Don't show non-virtual scales if virtual
|
|
continue;
|
|
}
|
|
echo "<p class=\"centerpara\">";
|
|
echo "<a title=\"$strseemoredetail\" href=\"report.php?action=questions&id=$id&qid=$question->multi\">";
|
|
survey_print_graph("id=$id&qid=$question->id&sid=$student&type=studentmultiquestion.png");
|
|
echo "</a></p><br />";
|
|
}
|
|
}
|
|
}
|
|
|
|
// Print non-scale questions
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
$question = $questions[$val];
|
|
if ($question->type == 0 or $question->type == 1) {
|
|
if ($answer = survey_get_user_answer($survey->id, $question->id, $user->id)) {
|
|
$table = NULL;
|
|
$table->head = array(get_string($question->text, "survey"));
|
|
$table->align = array ("left");
|
|
$table->data[] = array(s($answer->answer1)); // no html here, just plain text
|
|
print_table($table);
|
|
print_spacer(30);
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($rs = survey_get_analysis($survey->id, $user->id)) {
|
|
$notes = $rs->notes;
|
|
} else {
|
|
$notes = "";
|
|
}
|
|
echo "<hr noshade=\"noshade\" size=\"1\" />";
|
|
echo "<div class='studentreport'>";
|
|
echo "<form action=\"report.php\" method=\"post\">";
|
|
echo "<h3>$strnotes:</h3>";
|
|
echo "<blockquote>";
|
|
echo "<textarea name=\"notes\" rows=\"10\" cols=\"60\">";
|
|
p($notes);
|
|
echo "</textarea><br />";
|
|
echo "<input type=\"hidden\" name=\"action\" value=\"student\" />";
|
|
echo "<input type=\"hidden\" name=\"sesskey\" value=\"".sesskey()."\" />";
|
|
echo "<input type=\"hidden\" name=\"student\" value=\"$student\" />";
|
|
echo "<input type=\"hidden\" name=\"id\" value=\"$cm->id\" />";
|
|
echo "<input type=\"submit\" value=\"".get_string("savechanges")."\" />";
|
|
echo "</blockquote>";
|
|
echo "</form>";
|
|
echo "</div>";
|
|
|
|
|
|
break;
|
|
|
|
case "download":
|
|
print_heading($strdownload);
|
|
|
|
require_capability('mod/survey:download', $context);
|
|
|
|
echo '<p class="centerpara">'.get_string("downloadinfo", "survey").'</p>';
|
|
|
|
echo '<div class="reportbuttons">';
|
|
$optons = array();
|
|
$options["id"] = "$cm->id";
|
|
$options["group"] = $currentgroup;
|
|
|
|
$options["type"] = "ods";
|
|
print_single_button("download.php", $options, get_string("downloadods"));
|
|
|
|
$options["type"] = "xls";
|
|
print_single_button("download.php", $options, get_string("downloadexcel"));
|
|
|
|
$options["type"] = "txt";
|
|
print_single_button("download.php", $options, get_string("downloadtext"));
|
|
echo '</div>';
|
|
|
|
break;
|
|
|
|
}
|
|
print_footer($course);
|
|
?>
|