2009-11-01 10:42:45 +00:00
|
|
|
<?php
|
2008-07-10 09:16:43 +00:00
|
|
|
/**
|
|
|
|
* script for bulk user multy enrol operations
|
|
|
|
*/
|
|
|
|
require_once('../../config.php');
|
|
|
|
require_once($CFG->libdir.'/adminlib.php');
|
|
|
|
$processed = optional_param('processed', '', PARAM_CLEAN);
|
|
|
|
$sort = optional_param('sort', 'fullname', PARAM_ALPHA); //Sort by full name
|
2008-09-26 07:17:40 +00:00
|
|
|
$dir = optional_param('dir', 'asc', PARAM_ALPHA); //Order to sort (ASC)
|
2008-07-10 09:16:43 +00:00
|
|
|
|
2009-07-20 08:57:18 +00:00
|
|
|
require_login();
|
2008-07-10 09:16:43 +00:00
|
|
|
admin_externalpage_setup('userbulk');
|
2010-08-12 08:00:00 +00:00
|
|
|
require_capability('moodle/role:assign', get_context_instance(CONTEXT_SYSTEM)); //TODO: use some enrol cap
|
2008-07-10 09:16:43 +00:00
|
|
|
$return = $CFG->wwwroot.'/'.$CFG->admin.'/user/user_bulk.php';
|
|
|
|
//If no users selected then return to user_bulk.php
|
2009-11-01 10:55:31 +00:00
|
|
|
if (empty($SESSION->bulk_users)) {
|
2008-07-10 09:16:43 +00:00
|
|
|
redirect($return);
|
|
|
|
}
|
2008-09-26 07:17:40 +00:00
|
|
|
$users = $SESSION->bulk_users; //Get users to display
|
|
|
|
$usertotal = get_users(false); //Total number of users registered
|
|
|
|
$usercount = count($users); //number of users
|
2008-07-10 09:16:43 +00:00
|
|
|
|
2010-03-31 08:05:53 +00:00
|
|
|
echo $OUTPUT->header();
|
2008-07-10 09:16:43 +00:00
|
|
|
|
|
|
|
//take user info
|
|
|
|
foreach ($users as $key => $id) {
|
|
|
|
$user = $DB->get_record('user', array('id'=>$id));
|
|
|
|
$user->fullname = fullname($user, true);
|
|
|
|
unset($user->firstname);
|
|
|
|
unset($user->lastname);
|
|
|
|
$users[$key] = $user;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Need to sort by date
|
|
|
|
function sort_compare($a, $b) {
|
|
|
|
global $sort, $dir;
|
|
|
|
if($sort == 'lastaccess') {
|
|
|
|
$rez = $b->lastaccess - $a->lastaccess;
|
|
|
|
} else {
|
|
|
|
$rez = strcasecmp(@$a->$sort, @$b->$sort);
|
|
|
|
}
|
|
|
|
return $dir == 'desc' ? -$rez : $rez;
|
|
|
|
}
|
|
|
|
usort($users, 'sort_compare');
|
|
|
|
|
|
|
|
//Take courses data (id, shortname, and fullname)
|
|
|
|
$courses = get_courses_page(1, 'c.sortorder ASC', 'c.id,c.shortname,c.fullname,c.visible', $totalcount);
|
2009-08-20 08:39:07 +00:00
|
|
|
$table = new html_table();
|
2008-07-10 09:16:43 +00:00
|
|
|
$table->width = "95%";
|
|
|
|
$columns = array('fullname');
|
|
|
|
foreach ($courses as $v)
|
|
|
|
{
|
2008-09-26 07:17:40 +00:00
|
|
|
$columns[] = $v->shortname;
|
2008-07-10 09:16:43 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
//Print columns headers from table
|
|
|
|
foreach ($columns as $column) {
|
|
|
|
$strtitle = $column;
|
|
|
|
if ($sort != $column) {
|
|
|
|
$columnicon = '';
|
|
|
|
$columndir = 'asc';
|
|
|
|
} else {
|
|
|
|
$columndir = ($dir == 'asc') ? 'desc' : 'asc';
|
2009-12-16 21:50:45 +00:00
|
|
|
$columnicon = ' <img src="'.$OUTPUT->pix_url('t/'.($dir == 'asc' ? 'down' : 'up' )).'" alt="" />';
|
2008-07-10 09:16:43 +00:00
|
|
|
}
|
|
|
|
$table->head[] = '<a href="user_bulk_enrol.php?sort='.$column.'&dir='.$columndir.'">'.$strtitle.'</a>'.$columnicon;
|
|
|
|
$table->align[] = 'left';
|
|
|
|
}
|
|
|
|
|
|
|
|
// process data submitting
|
|
|
|
if(!empty($processed)) {
|
|
|
|
//Process data form here
|
|
|
|
$total = count($courses) * count($users);
|
2009-11-01 10:55:31 +00:00
|
|
|
|
2008-07-10 09:16:43 +00:00
|
|
|
for ( $i = 0; $i < $total; $i++ )
|
|
|
|
{
|
2008-09-26 07:17:40 +00:00
|
|
|
$param = "selected".$i;
|
2008-07-10 09:16:43 +00:00
|
|
|
$info = optional_param($param, '', PARAM_CLEAN);
|
|
|
|
/**
|
|
|
|
* user id: ids[0]
|
|
|
|
* course id: ids[1]
|
|
|
|
* enrol stat: ids[2]
|
|
|
|
*/
|
2008-09-26 07:17:40 +00:00
|
|
|
$ids = explode(',', $info);
|
2008-07-10 09:16:43 +00:00
|
|
|
if(!empty($ids[2])) {
|
2008-09-26 07:17:40 +00:00
|
|
|
$context = get_context_instance(CONTEXT_COURSE, $ids[1]);
|
MDL-21782 reworked enrolment framework, the core infrastructure is in place, the basic plugins are all implemented; see the tracker issue for list of unfinished bits, expect more changes and improvements during the next week
AMOS START
MOV [sendcoursewelcomemessage,core_admin],[sendcoursewelcomemessage,enrol_self]
MOV [configsendcoursewelcomemessage,core_admin],[sendcoursewelcomemessage_desc,enrol_self]
MOV [enrolstartdate,core],[enrolstartdate,enrol_self]
MOV [enrolenddate,core],[enrolenddate,enrol_self]
CPY [welcometocourse,core],[welcometocourse,enrol_self]
CPY [welcometocoursetext,core],[welcometocoursetext,enrol_self]
MOV [notenrollable,core],[notenrollable,core_enrol]
MOV [enrolenddaterror,core],[enrolenddaterror,enrol_self]
MOV [enrolmentkeyhint,core],[passwordinvalidhint,enrol_self]
MOV [coursemanager,core_admin],[coursecontact,core_admin]
MOV [configcoursemanager,core_admin],[coursecontact_desc,core_admin]
MOV [enrolledincourserole,core],[enrolledincourserole,enrol_manual]
MOV [enrolme,core],[enrolme,core_enrol]
MOV [unenrol,core],[unenrol,core_enrol]
MOV [unenrolme,core],[unenrolme,core_enrol]
MOV [enrolmentnew,core],[enrolmentnew,core_enrol]
MOV [enrolmentnewuser,core],[enrolmentnewuser,core_enrol]
MOV [enrolments,core],[enrolments,core_enrol]
MOV [enrolperiod,core],[enrolperiod,core_enrol]
MOV [unenrolroleusers,core],[unenrolroleusers,core_enrol]
AMOS END
2010-06-21 15:30:49 +00:00
|
|
|
role_assign(5, $ids[0], $context->id);
|
2008-09-26 07:17:40 +00:00
|
|
|
} else {
|
|
|
|
if( empty($ids[1] ) ) {
|
|
|
|
continue;
|
2008-07-10 09:16:43 +00:00
|
|
|
}
|
|
|
|
$context = get_context_instance(CONTEXT_COURSE, $ids[1]);
|
MDL-21782 reworked enrolment framework, the core infrastructure is in place, the basic plugins are all implemented; see the tracker issue for list of unfinished bits, expect more changes and improvements during the next week
AMOS START
MOV [sendcoursewelcomemessage,core_admin],[sendcoursewelcomemessage,enrol_self]
MOV [configsendcoursewelcomemessage,core_admin],[sendcoursewelcomemessage_desc,enrol_self]
MOV [enrolstartdate,core],[enrolstartdate,enrol_self]
MOV [enrolenddate,core],[enrolenddate,enrol_self]
CPY [welcometocourse,core],[welcometocourse,enrol_self]
CPY [welcometocoursetext,core],[welcometocoursetext,enrol_self]
MOV [notenrollable,core],[notenrollable,core_enrol]
MOV [enrolenddaterror,core],[enrolenddaterror,enrol_self]
MOV [enrolmentkeyhint,core],[passwordinvalidhint,enrol_self]
MOV [coursemanager,core_admin],[coursecontact,core_admin]
MOV [configcoursemanager,core_admin],[coursecontact_desc,core_admin]
MOV [enrolledincourserole,core],[enrolledincourserole,enrol_manual]
MOV [enrolme,core],[enrolme,core_enrol]
MOV [unenrol,core],[unenrol,core_enrol]
MOV [unenrolme,core],[unenrolme,core_enrol]
MOV [enrolmentnew,core],[enrolmentnew,core_enrol]
MOV [enrolmentnewuser,core],[enrolmentnewuser,core_enrol]
MOV [enrolments,core],[enrolments,core_enrol]
MOV [enrolperiod,core],[enrolperiod,core_enrol]
MOV [unenrolroleusers,core],[unenrolroleusers,core_enrol]
AMOS END
2010-06-21 15:30:49 +00:00
|
|
|
role_unassign(5, $ids[0], $context->id);
|
2008-09-26 07:17:40 +00:00
|
|
|
}
|
2008-07-10 09:16:43 +00:00
|
|
|
}
|
|
|
|
redirect($return, get_string('changessaved'));
|
|
|
|
}
|
2008-09-26 08:22:46 +00:00
|
|
|
|
2009-11-01 10:55:31 +00:00
|
|
|
//Form beginning
|
2008-07-10 09:16:43 +00:00
|
|
|
echo '<form id="multienrol" name="multienrol" method="post" action="user_bulk_enrol.php">';
|
|
|
|
echo '<input type="hidden" name="processed" value="yes" />';
|
|
|
|
$count = 0;
|
MDL-21782 reworked enrolment framework, the core infrastructure is in place, the basic plugins are all implemented; see the tracker issue for list of unfinished bits, expect more changes and improvements during the next week
AMOS START
MOV [sendcoursewelcomemessage,core_admin],[sendcoursewelcomemessage,enrol_self]
MOV [configsendcoursewelcomemessage,core_admin],[sendcoursewelcomemessage_desc,enrol_self]
MOV [enrolstartdate,core],[enrolstartdate,enrol_self]
MOV [enrolenddate,core],[enrolenddate,enrol_self]
CPY [welcometocourse,core],[welcometocourse,enrol_self]
CPY [welcometocoursetext,core],[welcometocoursetext,enrol_self]
MOV [notenrollable,core],[notenrollable,core_enrol]
MOV [enrolenddaterror,core],[enrolenddaterror,enrol_self]
MOV [enrolmentkeyhint,core],[passwordinvalidhint,enrol_self]
MOV [coursemanager,core_admin],[coursecontact,core_admin]
MOV [configcoursemanager,core_admin],[coursecontact_desc,core_admin]
MOV [enrolledincourserole,core],[enrolledincourserole,enrol_manual]
MOV [enrolme,core],[enrolme,core_enrol]
MOV [unenrol,core],[unenrol,core_enrol]
MOV [unenrolme,core],[unenrolme,core_enrol]
MOV [enrolmentnew,core],[enrolmentnew,core_enrol]
MOV [enrolmentnewuser,core],[enrolmentnewuser,core_enrol]
MOV [enrolments,core],[enrolments,core_enrol]
MOV [enrolperiod,core],[enrolperiod,core_enrol]
MOV [unenrolroleusers,core],[unenrolroleusers,core_enrol]
AMOS END
2010-06-21 15:30:49 +00:00
|
|
|
foreach($users as $user) {
|
2008-07-10 09:16:43 +00:00
|
|
|
$temparray = array (
|
2009-11-01 10:55:31 +00:00
|
|
|
'<a href="'.$CFG->wwwroot.'/user/view.php?id='.$user->id.'&course='.SITEID.'">'.$user->fullname.'</a>'
|
2008-07-10 09:16:43 +00:00
|
|
|
);
|
MDL-21782 reworked enrolment framework, the core infrastructure is in place, the basic plugins are all implemented; see the tracker issue for list of unfinished bits, expect more changes and improvements during the next week
AMOS START
MOV [sendcoursewelcomemessage,core_admin],[sendcoursewelcomemessage,enrol_self]
MOV [configsendcoursewelcomemessage,core_admin],[sendcoursewelcomemessage_desc,enrol_self]
MOV [enrolstartdate,core],[enrolstartdate,enrol_self]
MOV [enrolenddate,core],[enrolenddate,enrol_self]
CPY [welcometocourse,core],[welcometocourse,enrol_self]
CPY [welcometocoursetext,core],[welcometocoursetext,enrol_self]
MOV [notenrollable,core],[notenrollable,core_enrol]
MOV [enrolenddaterror,core],[enrolenddaterror,enrol_self]
MOV [enrolmentkeyhint,core],[passwordinvalidhint,enrol_self]
MOV [coursemanager,core_admin],[coursecontact,core_admin]
MOV [configcoursemanager,core_admin],[coursecontact_desc,core_admin]
MOV [enrolledincourserole,core],[enrolledincourserole,enrol_manual]
MOV [enrolme,core],[enrolme,core_enrol]
MOV [unenrol,core],[unenrol,core_enrol]
MOV [unenrolme,core],[unenrolme,core_enrol]
MOV [enrolmentnew,core],[enrolmentnew,core_enrol]
MOV [enrolmentnewuser,core],[enrolmentnewuser,core_enrol]
MOV [enrolments,core],[enrolments,core_enrol]
MOV [enrolperiod,core],[enrolperiod,core_enrol]
MOV [unenrolroleusers,core],[unenrolroleusers,core_enrol]
AMOS END
2010-06-21 15:30:49 +00:00
|
|
|
$mycourses = enrol_get_users_courses($user->id, false);
|
|
|
|
foreach($courses as $acourse) {
|
2008-09-26 08:22:46 +00:00
|
|
|
$state = '';
|
|
|
|
if (isset($mycourses[$acourse->id])) {
|
|
|
|
$state = 'checked="checked"';
|
2008-09-26 07:17:40 +00:00
|
|
|
}
|
2008-09-26 08:22:46 +00:00
|
|
|
$temparray[] = '<input type="hidden" name="selected' . $count .
|
|
|
|
'" value="' . $user->id . ',' . $acourse->id . ',0" />' .
|
|
|
|
'<input type="checkbox" name="selected' . $count .
|
|
|
|
'" value="' . $user->id . ',' . $acourse->id . ',1" ' . $state . '/>';
|
2008-09-26 07:17:40 +00:00
|
|
|
$count++;
|
|
|
|
}
|
|
|
|
$table->data[] = $temparray;
|
2008-07-10 09:16:43 +00:00
|
|
|
}
|
2009-08-06 08:17:12 +00:00
|
|
|
echo $OUTPUT->heading("$usercount / $usertotal ".get_string('users'));
|
2010-03-20 22:15:54 +00:00
|
|
|
echo html_writer::table($table);
|
2008-07-10 09:16:43 +00:00
|
|
|
echo '<div class="continuebutton">';
|
2008-09-26 08:22:46 +00:00
|
|
|
echo '<input type="submit" name="multienrolsubmit" value="save changes" />';
|
2008-07-10 09:16:43 +00:00
|
|
|
echo '</div>';
|
|
|
|
echo '</form>';
|
|
|
|
|
2009-08-06 14:12:46 +00:00
|
|
|
echo $OUTPUT->footer();
|