Agrego la administración de cuotas excepcionales. Modifico la sección Administración...

[mecon/yatta.git] / sistema / www / procesos.php

diff --git a/sistema/www/procesos.php b/sistema/www/procesos.php
index 4255760acc6f46c2d749905a22ed5cd597ad9c03..1dfb381ac78d37aaa1fa78a89e32bff698442320 100644 (file)
--- a/sistema/www/procesos.php
+++ b/sistema/www/procesos.php
@@ -33,22 +33,34 @@ 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;
 $res = $PROCESO->obtenerProcesosUsuario($DB, $_SESSION['usuario']);
 if (PEAR::isError($res)) {
-    die('Error: ' . $res->getMessage() . "\n");
+     trigger_error('Error: ' . $res->getMessage() . "\n", E_USER_ERROR);
 }
 
 $pager = $TABLADB->addPager($res, null, 
@@ -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();
 //}}}
-
 ?>