2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
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: mar may 27 15:16:38 ART 2003
17 // | Author: Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
22 require_once 'MECON/HTML/Tabla.php';
23 require_once 'SAMURAI/Sistema.php';
25 $aHref = '<a href="sistemas-abm?accion=##ACCION##&idSistema=##NUEVO##">';
26 $aHrefModif = $aHref.'<img src="/MECON/images/general_modificar.gif" border="0" alt="Modificar Sistema"></a>';
27 $aHrefElim = $aHref.'<img src="/MECON/images/general_eliminar.gif" border="0" alt="Eliminar Sistema" ></a>';
28 $aHrefPerm = '<a href="sistemas-permisos?idSistema=##SISTEMA##"><img src="/MECON/images/general_ir4" border="0" alt="Definir Permisos"></a>';
30 $sistemas = SAMURAI_Sistema::getSistemas($DB);
32 $TABLA2 = new Tabla ('cellspacing=0');
33 $row = array ($aHref.'<img src="/MECON/images/general_nuevo.gif" border="0">Ingresar Nuevo Sistema</a>');
34 $TABLA2->addRow($row,'align=right');
36 $TABLA = new Tabla ('cellpadding=2');
37 $row = array ('Id','Nombre','Descripcion','Fecha Inicio','Fecha Fin','Fecha Impl.','Contacto','Modif.','Elim.','Perm.');
38 $TABLA->addRow($row,'cabecera');
40 foreach ($sistemas as $sistema) {
41 $Modif = ereg_replace('##NUEVO##' , $sistema->getId(), $aHrefModif);
42 $Elim = ereg_replace('##NUEVO##' , $sistema->getId(), $aHrefElim);
43 $Modif = ereg_replace('##ACCION##' , 'm' , $Modif);
44 $Elim = ereg_replace('##ACCION##' , 'e' , $Elim);
45 $Perm = ereg_replace('##SISTEMA##', $sistema->getId(), $aHrefPerm);
47 $fecha_inicio = $sistema->getFechaInicio();
48 $fecha_fin = $sistema->getFechaFin();
49 $fecha_implementacion = $sistema->getFechaImplementacion();
51 $row = array ( $sistema->getId(),
52 $sistema->getNombre(),
53 $sistema->getDescripcion(),
54 $fecha_inicio ? $fecha_inicio->format("%d-%m-%Y") : '--',
55 $fecha_fin ? $fecha_fin->format("%d-%m-%Y") : '--',
56 $fecha_implementacion ? $fecha_implementacion->format("%d-%m-%Y") : '--',
57 $sistema->getContacto(),
66 //Agrego la opcion de seleccionar otro sistema para trabajar
67 $TABLA3 = new Tabla ('cellspacing=0');
68 $row = array ('<a href="../sel-sistema.php">Seleccionar otro sistema para trabajar <img src="/MECON/images/general_ir4" border="0"></a>');
69 $TABLA3->addRow($row,'align=right');
73 //Agrego las cosas al cuerpo de la pagina
75 $MARCO = new Marco ('../../conf/confSecciones.php');
76 $MARCO->addBody($TABLA2->toHtml(1));
77 $MARCO->addBody($TABLA);
78 $MARCO->addBody($TABLA3->toHtml(1));