// +----------------------------------------------------------------------+ // // $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'; require_once 'MECON/HTML/Error.php'; //}}} //SAMURAI {{{ require_once 'SAMURAI/Perfil.php'; require_once 'SAMURAI/Permiso.php'; require_once 'SAMURAI/Sistema.php'; //}}} require_once 'MECON/HTML/Image.php'; require_once 'HTML/Page.php'; // }}} //CREO LOS OBJETOS NECESARIOS {{{ if (!@$_GET['id_perfil']) { $FORM = new MECON_HTML_Error('No hay un perfil seleccionado'); } else { $PAGE = new HTML_Page(array ('doctype'=>'HTML 4.01 Transitional', 'charset' => 'iso-8859-1', 'lineend' => 'unix', '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'], $_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']; $texto = ($as['obs'] != '') ? $as['desc'].' - '.$as['obs']: $as['desc']; $PERMISOS[$clave] = $texto; } // }}} //AGREGO LOS ELEMENTOS AL FORM {{{ $FORM->addElement ('static', 'id_perfil' , 'Id Perfil' , $PERFIL->getId() ); $FORM->addElement ('static', 'desc_perfil', 'Descrición' , $PERFIL->getDescripcion() ); $perf =& $FORM->addElement('select', 'permisos' , 'Permisos' , $PERMISOS, array ('size'=>'5')); $perf->setSelected($PERFIL->getPermisos()); $FORM->freeze(); // }}} //DIBUJO LA PAGINA {{{ $PAGE->addBodyContent($FORM); $imagen = new MECON_HTML_Image('/MECON/images/general_cerrar.gif'); $PAGE->addBodyContent(''.$imagen->toHtml().''); $PAGE->setTitle('Datos del Perfil'); $PAGE->display(); // }}} //FIN ?>