<?php
// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
// +--------------------------------------------------------------------+
// |                      Ministerio de Economía                        |
// |                  AI (Administrador de Intranet)                    |
// +--------------------------------------------------------------------+
// | This file is part of AI.                                           |
// |                                                                    |
// | AI is free software; you can redistribute it and/or modify         |
// | it under the terms of the GNU General Public License as published  |
// | by the Free Software Foundation; either version 2 of the License,  |
// | or (at your option) any later version.                             |
// |                                                                    |
// | AI is distributed in the hope that it will be useful, but          |
// | WITHOUT ANY WARRANTY; without even the implied warranty of         |
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU   |
// | General Public License for more details.                           |
// |                                                                    |
// | You should have received a copy of the GNU General Public License  |
// | along with Hooks; if not, write to the Free Software Foundation,   |
// | Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA      |
// +--------------------------------------------------------------------+
// | Creado: Tue Jun 24 16:22:07 2003                                   |
// | Autor:  Leandro Lucarella <llucar@mecon.gov.ar>                    |
// +--------------------------------------------------------------------+
//
// $Id$
//

// +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.
 *
 * @package AI
 * @access public
 */
class AI_Sistema extends AI_DBObject {
    /**
     * ID del sistema (ID en SAMURAI).
FIXME - preguntar a gonzalo si le sirve.
     *
     * @var    int $sistema
     * @access public
     */
    var $sistema = 0;

    /**
     * Nombre del sistema (slo de lectura, extra?o de SAMURAI).
FIXME - preguntar a gonzalo si le sirve.
     *
     * @var    string $nombre
     * @access public
     */
    var $nombre = '';

    /**
     * Descripcin del sistema (slo de lectura, extra?o de SAMURAI).
     *
     * @var    string $descripcion
     * @access public
     */
    var $descripcion = '';

    /**
     * ?ono del sistema.
     *
     * @var    string $icono
     * @access public
     */
    var $icono = '';

    /**
     * Enlace a donde se encuentra el sistema.
     *
     * @var    string $link
     * @access public
     */
    var $link = '';

    /**
     * Enlace a la ayuda del sistema.
     *
     * @var    string $link_ayuda
     * @access public
     */
    var $link_ayuda = '';

    /**
     * Indica si esta habilitado.
     *
     * @var    bool $habilitado
     * @access public
     */
    var $habilitado = true;

    // ~X2C

    // +X2C Operation 466
    /**
     * @param  int $sistema ID del sistema.
     *
     * @return void
     * @access public
     */
    function AI_Sistema($sistema = 0) // ~X2C
    {
        parent::AI_DBObject($sistema, AI_SISTEMA_CONFFILE);
    }
    // -X2C

    // +X2C Operation 459
    /**
     * @param  DB $db DB donde guardar.
     * @param  bool $nuevo Si es true, se fuerza a guardar el servicio como nuevo.
     *
     * @return PEAR_Error
     * @access public
     */
    function guardar($db, $nuevo = false) // ~X2C
    {
        $datos = array(
            'icono'      => $this->icono,
            'link'       => $this->link,
            'link_ayuda' => $this->link_ayuda,
            'habilitado' => $this->habilitado ? 1 : 0,
        );
        $err = parent::guardar($db, $datos, $nuevo);
        if (PEAR::isError($err)) {
            return $err;
        }
    }
    // -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

?>