X-Git-Url: https://git.llucax.com/mecon/ai.git/blobdiff_plain/89f9ee9162349d9d5027d60f6db398a8c2767f17..6f01c3fab69d0faff0af9e84168264e7e69fb03e:/sistema/www/index.php?ds=inline

diff --git a/sistema/www/index.php b/sistema/www/index.php
index 0f0184f..655e967 100644
--- a/sistema/www/index.php
+++ b/sistema/www/index.php
@@ -33,13 +33,13 @@ prepend_include_path('/var/www/sistemas/ai/sistema/local_lib');
 
 // Debug. {{{
 require_once 'PEAR.php';
-PEAR::setErrorHandling(PEAR_ERROR_TRIGGER);
-#PEAR::setErrorHandling(PEAR_ERROR_RETURN);
+#PEAR::setErrorHandling(PEAR_ERROR_TRIGGER);
+PEAR::setErrorHandling(PEAR_ERROR_RETURN);
 // }}}
 
 // Creo el Marco. {{{
 require_once 'MECON/Marco.php';
-$marco = new Marco('../conf/Marco.php');
+$marco = new MECON_Marco('../conf/Marco.php');
 // }}}
 
 // Averiguo si estoy administrando algún tipo de objeto. {{{
@@ -217,8 +217,21 @@ if ($tipo) {
     }
     // }}}
 
-    // Agrego el menu y formulario a la página. {{{
+    // Agrego el menu, link para nuevo y formulario a la página. {{{
     $marco->addMenuVertical($arbol);
+    if ($accion & ~AI_ALTA) {
+        require_once 'HTML/Image.php';
+        require_once 'HTML/Link.php';
+        $img = new HTML_Image('/MECON/images/general_nuevo', 'Agregar nuevo',
+            array('border' => 0, 'align'  => 'middle',));
+        $link = new HTML_Link($tipo);
+        $marco->addBody('<DIV class="texto11_negro" valign="middle" align="center">');
+        $link->addContents($img);
+        $link_text = ' Agregar un nuevo ' . $nombre;
+        $link->addContents($link_text);
+        $marco->addBody($link);
+        $marco->addBody('</DIV>');
+    }
     $marco->addBody($form);
     // }}}