X-Git-Url: https://git.llucax.com/mecon/ai.git/blobdiff_plain/6e0df7b212f1a721cf8df887c629b67957871225..beb4f27c0f38e10c639f5ec2000a0ac57719221c:/lib/AI/Error.php

diff --git a/lib/AI/Error.php b/lib/AI/Error.php
index b4a221a..3af3bef 100644
--- a/lib/AI/Error.php
+++ b/lib/AI/Error.php
@@ -39,8 +39,24 @@ require_once 'PEAR.php';
  */
 define('AI_ERROR_NO_RESULTADOS', 1);
 
+/**
+ * Error que indica que un padre no se puede borrar porque aún tiene
+ * hijos.
+ *
+ * Es un error esperado y poco grave que sucede cuando se intenta borrar
+ * un elemento del tipo AI_DBTreeObject que aún tiene hijos.
+ */
+define('AI_ERROR_TIENE_HIJOS', 2);
+
+/**
+ * Error que indica que el tipo de orden usado no es válido.
+ * Es un error no esperado.
+ */
+define('AI_ERROR_ORDEN_INVALIDO', 3);
+
 // +X2C Class 469 :AI_Error
 /**
+ * @package AI
  * @access public
  */
 class AI_Error extends PEAR_Error {
@@ -48,7 +64,7 @@ class AI_Error extends PEAR_Error {
 
     // +X2C Operation 470
     /**
-     * @param  int $codigo Cdigo de error.
+     * @param  int $codigo Código de error.
      * @param  string $mensaje Mensaje para mostrar
      *
      * @return void
@@ -60,6 +76,20 @@ class AI_Error extends PEAR_Error {
     }
     // -X2C
 
+    // +X2C Operation 530
+    /**
+     * @param  mixed $error Variable a evaluar si es un error.
+     *
+     * @return bool
+     * @access public
+     * @static
+     */
+    function isError($error) // ~X2C
+    {
+        return is_a($error, 'ai_error');
+    }
+    // -X2C
+
 } // -X2C Class :AI_Error
 
 ?>
\ No newline at end of file