X-Git-Url: https://git.llucax.com/mecon/samurai.git/blobdiff_plain/ed75c70e49cb855328abca7045d02de6d81ecd80..84f76d573967832523dfc728235a56f2b2e14dba:/lib/SAMURAI/Perm.php?ds=sidebyside diff --git a/lib/SAMURAI/Perm.php b/lib/SAMURAI/Perm.php index ad31b05..e4923f3 100644 --- a/lib/SAMURAI/Perm.php +++ b/lib/SAMURAI/Perm.php @@ -30,6 +30,8 @@ // +X2C Class 377 :SAMURAI_Perm /** * Chequeador de permisos. +Para la libreria de perl: +@see perm.epl * * @package SAMURAI * @access public @@ -85,6 +87,8 @@ class SAMURAI_Perm { // +X2C Operation 380 /** * Constructor. +Para la libreria de perl: +@see perm.epl * * @param int $login Login del usuario para el cual obtener los permisos. * @param int $sistema Sistema con el cual se va a trabajar. @@ -200,6 +204,41 @@ Si no se pasa ningun parametro ($perm->tiene()), devuelve true si tiene un permi } // -X2C + /** + * Obtiene los datos de los usuarios que tienen el permiso indicado. + * + * @param db $db Base de datos. + * @param int $sistema Identificador del sistema al que pertenece el permiso. + * @param int $perm Identificador del permiso. + * @param string $obs Observación de la asignación del permiso. + * + * @return array + * @access public + * @static + */ + function getUsuariosPermiso (&$db, $sistema, $perm, $obs = null) + { + $sql = "SELECT PSU.login, + U.nombre, + LEFT (P.desc_perfil, LOCATE(' ', P.desc_perfil)) desc_perfil + FROM samurai.perfil_sist_usuario AS PSU, + usuario.Usuario AS U, + samurai.perm_perfil_sist AS PPS, + samurai.perfil AS P + WHERE U.login = PSU.login AND + PSU.id_perfil = PPS.id_perfil AND + PPS.id_perfil = P.id_perfil AND + PSU.id_sistema = $sistema AND + PPS.id_permiso = $perm "; + + $sql.= (is_null($obs))? + " ORDER BY U.nombre": + " AND PPS.observaciones = '". $obs. "' ORDER BY U.nombre"; + + return $db->getAll($sql); + + } + } // -X2C Class :SAMURAI_Perm ?> \ No newline at end of file