2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
3 // +--------------------------------------------------------------------+
4 // | Ministerio de Economía |
5 // | AI (Administrador de Intranet) |
6 // +--------------------------------------------------------------------+
7 // | This file is part of AI. |
9 // | AI is free software; you can redistribute it and/or modify |
10 // | it under the terms of the GNU General Public License as published |
11 // | by the Free Software Foundation; either version 2 of the License, |
12 // | or (at your option) any later version. |
14 // | AI is distributed in the hope that it will be useful, but |
15 // | WITHOUT ANY WARRANTY; without even the implied warranty of |
16 // | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
17 // | General Public License for more details. |
19 // | You should have received a copy of the GNU General Public License |
20 // | along with Hooks; if not, write to the Free Software Foundation, |
21 // | Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
22 // +--------------------------------------------------------------------+
23 // | Creado: Tue Jun 24 16:22:07 2003 |
24 // | Autor: Leandro Lucarella <llucar@mecon.gov.ar> |
25 // +--------------------------------------------------------------------+
31 require_once 'AI/DBObject.php';
34 require_once 'AI/Error.php';
37 * Archivo de configuración.
39 define('AI_SISTEMA_CONFFILE', dirname(__FILE__).'/Sistema.ini');
41 // +X2C Class 416 :AI_Sistema
48 class AI_Sistema extends AI_DBObject {
50 * ID del sistema (ID en SAMURAI).
58 * Nombre del sistema (slo de lectura, extra?o de SAMURAI).
66 * Descripcin del sistema (slo de lectura, extra?o de SAMURAI).
68 * @var string $descripcion
71 var $descripcion = '';
82 * Enlace a donde se encuentra el sistema.
90 * Enlace a la ayuda del sistema.
92 * @var string $link_ayuda
98 * Indica si esta habilitado.
100 * @var bool $habilitado
103 var $habilitado = true;
107 // +X2C Operation 466
109 * @param int $sistema ID del sistema.
114 function AI_Sistema($sistema = 0) // ~X2C
116 parent::AI_DBObject($sistema, AI_SISTEMA_CONFFILE);
120 // +X2C Operation 536
122 * @param mixed $db Base de datos o resultado de donde cargar el sistema.
127 function cargar($db) // ~X2C
129 $id_field = $this->conf['id'];
130 $id = intval($this->$id_field);
131 if (is_a($db, 'db_result')) {
134 // Si no es un resultado, hago el query.
136 // FIXME - ver como manejar JOINs - Ver de hacer el JOIN tambien en cargar.
137 $result = $db->query(
138 "SELECT AI.*, SA.nombre_sistema as nombre, SA.desc_sistema as descripcion
139 FROM {$this->conf['base']}.{$this->conf['tabla']} as AI, samurai.sistema as SA
140 WHERE AI.$id_field = $id AND AI.$id_field = SA.id_sistema"
142 if (DB::isError($result)) {
147 $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
149 return new AI_Error(AI_ERROR_NO_RESULTADOS,
150 "No hay más resultados en la DB [id=$id]");
152 // Asigno valores al objeto.
153 foreach ($row as $key => $val) {
160 // +X2C Operation 459
162 * @param DB $db DB donde guardar.
163 * @param bool $nuevo Si es true, se fuerza a guardar el servicio como nuevo.
168 function guardar($db, $nuevo = false) // ~X2C
171 'icono' => $this->icono,
172 'link' => $this->link,
173 'link_ayuda' => $this->link_ayuda,
174 'habilitado' => $this->habilitado ? 1 : 0,
176 $err = parent::guardar($db, $datos, $nuevo);
177 if (PEAR::isError($err)) {
183 // +X2C Operation 528
185 * Obtiene un array con los identificadores de los sistemas cargados.
187 * @param DB $db Base de datos de la cual obtener los sistemas.
188 * @param string $where Clausula WHERE para filtrar la bsqueda.
194 function getSistemasArray($db, $where = '') // ~X2C
198 $conf = parse_ini_file(AI_SISTEMA_CONFFILE, true);
201 // FIXME - ver como manejar JOINs - Ver de hacer el JOIN tambien en cargar.
203 SELECT SA.id_sistema, SA.nombre_sistema
204 FROM samurai.sistema as SA
205 LEFT JOIN $base.$tabla as AI
206 ON AI.sistema = SA.id_sistema
207 WHERE AI.sistema IS NULL AND SA.estado = 1";
209 $query .= " AND $where";
211 $query .= " ORDER BY SA.nombre_sistema ASC";
212 return $db->getAssoc($query);
216 // +X2C Operation 531
218 * @param DB $db Base de datos de donde obtener los sistemas.
219 * @param bool $soloHabilitados Clausula WHERE para filtrar la bsqueda.
220 * @param string $where Clausula WHERE para filtrar la bsqueda.
226 function getSistemas($db, $soloHabilitados = true, $where = '') // ~X2C
230 $conf = parse_ini_file(AI_SISTEMA_CONFFILE, true);
232 $id_field = $conf['id'];
233 $tabla = $conf['base'].'.'.$conf['tabla'];
234 // FIXME - ver como manejar JOINs - Ver de hacer el JOIN tambien en cargar.
236 SELECT AI.*, SA.nombre_sistema as nombre, SA.desc_sistema as descripcion
237 FROM $tabla as AI, samurai.sistema as SA
238 WHERE SA.id_sistema = AI.sistema AND SA.estado = 1";
239 if ($soloHabilitados) {
240 $query .= ' AND AI.habilitado = 1';
243 $query .= " AND $where";
245 $query .= ' ORDER BY nombre ASC';
246 $result = $db->query($query);
247 if (DB::isError($result)) {
251 $sistema = new AI_Sistema;
252 $err = $sistema->cargar($result);
253 while (!PEAR::isError($err)) {
254 $sistemas[] = $sistema->__clone();
255 $err = $sistema->cargar($result);
257 // Si no hay mas resultados (terminó bien) devuelve el array de
259 if (AI_Error::isError($err)
260 and $err->getCode() == AI_ERROR_NO_RESULTADOS) {
263 // Si no, se devuelve el error.
268 } // -X2C Class :AI_Sistema