2 // vim: set binary expandtab tabstop=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/DBTreeObject.php';
34 require_once 'AI/Error.php';
37 * Archivo de configuración.
39 define('AI_GRUPOSECCIONES_CONFFILE', dirname(__FILE__).'/GrupoSecciones.ini');
41 // +X2C Class 486 :AI_GrupoSecciones
48 class AI_GrupoSecciones extends AI_DBTreeObject {
50 * ID del grupo de secciones.
66 * @var int $grupo_padre
72 * Secciones que pertenecen a este grupo.
74 * @var array $secciones
77 var $secciones = array();
80 * Antigüedad (en días) de las noticias a mostrar.
82 * @var int $antiguedad
88 * True si hay que mostrar los grupos hijos (?? FIXME).
90 * @var bool $mostrar_hijos
93 var $mostrar_hijos = false;
96 * Indica si esta habilitado.
98 * @var bool $habilitado
101 var $habilitado = true;
105 // +X2C Operation 495
107 * @param int $grupo ID del grupo.
112 function AI_GrupoSecciones($grupo = 0) // ~X2C
114 parent::AI_DBTreeObject($grupo, AI_GRUPOSECCIONES_CONFFILE);
118 // +X2C Operation 496
120 * @param mixed $db Base de datos o Resultado a utilizar.
125 function cargar($db) // ~X2C
127 // Obtengo campos comunes.
128 $err = parent::cargar($db);
129 if (PEAR::isError($err)) {
132 // Obtengo secciones.
133 $id = intval($this->grupo);
134 extract($this->conf['secciones'], EXTR_PREFIX_ALL, 'cnf');
135 $secciones = $db->getCol(
137 FROM $cnf_base.$cnf_tabla
140 //Busco los hijos si corresponde
141 //Agregado por gmeray
142 if($this->mostrar_hijos)
145 $secciones = array_merge($secciones,
147 "SELECT GSS.$cnf_campo
148 FROM $cnf_base.$cnf_tabla GSS, $cnf_base.grupo_secciones GS
149 WHERE GSS.$cnf_id = GS.grupo
150 AND GS.grupo_padre = $id"
154 $secciones = array_merge($secciones,
156 "SELECT GSS.$cnf_campo
157 FROM $cnf_base.$cnf_tabla GSS, $cnf_base.grupo_secciones GS, $cnf_base.grupo_secciones GS2
158 WHERE GSS.$cnf_id = GS.grupo
159 AND GS.grupo_padre = GS2.grupo
160 AND GS2.grupo_padre = $id"
163 //Si hace falta agreguen los bisnietos.
167 if (DB::isError($secciones)) {
171 $this->secciones = $secciones;
173 $this->secciones = array();
179 // +X2C Operation 497
181 * @param DB $db DB donde guardar.
182 * @param bool $nuevo Si es true, se fuerza a guardar el Grupo de Secciones como nuevo.
187 function guardar($db, $nuevo = false) // ~X2C
189 // Guardo datos generales.
191 'grupo_padre' => intval($this->grupo_padre),
192 'nombre' => $this->nombre,
193 'habilitado' => $this->habilitado ? 1 : 0,
194 'antiguedad' => intval($this->antiguedad),
195 'mostrar_hijos' => $this->mostrar_hijos ? 1 : 0,
197 $err = parent::guardar($db, $datos, $nuevo);
198 if (PEAR::isError($err)) {
201 // Guardo datos de secciones.
202 $id_field = $this->conf['id'];
203 $id = intval($this->$id_field);
204 extract($this->conf['secciones'], EXTR_PREFIX_ALL, 'cnf');
205 $res = $db->query("DELETE FROM $cnf_base.$cnf_tabla WHERE $cnf_id = $id");
206 if (DB::isError($res)) {
209 $prepare = $db->prepare("INSERT INTO $cnf_base.$cnf_tabla
210 ($cnf_id, $cnf_campo) VALUES ($id, ?)");
211 if (DB::isError($prepare)) {
214 $res = $db->executeMultiple($prepare, $this->secciones);
215 if (DB::isError($res)) {
222 // +X2C Operation 498
224 * @param DB $db DB de donde borrar.
229 function borrar($db) // ~X2C
231 // Obtengo campos comunes.
232 $err = parent::borrar($db);
233 if (PEAR::isError($err)) {
236 // Obtengo secciones.
237 $id = intval($this->grupo);
238 extract($this->conf['secciones'], EXTR_PREFIX_ALL, 'cnf');
240 "DELETE FROM $cnf_base.$cnf_tabla WHERE $cnf_id = $id");
241 if (DB::isError($res)) {
248 // +X2C Operation 512
250 * Obtiene un array con una lista de secciones.
251 Sólo se obtienen las secciones que todavía no pertenecen a ningún grupo. Si se especifica un grupo, se agregan las secciones de ese grupo al <em>array</em> resultante.
253 * @param DB $db Base de datos a usar para obtener los datos.
254 * @param int $grupo Grupo del cual obtener las secciones.
260 function getSeccionesArray($db = null, $grupo = 0) // ~X2C
262 static $conf_dav, $conf_sec;
263 if (!$conf_dav or !$conf_sec) {
264 $conf = parse_ini_file(AI_GRUPOSECCIONES_CONFFILE, true);
265 $conf_dav = $conf['mecondav'];
266 $conf_sec = $conf['secciones'];
268 extract($conf_dav, EXTR_PREFIX_ALL, 'dav');
269 extract($conf_sec, EXTR_PREFIX_ALL, 'sec');
270 return $db->getAssoc(
271 "SELECT d.$dav_id, d.$dav_campo
272 FROM $dav_base.$dav_tabla as d
273 LEFT JOIN $sec_base.$sec_tabla AS s
274 ON s.$sec_campo = d.$dav_id
275 WHERE s.$sec_campo IS NULL
276 OR s.$sec_id = $grupo
277 ORDER BY d.$dav_campo ASC");
282 * Obtiene un array con una lista de todas las secciones.
284 * @param DB $db Base de datos a usar para obtener los datos.
290 function getAllSeccionesArray($db = null)
294 $conf = parse_ini_file(AI_GRUPOSECCIONES_CONFFILE, true);
295 $conf = $conf['mecondav'];
297 extract($conf, EXTR_PREFIX_ALL, 'dav');
298 return $db->getAssoc(
299 "SELECT d.$dav_id, d.$dav_campo
300 FROM $dav_base.$dav_tabla as d
301 ORDER BY d.$dav_campo ASC");
305 * Obtiene un array con una lista de las secciones ocultas.
307 * @param DB $db Base de datos a usar para obtener los datos.
313 function getSeccionesOcultasArray($db = null)
317 $conf = parse_ini_file(AI_GRUPOSECCIONES_CONFFILE, true);
318 $conf = $conf['ocultas'];
320 extract($conf, EXTR_PREFIX_ALL, 'ocu');
321 return $db->getCol("SELECT d.$ocu_id FROM $ocu_base.$ocu_tabla as d");
325 * Establece las secciones ocultas.
327 * @param DB $db Base de datos a usar para grabar los datos.
329 * @return Cantidad de secciones insertadas o PEAR_Error.
333 function setSeccionesOcultas($db = null, $secciones)
337 $conf = parse_ini_file(AI_GRUPOSECCIONES_CONFFILE, true);
338 $conf = $conf['ocultas'];
340 extract($conf, EXTR_PREFIX_ALL, 'ocu');
341 $res = $db->query("DELETE FROM $ocu_base.$ocu_tabla");
342 if (DB::isError($res)) {
345 foreach ($secciones as $seccion) {
347 "INSERT INTO $ocu_base.$ocu_tabla VALUES ("
348 . $db->quote($seccion) . ")");
349 if (DB::isError($res)) {
353 return count($secciones);
356 // +X2C Operation 537
358 * Obtiene el grupo al que pertenece una sección.
360 * @param int $seccion Sección a buscar.
361 * @param DB $db DB a usar.
363 * @return AI_GrupoSecciones
367 function getGrupo($seccion, $db = null) // ~X2C
371 $conf = parse_ini_file(AI_GRUPOSECCIONES_CONFFILE, true);
372 $conf = $conf['secciones'];
378 WHERE $campo = " . $db->quote($seccion));
382 } // -X2C Class :AI_GrupoSecciones