sistema/www/consultas/consultas.php

   1 <?php
   2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
   3 // +----------------------------------------------------------------------+
   4 // | PHP Version 4                                                        |
   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 // +----------------------------------------------------------------------+
  19 //
  20 // $Id$
  21 //
  22
  23 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
  24 $SAMURAI_PERM->setSistema(SAMURAI_PERM);
  25 if (!$SAMURAI_PERM->tiene(SAMURAI_PERM_DEVELOPER)) {
  26     $SAMURAI_PERM->chequear(SAMURAI_PERM_DEVELOPER);
  27 }
  28 $MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
  29 //}}}
  30 //REQUIRE ONCE {{{
  31     require_once 'MECON/HTML/Tabla.php';
  32     require_once 'MECON/HTML/Link.php';
  33     require_once 'MECON/HTML/Image.php';
  34 // }}}
  35 //CREO LOS OBJETOS NECESARIOS {{{
  36     $TABLA =& new HTML_Table('width="500" align="right"');
  37     $LINK0 =& new MECON_HTML_Link('sistemas', 'Ver información
  38             de los sistemas.', array('accion'=>'info_listado'));
  39     $LINK1 =& new MECON_HTML_Link('sistemas', 'Activar
  40             Sistemas.', array('accion'=>'activar_sistema'));
  41     $LINK2 =& new MECON_HTML_Link('usuarios', 'Ver información
  42             de los usuarios.', array('accion'=>'filtrar'));
  43     $LINK3 =& new MECON_HTML_Link ('php-constantes',
  44             'Bajar la definición de constantes de un sistema.');
  45     $LINK5 =& new MECON_HTML_Link ('migrar', 'Migrar Sistema.');
  46
  47     $IMG0 =& new MECON_HTML_Image('../images/verinfodesist.gif', '(->)');
  48     $IMG1 =& new MECON_HTML_Image('../images/activar.gif', '(->)');
  49     $IMG2 =& new MECON_HTML_Image('../images/verusuario.gif', '(->)');
  50     $IMG3 =& new MECON_HTML_Image('../images/bajar.gif', '(->)');
  51     $IMG5 =& new MECON_HTML_Image('../images/migrar.gif', '(->)');
  52
  53     $IMG4 =& new MECON_HTML_Image('/MECON/images/blanco.gif',
  54             '------------------------------------------------------');
  55
  56     $LINK00 =& new MECON_HTML_Link('sistemas', $IMG0,
  57             array('accion'=>'info_listado'));
  58     $LINK11 =& new MECON_HTML_Link('sistemas', $IMG1,
  59             array('accion'=>'activar_sistema'));
  60     $LINK22 =& new MECON_HTML_Link('usuarios', $IMG2,
  61             array('accion'=>'filtrar'));
  62     $LINK33 =& new MECON_HTML_Link('php-constantes', $IMG3);
  63     $LINK55 =& new MECON_HTML_Link('migrar', $IMG5);
  64 //}}}
  65 //AGREGO LA INFO A LAS TABLAS {{{
  66     $TABLA->addRow(array($LINK00->toHtml(),$LINK0->toHtml()), 'align="left"');
  67     $TABLA->addRow(array($IMG4->toHtml()), 'colspan="2"');
  68     $TABLA->addRow(array($LINK11->toHtml(),$LINK1->toHtml()), 'align="left"');
  69     $TABLA->addRow(array($IMG4->toHtml()), 'colspan="2"');
  70     $TABLA->addRow(array($LINK22->toHtml(),$LINK2->toHtml()), 'align="left"');
  71     $TABLA->addRow(array($IMG4->toHtml()), 'colspan="2"');
  72     $TABLA->addRow(array($LINK33->toHtml(),$LINK3->toHtml()), 'align="left"');
  73     $TABLA->addRow(array($IMG4->toHtml()), 'colspan="2"');
  74     $TABLA->addRow(array($LINK55->toHtml(),$LINK5->toHtml()), 'align="left"');
  75     $TABLA->addRow(array($IMG4->toHtml()), 'colspan="2"');
  76 //}}}
  77 //DIBUJO LA PAGINA {{{
  78     $MARCO->addBodyContent($TABLA);
  79     $MARCO->display();
  80 // }}}
  81 //FIN
  82 ?>