sistema/www/admin_cuotas.php

   1 <?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
   2 -------------------------------------------------------------------------------
   3                              Ministerio de Economía
   4                                     YATTA!
   5 -------------------------------------------------------------------------------
   6 This file is part of YATTA!.
   7
   8 YATTA! is free software; you can redistribute it and/or modify it under
   9 the terms of the GNU General Public License as published by the Free
  10 Software Foundation; either version 2 of the License, or (at your option)
  11 any later version.
  12
  13 YATTA! is distributed in the hope that it will be useful, but WITHOUT
  14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  15 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License; if not,
  18 write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
  19 Boston, MA  02111-1307  USA
  20 -------------------------------------------------------------------------------
  21 Creado: jue mar  4 19:22:05 ART 2004
  22 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
  23 -------------------------------------------------------------------------------
  24 $Id$
  25 -----------------------------------------------------------------------------*/
  26 //Require Once {{{
  27 //HTML {{{
  28 require_once 'MECON/HTML/TablaDB.php';
  29 require_once 'MECON/HTML/Image.php';
  30 require_once 'MECON/HTML/Link.php';
  31 //}}}
  32 //YATTA {{{
  33 require_once 'YATTA/CuotaDB.php';
  34 //}}}
  35 //}}}
  36
  37 //Obtengo los datos de los servidores {{{
  38 $CUOTA =& new YATTA_CuotaDB();
  39 $res = $CUOTA->buscar ($DB, MECON_DBO_OR, 'login');
  40 //}}}
  41
  42 //Agrego la informacion a la tabla {{{
  43 $TABLADB = new MECON_HTML_TablaDB ('Cuotas', 'width="400"');
  44
  45 $TABLADB->addLink('nuevo', new MECON_HTML_Link('admin_cuotas-abm',
  46             'Nueva Cuota'));
  47
  48 $TABLADB->addRow(array('Listado de Cuotas'),
  49         'cabecera colspan="4" align="left"');
  50
  51 $TABLADB->addRow(array('Login', 'Cuota (MB)', 'Modif.', 'Elim.'),'titulo');
  52
  53 $pager = $TABLADB->addPager($res, null, new MECON_HTML_Link ('admin_cuotas'
  54             , null));
  55
  56 $TABLADB->addRowsIcon('modificar', array ('login'), new MECON_HTML_Link
  57         ('admin_cuotas-abm', null, array('accion' => 'modificar')));
  58
  59 $TABLADB->addRowsIcon('borrar', array ('login'), new MECON_HTML_Link
  60         ('admin_cuotas-abm', null, array('accion' => 'eliminar')));
  61
  62 $TABLADB->addRows($pager, array ('login', 'cuota'));
  63
  64 $TABLADB->updateColAttributes(0, 'width="45%"');
  65 $TABLADB->updateColAttributes(1, 'width="45%"');
  66 $TABLADB->updateColAttributes(2, 'width="5%"');
  67 $TABLADB->updateColAttributes(3, 'width="5%"');
  68 //}}}
  69
  70 //Agrego la info al marco y la muestro {{{
  71 $MARCO->addStyleSheet('css/yatta.css');
  72 $MARCO->addBody($TABLADB);
  73 $MARCO->display();
  74 //}}}
  75 ?>