2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
3 // +----------------------------------------------------------------------+
5 // +----------------------------------------------------------------------+
6 // | Copyright (c) 1997-2003 The PHP Group |
7 // +----------------------------------------------------------------------+
8 // | This source file is subject to version 2.02 of the PHP license, |
9 // | that is bundled with this package in the file LICENSE, and is |
10 // | available at through the world-wide-web at |
11 // | http://www.php.net/license/2_02.txt. |
12 // | If you did not receive a copy of the PHP license and are unable to |
13 // | obtain it through the world-wide-web, please send a note to |
14 // | license@php.net so we can mail you a copy immediately. |
15 // +----------------------------------------------------------------------+
16 // | Created: jue sep 18 13:29:34 ART 2003
17 // | Author: Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
23 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
24 $SAMURAI_PERM->chequear(SAMURAI_DEVELOPER);
26 //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
27 if (!@$_SESSION['samurai']['id_sistema']) {
28 header('Location: ./../sel-sistema?redirect=consultas/consultas');
32 require_once 'MECON/HTML/Link.php';
34 //CREO LOS OBJETOS NECESARIOS {{{
35 $LINK_PHP_CONSTANTES = new MECON_HTML_Link ('php-constantes',
36 'Bajar la definicion de constantes de un sistema.');
38 //DIBUJO LA PAGINA {{{
39 $MARCO->addBodyContent($LINK_PHP_CONSTANTES);