Current Path : C:/Users/Mahmood/Desktop/moodle8/mod/survey/ |
Current File : C:/Users/Mahmood/Desktop/moodle8/mod/survey/report.php |
<?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/>. /** * This file is responsible for producing the survey reports * * @package mod_survey * @copyright 1999 onwards Martin Dougiamas {@link http://moodle.com} * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ 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_array($qids, PARAM_INT); $qid = implode (',', $qids); if (! $cm = get_coursemodule_from_id('survey', $id)) { print_error('invalidcoursemodule'); } if (! $course = $DB->get_record("course", array("id"=>$cm->course))) { print_error('coursemisconf'); } $url = new moodle_url('/mod/survey/report.php', array('id'=>$id)); if ($action !== '') { $url->param('action', $action); } if ($qid !== 0) { $url->param('qid', $qid); } if ($student !== 0) { $url->param('student', $student); } if ($notes !== '') { $url->param('notes', $notes); } $PAGE->set_url($url); require_login($course, false, $cm); $context = context_module::instance($cm->id); require_capability('mod/survey:readresponses', $context); if (! $survey = $DB->get_record("survey", array("id"=>$cm->instance))) { print_error('invalidsurveyid', 'survey'); } if (! $template = $DB->get_record("survey", array("id"=>$survey->template))) { print_error('invalidtmptid', 'survey'); } $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"); switch ($action) { case 'download': $PAGE->navbar->add(get_string('downloadresults', 'survey')); break; case 'summary': case 'scales': case 'questions': $PAGE->navbar->add($strreport); $PAGE->navbar->add(${'str'.$action}); break; case 'students': $PAGE->navbar->add($strreport); $PAGE->navbar->add(get_string('participants')); break; case '': $PAGE->navbar->add($strreport); $PAGE->navbar->add($strsummary); break; default: $PAGE->navbar->add($strreport); break; } $PAGE->set_title("$course->shortname: ".format_string($survey->name)); $PAGE->set_heading($course->fullname); echo $OUTPUT->header(); echo $OUTPUT->heading(format_string($survey->name)); /// Check to see if groups are being used in this survey if ($groupmode = groups_get_activity_groupmode($cm)) { // Groups are being used $menuaction = $action == "student" ? "students" : $action; $currentgroup = groups_get_activity_group($cm, true); groups_print_activity_menu($cm, $CFG->wwwroot . "/mod/survey/report.php?id=$cm->id&action=$menuaction&qid=$qid"); } else { $currentgroup = 0; } $params = array( 'objectid' => $survey->id, 'context' => $context, 'courseid' => $course->id, 'relateduserid' => $student, 'other' => array('action' => $action, 'groupid' => $currentgroup) ); $event = \mod_survey\event\report_viewed::create($params); $event->trigger(); if ($currentgroup) { $users = get_users_by_capability($context, 'mod/survey:participate', '', '', '', '', $currentgroup, null, false); } else if (!empty($cm->groupingid)) { $groups = groups_get_all_groups($courseid, 0, $cm->groupingid); $groups = array_keys($groups); $users = get_users_by_capability($context, 'mod/survey:participate', '', '', '', '', $groups, null, false); } else { $users = get_users_by_capability($context, 'mod/survey:participate', '', '', '', '', '', null, false); $group = false; } $groupingid = $cm->groupingid; echo $OUTPUT->box_start("generalbox boxaligncenter"); 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\">".get_string('participants')."</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\">".get_string('participants')."</a>"; if (has_capability('mod/survey:download', $context)) { echo " <a href=\"report.php?action=download&id=$id\">$strdownload</a>"; } if (empty($action)) { $action = "questions"; } } echo $OUTPUT->box_end(); echo $OUTPUT->spacer(array('height'=>30, 'width'=>30, 'br'=>true)); // should be done with CSS instead /// Print the menu across the top $virtualscales = false; switch ($action) { case "summary": echo $OUTPUT->heading($strsummary, 3); if (survey_count_responses($survey->id, $currentgroup, $groupingid)) { 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 { echo $OUTPUT->notification(get_string("nobodyyet","survey")); } break; case "scales": echo $OUTPUT->heading($strscales, 3); if (! $results = survey_get_responses($survey->id, $currentgroup, $groupingid) ) { echo $OUTPUT->notification(get_string("nobodyyet","survey")); } else { $questions = $DB->get_records_list("survey_questions", "id", explode(',', $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 = $DB->get_records_select("survey_questions", "id in ($qid)"); $questionorder = explode(",", $qid); if ($scale = $DB->get_records("survey_questions", array("multi"=>$qid))) { $scale = array_pop($scale); echo $OUTPUT->heading("$scale->text - $strselectedquestions", 3); } else { echo $OUTPUT->heading($strselectedquestions, 3); } } else { // get all top-level questions $questions = $DB->get_records_list("survey_questions", "id", explode(',',$survey->questions)); $questionorder = explode(",", $survey->questions); echo $OUTPUT->heading($strallquestions, 3); } if (! $results = survey_get_responses($survey->id, $currentgroup, $groupingid) ) { echo $OUTPUT->notification(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 $OUTPUT->heading($question->text . ':', 4); $subquestions = survey_get_subquestions($question); foreach ($subquestions as $subquestion) { 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 = new html_table(); $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">'.s($a->answer1).'</td>'; $contents .= "</tr>"; } } $contents .= "</table>"; $table->data[] = array($contents); echo html_writer::table($table); echo $OUTPUT->spacer(array('height'=>30)); // should be done with CSS instead } } } break; case "question": if (!$question = $DB->get_record("survey_questions", array("id"=>$qid))) { print_error('cannotfindquestion', 'survey'); } $question->text = get_string($question->text, "survey"); $answers = explode(",", get_string($question->options, "survey")); echo $OUTPUT->heading("$strquestion: $question->text", 3); $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 = new html_table(); $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( $OUTPUT->user_picture($a, array('courseid'=>$course->id)), "<a href=\"report.php?id=$id&action=student&student=$a->userid\">".fullname($a)."</a>", userdate($a->time), s($answer1), s($answer2)); } } echo html_writer::table($table); break; case "students": echo $OUTPUT->heading(get_string("analysisof", "survey", get_string('participants')), 3); if (! $results = survey_get_responses($survey->id, $currentgroup, $groupingid) ) { echo $OUTPUT->notification(get_string("nobodyyet","survey")); } else { survey_print_all_responses($cm->id, $results, $course->id); } break; case "student": if (!$user = $DB->get_record("user", array("id"=>$student))) { print_error('invaliduserid'); } echo $OUTPUT->heading(get_string("analysisof", "survey", fullname($user)), 3); if ($notes != '' and confirm_sesskey()) { if (survey_get_analysis($survey->id, $user->id)) { if (! survey_update_analysis($survey->id, $user->id, $notes)) { echo $OUTPUT->notification(get_string("errorunabletosavenotes", "survey"), "notifyproblem"); } else { echo $OUTPUT->notification(get_string("savednotes", "survey"), "notifysuccess"); } } else { if (! survey_add_analysis($survey->id, $user->id, $notes)) { echo $OUTPUT->notification(get_string("errorunabletosavenotes", "survey"), "notifyproblem"); } else { echo $OUTPUT->notification(get_string("savednotes", "survey"), "notifysuccess"); } } } echo "<p class=\"centerpara\">"; echo $OUTPUT->user_picture($user, array('courseid'=>$course->id)); echo "</p>"; $questions = $DB->get_records_list("survey_questions", "id", explode(',', $survey->questions)); $questionorder = explode(",", $survey->questions); if ($showscales) { // Print overall summary echo "<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 = new html_table(); $table->head = array(get_string($question->text, "survey")); $table->align = array ("left"); if (!empty($question->options) && $answer->answer1 > 0) { $answers = explode(',', get_string($question->options, 'survey')); if ($answer->answer1 <= count($answers)) { $table->data[] = array(s($answers[$answer->answer1 - 1])); // No html here, just plain text. } else { $table->data[] = array(s($answer->answer1)); // No html here, just plain text. } } else { $table->data[] = array(s($answer->answer1)); // No html here, just plain text. } echo html_writer::table($table); echo $OUTPUT->spacer(array('height'=>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 class=\"form-control\" 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\" class=\"btn btn-primary\" value=\"".get_string("savechanges")."\" />"; echo "</blockquote>"; echo "</form>"; echo "</div>"; break; case "download": echo $OUTPUT->heading($strdownload, 3); require_capability('mod/survey:download', $context); $numusers = survey_count_responses($survey->id, $currentgroup, $groupingid); if ($numusers > 0) { echo html_writer::tag('p', get_string("downloadinfo", "survey"), array('class' => 'centerpara')); echo $OUTPUT->container_start('reportbuttons'); $options = array(); $options["id"] = "$cm->id"; $options["group"] = $currentgroup; $options["type"] = "ods"; echo $OUTPUT->single_button(new moodle_url("download.php", $options), get_string("downloadods")); $options["type"] = "xls"; echo $OUTPUT->single_button(new moodle_url("download.php", $options), get_string("downloadexcel")); $options["type"] = "txt"; echo $OUTPUT->single_button(new moodle_url("download.php", $options), get_string("downloadtext")); echo $OUTPUT->container_end(); } else { echo html_writer::tag('p', get_string("nobodyyet", "survey"), array('class' => 'centerpara')); } break; } echo $OUTPUT->footer();