Agrego mensages de error.

[mecon/intranet.git] / sistema / www / servicios / agenda / agenda1.php

diff --git a/sistema/www/servicios/agenda/agenda1.php b/sistema/www/servicios/agenda/agenda1.php
index 891b98a65f67667a4582d03f545a438b9f4bac98..1facfd4e090744d601c4cccc3bc4863e21675d02 100644 (file)
--- a/sistema/www/servicios/agenda/agenda1.php
+++ b/sistema/www/servicios/agenda/agenda1.php
@@ -47,6 +47,9 @@ $LINK_2    = new MECON_HTML_Link('mailto:teleco@mecon.gov.ar', 'Consultas', arra
 //}}}
 //OBTENGO LOS DATOS DE LAS BASES {{{
 $EDIFICIOS = Servicios_Agenda::getEdificios($DB); 
+if (PEAR::isError($EDIFICIOS)) {
+    trigger_error('Error: ' . $EDIFICIOS->getMessage() . "\n", E_USER_ERROR);
+}
 //}}}
 //AGREGO LOS ELEMENTOS AL FORM {{{
 $header        =& $FORM->addElement('header', 'cabecera'      , $IMG1->toHtml().'Búsqueda de Internos');