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 f3d1620773f9c7050a55c7807cdf665cea55b9a8..1d7f2ef021d7e6592f09281c0fc76f3d272f0b29 100644 (file)
--- a/sistema/www/perfiles/perfiles-datos.php
+++ b/sistema/www/perfiles/perfiles-datos.php
@@ -20,6 +20,15 @@
 // $Id$
 // 
 
+//VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
+$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';
@@ -30,7 +39,7 @@
     require_once 'SAMURAI/Permiso.php';
     require_once 'SAMURAI/Sistema.php';
     //}}}
-    require_once 'HTML/Image.php';
+    require_once 'MECON/HTML/Image.php';
     require_once 'HTML/Page.php';
 // }}}
 
@@ -45,14 +54,16 @@
                                         'language' => 'es',
                                         'cache'    => 'false',
                                         'simple'   => 'true'));
+        $PAGE->addStyleSheet('/MECON/css/marco.css');
         $FORM    = new MECON_HTML_QuickForm ('perfil_datos','post','perfil-datos');
-        $PERFIL  = new SAMURAI_Perfil($DB, $_GET['id_perfil']);
+        $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'];
@@ -60,31 +71,17 @@
         $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();
 // }}}
 
 //DIBUJO LA PAGINA {{{
     $PAGE->addBodyContent($FORM);
-    $imagen = new HTML_Image('/MECON/images/general_cerrar.gif');
+    $imagen = new MECON_HTML_Image('/MECON/images/general_cerrar.gif');
     $PAGE->addBodyContent('<a href="" onClick=\'self.close();return false;\'>'.$imagen->toHtml().'</a>');
     $PAGE->setTitle('Datos del Perfil');
     $PAGE->display();