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/Marco.php';
  28
  29 /**
  30  * Libreria que permite agregar una tabla a un pdf.
  31  */
  32 class MECON_PDF_Tabla extends MECON_PDF_Marco {
  33
  34     /**
  35      * Funcion que envia el archivo a pantalla (para que el usuario haga un
  36      * download)
  37      *
  38      * @return string
  39      * @access public
  40      */
  41     function display() {
  42         $this->_agregarContenido();
  43
  44         //Agrego los encabezados
  45         $t = true;
  46         foreach ($this->_pdf->getPages() as $page) {
  47             $this->_pdf->_pagina_actual = $page;
  48             $this->buildPage($t, $t);
  49             $t = false;
  50         }
  51
  52         $this->_pdf->display();
  53     }
  54
  55     /**
  56      * Funcion que devuelve la posicion X en donde se debe escribir un texto
  57      * segun su ubicacion en la celda
  58      *
  59      * @param int $row Indicador de la fila
  60      * @param int $col Indicador de la columna
  61      * @param string $texto Texto a escribir
  62      * @param array $attr Atributos internos de la celda
  63      * @param array $estilo Estilo del texto
  64      *
  65      * @return int
  66      * @access protected
  67      */
  68     function _obtenerAlineacionTexto($row, $col, $texto, $attr, $estilo) {
  69
  70         $at = $this->getCellAttributes($row, $col);
  71         if (@$at['align'] == 'center') {
  72             $tam = $this->_pdf->strlen($texto, $estilo);
  73             $init = $attr[$col] + ($attr[$col+1] - $attr[$col] - $tam) / 2;
  74         }
  75         elseif (@$at['align'] == 'right') {
  76             $tam = $this->_pdf->strlen($texto, $estilo);
  77             $init = $attr[$col+1] - $tam + 1;
  78         }
  79         else {
  80             $init = $attr[$col];
  81         }
  82         return $init + 1;
  83     }
  84
  85     /**
  86      * Funcion que devuelve el estilo de la celda segun la configuracion.
  87      *
  88      * @param int $row Indicador de la fila
  89      * @param int $col Indicador de la columna
  90      *
  91      * @return array
  92      * @access protected
  93      */
  94     function _obtenerEstiloCelda($row, $col) {
  95         $clase = $this->getCellAttributes($row, $col);
  96         if (@$clase['cabecera'] || @$clase['oscura']) {
  97             $estilo = $this->_config['celda_cabecera'];
  98         }
  99         elseif (@$clase['titulo'] || @$clase['clara']) {
 100             $estilo = $this->_config['celda_titulo'];
 101         }
 102         else {
 103             $estilo = $this->_config['celda_comun'];
 104         }
 105         return $estilo;
 106     }
 107
 108     /**
 109      * Funcion que calcula el ancho de las columnas de la tabla.
 110      *
 111      * @return array
 112      * @access protected
 113      */
 114     function _obtenerAnchoColumnas() {
 115         $ancho_pagina = $this->_pdf->getWidth($this->_orientacion);
 116         for ($i=0; $i<$this->getColCount(); $i++ ) {
 117             $tmp = $this->getCellAttributes(0,$i);
 118             if (is_null(@$tmp['width'])) {
 119                 die ('Todas las columnas deben tener asignado un ancho.');
 120             }
 121             $attr[$i] = intval($tmp['width']);
 122         }
 123         $tmp = array_sum($attr);
 124         $attr2[0] = 0;
 125         for ($i=1; $i<count($attr); $i++) {
 126             $attr2[$i] = intval(($ancho_pagina * $attr[$i-1] / $tmp) +
 127                     $attr2[$i-1]);
 128         }
 129         $attr2[$i] = $ancho_pagina;
 130         return $attr2;
 131     }
 132
 133     /**
 134      * Funcion que agrega las filas y columnas a la pagina.
 135      *
 136      * @return void
 137      * @access protected
 138      */
 139     function _agregarContenido() {
 140         $this->_pdf->newPage($this->_tamanio);
 141         $alto = $this->_getAvailableSpace($this->_pdf->numPage());
 142         $attr2 = $this->_obtenerAnchoColumnas();
 143         for ($i = 0; $i < $this->getRowCount(); $i++) {
 144             $max = 0;
 145             for ($j = 0; $j < $this->getColCount(); $j++) {
 146                 $estilo = $this->_obtenerEstiloCelda($i, $j);
 147                 $txt = $this->_pdf->wordWrap($this->getCellContents($i,$j),
 148                         $attr2[$j+1] - $attr2[$j], $estilo);
 149                 $txtt[$j] = $txt; //Esto es para no hacer el wordWrap siempre
 150                 $max = max($estilo['alto_linea'] * count($txt), $max);
 151
 152                 $rep = array ();
 153                 $rep = $this->getCellAttributes($i, $j);
 154                 if (@$rep['cabecera'] || @$rep['titulo']) {
 155                     $repetir[$i][$j] = $txt;
 156                     $repetir[$i]['max'] = $max;
 157                 }
 158             }
 159
 160             if ($alto < 0) {
 161                 $this->_pdf->newPage($this->_tamanio);
 162                 $alto = $this->_getAvailableSpace($this->_pdf->numPage());
 163
 164                 foreach ($repetir as $ii => $value) {
 165                     $alto -= $repetir[$ii]['max'];
 166                     for ($jj = 0; $jj < $this->getColCount(); $jj++) {
 167                         $estilo = $this->_obtenerEstiloCelda($ii, $jj);
 168                         $this->_pdf->addRectangle($attr2[$jj], $alto,
 169                                 $attr2[$jj+1],  $alto+$repetir[$ii]['max'],
 170                                 @$estilo['fill'], null, $this->_orientacion);
 171
 172                         $alto1 = $alto + $repetir[$ii]['max'];
 173                         foreach ($repetir[$ii][$jj] as $t) {
 174                             $alto1 -= $estilo['alto_linea'];
 175
 176                             //Ubico el texto segun su alineacion
 177                             $init = $this->_obtenerAlineacionTexto($ii, $jj, $t, $attr2,
 178                                     $estilo);
 179
 180                             $this->_pdf->addText($init, $alto1 + 2,
 181                                     $t, $estilo, null, $this->_orientacion);
 182                         }
 183                     }
 184                 }
 185
 186             }
 187
 188             $alto -= $max;
 189             for ($j = 0; $j < $this->getColCount(); $j++) {
 190
 191                 $estilo = $this->_obtenerEstiloCelda($i, $j);
 192
 193                 $this->_pdf->addRectangle($attr2[$j], $alto,
 194                         $attr2[$j+1], $alto+$max, @$estilo['fill'], null,
 195                         $this->_orientacion);
 196
 197                 $alto1 = $alto + $max;
 198                 foreach ($txtt[$j] as $t) {
 199                     $alto1 -= $estilo['alto_linea'];
 200
 201                     //Ubico el texto segun su alineacion
 202                     $init = $this->_obtenerAlineacionTexto($i, $j, $t, $attr2,
 203                             $estilo);
 204
 205                     $this->_pdf->addText($init, $alto1 + 2,
 206                             $t, $estilo, null, $this->_orientacion);
 207                 }
 208             }
 209         }
 210     }
 211 }
 212 ?>