Estoy intentando matricular alumnos manualmente en un curso de Moodle
mediante un Script
pero no lo consigo. Estoy utilizando la función role_assign
de Moodle
pero no me funciona.
El código que estoy utilizando es el siguiente:
//obtiene el id del rol "member" que ha sido creado anteriormente
$rolMember = obtenerIdRol ("member");
$rolManager = obtenerIdRol ("manager" );
$contexto = context_course::instance($comunidad_moodle);
foreach ($usuariosUVDotlrn as $usu) {
$userid = null;
$usernameDotln = $usu["username"];
$rolDotln = $usu["rol"];
if($rolDotln == "dotlrn_admin_rel"){
$rolid = $rolManager;
}else if($rolDotln == "dotlrn_member_rel"){
$rolid = $rolMember;
}else{
$rolid = -1;
}
//obtenemos el id del usuario en Moodle
$sql = "SELECT id FROM mdl_user WHERE username = ?";
$resUsu = $DB->get_records_sql($sql, array($usernameDotln));
foreach ( $resUsu as $n ) {
$userid = $n->id;
}
//Comprobamos que el usuario existe en moodle.
if( is_null($userid)){
m("- El usuario: $usernameDotln no existe en la Base de Datos de Moodle");
}else{
//Comprobamos si el usuario pertenece al curso
$enrolled = is_enrolled($contexto, $userid, '', true);
if( !$enrolled){
if($rolid != -1){
$idroleassign = role_assign($rolid , $userid, $contexto);
m("- El usuario: $usernameDotln con id: $userid y rol: $rolid insertado en el curso: $comunidad_moodle");
}else{
m("- El usuario: $usernameDotln con id: $userid y rol: $rolid no esta en el curso: $comunidad_moodle. No se ha encontrado el rol.");
}
}else{
m("- El usuario: $usernameDotln con id: $userid ya pertenece al curso: $comunidad_moodle");
}
}
}
Nota: la funcion m("") se encarga de mostrar el texto en la consola
Nota2: la función obtenerIdRol
es la siguiente:
/**
* Devuelve el id del rol pasado.
*
* @param $rol nombre del rol.
*
* @return id del rol
*/
function obtenerIdRol ($rol ){
global $DB;
$id = null;
//obtenemos el id del rol en Moodle
$sqlrol = "SELECT id FROM mdl_role WHERE shortname = ?";
$roles = $DB->get_records_sql($sqlrol, array($rol));
foreach ( $roles as $r ) {
$id = $r->id;
}
if(is_null($id))
return -1;
else
return $id;
}
Si alguien conoce cómo hacerlo o tiene algún ejemplo o documentación que me pueda servir, será una gran ayuda para mi.