- $row = array ('<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
- $TABLA3->addRow($row,'titulo align=left');
- $row = array ('<a href="perfiles-nuevo"><img src="/MECON/images/general_nuevo.gif" border="0">Ingresar Nuevo Perfil</a>');
- $TABLA2->addRow($row,'align=right');
- $row = array ('Id','Descripcion','Tipo','Modif.','Elim.');
+ $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
+ $row = array ($imagen->toHtml().' <b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
+ $TABLA3->addRow($row,'align=left');
+
+ //Agrego el link a nuevo
+ if ($SAMURAI_PERM->tiene(SAMURAI_ALTA_PERFIL)) {
+ $row = array ('<a href="perfiles-nuevo"><img src="/MECON/images/general_nuevo.gif" border="0">Ingresar Nuevo Perfil</a>');
+ $TABLA2->addRow($row,'align=right');
+ }
+ //Genero la cabecera de la tabla
+ $row = array ('Id','Descripcion');
+ if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
+ $row[] = 'Tipo';
+ }
+ if ($SAMURAI_PERM->tiene(SAMURAI_MODI_PERFIL)) {
+ $row[] = 'Modif.';
+ }
+ if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_PERFIL)) {
+ $row[] = 'Elim.';
+ }
+