Bugfixes.

[mecon/ai.git] / lib / AI / Sistema.php

diff --git a/lib/AI/Sistema.php b/lib/AI/Sistema.php
index 05f2559735967806d176f5515463ecbfee739051..e149668b4f28c8af08e2cd55b6345d6efe9bb16f 100644 (file)
--- a/lib/AI/Sistema.php
+++ b/lib/AI/Sistema.php
@@ -30,11 +30,16 @@
 // +X2C includes
 require_once 'AI/DBObject.php';
 // ~X2C
-//
+
 require_once 'AI/Error.php';
 // TODO - preguntar a gmeray si le sirve, yo no lo uso...
 require_once 'SAMURAI/Sistema.php';
 
+/**
+ * Archivo de configuración.
+ */
+define('AI_SISTEMA_CONFFILE', dirname(__FILE__).'/Sistema.ini');
+
 // +X2C Class 416 :AI_Sistema
 /**
  * Sistema.
@@ -112,7 +117,7 @@ FIXME - preguntar a gonzalo si le sirve.
      */
     function AI_Sistema($sistema = 0) // ~X2C
     {
-        parent::AI_DBObject($sistema, dirname(__FILE__) . '/Sistema.ini');
+        parent::AI_DBObject($sistema, AI_SISTEMA_CONFFILE);
     }
     // -X2C
 
@@ -139,6 +144,34 @@ FIXME - preguntar a gonzalo si le sirve.
     }
     // -X2C
 
+    // +X2C Operation 528
+    /**
+     * Obtiene un array con los identificadores de los sistemas cargados.
+     *
+     * @param  DB $db Base de datos de la cual obtener los sistemas.
+     * @param  string $where Clausula WHERE para filtrar resultados.
+     *
+     * @return array
+     * @access public
+     * @static
+     */
+    function getSistemasArray($db, $where = '') // ~X2C
+    {
+        static $conf;
+        if (!$conf) {
+            $conf = parse_ini_file(AI_SISTEMA_CONFFILE, true);
+        }
+        extract($conf);
+        $query = "
+            SELECT   $id
+            FROM     $base.$tabla";
+        if ($where) {
+            $query .= "WHERE $where";
+        }
+        return $db->getCol($query);
+    }
+    // -X2C
+
 } // -X2C Class :AI_Sistema
 
-?>
+?>
\ No newline at end of file