// +----------------------------------------------------------------------+
//
// $Id$
//
//VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
$SAMURAI_PERM->chequear(SAMURAI_PERM_PERFIL_ALTA, SAMURAI_PERM_DEVELOPER);
//}}}
//REQUIRE_ONCE {{{
require_once 'PEAR.php';
require_once 'MECON/HTML/QuickForm.php';
require_once 'MECON/HTML/Tabla.php';
require_once 'SAMURAI/Perfil.php';
require_once 'SAMURAI/Sistema.php';
//}}}
//CREO LOS OBJETO NECESARIOS {{{
$FORM = new MECON_HTML_QuickForm ('perfiles_nuevo','post','perfiles-nuevo');
$SISTEMA = new SAMURAI_Sistema ($DB, $_SESSION['samurai']['id_sistema']);
// }}}
//AGREGO LOS ELEMENTOS DEL FORM {{{
$FORM->addElement ('header', 'cabecera' , 'Nuevo Perfil');
$FORM->addElement ('select', 'perfiles' , 'Perfiles', '', array('size' => '1'));
$FORM->addElement ('text' , 'filtro' , 'Filtrar' , array('size' => '50'));
$FORM->addElement ('text' , 'descripcion', 'Nombre' , array('size' => '50'));
$group[] = HTML_QuickForm::createElement('submit', 'continuar', 'Continuar');
$group[] = HTML_QuickForm::createElement('submit', 'filtrar' , 'Filtrar' );
$group[] = HTML_QuickForm::createElement('submit', 'cancelar' , 'Cancelar', array ('onClick' => 'javascript:window.location =\'perfiles\';return false;') );
$FORM->addGroup($group,'botones');
// }}}
//RESTRINJO EL FORMATO DEL NOMBRE DEL PERFIL{{{
$FORM->addRule ('descripcion', 'El nombre del perfil solo puede contener letras y/o numeros.', 'regex','/^[a-zA-Z0-9 ]+$/');
// }}}
// CARGO LA INFORMACION EN EL SELECT DE PERFILES {{{
$botones = $FORM->getSubmitValue('botones');
$perfiles =& $FORM->getElement('perfiles');
$descripcion =& $FORM->getElement('descripcion');
if (@$botones['cancelar']) {
header('Location: perfiles');
}
if (!isset($botones['filtrar'])) {
$PERFILES = SAMURAI_Perfil::getArrayPerfiles($DB);
}
elseif (@$botones['filtrar']) {
$filtro =& $FORM->getElement('filtro');
$PERFILES = SAMURAI_Perfil::getArrayPerfiles($DB, $filtro->getValue());
}
$perfiles->addOption('--', '--');
$perfiles->loadArray($PERFILES);
// }}}
// VALIDO EL FORMULARIO {{{
if ($FORM->validate()) {
if (@$botones['continuar']) { //Ya selecciono un nombre para el perfil
$res = '';
$tmp = $perfiles->getSelected();
if ((!@$descripcion->getvalue() && $tmp['0'] == '--') || ($descripcion->getvalue() && $tmp['0'] != '--')) {
$res = new PEAR_Error("Debe seleccionar un perfil del combo o ingresar un nombre en la casilla correspondiente.
Solo una de las dos opciones.");
@$descripcion->setValue('');
}
elseif ($tmp['0'] != '--') {
//verificar que el sistema no tenga una asociacion con ese perfil
if (SAMURAI_Perfil::existeAsociacion($DB, $tmp['0'], $_SESSION['samurai']['id_sistema'])) {
$res = new PEAR_Error("El sistema ya tiene asociado el perfil seleccionado, modifique sus permisos desde la seccion perfiles.");
}
else {
header('Location: perfiles-abm?id_perfil='.$tmp['0']);
}
}
elseif ($descripcion->getValue()) {
//Verificar que no exista un perfil con la misma descripcion
//Reduzco los blancos
$temp = $descripcion->getValue();
$tt = split (' ', $temp);
$rta = '';
foreach ($tt as $t) {
if ($t != '') {
$rta.= $t.' ';
}
}
$rta = rtrim($rta);
//
if (SAMURAI_Perfil::existePerfil($DB, $rta)) {
$res = new PEAR_Error("Ya existe un perfil con ese nombre, seleccionelo del combo.
Recuerde que varios espacios se reduciran a uno solo (Ej: Agregar Usuario -> Agregar Usuario)");
}
else {
$temp = ereg_replace(' ' , '%20', $rta); //Cambio los espacios por %20 para que no chille el netscape
header('Location: perfiles-abm?desc_perfil='.$temp);
}
}
if (PEAR::isError($res)) {
$TABLA = new MECON_HTML_Tabla ('cellspacing=0');
$row = array (''.$res->getMessage().'');
$TABLA->addRow($row,'align=left');
}
}
}
// }}}
//MUESTRO LA PAGINA {{{
//AGREGO LOS DATOS A LAS TABLAS {{{
$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');
//}}}
$MARCO->addBody($TABLA3);
if (isset($TABLA)) {
$MARCO->addBody($TABLA);
}
$MARCO->addBody($FORM);
$MARCO->display();
// }}}
?>