sistema/local_lib/HTML_Mensaje.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 Nov 3 16:53:37 2003                                   |
  24 // | Autor:  Gonzalo Merayo <gmeray@mecon.gov.ar>                                                    |
  25 // +--------------------------------------------------------------------+
  26 //
  27 // $Id: xmi2code.tpl.php 2 2003-06-23 18:29:20Z gmeray $
  28 //
  29
  30 require_once 'MECON/HTML/Image.php';
  31
  32
  33 // +X2C includes
  34 require_once 'HTML/Table.php';
  35 // ~X2C
  36
  37 // +X2C Class 180 :HTML_Mensaje
  38 /**
  39  * Clase para mostrar mensajes en Intranet.
  40  *
  41  * @package sistema_local_lib
  42  * @access public
  43  */
  44 class HTML_Mensaje extends HTML_Table {
  45     /**
  46      * @var    string $img
  47      * @access private
  48      */
  49     var $_img;
  50
  51     /**
  52      * @var    int $ancho
  53      * @access private
  54      */
  55     var $_ancho;
  56
  57     /**
  58      * @var    string $texto
  59      * @access private
  60      */
  61     var $_texto;
  62
  63     // ~X2C
  64
  65     // +X2C Operation 181
  66     /**
  67      * Constructor.
  68      *
  69      * @param  string $tipo Tipo de mensaje.
  70 Puede ser: 'error', 'ok', 'alerta'.
  71      * @param  string $texto Texto del mensaje.
  72      * @param  int $ancho Ancho del mensaje.
  73      *
  74      * @return void
  75      * @access public
  76      */
  77     function HTML_Mensaje($tipo, $texto = null, $ancho = null) // ~X2C
  78     {
  79         $this->_ancho = (isset($ancho))?$ancho:180;
  80
  81         switch ($tipo){
  82             case 'ok':
  83                 $this->_img = 'mensaje_ok.gif';
  84                 $this->_texto = 'Correcto';
  85                 break;
  86             case 'alerta':
  87                 $this->_img = 'mensaje_alerta.gif';
  88                 $this->_texto = 'Incorrecto';
  89                 break;
  90             default:
  91                 //case 'error'
  92                 $this->_img = 'mensaje_error.gif';
  93                 $this->_texto = 'No autorizado';
  94                 break;
  95         }
  96
  97         if (isset($texto)){
  98             $this->_texto = $texto;
  99         }
 100
 101     }
 102     // -X2C
 103
 104     // +X2C Operation 182
 105     /**
 106      * Muestra el mensaje.
 107      *
 108      * @return string
 109      * @access public
 110      */
 111     function toHtml() // ~X2C
 112     {
 113         $ancho_msg = $this->_ancho - 45 - 12 - 1;
 114
 115         //Imgs
 116         $IMG_Pixel =& new MECON_HTML_Image('/sistemas/intranet/images/mensaje_pixel.gif', '', array('height'=>'1'));
 117         $IMG_Superior =& new MECON_HTML_Image('/sistemas/intranet//images/mensaje_superior.gif');
 118         $IMG_Inferior =& new MECON_HTML_Image('/sistemas/intranet//images/mensaje_inferior.gif');
 119         $IMG_Derecha =& new MECON_HTML_Image('/sistemas/intranet//images/mensaje_derecha.gif');
 120         $IMG_Izquierda =& new MECON_HTML_Image('/sistemas/intranet//images/'.$this->_img);
 121         $IMG_Pixel21 =& new MECON_HTML_Image('/sistemas/intranet/images/mensaje_pixel.gif', '', array('height'=>'21'));
 122
 123
 124         $tabla =& new HTML_Table (array('border'=>'0',
 125                                         'cellpadding'=>'0',
 126                                         'cellspacing'=>'0',
 127                                         'width'=>$this->_ancho));
 128
 129         $tabla->addrow( array($IMG_Pixel->toHtml(), $IMG_Pixel->toHtml(), $IMG_Pixel->toHtml(), $IMG_Pixel->toHtml()),
 130                         array ('height'=>'1', 'border'=>'0'));
 131
 132         $tabla->updateColAttributes(0, array('width'=>'45'));
 133         $tabla->updateColAttributes(1, array('width'=>$ancho_msg));
 134         $tabla->updateColAttributes(2, array('width'=>'12'));
 135         $tabla->updateColAttributes(3, array('width'=>'1'));
 136
 137         $tabla->addrow( array($IMG_Izquierda->toHtml(), $IMG_Superior->toHtml(), $IMG_Derecha->toHtml(), $IMG_Pixel->toHtml()),
 138                         array ('valign'=>'top'));
 139
 140         $tabla->addrow( array('', $this->_texto , '', $IMG_Pixel21->toHtml()),
 141                         array ('valign'=>'top'));
 142
 143         $tabla->addrow( array('', $IMG_Inferior->toHtml() , '', $IMG_Pixel->toHtml()),
 144                         array ('valign'=>'top'));
 145
 146         $tabla->updateCellAttributes(1,0, array('rowspan'=>'3'));
 147         $tabla->updateCellAttributes(1,2, array('rowspan'=>'3'));
 148
 149         $tabla->updateCellAttributes(2, 1, array('background'=>'/sistemas/intranet/images/mensaje_fondo.gif',
 150                                                  'class'=>'mensaje'));
 151
 152         $tabla->updateCellAttributes(1, 1, array('background'=>'/sistemas/intranet/images/mensaje_superior.gif'));
 153         $tabla->updateCellAttributes(3, 1, array('background'=>'/sistemas/intranet/images/mensaje_inferior.gif'));
 154
 155         return $tabla->toHtml();
 156
 157     }
 158     // -X2C
 159
 160     // +X2C Operation 187
 161     /**
 162      * Obtener la hoja de estilos.
 163      *
 164      * @return string
 165      * @access public
 166      */
 167     function getCSS() // ~X2C
 168     {
 169         $css = '/sistemas/intranet/css/mensaje.css';
 170         return $css;
 171     }
 172     // -X2C
 173
 174 } // -X2C Class :HTML_Mensaje
 175 ?>