<?php
// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
// +----------------------------------------------------------------------+
// | PHP Version 4                                                        |
// +----------------------------------------------------------------------+
// | Copyright (c) 1997-2003 The PHP Group                                |
// +----------------------------------------------------------------------+
// | This source file is subject to version 2.02 of the PHP license,      |
// | that is bundled with this package in the file LICENSE, and is        |
// | available at through the world-wide-web at                           |
// | http://www.php.net/license/2_02.txt.                                 |
// | If you did not receive a copy of the PHP license and are unable to   |
// | obtain it through the world-wide-web, please send a note to          |
// | license@php.net so we can mail you a copy immediately.               |
// +----------------------------------------------------------------------+
// | Created: jue sep 18 13:29:34 ART 2003
// | Author:  Martin Marrese <mmarre@mecon.gov.ar>
// +----------------------------------------------------------------------+
//
// $Id$
// 

//VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
$SAMURAI_PERM->chequear(SAMURAI_PERM_DEVELOPER);
//}}}
    //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
    if (!@$_SESSION['samurai']['id_sistema']) {
        header('Location: ./../sel-sistema?redirect=consultas/consultas');    
    }
    // }}}  
//REQUIRE ONCE {{{
    require_once 'MECON/HTML/Tabla.php';
    require_once 'MECON/HTML/Link.php';
    require_once 'MECON/HTML/Image.php';
// }}}
//CREO LOS OBJETOS NECESARIOS {{{
    $TABLA =& new MECON_HTML_Tabla ('width="500"', 'claro');
    $LINK_PHP_CONSTANTES =& new MECON_HTML_Link ('php-constantes',
            'Bajar la definicion de constantes de un sistema.');
    $LINK_INFO_SISTEMAS =& new MECON_HTML_Link('sistemas', 'Ver informacion
            de los sistemas.', array('accion'=>'info_listado'));
    $LINK_ACTIVAR_SISTEMAS =& new MECON_HTML_Link('sistemas', 'Activar
            Sistemas.', array('accion'=>'activar_sistema'));
    $LINK_INFO_USUARIOS =& new MECON_HTML_Link('info-usuarios', 'Ver informacion
            de los usuarios.');
//}}}    
//AGREGO LA INFO A LAS TABLAS {{{
    $TABLA->addRow(array($LINK_PHP_CONSTANTES->toHtml()), 'align="center"');
    $TABLA->addRow(array($LINK_INFO_SISTEMAS->toHtml()) , 'align="center"');
    $TABLA->addRow(array($LINK_ACTIVAR_SISTEMAS->toHtml()) , 'align="center"');
    $TABLA->addRow(array($LINK_INFO_USUARIOS->toHtml()) , 'align="center"');
//}}}
//DIBUJO LA PAGINA {{{
    $MARCO->addBodyContent($TABLA);
    $MARCO->display();
// }}}
//FIN
?>