sistema/local_lib/Servicios/Legajos/Estudios.php

   1 <?php
   2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
   3 // +--------------------------------------------------------------------+
   4 // |                      Ministerio de Economía                        |
   5 // |                             Intranet                               |
   6 // +--------------------------------------------------------------------+
   7 // | This file is part of Intranet.                                     |
   8 // |                                                                    |
   9 // | Intranet 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.                             |
  13 // |                                                                    |
  14 // | Intranet 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.                           |
  18 // |                                                                    |
  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: Mon Jul 7 17:22:10 2003                                    |
  24 // | Autor:  Matías Sklar <msklar@mecon.gov.ar>                         |
  25 // +--------------------------------------------------------------------+
  26 //
  27 // $Id: Intranet_Legajos_Estudios.php 23 2003-07-15 18:56:42Z msklar $
  28 //
  29
  30
  31
  32 // +X2C includes
  33 require_once 'DB.php';
  34 // ~X2C
  35 require_once 'intranetdb.php';
  36
  37 // +X2C Class 163 :Servicios_Legajos_Estudios
  38 /**
  39  * Estudios del agente
  40  *
  41  * @access public
  42  */
  43 // XXX - Pregunta llucar: POR QUE CATSO HEREDA DE DB???
  44 class Servicios_Legajos_Estudios extends DB {
  45     /**
  46      * @var    int $agente
  47      * @access public
  48      */
  49     var $agente;
  50
  51     /**
  52      * @var    int $datos
  53      * @access public
  54      */
  55     var $datos;
  56
  57     // ~X2C
  58
  59     // +X2C Operation 166
  60     /**
  61      * @param  int $agente
  62      *
  63      * @return void
  64      * @access public
  65      */
  66     function Servicios_Legajos_Estudios($agente) // ~X2C
  67     {
  68         $this->agente = $agente;
  69         $db = IntranetDB::connect();
  70         if (DB::isError($db))
  71             trigger_error($db->getMessage('No pudo conectarse a la base'), E_USER_ERROR);
  72         $sql = "SELECT *
  73                 FROM novedades.web005
  74                 WHERE documento = $agente";
  75         $result = $db->query($sql);
  76         if (DB::isError($result))
  77             trigger_error($result->getMessage('Query mal hecho'), E_USER_ERROR);
  78
  79         for ($fila = 0; $fila < $result->numRows(); $fila++) {
  80             $this->datos[$fila] = $result->fetchRow(DB_FETCHMODE_ASSOC);
  81         }
  82     }
  83     // -X2C
  84
  85     // +X2C Operation 172
  86     /**
  87      * @return void
  88      * @access public
  89      */
  90     function getEstudios() // ~X2C
  91     {
  92         return $this->datos;
  93     }
  94     // -X2C
  95
  96 } // -X2C Class :Servicios_Legajos_Estudios
  97 ?>