BugFix en los sistemas que se muestran en sel-sistema.

[mecon/samurai.git] / lib / SAMURAI / Sistema.php

diff --git a/lib/SAMURAI/Sistema.php b/lib/SAMURAI/Sistema.php
index 61ad5d97d2f45186962a5d5151b60e4d77f510c3..2073da4852dca236f35c8de2c9940466677c74d7 100644 (file)
--- a/lib/SAMURAI/Sistema.php
+++ b/lib/SAMURAI/Sistema.php
@@ -1038,7 +1038,10 @@ class SAMURAI_Sistema {
         //sistemas en los cuales puede trabajar
         $consulta = $sql['sistemas_seleccionar'];
         $dbh = $DB->prepare($consulta);
-        $res = $DB->execute($dbh, array($_SESSION['usuario']));
+        $res = $DB->execute($dbh, array($_SESSION['usuario'],
+                    SAMURAI_PERM_PERFIL_ALTA, SAMURAI_PERM_PERFIL_BAJA,
+                    SAMURAI_PERM_PERFIL_MODIF, SAMURAI_PERM_USUARIO_ALTA,
+                    SAMURAI_PERM_USUARIO_BAJA, SAMURAI_PERM_USUARIO_MODIF));
         while ($re = $res->fetchrow(DB_FETCHMODE_ASSOC)) {
             $rta[$re['id_sistema']] = $re['nombre_sistema'];
         }        
@@ -1051,4 +1054,4 @@ class SAMURAI_Sistema {
 
 } // -X2C Class :SAMURAI_Sistema
 
-?>
\ No newline at end of file
+?>