Se pone bien el redirect, se borra un estilo deprecated.

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

diff --git a/lib/AI/Sistema.php b/lib/AI/Sistema.php
index 54260afc017ce302e7bbce55be40907ef4e02c02..2f65ea84da5b998c6d4828aca023f272c3f4d1e7 100644 (file)
--- a/lib/AI/Sistema.php
+++ b/lib/AI/Sistema.php
@@ -55,7 +55,7 @@ class AI_Sistema extends AI_DBObject {
     var $sistema = 0;
 
     /**
-     * Nombre del sistema (slo de lectura, extra?o de SAMURAI).
+     * Nombre del sistema (sólo de lectura, extraído de SAMURAI).
      *
      * @var    string $nombre
      * @access public
@@ -63,7 +63,7 @@ class AI_Sistema extends AI_DBObject {
     var $nombre = '';
 
     /**
-     * Descripcin del sistema (slo de lectura, extra?o de SAMURAI).
+     * Descripción del sistema (sólo de lectura, extraído de SAMURAI).
      *
      * @var    string $descripcion
      * @access public
@@ -71,7 +71,7 @@ class AI_Sistema extends AI_DBObject {
     var $descripcion = '';
 
     /**
-     * ?ono del sistema.
+     * Ícono del sistema.
      *
      * @var    string $icono
      * @access public
@@ -102,6 +102,12 @@ class AI_Sistema extends AI_DBObject {
      */
     var $habilitado = true;
 
+    /**
+     * @var    string $tipo
+     * @access public
+     */
+    var $tipo = 'php';
+
     // ~X2C
 
     // +X2C Operation 466
@@ -117,6 +123,45 @@ class AI_Sistema extends AI_DBObject {
     }
     // -X2C
 
+    // +X2C Operation 536
+    /**
+     * @param  mixed $db Base de datos o resultado de donde cargar el sistema.
+     *
+     * @return PEAR_Error
+     * @access public
+     */
+    function cargar($db) // ~X2C
+    {
+        $id_field = $this->conf['id'];
+        $id = intval($this->$id_field);
+        if (is_a($db, 'db_result')) {
+            $result = $db;
+            $db     = $result->dbh;
+        // Si no es un resultado, hago el query.
+        } else {
+            $result = $db->query(
+                "SELECT AI.*, SA.nombre_sistema as nombre, SA.desc_sistema as descripcion
+                    FROM {$this->conf['base']}.{$this->conf['tabla']} as AI, samurai.sistema as SA
+                    WHERE AI.$id_field = $id AND AI.$id_field = SA.id_sistema"
+            );
+            if (DB::isError($result)) {
+                return $result;
+            }
+        }
+        // Obtengo la fila.
+        $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
+        if (!$row) {
+            return new AI_Error(AI_ERROR_NO_RESULTADOS,
+                "No hay más resultados en la DB [id=$id]");
+        }
+        // Asigno valores al objeto.
+        foreach ($row as $key => $val) {
+            $this->$key = $val;
+        }
+        return true;
+    }
+    // -X2C
+
     // +X2C Operation 459
     /**
      * @param  DB $db DB donde guardar.
@@ -132,6 +177,7 @@ class AI_Sistema extends AI_DBObject {
             'link'       => $this->link,
             'link_ayuda' => $this->link_ayuda,
             'habilitado' => $this->habilitado ? 1 : 0,
+            'tipo'       => $this->tipo,
         );
         $err = parent::guardar($db, $datos, $nuevo);
         if (PEAR::isError($err)) {
@@ -145,7 +191,7 @@ class AI_Sistema extends AI_DBObject {
      * 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.
+     * @param  string $where Clausula WHERE para filtrar la búsqueda.
      *
      * @return array
      * @access public
@@ -159,25 +205,30 @@ class AI_Sistema extends AI_DBObject {
         }
         extract($conf);
         $query = "
-            SELECT   $id
-            FROM     $base.$tabla";
+            SELECT    SA.id_sistema, SA.nombre_sistema
+            FROM      samurai.sistema as SA
+            LEFT JOIN $base.$tabla as AI
+            ON        AI.sistema = SA.id_sistema
+            WHERE     AI.sistema IS NULL AND SA.estado = 1";
         if ($where) {
-            $query .= "WHERE $where";
+            $query .= " AND $where";
         }
-        return $db->getCol($query);
+        $query .= " ORDER BY SA.nombre_sistema ASC";
+        return $db->getAssoc($query);
     }
     // -X2C
 
     // +X2C Operation 531
     /**
      * @param  DB $db Base de datos de donde obtener los sistemas.
-     * @param  string $where Clausula WHERE para filtrar la bsqueda.
+     * @param  bool $soloHabilitados Clausula WHERE para filtrar la búsqueda.
+     * @param  string $where Clausula WHERE para filtrar la búsqueda.
      *
      * @return array
      * @access public
      * @static
      */
-    function getSistemas($db, $where = '') // ~X2C
+    function getSistemas($db, $soloHabilitados = true, $where = '') // ~X2C
     {
         static $conf;
         if (!$conf) {
@@ -185,13 +236,15 @@ class AI_Sistema extends AI_DBObject {
         }
         $id_field = $conf['id'];
         $tabla    = $conf['base'].'.'.$conf['tabla'];
-        // FIXME - ver como manejar JOINs - Ver de hacer el JOIN tambien en cargar.
         $query = "
             SELECT AI.*, SA.nombre_sistema as nombre, SA.desc_sistema as descripcion
             FROM   $tabla as AI, samurai.sistema as SA
-            WHERE  SA.id_sistema = AI.sistema and SA.estado = 1";
+            WHERE  SA.id_sistema = AI.sistema AND SA.estado = 1";
+        if ($soloHabilitados) {
+            $query .= ' AND AI.habilitado = 1';
+        }
         if ($where) {
-            $query .= " WHERE $where";
+            $query .= " AND $where";
         }
         $query  .= ' ORDER BY nombre ASC';
         $result  = $db->query($query);
@@ -218,4 +271,4 @@ class AI_Sistema extends AI_DBObject {
 
 } // -X2C Class :AI_Sistema
 
-?>
+?>
\ No newline at end of file