// +----------------------------------------------------------------------+
//
// $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 {{{
require_once 'SAMURAI/Sistema.php';
require_once 'SAMURAI/Perfil.php';
require_once 'MECON/HTML/Image.php';
require_once 'MECON/HTML/TablaDB.php';
//}}}
//VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
if (!@$_SESSION['samurai']['id_sistema']) {
header('Location: ./../sel-sistema?redirect=perfiles/perfiles');
}
//}}}
//VIÑETA CON EL SISTEMA EN EL CUAL SE ESTA TRABAJANDO {{{
$SISTEMA =& new SAMURAI_Sistema($DB, $_SESSION['samurai']['id_sistema']);
$tmp =& new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif', '>>');
$VINETA = ''. $tmp->toHTML() .' SISTEMA: '.
$SISTEMA->getNombre().'
';
//}}}
//OBTENGO LA INFORMACION DE LOS PERFILES {{{
$res = SAMURAI_Perfil::getPerfilesPager($DB, null, $_SESSION['samurai']['id_sistema']);
//}}}
//CREO LA TABLA DE USUARIOS {{{
$TABLA =& new MECON_HTML_TablaDB ('Perfiles');
$TABLA->addLink(
'nuevo',
new MECON_HTML_Link(
'perfiles-nuevo', 'Nuevo Perfil'
)
);
$TABLA->addLink(
'volver',
new MECON_HTML_Link(
'./../sel-sistema?redirect=perfiles/perfiles',
'Seleccionar otro sistema para trabajar'
)
);
$cabecera[] = 'Id';
$cabecera[] = 'Descripción';
//Agrego las columnas de modificacion y eliminacion {{{
$link = new MECON_HTML_Link ('perfiles-abm', null, array('accion' => 'm'));
if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_MODIF)) {
$cabecera[] = 'Modif.';
$TABLA->addRowsIcon('modificar', 'id_perfil', $link);
}
if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_BAJA)) {
$cabecera[] = 'Elimn.';
$link->setGetVar('accion', 'e');
$TABLA->addRowsIcon('eliminar', 'id_perfil', $link);
}
//}}}
$TABLA->addRow($cabecera, 'cabecera');
$pager = $TABLA->addPager($res, null, new MECON_HTML_Link ('perfiles', null), 25);
$TABLA->addRowsData('%s', array ('id_perfil'), 'prepend');
$TABLA->addRowsData('%s',
array ('id_perfil', 'descripcion'), 'prepend'
);
$TABLA->addRows($pager, array());
//}}}
//DIBUJO LA PAGINA {{{
$MARCO->addBody($VINETA);
$MARCO->addBody($TABLA);
$MARCO->display();
//}}}
?>