Agrego la posibilidad de borrar procesos.

diff --git a/sistema/www/archivos.php b/sistema/www/archivos.php
index 4dcb3ffb5125c343844e827e8ea0ad5211226123..5c1f5a19d599b4da1237d1d11d5fd546a5aead97 100644 (file)
--- 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 00f43d00ae16e3492b674c48058b24007a3ccf4e..1dfb381ac78d37aaa1fa78a89e32bff698442320 100644 (file)
--- 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();
 //}}}
-
 ?>