]> git.llucax.com Git - mecon/samurai.git/blobdiff - sistema/www/perfiles/perfiles-abm.php
Agregue la documentacion de Perfil Embebido y Usuario Embebido, y las referencias...
[mecon/samurai.git] / sistema / www / perfiles / perfiles-abm.php
index badc3b287c001fb3e27612c3e8c858af0ba31944..001aae0093b18bd3a65f169c35b18898b89f7304 100644 (file)
@@ -20,9 +20,7 @@
 // $Id$
 // 
 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
-    if (!$SAMURAI_PERM->tiene(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PERFIL)) {
-//        header('Location: error')
-    }
+$SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PERFIL, SAMURAI_DEVELOPER);
 //}}}
 
 // REQUIRE_ONCE {{{
@@ -32,7 +30,7 @@
     require_once 'SAMURAI/Perfil.php';
     require_once 'SAMURAI/Permiso.php';
     require_once 'SAMURAI/Sistema.php';
-    require_once 'HTML/Image.php';
+    require_once 'MECON/HTML/Image.php';
 // }}}
 //CREO LOS OBJETO NECESARIOS {{{
     if (@$_GET['id_perfil']) {
     }
     $FORM = new MECON_HTML_QuickForm ('perfiles_abm','post','perfiles-abm');
     $SISTEMA = new SAMURAI_Sistema ($DB, $_SESSION['samurai']['id_sistema']);
-    $PERFIL = new SAMURAI_Perfil ($DB, $id_perfil);
+    $PERFIL = new SAMURAI_Perfil ($DB, $id_perfil,
+            $_SESSION['samurai']['id_sistema']);
 
     if ($PERFIL->getResponsable()) {
         $responsable = $PERFIL->getResponsable();
     }
     else {
-        $responsable = $_SESSION['samurai']['login'];
+        $responsable = $_SESSION['usuario'];
     }
     
     if (!@$_GET['id_perfil']) {
     }
 // }}}
 //DIBUJO LA PAGINA {{{
-    $imagen = new HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
+    $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
     $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
     $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
     $TABLA3->addRow($row,'align=left');