Acomodo para que funcione con los nuevos cambios en QuickForm

[mecon/samurai.git] / sistema / www / perfiles / perfiles-datos.php

diff --git a/sistema/www/perfiles/perfiles-datos.php b/sistema/www/perfiles/perfiles-datos.php
index 7083e0774f7af24e51c9c6dc13e3e740c008ccce..1d7f2ef021d7e6592f09281c0fc76f3d272f0b29 100644 (file)
--- a/sistema/www/perfiles/perfiles-datos.php
+++ b/sistema/www/perfiles/perfiles-datos.php
@@ -21,8 +21,14 @@
 // 
 
 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
-$SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PERFIL, SAMURAI_DEVELOPER);
+$SAMURAI_PERM->setSistema(SAMURAI_PERM);
+if (!$SAMURAI_PERM->tiene(SAMURAI_PERM_DEVELOPER)) {
+    $SAMURAI_PERM->setSistema($_SESSION['samurai']['id_sistema']);
+    $SAMURAI_PERM->chequear(SAMURAI_PERM_PERFIL_ALTA,SAMURAI_PERM_PERFIL_BAJA,SAMURAI_PERM_PERFIL_MODIF, SAMURAI_PERM_DEVELOPER);
+}
+$MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
 //}}}
+
 //REQUIRE ONCE {{{
     //MECON {{{
     require_once 'MECON/HTML/QuickForm.php';
@@ -48,16 +54,16 @@ $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PER
                                         'language' => 'es',
                                         'cache'    => 'false',
                                         'simple'   => 'true'));
-        $PAGE->addStyleSheet('/MECON/css/general_estilos.css');
+        $PAGE->addStyleSheet('/MECON/css/marco.css');
         $FORM    = new MECON_HTML_QuickForm ('perfil_datos','post','perfil-datos');
         $PERFIL  = new SAMURAI_Perfil($DB, $_GET['id_perfil'],
                 $_SESSION['samurai']['id_sistema']);
         $SISTEMA = new SAMURAI_Sistema ($DB, $_SESSION['samurai']['id_sistema']);
     }
 // }}}
-
 //OBTENGO LOS PERMISOS DEL SISTEMA {{{
     $ASOCIACIONES = $SISTEMA->getAsociaciones();
+
     $PERMISOS = array ();
     foreach ($ASOCIACIONES as $as) {
         $clave = $as['id'].'##'.$as['obs'];
@@ -65,24 +71,10 @@ $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PER
         $PERMISOS[$clave] = $texto;
     }
 // }}}
-//TRADUZCO EL TIPO DE PERFIL {{{
-    $TipoPerfil = $PERFIL->getTipo();
-    
-    switch ($TipoPerfil) {
-        case 'I':   $TipoPerfil = 'Interno';
-                    break;
-        case 'E':   $TipoPerfil = 'Externo';
-                    break;
-        case 'D':   $TipoPerfil = 'Dios';
-                    break;
-    }
-//}}}
-
 //AGREGO LOS ELEMENTOS AL FORM {{{
     $FORM->addElement         ('static', 'id_perfil'  , 'Id Perfil'    , $PERFIL->getId()              );
-    $FORM->addElement         ('static', 'desc_perfil', 'Descricion'   , $PERFIL->getDescripcion()     );
+    $FORM->addElement         ('static', 'desc_perfil', 'Descrición'   , $PERFIL->getDescripcion()     );
     $perf =& $FORM->addElement('select', 'permisos'   , 'Permisos'     , $PERMISOS, array ('size'=>'5'));
-    $FORM->addElement         ('static', 'tipo_perfil', 'Tipo Perfil'  , $TipoPerfil                   );
     $perf->setSelected($PERFIL->getPermisos());
     $FORM->freeze();
 // }}}