2007-05-11 09:08:30 +00:00
|
|
|
<?php
|
|
|
|
///////////////////////////////////////////////////////////////////////////
|
|
|
|
// //
|
|
|
|
// NOTICE OF COPYRIGHT //
|
|
|
|
// //
|
|
|
|
// Moodle - Modular Object-Oriented Dynamic Learning Environment //
|
|
|
|
// http://moodle.com //
|
|
|
|
// //
|
|
|
|
// Copyright (C) 2001-2003 Martin Dougiamas http://dougiamas.com //
|
|
|
|
// //
|
|
|
|
// This program 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 2 of the License, or //
|
|
|
|
// (at your option) any later version. //
|
|
|
|
// //
|
|
|
|
// This program 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: //
|
|
|
|
// //
|
|
|
|
// http://www.gnu.org/copyleft/gpl.html //
|
|
|
|
// //
|
|
|
|
///////////////////////////////////////////////////////////////////////////
|
|
|
|
require_once("../../../config.php");
|
|
|
|
require_once($CFG->dirroot.'/grade/export/lib.php');
|
|
|
|
require_once('grade_export_txt.php');
|
|
|
|
|
|
|
|
$id = required_param('id', PARAM_INT); // course id
|
2007-07-18 08:13:09 +00:00
|
|
|
|
|
|
|
require_login($id);
|
2007-07-23 19:22:48 +00:00
|
|
|
require_capability('moodle/grade:export', get_context_instance(CONTEXT_COURSE, $id));
|
2007-07-18 08:13:09 +00:00
|
|
|
|
2007-05-11 09:08:30 +00:00
|
|
|
$feedback = optional_param('feedback', '', PARAM_ALPHA);
|
2007-07-03 06:20:07 +00:00
|
|
|
$course = get_record('course', 'id', $id);
|
2007-07-17 03:32:10 +00:00
|
|
|
$strgrades = get_string('grades', 'grades');
|
2007-07-23 08:13:59 +00:00
|
|
|
$actionstr = get_string('modulename', 'gradeexport_txt');
|
2007-07-17 03:32:10 +00:00
|
|
|
$gradenav = "<a href=\"$CFG->wwwroot/course/view.php?id=$course->id\">$course->shortname</a>";
|
|
|
|
$gradenav .= " -> <a href=\"$CFG->wwwroot/grade/index.php?id=$course->id\">$strgrades</a>";
|
|
|
|
$gradenav .= " -> $actionstr";
|
|
|
|
print_header($course->shortname.': '.get_string('grades'), $course->fullname, $gradenav);
|
2007-05-11 09:08:30 +00:00
|
|
|
|
|
|
|
// process post information
|
2007-05-18 08:49:00 +00:00
|
|
|
if (($data = data_submitted()) && confirm_sesskey()) {
|
2007-05-16 08:21:46 +00:00
|
|
|
|
2007-07-03 06:20:07 +00:00
|
|
|
// $itemids consists of ints and ",", will be cleaned in the main export class
|
2007-05-16 08:21:46 +00:00
|
|
|
if (!is_array($data->itemids)) {
|
|
|
|
$itemidsurl = $data->itemids;
|
|
|
|
} else {
|
|
|
|
$itemidsurl = implode(",",$data->itemids);
|
|
|
|
}
|
2007-07-18 19:56:07 +00:00
|
|
|
|
2007-05-16 08:21:46 +00:00
|
|
|
$export = new grade_export($id, $data->itemids);
|
2007-05-11 09:08:30 +00:00
|
|
|
$export->display_grades($feedback);
|
2007-07-18 19:56:07 +00:00
|
|
|
|
2007-05-16 08:21:46 +00:00
|
|
|
// this redirect should trigger a download prompt
|
2007-05-18 08:49:00 +00:00
|
|
|
redirect('export.php?id='.$id.'&itemids='.$itemidsurl.'&separator='.$data->separator);
|
2007-07-18 19:56:07 +00:00
|
|
|
exit;
|
2007-05-11 09:08:30 +00:00
|
|
|
}
|
|
|
|
|
2007-07-03 06:20:07 +00:00
|
|
|
// print the form to choose what grade_items to export
|
2007-05-24 08:57:36 +00:00
|
|
|
include_once('grade_export_txt_form.php');
|
|
|
|
$mform = new grade_export_txt_form(qualified_me(), array('id'=>$id));
|
|
|
|
$mform->display();
|
2007-05-18 08:49:00 +00:00
|
|
|
|
|
|
|
print_footer();
|
2007-07-23 08:13:59 +00:00
|
|
|
?>
|