From 763af8f8638f2e6c8833c1faf01f0dfa76259774 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Mart=C3=ADn=20Marrese?= <marrese@gmail.com>
Date: Tue, 2 Dec 2003 22:08:39 +0000
Subject: [PATCH] Modificaciones para la seccion procesos

---
 lib/YATTA/Proceso.php          | 36 ++++++++-----
 sistema/www/procesos.php       |  8 +--
 sistema/www/procesos_popup.php | 94 ++++++++++++++++++++++++++++++++++
 3 files changed, 122 insertions(+), 16 deletions(-)
 create mode 100644 sistema/www/procesos_popup.php

diff --git a/lib/YATTA/Proceso.php b/lib/YATTA/Proceso.php
index 87dd3a0..df7310c 100644
--- a/lib/YATTA/Proceso.php
+++ b/lib/YATTA/Proceso.php
@@ -172,6 +172,14 @@ class YATTA_Proceso extends MECON_DBO {
      * @access public
      */
     var $nota = null;
+
+    /**
+     * Descripcion del estado.
+     *
+     * @var    string $icono
+     * @access public
+     */
+    var $icono = null;
     
     /**
      * Carga el objeto con los datos que se pasan por parametro.
@@ -212,6 +220,7 @@ class YATTA_Proceso extends MECON_DBO {
             $this->notificar        = $res['notificar'];
             $this->resultado        = $res['resultado'];
             $this->nota             = $res['nota'];
+            $this->icono            = $res['icono'];
             return true;
         }
         return false; 
@@ -243,6 +252,9 @@ class YATTA_Proceso extends MECON_DBO {
     function buscar($db = null, $operador = MECON_DBO_OR, $orden = null) 
     {
         // Armo el WHERE.
+        if (is_null($this->owner)) {
+            return new PEAR_Error ('Debe definirse el Owner del proceso.');
+        }
         $where = array();
         if (!is_null($this->id)) {
             $where[] = 'p.id = '.$this->id;
@@ -278,9 +290,6 @@ class YATTA_Proceso extends MECON_DBO {
         if (!is_null($this->status)) {
             $where[] = 'p.status = '.$this->status;
         }
-        if (!is_null($this->owner)) {
-            $where[] = 'p.owner LIKE '. $db->quote("%$this->owner%");
-        }
         if (!is_null($this->destinos)) {
             if (is_array($this->destinos)) {
                 foreach ($this->destinos as $destino) {
@@ -307,11 +316,13 @@ class YATTA_Proceso extends MECON_DBO {
             $where[] = 'p.nota LIKE '. $db->quote("%$this->nota%");
         } 
         if ($where) {
-            $where = 'WHERE p.id_sistema = s.id_sistema AND ('. join ("$operador
+            $where = 'WHERE p.owner = '. $db->quote("$this->owner").
+                'AND p.id_sistema = s.id_sistema AND ('. join ("$operador
                         ", $where).')';
         } 
         else {
-            $where = 'WHERE p.id_sistema = s.id_sistema';
+            $where = 'WHERE p.owner = '. $db->quote("$this->owner").
+                'AND p.id_sistema = s.id_sistema';
         }
         // Armo el ORDER BY.
         if (is_string($orden))
@@ -334,17 +345,17 @@ class YATTA_Proceso extends MECON_DBO {
                 AS scheduling, p.notificar AS notificar, p.resultado AS 
                 resultado, p.nota AS nota,".
                 "IF (p.status = 0, 'El proceso esta en cola. Aun no se ejecuto.".
-                " Puede abortar su ejecucion presionando en el icono.', ".
+                "', ".
                 "IF(p.status = 1, 'El proceso se esta ejecutando en este momento.".
-                " Puede abortar su ejecucion presionando en el icono.',".
+                "',".
                 "IF(p.status = 2, 'El proceso ha finalizado. ".
-                "Puede buscar el resultado en la seccion archivos.',".
+                "',".
                 "IF(p.status = 3, 'Se produjo un error durante la ejecucion".
-                " del proceso. Presionando sobre el icono puede ver una".
-                " explicacion del mismo.',".
+                " del proceso.".
+                "',".
                 "'El proceso fue detenido por alguna persona (el responsable o".
-                " el administrador). Presionando sobre el icono puede ver una ".
-                "explicacion.'".
+                " el administrador).".
+                "'".
                 ")".
                 ")".
                 ")".
@@ -432,6 +443,7 @@ class YATTA_Proceso extends MECON_DBO {
         $this->notificar = null;
         $this->resultado = null;
         $this->nota = null;
+        $this->icono = null;
     }
 }
 ?>
\ No newline at end of file
diff --git a/sistema/www/procesos.php b/sistema/www/procesos.php
index 9e2ec92..8e8181a 100644
--- a/sistema/www/procesos.php
+++ b/sistema/www/procesos.php
@@ -42,23 +42,23 @@ $TABLADB->addRow(array(
             ),'titulo');
 
 $PROCESO =& new YATTA_Proceso;
+$PROCESO->owner = $_SESSION['usuario'];
 $res = $PROCESO->buscar($DB, MECON_DBO_AND, ' id ASC');
 if (PEAR::isError($res)) {
     die('Error: ' . $res->getMessage() . "\n");
 }
 
+//@FIXME La fecha esta quedando en formato americano, arreglar eso.
+
 $pager = $TABLADB->addPager($res, null, 
             new MECON_HTML_Link
                 ('procesos', null 
                 )
         );
 
-$desc_estado_0 = 'MARTIN';
-$desc_estado_1 = 'MYRNA';
-
 $TABLADB->addRowsData('<a href="procesos_popup?id=%s" '.
         'OnClick="javascript:window.open(\'procesos_popup?id=%s\','.
-        '\'proc\', \'width=400,height=300,scrollbars=yes\');'.
+        '\'proc\', \'width=450,height=250,scrollbars=yes\');'.
         'return false;" target="_blank">'.
         "<img src=\"/sistemas/yatta/images/estado_%s.gif\" alt=\"%s\"".
         ' border=0></a>', array ('id', 'id', 'status', 'icono'));
diff --git a/sistema/www/procesos_popup.php b/sistema/www/procesos_popup.php
new file mode 100644
index 0000000..bc03c13
--- /dev/null
+++ b/sistema/www/procesos_popup.php
@@ -0,0 +1,94 @@
+<?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
+-------------------------------------------------------------------------------
+                             Ministerio de Economía
+                                    YATTA!
+-------------------------------------------------------------------------------
+This file is part of YATTA!.
+
+YATTA! is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2 of the License, or (at your option)
+any later version.
+
+YATTA! is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+ 
+You should have received a copy of the GNU General Public License; if not,
+write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+Boston, MA  02111-1307  USA
+-------------------------------------------------------------------------------
+Creado: mar dic  2 18:11:32 ART 2003
+Autor:  Martin Marrese <mmarre@mecon.gov.ar>
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/
+
+//Require Once {{{
+require_once 'HTML/Page.php';
+require_once 'HTML/Table.php';
+require_once 'MECON/HTML/Link.php';
+require_once 'MECON/HTML/Image.php';
+require_once 'YATTA/Proceso.php';
+//}}}
+
+//Creo los objetos necesarios {{{
+$PAGE =& new HTML_Page(array ('doctype'  => 'HTML 4.01 Transitional',
+                                'charset'  => 'iso-8859-1',
+                                'lineend'  => 'unix',
+                                'language' => 'es',
+                                'cache'    => 'false',
+                                'simple'   => 'true'));
+$PAGE->addStyleSheet('/sistemas/yatta/css/yatta.css');
+$PAGE->addStyleSheet('/MECON/css/marco.css');
+$TABLA=& new HTML_Table('width="370"');
+$PROCESO =& new YATTA_Proceso;
+//}}}
+
+//Obtengo la info que se pasa por get {{{
+$id = (@$_REQUEST['id']) ? $_REQUEST['id'] : null;
+//}}}
+
+//Obtengo la informacion del proceso {{{
+$PROCESO->owner = $_SESSION['usuario'];
+$PROCESO->id = $id;
+$res = $PROCESO->buscar($DB, MECON_DBO_AND, ' id ASC');
+if (PEAR::isError($res)) {
+    die('Error: ' . $res->getMessage() . "\n");
+}
+$res = $PROCESO->cargar($res);
+//}}}
+
+//Creo las imagenes {{{
+$imagen =& new MECON_HTML_Image('/sistemas/yatta/images/estado_'.
+                $PROCESO->status.'.gif');
+$cerrar = new MECON_HTML_Image('/MECON/images/general_cerrar.gif');
+$detener =& new MECON_HTML_Link('proceso_detener', 
+                new MECON_HTML_Image ('/MECON/images/general_detener.gif'),
+                array ('id' => $id));
+//}}}
+
+//DIBUJO LA PAGINA {{{
+$PAGE->addBodyContent('<b>'. $imagen->toHtml().' '. $PROCESO->icono
+        .'</b><br><br>');
+
+$TABLA->addRow(array(
+                '<b>Id: '. $id .'</b><br>'.
+                '<b>Fecha: '. $PROCESO->fecha->format("%d/%m/%Y") .'</b><br>'.
+                '<b>Sistema: '. $PROCESO->nombre_sistema .'</b><br>'.
+                '<b>Descripcion: '. $PROCESO->descripcion .'</b><br>'.
+                '<b>Owner: '. $PROCESO->owner .'</b><br>'.
+                '<b>Destinos: '. implode(', ', $PROCESO->destinos) .'</b><br>'.
+                '<b>Nota: '. $PROCESO->nota .'</b><br>' 
+            ));
+$PAGE->addBodyContent($TABLA->toHtml());
+$PAGE->addBodyContent('<br>');
+if ($PROCESO->status == 0 || $PROCESO->status == 1) {
+    $PAGE->addBodyContent($detener->toHtml()); 
+}
+$PAGE->addBodyContent('<a href="" onClick=\'self.close();return'.
+        ' false;\'>'.$cerrar->toHtml().'</a>');
+$PAGE->setTitle('Datos del Proceso');
+$PAGE->display();                          
+// }}}
+?>
-- 
2.43.0