sistema/www/procesos.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 nov 27 18:58:19 ART 2003
  22 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
  23 -------------------------------------------------------------------------------
  24 $Id$
  25 -----------------------------------------------------------------------------*/
  26
  27 //Require Once {{{
  28 //HTML {{{
  29 require_once 'MECON/HTML/TablaDB.php';
  30 require_once 'MECON/HTML/Tabla.php';
  31 require_once 'MECON/HTML/Image.php';
  32 require_once 'MECON/HTML/Link.php';
  33 //}}}
  34 //YATTA {{{
  35 require_once 'YATTA/Controlador.php';
  36 //}}}
  37 //}}}
  38
  39 //Obtengo la informacion de la base y la agrego a la tabla {{{
  40 $TABLADB = new MECON_HTML_TablaDB ('Procesos');
  41 $TABLADB->addRow(array(
  42             'Listado de Procesos'
  43             ), 'cabecera colspan="4" align="left"');
  44 $TABLADB->addRow(array(
  45             'Id', 'Fecha', 'Sistema', 'Descripcion', 'Estado'
  46             ),'titulo');
  47
  48 $PROCESO =& new YATTA_Controlador;
  49 $res = $PROCESO->obtenerProcesosUsuario($DB, $_SESSION['usuario']);
  50 if (PEAR::isError($res)) {
  51     die('Error: ' . $res->getMessage() . "\n");
  52 }
  53
  54 $pager = $TABLADB->addPager($res, null,
  55             new MECON_HTML_Link
  56                 ('procesos', null
  57                 )
  58         );
  59
  60 $TABLADB->addRowsData('<a href="procesos_popup?id=%s">'.
  61         "<img src=\"/sistemas/yatta/images/estado_%s.gif\" alt=\"%s\"".
  62         ' border=0></a>', array ('id', 'status', 'icono'));
  63
  64 $TABLADB->addRows($pager, array ('id', 'fecha', 'nombre_sistema', 'descripcion'));
  65 $TABLADB->updateColAttributes(0,'width="8%"');
  66 $TABLADB->updateColAttributes(2,'width="30%"');
  67 $TABLADB->updateColAttributes(3,'width="40%"');
  68 $TABLADB->updateColAttributes(4,'width="5%"');
  69 //}}}
  70
  71 //Agrego la tabla con la explicacion de los iconos {{{
  72 $TABLA =& new MECON_HTML_Tabla ('width="400"');
  73 $TABLA->addRow(array('Significado de los iconos'), 'cabecera colspan="2"');
  74 $TABLA->addRow(array('Icono', 'Significado'), 'titulo');
  75 $TABLA->addRow(array(
  76                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_0.gif',
  77                     'Espera'),
  78                 "El proceso esta en cola. Aun no se ejecuto.<br>Puede abortar su".
  79                 ' ejecucion presionando en el icono.'
  80             ));
  81 $TABLA->addRow(array(
  82                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_1.gif',
  83                     'Procesando'),
  84                 'El proceso se esta ejecutando en este momento. <br>Puede abortar su'.
  85                 ' ejecucion presionando en el icono.'
  86             ));
  87 $TABLA->addRow(array(
  88                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_2.gif',
  89                     'Finalizado'),
  90                 'El proceso ha finalizado.<br>'.
  91                 'Puede buscar el resultado en la seccion archivos.'
  92             ));
  93 $TABLA->addRow(array(
  94                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_3.gif',
  95                     'Error'),
  96                 'Se produjo un error durante la ejecucion del proceso.<br>'.
  97                 'Presionando sobre el icono puede ver una explicacion del mismo.'
  98             ));
  99 $TABLA->addRow(array(
 100                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_4.gif',
 101                     'Abortado'),
 102                 'El proceso fue detenido por alguna persona (el responsable o'.
 103                 ' el administrador). Presionando sobre el icono puede ver una'.
 104                 'explicacion.'
 105             ));
 106 $TABLA->updateColAttributes(0, 'align="center"');
 107 $TABLA->updateColAttributes(1, 'align="left"');
 108 //}}}
 109
 110 //Agrego la info al marco y la muestro {{{
 111 $MARCO->addStyleSheet('css/yatta.css');
 112 $MARCO->addBody($TABLADB);
 113 $MARCO->addBody('<BR> <BR>');
 114 $MARCO->addBody($TABLA);
 115 $MARCO->display();
 116 //}}}
 117
 118 ?>