From: Martín Marrese <marrese@gmail.com>
Date: Mon, 9 Feb 2004 19:12:13 +0000 (+0000)
Subject: Agrego la posibilidad de borrar procesos.
X-Git-Tag: svn_import~41
X-Git-Url: https://git.llucax.com/mecon/yatta.git/commitdiff_plain/2648e8c31d6b64dcdc84b76bcc776781c9d2d49a

Agrego la posibilidad de borrar procesos.
---

diff --git a/sistema/www/archivos.php b/sistema/www/archivos.php
index 4dcb3ff..5c1f5a1 100644
--- a/sistema/www/archivos.php
+++ b/sistema/www/archivos.php
@@ -125,10 +125,6 @@ function owner_callback($owner) {
 }
 //}}}
 
-
-//$TABLADB->addRowsIcon('borrar', array ('id'), new MECON_HTML_Link ('archivos', '', array
-//            ('accion' => 'borrar')));
-
 $pager = $TABLADB->addPager($res, null, 
             new MECON_HTML_Link
                 ('archivos', null 
diff --git a/sistema/www/procesos.php b/sistema/www/procesos.php
index 00f43d0..1dfb381 100644
--- a/sistema/www/procesos.php
+++ b/sistema/www/procesos.php
@@ -33,16 +33,28 @@ require_once 'MECON/HTML/Link.php';
 //}}}
 //YATTA {{{
 require_once 'YATTA/Controlador.php';
+require_once 'YATTA/Proceso.php' ;
 //}}}
 //}}}
 
+//Elimino el proceso en caso de ser necesario {{{
+if (@$_REQUEST['accion'] == 'eliminar') {
+    $PROCESO = new YATTA_Proceso;
+    $PROCESO->id = $_REQUEST['_id'];
+    $res = $PROCESO->borrar($DB);
+    if (PEAR::isError($res)) {
+        trigger_error('Error: ' . $res->getMessage() . "\n", E_USER_ERROR);
+    }
+}
+//}}}
+
 //Obtengo la informacion de la base y la agrego a la tabla {{{ 
 $TABLADB = new MECON_HTML_TablaDB ('Procesos');
 $TABLADB->addRow(array(
             'Listado de Procesos'
-            ), 'cabecera colspan="4" align="left"');
+            ), 'cabecera colspan="5" align="left"');
 $TABLADB->addRow(array(
-            'Id', 'Fecha', 'Sistema', 'Descripcion', 'Estado'
+            'Id', 'Fecha', 'Sistema', 'Descripcion', 'Estado', 'Borrar'
             ),'titulo');
 
 $PROCESO =& new YATTA_Controlador;
@@ -61,11 +73,15 @@ $TABLADB->addRowsData('<a href="procesos_popup?id=%s">'.
         "<img src=\"/sistemas/yatta/images/estado_%s.gif\" alt=\"%s\"".
         ' border=0></a>', array ('id', 'status', 'icono'));
 
+$LINK =& new MECON_HTML_Link ('procesos', '', array ('accion' => 'eliminar'));
+$TABLADB->addRowsIcon('borrar', 'id', $LINK);
+
 $TABLADB->addRows($pager, array ('id', 'fecha', 'nombre_sistema', 'descripcion'));
 $TABLADB->updateColAttributes(0,'width="8%"');
 $TABLADB->updateColAttributes(2,'width="30%"');
 $TABLADB->updateColAttributes(3,'width="40%"');
 $TABLADB->updateColAttributes(4,'width="5%"');
+$TABLADB->updateColAttributes(5,'width="5%"');
 //}}}
 
 //Agrego la tabla con la explicacion de los iconos {{{
@@ -114,5 +130,4 @@ $MARCO->addBody('<BR> <BR>');
 $MARCO->addBody($TABLA);
 $MARCO->display();
 //}}}
-
 ?>