mirror of
https://github.com/moodle/moodle.git
synced 2025-01-18 22:08:20 +01:00
227 lines
8.8 KiB
PHP
227 lines
8.8 KiB
PHP
<?php // $Id$
|
|
|
|
require_once("../../config.php");
|
|
require_once("lib.php");
|
|
|
|
$id = required_param('id', PARAM_INT); //moduleid
|
|
$format = optional_param('format', CHOICE_PUBLISH_NAMES, PARAM_INT);
|
|
$download = optional_param('download', '', PARAM_ALPHA);
|
|
$action = optional_param('action', '', PARAM_ALPHA);
|
|
|
|
if (! $cm = get_coursemodule_from_id('choice', $id)) {
|
|
print_error("invalidcoursemodule");
|
|
}
|
|
|
|
if (! $course = $DB->get_record("course", array("id" => $cm->course))) {
|
|
print_error("coursemisconf");
|
|
}
|
|
|
|
require_login($course->id, false, $cm);
|
|
|
|
$context = get_context_instance(CONTEXT_MODULE, $cm->id);
|
|
|
|
require_capability('mod/choice:readresponses', $context);
|
|
|
|
if (!$choice = choice_get_choice($cm->instance)) {
|
|
print_error('invalidcoursemodule');
|
|
}
|
|
|
|
$strchoice = get_string("modulename", "choice");
|
|
$strchoices = get_string("modulenameplural", "choice");
|
|
$strresponses = get_string("responses", "choice");
|
|
|
|
add_to_log($course->id, "choice", "report", "report.php?id=$cm->id", "$choice->id",$cm->id);
|
|
|
|
if ($action == 'delete' && has_capability('mod/choice:deleteresponses',$context)) {
|
|
$attemptids = isset($_POST['attemptid']) ? $_POST['attemptid'] : array(); //get array of repsonses to delete.
|
|
choice_delete_responses($attemptids, $choice->id); //delete responses.
|
|
redirect("report.php?id=$cm->id");
|
|
}
|
|
|
|
if (!$download) {
|
|
|
|
$navigation = build_navigation($strresponses, $cm);
|
|
print_header_simple(format_string($choice->name).": $strresponses", "", $navigation, "", '', true,
|
|
update_module_button($cm->id, $course->id, $strchoice), navmenu($course, $cm));
|
|
/// Check to see if groups are being used in this choice
|
|
$groupmode = groups_get_activity_groupmode($cm);
|
|
groups_get_activity_group($cm, true);
|
|
groups_print_activity_menu($cm, 'report.php?id='.$id);
|
|
} else {
|
|
$groupmode = groups_get_activity_groupmode($cm);
|
|
}
|
|
$users = choice_get_response_data($choice, $cm, $groupmode);
|
|
|
|
if ($download == "ods" && has_capability('mod/choice:downloadresponses', $context)) {
|
|
require_once("$CFG->libdir/odslib.class.php");
|
|
|
|
/// Calculate file name
|
|
$filename = clean_filename("$course->shortname ".strip_tags(format_string($choice->name,true))).'.ods';
|
|
/// Creating a workbook
|
|
$workbook = new MoodleODSWorkbook("-");
|
|
/// Send HTTP headers
|
|
$workbook->send($filename);
|
|
/// Creating the first worksheet
|
|
$myxls =& $workbook->add_worksheet($strresponses);
|
|
|
|
/// Print names of all the fields
|
|
$myxls->write_string(0,0,get_string("lastname"));
|
|
$myxls->write_string(0,1,get_string("firstname"));
|
|
$myxls->write_string(0,2,get_string("idnumber"));
|
|
$myxls->write_string(0,3,get_string("group"));
|
|
$myxls->write_string(0,4,get_string("choice","choice"));
|
|
|
|
/// generate the data for the body of the spreadsheet
|
|
$i=0;
|
|
$row=1;
|
|
if ($users) {
|
|
foreach ($users as $option => $userid) {
|
|
$option_text = choice_get_option_text($choice, $option);
|
|
foreach($userid as $user) {
|
|
$myxls->write_string($row,0,$user->lastname);
|
|
$myxls->write_string($row,1,$user->firstname);
|
|
$studentid=(!empty($user->idnumber) ? $user->idnumber : " ");
|
|
$myxls->write_string($row,2,$studentid);
|
|
$ug2 = '';
|
|
if ($usergrps = groups_get_all_groups($course->id, $user->id)) {
|
|
foreach ($usergrps as $ug) {
|
|
$ug2 = $ug2. $ug->name;
|
|
}
|
|
}
|
|
$myxls->write_string($row,3,$ug2);
|
|
|
|
if (isset($option_text)) {
|
|
$myxls->write_string($row,4,format_string($option_text,true));
|
|
}
|
|
$row++;
|
|
$pos=4;
|
|
}
|
|
}
|
|
}
|
|
/// Close the workbook
|
|
$workbook->close();
|
|
|
|
exit;
|
|
}
|
|
|
|
//print spreadsheet if one is asked for:
|
|
if ($download == "xls" && has_capability('mod/choice:downloadresponses', $context)) {
|
|
require_once("$CFG->libdir/excellib.class.php");
|
|
|
|
/// Calculate file name
|
|
$filename = clean_filename("$course->shortname ".strip_tags(format_string($choice->name,true))).'.xls';
|
|
/// Creating a workbook
|
|
$workbook = new MoodleExcelWorkbook("-");
|
|
/// Send HTTP headers
|
|
$workbook->send($filename);
|
|
/// Creating the first worksheet
|
|
$myxls =& $workbook->add_worksheet($strresponses);
|
|
|
|
/// Print names of all the fields
|
|
$myxls->write_string(0,0,get_string("lastname"));
|
|
$myxls->write_string(0,1,get_string("firstname"));
|
|
$myxls->write_string(0,2,get_string("idnumber"));
|
|
$myxls->write_string(0,3,get_string("group"));
|
|
$myxls->write_string(0,4,get_string("choice","choice"));
|
|
|
|
|
|
/// generate the data for the body of the spreadsheet
|
|
$i=0;
|
|
$row=1;
|
|
if ($users) {
|
|
foreach ($users as $option => $userid) {
|
|
$option_text = choice_get_option_text($choice, $option);
|
|
foreach($userid as $user) {
|
|
$myxls->write_string($row,0,$user->lastname);
|
|
$myxls->write_string($row,1,$user->firstname);
|
|
$studentid=(!empty($user->idnumber) ? $user->idnumber : " ");
|
|
$myxls->write_string($row,2,$studentid);
|
|
$ug2 = '';
|
|
if ($usergrps = groups_get_all_groups($course->id, $user->id)) {
|
|
foreach ($usergrps as $ug) {
|
|
$ug2 = $ug2. $ug->name;
|
|
}
|
|
}
|
|
$myxls->write_string($row,3,$ug2);
|
|
if (isset($option_text)) {
|
|
$myxls->write_string($row,4,format_string($option_text,true));
|
|
}
|
|
$row++;
|
|
}
|
|
}
|
|
$pos=4;
|
|
}
|
|
/// Close the workbook
|
|
$workbook->close();
|
|
exit;
|
|
}
|
|
|
|
// print text file
|
|
if ($download == "txt" && has_capability('mod/choice:downloadresponses', $context)) {
|
|
$filename = clean_filename("$course->shortname ".strip_tags(format_string($choice->name,true))).'.txt';
|
|
|
|
header("Content-Type: application/download\n");
|
|
header("Content-Disposition: attachment; filename=\"$filename\"");
|
|
header("Expires: 0");
|
|
header("Cache-Control: must-revalidate,post-check=0,pre-check=0");
|
|
header("Pragma: public");
|
|
|
|
/// Print names of all the fields
|
|
|
|
echo get_string("firstname")."\t".get_string("lastname") . "\t". get_string("idnumber") . "\t";
|
|
echo get_string("group"). "\t";
|
|
echo get_string("choice","choice"). "\n";
|
|
|
|
/// generate the data for the body of the spreadsheet
|
|
$i=0;
|
|
if ($users) {
|
|
foreach ($users as $option => $userid) {
|
|
$option_text = choice_get_option_text($choice, $option);
|
|
foreach($userid as $user) {
|
|
echo $user->lastname;
|
|
echo "\t".$user->firstname;
|
|
$studentid = " ";
|
|
if (!empty($user->idnumber)) {
|
|
$studentid = $user->idnumber;
|
|
}
|
|
echo "\t". $studentid."\t";
|
|
$ug2 = '';
|
|
if ($usergrps = groups_get_all_groups($course->id, $user->id)) {
|
|
foreach ($usergrps as $ug) {
|
|
$ug2 = $ug2. $ug->name;
|
|
}
|
|
}
|
|
echo $ug2. "\t";
|
|
if (isset($option_text)) {
|
|
echo format_string($option_text,true);
|
|
}
|
|
echo "\n";
|
|
}
|
|
}
|
|
}
|
|
exit;
|
|
}
|
|
choice_show_results($choice, $course, $cm, $users, $format); //show table with students responses.
|
|
|
|
//now give links for downloading spreadsheets.
|
|
if (has_capability('mod/choice:downloadresponses',$context)) {
|
|
echo "<br />\n";
|
|
echo "<table class=\"downloadreport\"><tr>\n";
|
|
echo "<td>";
|
|
$options = array();
|
|
$options["id"] = "$cm->id";
|
|
$options["download"] = "ods";
|
|
print_single_button("report.php", $options, get_string("downloadods"));
|
|
echo "</td><td>";
|
|
$options["download"] = "xls";
|
|
print_single_button("report.php", $options, get_string("downloadexcel"));
|
|
echo "</td><td>";
|
|
$options["download"] = "txt";
|
|
print_single_button("report.php", $options, get_string("downloadtext"));
|
|
|
|
echo "</td></tr></table>";
|
|
}
|
|
print_footer($course);
|
|
|
|
?>
|