3 // This file is part of Moodle - http://moodle.org/
5 // Moodle is free software: you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation, either version 3 of the License, or
8 // (at your option) any later version.
10 // Moodle is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 // GNU General Public License for more details.
15 // You should have received a copy of the GNU General Public License
16 // along with Moodle. If not, see <http://www.gnu.org/licenses/>.
19 * This file is responsible for displaying the survey
22 * @copyright 1999 onwards Martin Dougiamas {@link http://moodle.com}
23 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
26 require_once("../../config.php");
27 require_once("lib.php");
29 $id = required_param('id', PARAM_INT
); // Course Module ID
31 if (! $cm = get_coursemodule_from_id('survey', $id)) {
32 print_error('invalidcoursemodule');
35 if (! $course = $DB->get_record("course", array("id"=>$cm->course
))) {
36 print_error('coursemisconf');
39 $PAGE->set_url('/mod/survey/view.php', array('id'=>$id));
40 require_login($course, false, $cm);
41 $context = context_module
::instance($cm->id
);
43 require_capability('mod/survey:participate', $context);
45 if (! $survey = $DB->get_record("survey", array("id"=>$cm->instance
))) {
46 print_error('invalidsurveyid', 'survey');
48 $trimmedintro = trim($survey->intro
);
49 if (empty($trimmedintro)) {
50 $tempo = $DB->get_field("survey", "intro", array("id"=>$survey->template
));
51 $survey->intro
= get_string($tempo, "survey");
54 if (! $template = $DB->get_record("survey", array("id"=>$survey->template
))) {
55 print_error('invalidtmptid', 'survey');
58 // Update 'viewed' state if required by completion system
59 require_once($CFG->libdir
. '/completionlib.php');
60 $completion = new completion_info($course);
61 $completion->set_module_viewed($cm);
63 $showscales = ($template->name
!= 'ciqname');
65 $strsurvey = get_string("modulename", "survey");
66 $PAGE->set_title($survey->name
);
67 $PAGE->set_heading($course->fullname
);
68 echo $OUTPUT->header();
69 echo $OUTPUT->heading($survey->name
);
71 /// Check to see if groups are being used in this survey
72 if ($groupmode = groups_get_activity_groupmode($cm)) { // Groups are being used
73 $currentgroup = groups_get_activity_group($cm);
77 $groupingid = $cm->groupingid
;
79 if (has_capability('mod/survey:readresponses', $context) or ($groupmode == VISIBLEGROUPS
)) {
83 if (has_capability('mod/survey:readresponses', $context)) {
84 $numusers = survey_count_responses($survey->id
, $currentgroup, $groupingid);
85 echo "<div class=\"reportlink\"><a href=\"report.php?id=$cm->id\">".
86 get_string("viewsurveyresponses", "survey", $numusers)."</a></div>";
87 } else if (!$cm->visible
) {
88 notice(get_string("activityiscurrentlyhidden"));
91 if (!is_enrolled($context)) {
92 echo $OUTPUT->notification(get_string("guestsnotallowed", "survey"));
96 // Check the survey hasn't already been filled out.
98 if (survey_already_done($survey->id
, $USER->id
)) {
100 'objectid' => $survey->id
,
101 'context' => $context,
102 'courseid' => $course->id
,
103 'other' => array('viewed' => 'graph')
105 $event = \mod_survey\event\course_module_viewed
::create($params);
107 $numusers = survey_count_responses($survey->id
, $currentgroup, $groupingid);
110 // Ensure that graph.php will allow the user to see the graph.
111 if (has_capability('mod/survey:readresponses', $context) ||
!$groupmode ||
groups_is_member($currentgroup)) {
113 echo $OUTPUT->box(get_string("surveycompleted", "survey"));
114 echo $OUTPUT->box(get_string("peoplecompleted", "survey", $numusers));
116 echo '<div class="resultgraph">';
117 survey_print_graph("id=$cm->id&sid=$USER->id&group=$currentgroup&type=student.png");
120 echo $OUTPUT->box(get_string("surveycompletednograph", "survey"));
121 echo $OUTPUT->box(get_string("peoplecompleted", "survey", $numusers));
126 echo $OUTPUT->box(format_module_intro('survey', $survey, $cm->id
), 'generalbox', 'intro');
127 echo $OUTPUT->spacer(array('height'=>30, 'width'=>1), true); // should be done with CSS instead
129 $questions = $DB->get_records_list("survey_questions", "id", explode(',', $survey->questions
));
130 $questionorder = explode(",", $survey->questions
);
131 foreach ($questionorder as $key => $val) {
132 $question = $questions[$val];
133 if ($question->type
== 0 or $question->type
== 1) {
134 if ($answer = survey_get_user_answer($survey->id
, $question->id
, $USER->id
)) {
135 $table = new html_table();
136 $table->head
= array(get_string($question->text
, "survey"));
137 $table->align
= array ("left");
138 $table->data
[] = array(s($answer->answer1
));//no html here, just plain text
139 echo html_writer
::table($table);
140 echo $OUTPUT->spacer(array('height'=>30, 'width'=>1), true);
146 echo $OUTPUT->footer();
150 // Start the survey form
152 'objectid' => $survey->id
,
153 'context' => $context,
154 'courseid' => $course->id
,
155 'other' => array('viewed' => 'form')
157 $event = \mod_survey\event\course_module_viewed
::create($params);
160 echo "<form method=\"post\" action=\"save.php\" id=\"surveyform\">";
162 echo "<input type=\"hidden\" name=\"id\" value=\"$id\" />";
163 echo "<input type=\"hidden\" name=\"sesskey\" value=\"".sesskey()."\" />";
165 echo $OUTPUT->box(format_module_intro('survey', $survey, $cm->id
), 'generalbox boxaligncenter bowidthnormal', 'intro');
166 echo '<div>'. get_string('allquestionrequireanswer', 'survey'). '</div>';
168 // Get all the major questions and their proper order
169 if (! $questions = $DB->get_records_list("survey_questions", "id", explode(',', $survey->questions
))) {
170 print_error('cannotfindquestion', 'survey');
172 $questionorder = explode( ",", $survey->questions
);
174 // Cycle through all the questions in order and print them
176 global $qnum; //TODO: ugly globals hack for survey_print_*()
177 global $checklist; //TODO: ugly globals hack for survey_print_*()
179 $checklist = array();
180 foreach ($questionorder as $key => $val) {
181 $question = $questions["$val"];
182 $question->id
= $val;
184 if ($question->type
>= 0) {
186 if ($question->text
) {
187 $question->text
= get_string($question->text
, "survey");
190 if ($question->shorttext
) {
191 $question->shorttext
= get_string($question->shorttext
, "survey");
194 if ($question->intro
) {
195 $question->intro
= get_string($question->intro
, "survey");
198 if ($question->options
) {
199 $question->options
= get_string($question->options
, "survey");
202 if ($question->multi
) {
203 survey_print_multi($question);
205 survey_print_single($question);
210 if (!is_enrolled($context)) {
213 echo $OUTPUT->footer();
217 $checkarray = Array('questions'=>Array());
218 if (!empty($checklist)) {
219 foreach ($checklist as $question => $default) {
220 $checkarray['questions'][] = Array('question'=>$question, 'default'=>$default);
223 $PAGE->requires
->data_for_js('surveycheck', $checkarray);
225 'name' => 'mod_survey',
226 'fullpath' => '/mod/survey/survey.js',
227 'requires' => array('yui2-event'),
229 $PAGE->requires
->string_for_js('questionsnotanswered', 'survey');
230 $PAGE->requires
->js_init_call('M.mod_survey.init', $checkarray, true, $module);
233 echo '<input type="submit" value="'.get_string("clicktocontinue", "survey").'" />';
237 echo $OUTPUT->footer();