Se agrega una versión simple de MECON_QuickForm que no usa un renderer:

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

diff --git a/lib/MECON/Dependencia.php b/lib/MECON/Dependencia.php
index d137c08296e0c3fe68329adfc14c9a3eb443b85b..cf0f9f8e332fd53c198b4d53738d1a8fa24c05bd 100644 (file)
--- a/lib/MECON/Dependencia.php
+++ b/lib/MECON/Dependencia.php
@@ -1,35 +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 16:54:08 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 16:54:08 2003
+Autor:  Gonzalo Merayo <gmeray@mecon.gov.ar>
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/
 
 #require_once 'PEAR.php';
 require_once 'MECON/Agente.php';
 require_once 'DB.php';
 
-
-
 // +X2C Class 145 :Dependencia
 /**
  * @access protected
@@ -41,6 +39,18 @@ class Dependencia {
      */
     var $codep;
 
+    /**
+     * @var    int $nombre
+     * @access public
+     */
+    var $nombre;
+
+    /**
+     * @var    int $nombre_breve
+     * @access public
+     */
+    var $nombre_breve;
+
     // ~X2C
 
     // +X2C Operation 147
@@ -53,6 +63,22 @@ class Dependencia {
     function dependencia($codep) // ~X2C
   {
     $this->codep = $codep;
+    $dsn = 'mysql://intranet:intranet@intranet-db/CODEP';
+    $db = DB::connect($dsn);
+    if (DB::isError($db)) die ($db->getMessage("No pudo conectarse a la base"));
+    $sql = "SELECT nombre, nombre_breve
+            FROM Dependencias
+            WHERE codigo_actual = '$this->codep' AND
+                dependencia_esta_activa = 1";
+    $result = $db->query($sql);
+    if(DB::isError($result))
+        die($result->getMessage("query mal hecho"));
+    if($result->numRows() > 0)
+    {
+        $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
+        $this->nombre = $row['nombre'];
+        $this->nombre_breve = $row['nombre_breve'];
+    }
   }
   // -X2C
 
@@ -70,7 +96,7 @@ class Dependencia {
       if (DB::isError($db)) die ($db->getMessage("No pudo conectarse a la base"));
       $sql = "SELECT nrodoc 
               FROM web003
-             WHERE codep = $this->codep";
+                 WHERE codep = '$this->codep'";
       $result = $db->query($sql);
       if(DB::isError($result))
         die($result->getMessage("query mal hecho"));
@@ -80,9 +106,9 @@ class Dependencia {
       $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 * 
+      $sql = "SELECT nrodoc 
               FROM Contratados
-              WHERE codep = $this->codep";
+              WHERE codep = '$this->codep'";
       $result = $db->query($sql);
       if(DB::isError($result))
         die($result->getMessage("query mal hecho"));
@@ -105,16 +131,38 @@ class Dependencia {
       if (DB::isError($db)) die ($db->getMessage("No pudo conectarse a la base"));
       $sql = "SELECT codigo_actual 
               FROM Dependencias
-             WHERE dependencia_esta_activa = 1";
+                 WHERE dependencia_esta_activa = 1";
       $result = $db->query($sql);
       if(DB::isError($result))
         die($result->getMessage("query mal hecho"));
-      $dependencias[] = array();
+      $dependencias = array();
       while($row = $result->fetchRow())
         $dependencias[] = $row[0];
       return $dependencias;
     }
     // -X2C
 
+    // +X2C Operation 165
+    /**
+     * @return void
+     * @access public
+     */
+    function getNombre() // ~X2C
+    {
+        return $this->nombre;
+    }
+    // -X2C
+
+    // +X2C Operation 166
+    /**
+     * @return void
+     * @access public
+     */
+    function getNombreBreve() // ~X2C
+    {
+        return $this->nombre_breve;
+    }
+    // -X2C
+
 } // -X2C Class :Dependencia
-?>
+?>
\ No newline at end of file