-<?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: Mon Apr 14 16:23:22 2003
-// | Author: Martin Marrese <mmarre@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: Mon Apr 14 16:23:22 2003
+Autor: Martin Marrese <mmarre@mecon.gov.ar>
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/
require_once 'PEAR.php';
-// +X2C Class 9 :Copete
+// +X2C Class 9 :MECON_Marco_Copete
/**
- * Clase para el manejo de los copetes de los sistemas integrantes de intranet. Recibe el directorio porque debe obtener la imagen del directorio especificado.
+ * Manejo del copete de los sistemas que utilizan MECON_Marco
*
+ * @package MECON_Marco
* @access public
*/
-class Copete {
+class MECON_Marco_Copete {
/**
* Nombre del directorio en donde se encuentra el sistema. Es case sensitive.
*
* @var string $directorio
* @access private
*/
- var $_directorio;
+ var $_directorio = '';
+
+ /**
+ * String con la referencia y los getvars de la ayuda
+ *
+ * @var string $ayuda
+ * @access private
+ */
+ var $_ayuda = null;
// ~X2C
// +X2C Operation 34
/**
- * Constructor. Recibe el nombre del directorio en donde se encuentra instalado el sistema. El directorio es case sensitive.
+ * Recibe el nombre del directorio en donde se encuentra instalado el sistema. El directorio es case sensitive.
*
* @param string $directorio Nombre del directorio en donde se encuentra el sistema.
+ * @param mixed $ayuda Objeto MECON_HTML_Link o string para armar el map de la ayuda.
*
* @return void
* @access public
*/
- function Copete($directorio) // ~X2C
+ function MECON_Marco_Copete($directorio, $ayuda = null) // ~X2C
{
$this->_directorio = $directorio;
+ if (@$ayuda) {
+ if (is_object($ayuda)) {
+ $val = $ayuda->getHref();
+ foreach ($ayuda->getGetVars() as $var => $v) {
+ if (is_object($v) and method_exists($v, 'tostring')) {
+ $v = $v->tostring();
+ } elseif (is_object($v) or is_array($v)) {
+ $v = serialize($v);
+ }
+ $vars[] = urlencode($var) . '=' . urlencode($v);
+ }
+ if ($vars) {
+ $val .= '?' . join('&', $vars);
+ }
+ $this->_ayuda = $val;
+ }
+ else {
+ $this->_ayuda = $ayuda;
+ }
+ }
}
// -X2C
function toHtml() // ~X2C
{
if (!is_null($this->_directorio)) {
- return '<img src="'.$this->_directorio.'/copete">';
+ if (@$this->_ayuda) {
+ return '<img src="'.$this->_directorio.'/copete_ayuda" alt=""
+ width="760" height="42" usemap="#Map_copete" border="0"><map
+ name="Map_copete"><area shape="circle" coords="748,30,7"
+ href="'.$this->_ayuda.'"></map>';
+ }
+ else {
+ return '<img src="'.$this->_directorio.'/copete" alt="">';
+ }
}
else {
return '';
}
// -X2C
- // +X2C Operation 94
- /**
- * Funcion que devuelve el html de la imagen a incluir.
- *
- * @return string
- * @access public
- */
- function darCopete() // ~X2C
- {
- return '<img src="'.$this->_directorio.'/copete.jpg">';
- }
- // -X2C
-} // -X2C Class :Copete
+} // -X2C Class :MECON_Marco_Copete
-?>
+?>
\ No newline at end of file