Ahora en las secciones "Padre" se puede agregar una clave subhijos cuyo contenido...

[mecon/meconlib.git] / lib / MECON / Agente.php

diff --git a/lib/MECON/Agente.php b/lib/MECON/Agente.php
index 01f7e96dc2e6a0fe3d867231ee7280a0ecd276d5..d763451a247ad2a1f2020293d6fd837ed6a06c18 100644 (file)
--- a/lib/MECON/Agente.php
+++ b/lib/MECON/Agente.php
@@ -1,36 +1,33 @@
-<?php
-// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
-// +----------------------------------------------------------------------+
-// | PHP Version 4                                                        |
-// +----------------------------------------------------------------------+
-// | Copyright (c) 1997-2003 The PHP Group                                |
-// +----------------------------------------------------------------------+
-// | This source file is subject to version 2.02 of the PHP license,      |
-// | that is bundled with this package in the file LICENSE, and is        |
-// | available at through the world-wide-web at                           |
-// | http://www.php.net/license/2_02.txt.                                 |
-// | If you did not receive a copy of the PHP license and are unable to   |
-// | obtain it through the world-wide-web, please send a note to          |
-// | license@php.net so we can mail you a copy immediately.               |
-// +----------------------------------------------------------------------+
-// | Created: Thu Jun 19 15:17:11 2003
-// | Author:  Gonzalo Merayo <gmeray@mecon.gov.ar>
-// +----------------------------------------------------------------------+
-//
-// $Id$
-// $Author$
-// $URL$
-// $Date$
-// $Rev$
-//
+<?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80:
+-------------------------------------------------------------------------------
+                             Ministerio de Economía
+                                    meconlib
+-------------------------------------------------------------------------------
+This file is part of meconlib.
+
+meconlib is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2 of the License, or (at your option)
+any later version.
+
+meconlib is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+ 
+You should have received a copy of the GNU General Public License; if not,
+write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+Boston, MA  02111-1307  USA
+-------------------------------------------------------------------------------
+Creado: Thu Jun 19 15:17:11 2003
+Autor:  Gonzalo Merayo <gmeray@mecon.gov.ar>
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/

 
 #require_once 'PEAR.php';
 require_once 'DB.php';
 require_once 'MECON/Tiempo/Hora.php';
 
 
 #require_once 'PEAR.php';
 require_once 'DB.php';
 require_once 'MECON/Tiempo/Hora.php';
 

-
-
-

 // +X2C Class 131 :Agente
 /**
  * @access public
 // +X2C Class 131 :Agente
 /**
  * @access public


@@ -85,38 +82,8 @@ class Agente {
      */
     function Agente($agente) // ~X2C
   {
      */
     function Agente($agente) // ~X2C
   {

-      $this->agente = $agente;
-      $dsn = 'mysql://intranet:intranet@intranet-db/novedades';
-      $db = DB::connect($dsn);
-      if (DB::isError($db)) die ($db->getMessage("No pudo conectarse a la base"));
-      $sql = "SELECT * 
-              FROM web003
-             WHERE nrodoc = $agente";
-      $result = $db->query($sql);
-      if(DB::isError($result))
-        die($result->getMessage("query mal hecho"));
-      if($result->numRows() > 0)
-      {
-          $this->datos = $result->fetchRow(DB_FETCHMODE_ASSOC); 
-      }
-      else
-      {
-          $dsn = 'mysql://intranet:intranet@intranet-db/Contratados';
-          $db = DB::connect($dsn);
-          if (DB::isError($db)) die ($db->getMessage("No pudo conectarse a la base"));
-          $sql = "SELECT * 
-                  FROM Contratados
-                 WHERE nrodoc = $agente";
-          $result = $db->query($sql);
-          if(DB::isError($result))
-            die($result->getMessage("query mal hecho"));
-          if($result->numRows() > 0)
-          {
-            $this->datos = $result->fetchRow(DB_FETCHMODE_ASSOC);
-          }
-         else
-            trigger_error("Ahhhhh, agente no encontrado!"); 
-      }
+      if(! is_null($agente))
+        $this->buscarAgente($agente);

   }
   // -X2C
 
   }
   // -X2C
 


@@ -164,9 +131,11 @@ class Agente {
      * @return void
      * @access public
      */
      * @return void
      * @access public
      */

-    function getCuil()// ~X2C
+    function getCuil() // ~X2C

     {
     {

-        trigger_error('Not implemented!', E_USER_WARNING);
+        $aux = $this->datos['cuil'];
+        $aux = preg_replace('/(\d{2})(\d*)(\d{1})/','$1-$2-$3',$aux);
+        return $aux;

     }
     // -X2C
 
     }
     // -X2C
 


@@ -175,9 +144,10 @@ class Agente {
      * @return void
      * @access public
      */
      * @return void
      * @access public
      */

-    function getOtrosDatos()// ~X2C
+    function getOtrosDatos() // ~X2C

     {
         if(!is_null($this->datos['tipo_agente'])) {
     {
         if(!is_null($this->datos['tipo_agente'])) {

+            $aux['tipo_doc'] = $this->datos['tipodoc']; 

             $aux['fecha_nac'] = $this->datos['fecha_nac']; 
             $aux['edad'] = $this->datos['edad']; 
             $aux['estado_civil'] = $this->datos['estado_civil']; 
             $aux['fecha_nac'] = $this->datos['fecha_nac']; 
             $aux['edad'] = $this->datos['edad']; 
             $aux['estado_civil'] = $this->datos['estado_civil']; 


@@ -201,9 +171,58 @@ class Agente {
             $aux['fecha_nac_conyuge'] = $this->datos['fecha_nac_cony']; 
             $aux['tipo_doc_conyuge'] = $this->datos['tipodoc_cony']; 
             $aux['nro_doc_cony'] = $this->datos['nrodoc_cony']; 
             $aux['fecha_nac_conyuge'] = $this->datos['fecha_nac_cony']; 
             $aux['tipo_doc_conyuge'] = $this->datos['tipodoc_cony']; 
             $aux['nro_doc_cony'] = $this->datos['nrodoc_cony']; 

+            return $aux;
+        }else
+        {
+            return false;

         }
         }

-        return $aux;

     }
     }

+    // -X2C
+
+    // +X2C Operation 154
+    /**
+     * @param  int $agente 
+     *
+     * @return void
+     * @access public
+     */
+    function buscarAgente($agente) // ~X2C
+    {
+      $this->agente = $agente;
+      $dsn = 'mysql://intranet:intranet@intranet-db/novedades';
+      $db = DB::connect($dsn);
+      if (DB::isError($db)) die ($db->getMessage("No pudo conectarse a la base"));
+      $sql = "SELECT * 
+              FROM web003
+             WHERE nrodoc = $agente";
+      $result = $db->query($sql);
+      if(DB::isError($result))
+        die($result->getMessage("query mal hecho"));
+      if($result->numRows() > 0)
+      {
+          $this->datos = $result->fetchRow(DB_FETCHMODE_ASSOC); 
+      }
+      else
+      {
+          $dsn = 'mysql://intranet:intranet@intranet-db/Contratados';
+          $db = DB::connect($dsn);
+          if (DB::isError($db)) die ($db->getMessage("No pudo conectarse a la base"));
+          $sql = "SELECT * 
+                  FROM Contratados
+                 WHERE nrodoc = $agente";
+          $result = $db->query($sql);
+          if(DB::isError($result))
+            die($result->getMessage("query mal hecho"));
+          if($result->numRows() > 0)
+          {
+            $this->datos = $result->fetchRow(DB_FETCHMODE_ASSOC);
+          }
+         else
+            return false;
+      }
+      return true;
+    }
+    // -X2C

 
 } // -X2C Class :Agente
 
 } // -X2C Class :Agente

-?>
+?>
\ No newline at end of file