Moodle  2.2.1
http://www.collinsharper.com
C:/xampp/htdocs/moodle/admin/tool/qeupgradehelper/listpreupgrade.php
Go to the documentation of this file.
00001 <?php
00002 // This file is part of Moodle - http://moodle.org/
00003 //
00004 // Moodle is free software: you can redistribute it and/or modify
00005 // it under the terms of the GNU General Public License as published by
00006 // the Free Software Foundation, either version 3 of the License, or
00007 // (at your option) any later version.
00008 //
00009 // Moodle is distributed in the hope that it will be useful,
00010 // but WITHOUT ANY WARRANTY; without even the implied warranty of
00011 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00012 // GNU General Public License for more details.
00013 //
00014 // You should have received a copy of the GNU General Public License
00015 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
00016 
00028 require_once(dirname(__FILE__) . '/../../../config.php');
00029 require_once(dirname(__FILE__) . '/locallib.php');
00030 require_once($CFG->libdir . '/adminlib.php');
00031 
00032 require_login();
00033 require_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM));
00034 tool_qeupgradehelper_require_not_upgraded();
00035 
00036 admin_externalpage_setup('qeupgradehelper', '', array(), tool_qeupgradehelper_url(''));
00037 $PAGE->navbar->add(get_string('listpreupgrade', 'tool_qeupgradehelper'));
00038 
00039 $renderer = $PAGE->get_renderer('tool_qeupgradehelper');
00040 
00041 $quizzes = new tool_qeupgradehelper_pre_upgrade_quiz_list();
00042 
00043 // Look to see if the admin has set things up to only upgrade certain attempts.
00044 $partialupgradefile = $CFG->dirroot . '/' . $CFG->admin . '/tool/qeupgradehelper/partialupgrade.php';
00045 $partialupgradefunction = 'tool_qeupgradehelper_get_quizzes_to_upgrade';
00046 if (is_readable($partialupgradefile)) {
00047     include_once($partialupgradefile);
00048     if (function_exists($partialupgradefunction)) {
00049         $quizzes = new tool_qeupgradehelper_pre_upgrade_quiz_list_restricted(
00050                 $partialupgradefunction());
00051     }
00052 }
00053 
00054 $numveryoldattemtps = tool_qeupgradehelper_get_num_very_old_attempts();
00055 
00056 if ($quizzes->is_empty()) {
00057     echo $renderer->simple_message_page(get_string('noquizattempts', 'tool_qeupgradehelper'));
00058 
00059 } else {
00060     echo $renderer->quiz_list_page($quizzes, $numveryoldattemtps);
00061 }
 All Data Structures Namespaces Files Functions Variables Enumerations