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();
|
|
|
|
require_capability('moodle/site:approvecourse', get_context_instance(CONTEXT_SYSTEM));
|
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.
|
|
|
|
admin_externalpage_print_header($rejectform->focus());
|
|
|
|
$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.
|
|
|
|
admin_externalpage_print_header();
|
|
|
|
|
|
|
|
$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';
|
2009-11-04 06:14:06 +00:00
|
|
|
$table->align = array('center', 'center', 'center', 'center', 'center', 'center', 'center');
|
|
|
|
$table->head = array(' ', get_string('shortname'), get_string('fullname'),
|
|
|
|
get_string('requestedby'), get_string('summary'), get_string('requestreason'), get_string('action'));
|
|
|
|
$strrequireskey = get_string('requireskey');
|
|
|
|
|
|
|
|
// Loop over requested courses.
|
2010-02-11 14:59:00 +00:00
|
|
|
$keyicon = $OUTPUT->pix_icon('i/key', $strrequireskey, 'moodle', array('class'=>'icon'));
|
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();
|
|
|
|
|
|
|
|
$row = array();
|
|
|
|
// Show an enrolment key icon in the first column if applicable.
|
|
|
|
if (!empty($course->password)) {
|
|
|
|
$row[] = $keyicon;
|
|
|
|
} else {
|
|
|
|
$row[] = '';
|
2005-08-16 06:15:49 +00:00
|
|
|
}
|
2009-11-04 06:14:06 +00:00
|
|
|
// Info in the other columns.
|
|
|
|
$row[] = format_string($course->shortname);
|
|
|
|
$row[] = format_string($course->fullname);
|
|
|
|
$row[] = fullname($course->get_requester());
|
|
|
|
$row[] = $course->summary;
|
|
|
|
$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();
|