src/www/sistemas_abm.php

   1 <?php
   2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
   3 // +--------------------------------------------------------------------+
   4 // |                           SAMURAI                                  |
   5 // +--------------------------------------------------------------------+
   6 // |   Sistema de Administracion y Matenimiento de Usuarios Relativo A  |
   7 // |                             Intranet                               |
   8 // |                      Ministerio de Economía                        |
   9 // +--------------------------------------------------------------------+
  10 // | Creado: fri mar 21 ART 2003                                        |
  11 // | Autor:  Martin Marrese <mmarre@mecon.gov.ar>                       |
  12 // +--------------------------------------------------------------------+
  13 //
  14 // $Id$
  15 //
  16 // $URL$
  17 // $Rev$
  18 // $Date$
  19 // $Author$
  20
  21 require_once 'HTML/Form.php';
  22 require_once 'HTML/Tabla.php';
  23
  24 // Armo el FORM {{{
  25 $FORM = new HTML_Form('sistemas_abm.php', 'post', 'sistemas_abm');
  26 $FORM->start();
  27 // Recibo la accion y el id por get
  28     if (isset($_GET['id'])) {
  29         $id_sistema = $_GET['id'];
  30     }
  31     else {
  32         $id_sistema = '';
  33     }
  34     if (isset($_GET['accion'])) {
  35         $accion = $_GET['accion'];
  36     }
  37     else {
  38         $accion = '';
  39     }
  40 //Armo la tabla {{{
  41         $TABLE_externa = new Tabla('width="760" align="center" bgcolor="#FFFFFF"');
  42             //Cargo las filas {{{
  43                 // Cargo el link a sistemas_abm.php
  44                 $row_vacio = array ('0' => '');
  45
  46                 // Agrego una linea en blanco, que mas lindo esteticamente
  47                 $TABLE_externa->agregarFila($row_vacio);
  48
  49                 // Cargo los datos del sistema
  50                 $row = array ($sistema_remoto->htmlDatosSistema($id_sistema, $accion));
  51                 $TABLE_externa->agregarFila($row);
  52
  53                 // Tengo que agregar una fila mas para dejar un espacio en blanco
  54                 $TABLE_externa->agregarFila($row_vacio);
  55
  56             // }}} Fin carga de filas
  57         $TABLE_externa->display();
  58     // }}} Fin de la tabla
  59
  60     $FORM->end();
  61     // }}} Fin del FORM
  62
  63 ?>