X-Git-Url: https://git.llucax.com/mecon/samurai.git/blobdiff_plain/421bca9938fcbe0d0cf3e715a27f0a6bc37c15c3..50d164c278afef190726d33beee8ce2e1b333fe3:/sistema/www/perfiles/perfiles-nuevo.php?ds=inline
diff --git a/sistema/www/perfiles/perfiles-nuevo.php b/sistema/www/perfiles/perfiles-nuevo.php
index 770eaa2..c5dace9 100644
--- a/sistema/www/perfiles/perfiles-nuevo.php
+++ b/sistema/www/perfiles/perfiles-nuevo.php
@@ -20,9 +20,12 @@
// $Id$
//
//VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
- if (!$SAMURAI_PERM->tiene(SAMURAI_ALTA_PERFIL)) {
-// header('Location: error')
- }
+$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_DEVELOPER);
+}
+$MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
//}}}
//REQUIRE_ONCE {{{
@@ -34,6 +37,7 @@
//}}}
//CREO LOS OBJETO NECESARIOS {{{
$FORM = new MECON_HTML_QuickForm ('perfiles_nuevo','post','perfiles-nuevo');
+ $FORM->renderer->updateAttributes('width="400"');
$SISTEMA = new SAMURAI_Sistema ($DB, $_SESSION['samurai']['id_sistema']);
// }}}
//AGREGO LOS ELEMENTOS DEL FORM {{{
@@ -106,7 +110,7 @@
}
}
if (PEAR::isError($res)) {
- $TABLA = new Tabla ('cellspacing=0');
+ $TABLA = new MECON_HTML_Tabla ('cellspacing=0');
$row = array (''.$res->getMessage().'');
$TABLA->addRow($row,'align=left');
}
@@ -115,8 +119,8 @@
// }}}
//MUESTRO LA PAGINA {{{
//AGREGO LOS DATOS A LAS TABLAS {{{
- $TABLA3 = new Tabla ('cellspacing=0');
- $imagen = new HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
+ $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
+ $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
$row = array ($imagen->toHtml().' SISTEMA: '.$SISTEMA->getNombre().'');
$TABLA3->addRow($row,'align=left');
//}}}