X-Git-Url: https://git.llucax.com/mecon/meconlib.git/blobdiff_plain/53dea79e14a592c07d0211cb7a7d93949c231fe1..f82ac09838f49891a683ca0cf345adf06b5e75f9:/lib/MECON/PDF/Tabla.php

diff --git a/lib/MECON/PDF/Tabla.php b/lib/MECON/PDF/Tabla.php
index cd1d7d4..37ecb7d 100644
--- a/lib/MECON/PDF/Tabla.php
+++ b/lib/MECON/PDF/Tabla.php
@@ -39,10 +39,174 @@ class MECON_PDF_Tabla extends MECON_PDF_Marco {
      * @access public
      */
     function display() {
-        $this->_pdf->newPage($this->_tamanio);
-        $this->buildPage();
+        $this->_agregarContenido();
+        
+        //Agrego los encabezados
+        $t = true;
+        foreach ($this->_pdf->getPages() as $page) {
+            $this->_pdf->_pagina_actual = $page;
+            $this->buildPage($t, $t);
+            $t = false;
+        }
+        
         $this->_pdf->display();
     }
-    
+
+    /**
+     * Funcion que devuelve la posicion X en donde se debe escribir un texto
+     * segun su ubicacion en la celda
+     *
+     * @param int $row Indicador de la fila
+     * @param int $col Indicador de la columna
+     * @param string $texto Texto a escribir
+     * @param array $attr Atributos internos de la celda
+     * @param array $estilo Estilo del texto
+     *
+     * @return int
+     * @access protected
+     */
+    function _obtenerAlineacionTexto($row, $col, $texto, $attr, $estilo) {
+        
+        $at = $this->getCellAttributes($row, $col);
+        if (@$at['align'] == 'center') {
+            $tam = $this->_pdf->strlen($texto, $estilo);
+            $init = $attr[$col] + ($attr[$col+1] - $attr[$col] - $tam) / 2;
+        }
+        elseif (@$at['align'] == 'right') {
+            $tam = $this->_pdf->strlen($texto, $estilo);
+            $init = $attr[$col+1] - $tam + 1;
+        }
+        else {
+            $init = $attr[$col];
+        }
+        return $init + 1;
+    }
+
+    /**
+     * Funcion que devuelve el estilo de la celda segun la configuracion.  
+     *
+     * @param int $row Indicador de la fila
+     * @param int $col Indicador de la columna
+     *
+     * @return array
+     * @access protected
+     */
+    function _obtenerEstiloCelda($row, $col) {
+        $clase = $this->getCellAttributes($row, $col);
+        if (@$clase['cabecera'] || @$clase['oscura']) {
+            $estilo = $this->_config['celda_cabecera'];
+        }
+        elseif (@$clase['titulo'] || @$clase['clara']) {
+            $estilo = $this->_config['celda_titulo'];
+        }
+        else {
+            $estilo = $this->_config['celda_comun'];
+        }
+        return $estilo;
+    }
+
+    /**
+     * Funcion que calcula el ancho de las columnas de la tabla.  
+     *
+     * @return array
+     * @access protected
+     */
+    function _obtenerAnchoColumnas() {
+        $ancho_pagina = $this->_pdf->getWidth($this->_orientacion);
+        for ($i=0; $i<$this->getColCount(); $i++ ) {
+            $tmp = $this->getCellAttributes(0,$i);
+            if (is_null(@$tmp['width'])) {
+                die ('Todas las columnas deben tener asignado un ancho.');                
+            }
+            $attr[$i] = intval($tmp['width']);
+        }
+        $tmp = array_sum($attr);
+        $attr2[0] = 0;
+        for ($i=1; $i<count($attr); $i++) {
+            $attr2[$i] = intval(($ancho_pagina * $attr[$i-1] / $tmp) +
+                    $attr2[$i-1]);
+        }
+        $attr2[$i] = $ancho_pagina;
+        return $attr2;
+    }
+
+    /**
+     * Funcion que agrega las filas y columnas a la pagina.                  
+     *
+     * @return void
+     * @access protected
+     */
+    function _agregarContenido() {
+        $this->_pdf->newPage($this->_tamanio);               
+        $alto = $this->_getAvailableSpace($this->_pdf->numPage());
+        $attr2 = $this->_obtenerAnchoColumnas();
+        for ($i = 0; $i < $this->getRowCount(); $i++) {
+            $max = 0;
+            for ($j = 0; $j < $this->getColCount(); $j++) {
+                $estilo = $this->_obtenerEstiloCelda($i, $j);
+                $txt = $this->_pdf->wordWrap($this->getCellContents($i,$j),
+                        $attr2[$j+1] - $attr2[$j], $estilo);
+                $txtt[$j] = $txt; //Esto es para no hacer el wordWrap siempre
+                $max = max($estilo['alto_linea'] * count($txt), $max);
+                
+                $rep = array ();
+                $rep = $this->getCellAttributes($i, $j);
+                if (@$rep['cabecera'] || @$rep['titulo']) {
+                    $repetir[$i][$j] = $txt;
+                    $repetir[$i]['max'] = $max;
+                }
+            }
+            
+            if ($alto < 0) {
+                $this->_pdf->newPage($this->_tamanio);
+                $alto = $this->_getAvailableSpace($this->_pdf->numPage());
+                
+                foreach ($repetir as $ii => $value) {
+                    $alto -= $repetir[$ii]['max'];
+                    for ($jj = 0; $jj < $this->getColCount(); $jj++) {
+                        $estilo = $this->_obtenerEstiloCelda($ii, $jj);
+                        $this->_pdf->addRectangle($attr2[$jj], $alto,
+                                $attr2[$jj+1],  $alto+$repetir[$ii]['max'],
+                                @$estilo['fill'], null, $this->_orientacion);
+                        
+                        $alto1 = $alto + $repetir[$ii]['max'];
+                        foreach ($repetir[$ii][$jj] as $t) {
+                            $alto1 -= $estilo['alto_linea'];
+
+                            //Ubico el texto segun su alineacion
+                            $init = $this->_obtenerAlineacionTexto($ii, $jj, $t, $attr2,
+                                    $estilo);
+                            
+                            $this->_pdf->addText($init, $alto1 + 2,
+                                    $t, $estilo, null, $this->_orientacion);
+                        }
+                    }
+                }
+                
+            }
+            
+            $alto -= $max;
+            for ($j = 0; $j < $this->getColCount(); $j++) {
+
+                $estilo = $this->_obtenerEstiloCelda($i, $j);
+                
+                $this->_pdf->addRectangle($attr2[$j], $alto,
+                        $attr2[$j+1], $alto+$max, @$estilo['fill'], null,
+                        $this->_orientacion);
+                
+                $alto1 = $alto + $max;
+                foreach ($txtt[$j] as $t) {
+                    $alto1 -= $estilo['alto_linea'];
+
+                    //Ubico el texto segun su alineacion
+                    $init = $this->_obtenerAlineacionTexto($i, $j, $t, $attr2,
+                            $estilo);
+                    
+                    $this->_pdf->addText($init, $alto1 + 2,
+                            $t, $estilo, null, $this->_orientacion);
+                }
+            }
+        }
+    }
 }
 ?>
\ No newline at end of file