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: Fri Jul 18 16:05:22 2003 |
24 // | Autor: Leandro Lucarella <llucar@mecon.gov.ar> |
25 // +--------------------------------------------------------------------+
31 * Objecto con capacidad de guardarse, cargarse y borrarse de una base de datos.
45 * @param int $id Identificador del objeto a cargar.
46 * @param string $confFile Archivo de configuración del objeto.
51 function AI_DBObject($id = 0, $confFile = '')
54 $this->conf = parse_ini_file($confFile, true);
56 $this->conf = parse_ini_file(dirname(__FILE__) . get_class($this)
59 $id_field = $this->conf['id'];
60 $this->$id_field = $id;
64 * @param mixed $db Base de datos o resultado a usar para cargar el objeto.
71 $id_field = $this->conf['id'];
72 $id = intval($this->$id_field);
73 if (is_a($db, 'db_result')) {
76 // Si no es un resultado, hago el query.
80 FROM {$this->conf['base']}.{$this->conf['tabla']}
81 WHERE $id_field = $id"
83 if (DB::isError($result)) {
88 $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
90 return new AI_Error(AI_ERROR_NO_RESULTADOS,
91 "No hay más resultados en la DB [id=$id]");
93 // Asigno valores al objeto.
94 foreach ($row as $key => $val) {
101 * @param DB $db Base de datos a usar para guardar el objeto.
102 * @param array $datos Array con los datos a guardar en la DB (donde la
103 * clave es el campo y el valor el contenido a
105 * @param bool $nuevo Si es true, se fuerza a cargar el objeto en la base
106 * como si fuera nuevo.
111 function guardar($db, $datos, $nuevo = false)
113 $id_field = $this->conf['id'];
114 $tabla = $this->conf['tabla'];
115 $base = $this->conf['base'];
116 $id = intval($this->$id_field);
118 if ($id and !$nuevo) {
119 $accion = DB_AUTOQUERY_UPDATE;
120 $where = "$id_field = $id";
122 $accion = DB_AUTOQUERY_INSERT;
123 // Si no tiene ID, le asigno uno nuevo.
125 $id = $db->nextId($tabla);
126 if (DB::isError($id)) {
129 $this->$id_field = $id;
131 $datos[$id_field] = $id;
133 $res = $db->autoExecute("$base.$tabla", $datos, $accion, $where);
134 if (DB::isError($res)) {
141 * @param DB $db Base de datos a usar para borrar el objeto.
148 $id_field = $this->conf['id'];
149 $tabla = $this->conf['base'].'.'.$this->conf['tabla'];
150 $id = intval($this->$id_field);
153 "DELETE FROM $tabla WHERE $id_field = $id");
154 if (DB::isError($res)) {
159 return PEAR::raiseError('No hay un identificador válido para borrar');
163 * @return AI_DBObject