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         'OnClick="javascript:window.open(\'procesos_popup?id=%s\','.
  62         '\'proc\', \'width=450,height=250,scrollbars=yes\');'.
  63         'return false;" target="_blank">'.
  64         "<img src=\"/sistemas/yatta/images/estado_%s.gif\" alt=\"%s\"".
  65         ' border=0></a>', array ('id', 'id', 'status', 'icono'));
  66
  67 $TABLADB->addRows($pager, array ('id', 'fecha', 'nombre_sistema', 'descripcion'));
  68 $TABLADB->updateColAttributes(0,'width="8%"');
  69 $TABLADB->updateColAttributes(2,'width="30%"');
  70 $TABLADB->updateColAttributes(3,'width="40%"');
  71 $TABLADB->updateColAttributes(4,'width="5%"');
  72 //}}}
  73
  74 //Agrego la tabla con la explicacion de los iconos {{{
  75 $TABLA =& new MECON_HTML_Tabla ('width="400"');
  76 $TABLA->addRow(array('Significado de los iconos'), 'cabecera colspan="2"');
  77 $TABLA->addRow(array('Icono', 'Significado'), 'titulo');
  78 $TABLA->addRow(array(
  79                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_0.gif',
  80                     'Espera'),
  81                 "El proceso esta en cola. Aun no se ejecuto.<br>Puede abortar su".
  82                 ' ejecucion presionando en el icono.'
  83             ));
  84 $TABLA->addRow(array(
  85                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_1.gif',
  86                     'Procesando'),
  87                 'El proceso se esta ejecutando en este momento. <br>Puede abortar su'.
  88                 ' ejecucion presionando en el icono.'
  89             ));
  90 $TABLA->addRow(array(
  91                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_2.gif',
  92                     'Finalizado'),
  93                 'El proceso ha finalizado.<br>'.
  94                 'Puede buscar el resultado en la seccion archivos.'
  95             ));
  96 $TABLA->addRow(array(
  97                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_3.gif',
  98                     'Error'),
  99                 'Se produjo un error durante la ejecucion del proceso.<br>'.
 100                 'Presionando sobre el icono puede ver una explicacion del mismo.'
 101             ));
 102 $TABLA->addRow(array(
 103                 new MECON_HTML_Image ('/sistemas/yatta/images/estado_4.gif',
 104                     'Abortado'),
 105                 'El proceso fue detenido por alguna persona (el responsable o'.
 106                 ' el administrador). Presionando sobre el icono puede ver una'.
 107                 'explicacion.'
 108             ));
 109 $TABLA->updateColAttributes(0, 'align="center"');
 110 $TABLA->updateColAttributes(1, 'align="left"');
 111 //}}}
 112
 113 //Agrego la info al marco y la muestro {{{
 114 $MARCO->addStyleSheet('css/yatta.css');
 115 $MARCO->addBody($TABLADB);
 116 $MARCO->addBody('<BR> <BR>');
 117 $MARCO->addBody($TABLA);
 118 $MARCO->display();
 119 //}}}
 120
 121 ?>