------------------------------------------------------------------------------- $Id$ -----------------------------------------------------------------------------*/ //Require Once {{{ //HTML {{{ require_once 'MECON/HTML/TablaDB.php'; require_once 'MECON/HTML/Image.php'; require_once 'MECON/HTML/Link.php'; //}}} //YATTA {{{ require_once 'YATTA/CuotaDB.php'; //}}} //}}} //Obtengo los datos de los servidores {{{ $CUOTA =& new YATTA_CuotaDB(); $res = $CUOTA->buscar ($DB, MECON_DBO_OR, 'login'); //}}} //Agrego la informacion a la tabla {{{ $TABLADB = new MECON_HTML_TablaDB ('Cuotas', 'width="400"'); $TABLADB->addLink('nuevo', new MECON_HTML_Link('admin_cuotas-abm', 'Nueva Cuota')); $TABLADB->addRow(array('Listado de Cuotas'), 'cabecera colspan="4" align="left"'); $TABLADB->addRow(array('Login', 'Cuota (MB)', 'Modif.', 'Elim.'),'titulo'); $pager = $TABLADB->addPager($res, null, new MECON_HTML_Link ('admin_cuotas' , null)); $TABLADB->addRowsIcon('modificar', array ('login'), new MECON_HTML_Link ('admin_cuotas-abm', null, array('accion' => 'modificar'))); $TABLADB->addRowsIcon('borrar', array ('login'), new MECON_HTML_Link ('admin_cuotas-abm', null, array('accion' => 'eliminar'))); $TABLADB->addRows($pager, array ('login', 'cuota')); $TABLADB->updateColAttributes(0, 'width="45%"'); $TABLADB->updateColAttributes(1, 'width="45%"'); $TABLADB->updateColAttributes(2, 'width="5%"'); $TABLADB->updateColAttributes(3, 'width="5%"'); //}}} //Agrego la info al marco y la muestro {{{ $MARCO->addStyleSheet('css/yatta.css'); $MARCO->addBody($TABLADB); $MARCO->display(); //}}} ?>