lib/MECON/PDF/Tabla.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: Fri Oct 24 16:34:11 2003
  22 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
  23 -------------------------------------------------------------------------------
  24 $Id$
  25 -----------------------------------------------------------------------------*/
  26
  27 require_once 'MECON/PDF/Contenido.php';
  28
  29 /**
  30  * Libreria que permite agregar una tabla a un pdf.
  31  */
  32 class MECON_PDF_Tabla extends MECON_PDF_Contenido {
  33
  34     /**
  35      * Configuracion
  36      * @var array $config
  37      * @access protected
  38      */
  39     var $_config;
  40
  41     /**
  42      * Objeto MECON_HTML_Tabla.
  43      * @var &Object $tabla MECON_HTML_Tabla
  44      * @access protected
  45      */
  46     var $_tabla;
  47
  48     /**
  49      * Objeto MECON_PDF_Marco
  50      * @var &Object $marco
  51      * @access protected
  52      */
  53     var $_marco;
  54
  55     /**
  56      * Class Constructor
  57      *
  58      * @param &Object $TABLA MECON_HTML_Tabla
  59      *
  60      * @return void
  61      * @access public
  62      */
  63     function MECON_PDF_Tabla(&$TABLA) {
  64         $this->_tabla =& $TABLA;
  65         $this->_config = include 'MECON/PDF/Tabla/medidas.php';
  66     }
  67
  68     /**
  69      * Funcion que agrega el contenido de la tabla que se este utilizando al
  70      * PDF.
  71      *
  72      * @param &Object $MARCO MECON_PDF_Marco
  73      *
  74      * @return void
  75      * @access public
  76      */
  77     function toPDF(&$MARCO) {
  78         $this->_marco =& $MARCO;
  79         $this->_agregarContenido();
  80     }
  81
  82     /**
  83      * Funcion que devuelve la posicion X en donde se debe escribir un texto
  84      * segun su ubicacion en la celda
  85      *
  86      * @param int $row Indicador de la fila
  87      * @param int $col Indicador de la columna
  88      * @param string $texto Texto a escribir
  89      * @param array $attr Atributos internos de la celda
  90      * @param array $estilo Estilo del texto
  91      *
  92      * @return int
  93      * @access protected
  94      */
  95     function _obtenerAlineacionTexto($row, $col, $texto, $attr, $estilo) {
  96
  97         $at = $this->_tabla->getCellAttributes($row, $col);
  98         if (@$at['align'] == 'center') {
  99             $tam = $this->_marco->strlen($texto, $estilo);
 100             $init = $attr[$col] + ($attr[$col+1] - $attr[$col] - $tam) / 2;
 101         }
 102         elseif (@$at['align'] == 'right') {
 103             $tam = $this->_marco->strlen($texto, $estilo);
 104             $init = $attr[$col+1] - $tam + 1;
 105         }
 106         else {
 107             $init = $attr[$col];
 108         }
 109         return $init + 1;
 110     }
 111
 112     /**
 113      * Funcion que devuelve el estilo de la celda segun la configuracion.
 114      *
 115      * @param int $row Indicador de la fila
 116      * @param int $col Indicador de la columna
 117      *
 118      * @return array
 119      * @access protected
 120      */
 121     function _obtenerEstiloCelda($row, $col) {
 122         $clase = $this->_tabla->getCellAttributes($row, $col);
 123         if (@$clase['cabecera'] || @$clase['oscura']) {
 124             $estilo = $this->_config['celda_cabecera'];
 125         }
 126         elseif (@$clase['titulo'] || @$clase['clara']) {
 127             $estilo = $this->_config['celda_titulo'];
 128         }
 129         else {
 130             $estilo = $this->_config['celda_comun'];
 131         }
 132         return $estilo;
 133     }
 134
 135     /**
 136      * Funcion que calcula el ancho de las columnas de la tabla.
 137      *
 138      * @return array
 139      * @access protected
 140      */
 141     function _obtenerAnchoColumnas() {
 142         $ancho_pagina = $this->_marco->getWidth($this->_marco->orientacion);
 143         for ($i=0; $i<$this->_tabla->getColCount(); $i++ ) {
 144             $tmp = $this->_tabla->getCellAttributes(0,$i);
 145             if (is_null(@$tmp['width'])) {
 146                 die ('Todas las columnas deben tener asignado un ancho.');
 147             }
 148             $attr[$i] = intval($tmp['width']);
 149         }
 150         $tmp = array_sum($attr);
 151         $attr2[0] = 0;
 152         for ($i=1; $i<count($attr); $i++) {
 153             $attr2[$i] = intval(($ancho_pagina * $attr[$i-1] / $tmp) +
 154                     $attr2[$i-1]);
 155         }
 156         $attr2[$i] = $ancho_pagina;
 157         return $attr2;
 158     }
 159
 160     /**
 161      * Funcion que agrega las filas y columnas a la pagina.
 162      *
 163      * @return void
 164      * @access protected
 165      */
 166     function _agregarContenido() {
 167         $alto = $this->_marco->espacioDisponible;
 168         if ($alto <= 0 ) {
 169             $this->_marco->newPage($this->_marco->tamanio);
 170         }
 171         //\@TODO Aca antes de crear una nueva pagina utilizar la que ya existe
 172         $attr2 = $this->_obtenerAnchoColumnas();
 173         for ($i = 0; $i < $this->_tabla->getRowCount(); $i++) {
 174             $max = 0;
 175             for ($j = 0; $j < $this->_tabla->getColCount(); $j++) {
 176                 $estilo = $this->_obtenerEstiloCelda($i, $j);
 177                 $txt = $this->_marco->wordWrap($this->_tabla->getCellContents($i,$j),
 178                         $attr2[$j+1] - $attr2[$j], $estilo);
 179                 $txtt[$j] = $txt; //Esto es para no hacer el wordWrap siempre
 180                 $max = max($estilo['alto_linea'] * count($txt), $max);
 181
 182                 $rep = array ();
 183                 $rep = $this->_tabla->getCellAttributes($i, $j);
 184                 if (@$rep['cabecera'] || @$rep['titulo']) {
 185                     $repetir[$i][$j] = $txt;
 186                     $repetir[$i]['max'] = $max;
 187                 }
 188             }
 189
 190             if ($alto <= 0) {
 191                 $this->_marco->newPage($this->_marco->tamanio);
 192                 $alto = $this->_marco->espacioDisponible;
 193
 194                 foreach ($repetir as $ii => $value) {
 195                     $alto -= $repetir[$ii]['max'];
 196                     for ($jj = 0; $jj < $this->_tabla->getColCount(); $jj++) {
 197                         $estilo = $this->_obtenerEstiloCelda($ii, $jj);
 198                         $this->_marco->addRectangle($attr2[$jj], $alto,
 199                                 $attr2[$jj+1],  $alto+$repetir[$ii]['max'],
 200                                 @$estilo['fill'], null, $this->_marco->orientacion);
 201
 202                         $alto1 = $alto + $repetir[$ii]['max'];
 203                         foreach ($repetir[$ii][$jj] as $t) {
 204                             $alto1 -= $estilo['alto_linea'];
 205
 206                             //Ubico el texto segun su alineacion
 207                             $init = $this->_obtenerAlineacionTexto($ii, $jj, $t, $attr2,
 208                                     $estilo);
 209
 210                             $this->_marco->addText($init, $alto1 + 2,
 211                                     $t, $estilo, null, $this->_marco->orientacion);
 212                         }
 213                     }
 214                 }
 215
 216             }
 217
 218             $alto -= $max;
 219             for ($j = 0; $j < $this->_tabla->getColCount(); $j++) {
 220
 221                 $estilo = $this->_obtenerEstiloCelda($i, $j);
 222
 223                 $this->_marco->addRectangle($attr2[$j], $alto,
 224                         $attr2[$j+1], $alto+$max, @$estilo['fill'], null,
 225                         $this->_marco->orientacion);
 226
 227                 $alto1 = $alto + $max;
 228                 foreach ($txtt[$j] as $t) {
 229                     $alto1 -= $estilo['alto_linea'];
 230
 231                     //Ubico el texto segun su alineacion
 232                     $init = $this->_obtenerAlineacionTexto($i, $j, $t, $attr2,
 233                             $estilo);
 234
 235                     $this->_marco->addText($init, $alto1 + 2,
 236                             $t, $estilo, null, $this->_marco->orientacion);
 237                 }
 238             }
 239         }
 240         $this->_marco->espacioDisponible = $alto;
 241     }
 242 }
 243 ?>