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 (sólo de lectura, extraído de SAMURAI).
66 * Descripción del sistema (sólo de lectura, extraído 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;
113 // +X2C Operation 466
115 * @param int $sistema ID del sistema.
120 function AI_Sistema($sistema = 0) // ~X2C
122 parent::AI_DBObject($sistema, AI_SISTEMA_CONFFILE);
126 // +X2C Operation 536
128 * @param mixed $db Base de datos o resultado de donde cargar el sistema.
133 function cargar($db) // ~X2C
135 $id_field = $this->conf['id'];
136 $id = intval($this->$id_field);
137 if (is_a($db, 'db_result')) {
140 // Si no es un resultado, hago el query.
142 $result = $db->query(
143 "SELECT AI.*, SA.nombre_sistema as nombre, SA.desc_sistema as descripcion
144 FROM {$this->conf['base']}.{$this->conf['tabla']} as AI, samurai.sistema as SA
145 WHERE AI.$id_field = $id AND AI.$id_field = SA.id_sistema"
147 if (DB::isError($result)) {
152 $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
154 return new AI_Error(AI_ERROR_NO_RESULTADOS,
155 "No hay más resultados en la DB [id=$id]");
157 // Asigno valores al objeto.
158 foreach ($row as $key => $val) {
165 // +X2C Operation 459
167 * @param DB $db DB donde guardar.
168 * @param bool $nuevo Si es true, se fuerza a guardar el servicio como nuevo.
173 function guardar($db, $nuevo = false) // ~X2C
176 'icono' => $this->icono,
177 'link' => $this->link,
178 'link_ayuda' => $this->link_ayuda,
179 'habilitado' => $this->habilitado ? 1 : 0,
180 'tipo' => $this->tipo,
182 $err = parent::guardar($db, $datos, $nuevo);
183 if (PEAR::isError($err)) {
189 // +X2C Operation 528
191 * Obtiene un array con los identificadores de los sistemas cargados.
193 * @param DB $db Base de datos de la cual obtener los sistemas.
194 * @param string $where Clausula WHERE para filtrar la búsqueda.
200 function getSistemasArray($db, $where = '') // ~X2C
204 $conf = parse_ini_file(AI_SISTEMA_CONFFILE, true);
208 SELECT SA.id_sistema, SA.nombre_sistema
209 FROM samurai.sistema as SA
210 LEFT JOIN $base.$tabla as AI
211 ON AI.sistema = SA.id_sistema
212 WHERE AI.sistema IS NULL AND SA.estado = 1";
214 $query .= " AND $where";
216 $query .= " ORDER BY SA.nombre_sistema ASC";
217 return $db->getAssoc($query);
221 // +X2C Operation 531
223 * @param DB $db Base de datos de donde obtener los sistemas.
224 * @param bool $soloHabilitados Clausula WHERE para filtrar la búsqueda.
225 * @param string $where Clausula WHERE para filtrar la búsqueda.
231 function getSistemas($db, $soloHabilitados = true, $where = '') // ~X2C
235 $conf = parse_ini_file(AI_SISTEMA_CONFFILE, true);
237 $id_field = $conf['id'];
238 $tabla = $conf['base'].'.'.$conf['tabla'];
240 SELECT AI.*, SA.nombre_sistema as nombre, SA.desc_sistema as descripcion
241 FROM $tabla as AI, samurai.sistema as SA
242 WHERE SA.id_sistema = AI.sistema AND SA.estado = 1";
243 if ($soloHabilitados) {
244 $query .= ' AND AI.habilitado = 1';
247 $query .= " AND $where";
249 $query .= ' ORDER BY nombre ASC';
250 $result = $db->query($query);
251 if (DB::isError($result)) {
255 $sistema = new AI_Sistema;
256 $err = $sistema->cargar($result);
257 while (!PEAR::isError($err)) {
258 $sistemas[] = $sistema->__clone();
259 $err = $sistema->cargar($result);
261 // Si no hay mas resultados (terminó bien) devuelve el array de
263 if (AI_Error::isError($err)
264 and $err->getCode() == AI_ERROR_NO_RESULTADOS) {
267 // Si no, se devuelve el error.
272 } // -X2C Class :AI_Sistema