// +----------------------------------------------------------------------+ // // $Id$ // //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{ $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PERFIL, SAMURAI_DEVELOPER); //}}} //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/general_estilos.css'); $FORM = new MECON_HTML_QuickForm ('perfil_datos','post','perfil-datos'); $PERFIL = new SAMURAI_Perfil($DB, $_GET['id_perfil']); $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; } // }}} //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() ); $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 MECON_HTML_Image('/MECON/images/general_cerrar.gif'); $PAGE->addBodyContent(''.$imagen->toHtml().''); $PAGE->setTitle('Datos del Perfil'); $PAGE->display(); // }}} //FIN ?>