2009-11-04 06:14:06 +00:00
|
|
|
<?php
|
2005-08-16 06:15:49 +00:00
|
|
|
|
2008-12-05 08:56:54 +00:00
|
|
|
///////////////////////////////////////////////////////////////////////////
|
|
|
|
// //
|
|
|
|
// NOTICE OF COPYRIGHT //
|
|
|
|
// //
|
|
|
|
// Moodle - Modular Object-Oriented Dynamic Learning Environment //
|
|
|
|
// http://moodle.org //
|
|
|
|
// //
|
|
|
|
// Copyright (C) 1999 onwards 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 //
|
|
|
|
// //
|
|
|
|
///////////////////////////////////////////////////////////////////////////
|
2005-08-16 06:15:49 +00:00
|
|
|
|
2008-12-05 08:56:54 +00:00
|
|
|
/**
|
|
|
|
* Allow the administrator to look through a list of course requests and approve or reject them.
|
|
|
|
*
|
|
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU Public License
|
|
|
|
* @package course
|
2009-11-04 06:14:06 +00:00
|
|
|
*/
|
2008-12-05 08:56:54 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
require_once(dirname(__FILE__) . '/../config.php');
|
|
|
|
require_once($CFG->libdir . '/adminlib.php');
|
|
|
|
require_once($CFG->dirroot . '/course/lib.php');
|
|
|
|
require_once($CFG->dirroot . '/course/request_form.php');
|
2005-08-16 06:15:49 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
require_login();
|
2012-07-23 15:59:04 +08:00
|
|
|
require_capability('moodle/site:approvecourse', context_system::instance());
|
2005-08-16 06:15:49 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
$approve = optional_param('approve', 0, PARAM_INT);
|
|
|
|
$reject = optional_param('reject', 0, PARAM_INT);
|
2005-08-16 06:15:49 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
$baseurl = $CFG->wwwroot . '/course/pending.php';
|
|
|
|
admin_externalpage_setup('coursespending');
|
2008-12-05 08:56:54 +00:00
|
|
|
|
|
|
|
/// Process approval of a course.
|
2009-11-04 06:14:06 +00:00
|
|
|
if (!empty($approve) and confirm_sesskey()) {
|
2008-12-05 08:56:54 +00:00
|
|
|
/// Load the request.
|
2009-11-04 06:14:06 +00:00
|
|
|
$course = new course_request($approve);
|
|
|
|
$courseid = $course->approve();
|
2008-12-05 08:56:54 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
if ($courseid !== false) {
|
|
|
|
redirect($CFG->wwwroot.'/course/edit.php?id=' . $courseid);
|
|
|
|
} else {
|
|
|
|
print_error('courseapprovedfailed');
|
2005-08-16 06:15:49 +00:00
|
|
|
}
|
2009-11-04 06:14:06 +00:00
|
|
|
}
|
2007-08-17 19:09:11 +00:00
|
|
|
|
2008-12-05 08:56:54 +00:00
|
|
|
/// Process rejection of a course.
|
2009-11-04 06:14:06 +00:00
|
|
|
if (!empty($reject)) {
|
|
|
|
// Load the request.
|
|
|
|
$course = new course_request($reject);
|
2005-08-16 06:15:49 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
// Prepare the form.
|
|
|
|
$rejectform = new reject_request_form($baseurl);
|
|
|
|
$default = new stdClass();
|
|
|
|
$default->reject = $course->id;
|
|
|
|
$rejectform->set_data($default);
|
2007-08-17 19:09:11 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
/// Standard form processing if statement.
|
|
|
|
if ($rejectform->is_cancelled()){
|
|
|
|
redirect($baseurl);
|
2008-12-05 08:56:54 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
} else if ($data = $rejectform->get_data()) {
|
2008-12-05 08:56:54 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
/// Reject the request
|
|
|
|
$course->reject($data->rejectnotice);
|
|
|
|
|
|
|
|
/// Redirect back to the course listing.
|
|
|
|
redirect($baseurl, get_string('courserejected'));
|
2008-12-05 08:56:54 +00:00
|
|
|
}
|
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
/// Display the form for giving a reason for rejecting the request.
|
2010-03-31 08:05:53 +00:00
|
|
|
echo $OUTPUT->header($rejectform->focus());
|
2009-11-04 06:14:06 +00:00
|
|
|
$rejectform->display();
|
|
|
|
echo $OUTPUT->footer();
|
|
|
|
exit;
|
|
|
|
}
|
2008-12-05 08:56:54 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
/// Print a list of all the pending requests.
|
2010-03-31 08:05:53 +00:00
|
|
|
echo $OUTPUT->header();
|
2009-11-04 06:14:06 +00:00
|
|
|
|
|
|
|
$pending = $DB->get_records('course_request');
|
|
|
|
if (empty($pending)) {
|
|
|
|
echo $OUTPUT->heading(get_string('nopendingcourses'));
|
|
|
|
} else {
|
|
|
|
echo $OUTPUT->heading(get_string('coursespending'));
|
|
|
|
|
|
|
|
/// Build a table of all the requests.
|
|
|
|
$table = new html_table();
|
2010-03-20 22:15:54 +00:00
|
|
|
$table->attributes['class'] = 'pendingcourserequests generaltable';
|
2011-01-03 18:08:44 +01:00
|
|
|
$table->align = array('center', 'center', 'center', 'center', 'center', 'center');
|
2012-08-16 14:10:39 +08:00
|
|
|
$table->head = array(get_string('shortnamecourse'), get_string('fullnamecourse'), get_string('requestedby'),
|
|
|
|
get_string('summary'), get_string('category'), get_string('requestreason'), get_string('action'));
|
2009-11-04 08:11:02 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
foreach ($pending as $course) {
|
|
|
|
$course = new course_request($course);
|
2009-11-04 08:11:02 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
// Check here for shortname collisions and warn about them.
|
|
|
|
$course->check_shortname_collision();
|
|
|
|
|
2012-08-16 14:10:39 +08:00
|
|
|
// Retreiving category name.
|
2012-09-19 16:50:18 +08:00
|
|
|
// If the category was not set (can happen after upgrade) or if the user does not have the capability
|
|
|
|
// to change the category, we fallback on the default one.
|
2012-08-16 14:10:39 +08:00
|
|
|
// Else, the category proposed is fetched, but we fallback on the default one if we can't find it.
|
|
|
|
// It is just a matter of displaying the right information because the logic when approving the category
|
|
|
|
// proceeds the same way. The system context level is used as moodle/site:approvecourse uses it.
|
2012-09-19 16:50:18 +08:00
|
|
|
if (empty($course->category) || !has_capability('moodle/course:changecategory', context_system::instance()) ||
|
2012-08-16 14:10:39 +08:00
|
|
|
(!$category = get_course_category($course->category))) {
|
|
|
|
$category = get_course_category($CFG->defaultrequestcategory);
|
|
|
|
}
|
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
$row = array();
|
|
|
|
$row[] = format_string($course->shortname);
|
|
|
|
$row[] = format_string($course->fullname);
|
|
|
|
$row[] = fullname($course->get_requester());
|
|
|
|
$row[] = $course->summary;
|
2012-08-16 14:10:39 +08:00
|
|
|
$row[] = format_string($category->name);
|
2009-11-04 06:14:06 +00:00
|
|
|
$row[] = format_string($course->reason);
|
2010-01-03 15:46:14 +00:00
|
|
|
$row[] = $OUTPUT->single_button(new moodle_url($baseurl, array('approve' => $course->id, 'sesskey' => sesskey())), get_string('approve'), 'get') .
|
|
|
|
$OUTPUT->single_button(new moodle_url($baseurl, array('reject' => $course->id)), get_string('rejectdots'), 'get');
|
2009-11-04 06:14:06 +00:00
|
|
|
|
|
|
|
/// Add the row to the table.
|
|
|
|
$table->data[] = $row;
|
|
|
|
}
|
2008-12-05 08:56:54 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
/// Display the table.
|
2010-03-20 22:15:54 +00:00
|
|
|
echo html_writer::table($table);
|
2008-12-05 08:56:54 +00:00
|
|
|
|
2009-11-04 06:14:06 +00:00
|
|
|
/// Message about name collisions, if necessary.
|
|
|
|
if (!empty($collision)) {
|
|
|
|
print_string('shortnamecollisionwarning');
|
2005-08-16 06:15:49 +00:00
|
|
|
}
|
2009-11-04 06:14:06 +00:00
|
|
|
}
|
2005-08-16 06:15:49 +00:00
|
|
|
|
2008-12-05 08:56:54 +00:00
|
|
|
/// Finish off the page.
|
2010-01-03 15:46:14 +00:00
|
|
|
echo $OUTPUT->single_button($CFG->wwwroot . '/course/index.php', get_string('backtocourselisting'));
|
2010-03-20 22:15:54 +00:00
|
|
|
echo $OUTPUT->footer();
|