]> git.llucax.com Git - mecon/meconlib.git/blob - lib/MECON/Marco/Copete.php
Se modifica el método acumular para que las secuencias se pinten automáticamente...
[mecon/meconlib.git] / lib / MECON / Marco / Copete.php
1 <?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80:
2 -------------------------------------------------------------------------------
3                              Ministerio de Economía
4                                     meconlib
5 -------------------------------------------------------------------------------
6 This file is part of meconlib.
7
8 meconlib is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 2 of the License, or (at your option)
11 any later version.
12
13 meconlib is distributed in the hope that it will be useful, but WITHOUT
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
15 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
16  
17 You should have received a copy of the GNU General Public License; if not,
18 write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
19 Boston, MA  02111-1307  USA
20 -------------------------------------------------------------------------------
21 Creado: Mon Apr 14 16:23:22 2003
22 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
23 -------------------------------------------------------------------------------
24 $Id$
25 -----------------------------------------------------------------------------*/
26
27 require_once 'PEAR.php';
28
29
30 // +X2C Class 9 :MECON_Marco_Copete
31 /**
32  * Manejo del copete de los sistemas que utilizan MECON_Marco
33  *
34  * @package MECON_Marco
35  * @access public
36  */
37 class MECON_Marco_Copete {
38     /**
39      * Nombre del directorio en donde se encuentra el sistema. Es case sensitive.
40      *
41      * @var    string $directorio
42      * @access private
43      */
44     var $_directorio = '';
45
46     /**
47      * String con la referencia y los getvars de la ayuda
48      *
49      * @var    string $ayuda
50      * @access private
51      */
52     var $_ayuda = null;
53
54     // ~X2C
55
56     // +X2C Operation 34
57     /**
58      * Recibe el nombre del directorio en donde se encuentra instalado el sistema. El directorio es case sensitive.
59      *
60      * @param  string $directorio Nombre del directorio en donde se encuentra el sistema.
61      * @param  mixed $ayuda Objeto MECON_HTML_Link o string para armar el map de la ayuda.
62      *
63      * @return void
64      * @access public
65      */
66     function MECON_Marco_Copete($directorio, $ayuda = null) // ~X2C
67     {
68         $this->_directorio  = $directorio;
69         if (@$ayuda) {
70             if (is_object($ayuda)) {
71                 $val = $ayuda->getHref();
72                 foreach ($ayuda->getGetVars() as $var => $v) {
73                     if (is_object($v) and method_exists($v, 'tostring')) {
74                         $v = $v->tostring();
75                     } elseif (is_object($v) or is_array($v)) {
76                         $v = serialize($v);
77                     }
78                     $vars[] = urlencode($var) . '=' . urlencode($v);
79                 }
80                 if ($vars) {
81                     $val .= '?' . join('&', $vars);
82                 }
83                 $this->_ayuda = $val;
84             }
85             else {
86                 $this->_ayuda = $ayuda;
87             }
88         }
89     }
90     // -X2C
91
92     // +X2C Operation 35
93     /**
94      * Funcion que devuelve el string html a imprimir en pantalla.
95      *
96      * @return string
97      * @access public
98      */
99     function toHtml() // ~X2C
100     {
101         if (!is_null($this->_directorio)) {
102             if (@$this->_ayuda) {
103                 return '<img src="'.$this->_directorio.'/copete_ayuda" alt=""
104                     width="760" height="42" usemap="#Map_copete" border="0"><map
105                     name="Map_copete"><area shape="circle" coords="748,30,7"
106                     href="'.$this->_ayuda.'"></map>';                
107             }
108             else {
109                 return '<img src="'.$this->_directorio.'/copete" alt="">';
110             }
111         }
112         else {
113             return '';
114         }
115     }
116     // -X2C
117
118
119 } // -X2C Class :MECON_Marco_Copete
120
121 ?>