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