]> git.llucax.com Git - mecon/meconlib.git/blob - lib/MECON/PDF/Tabla.php
Se agrega un método para acumular secuencias y generar gráficos de barras acumulativos.
[mecon/meconlib.git] / 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      * Orientacion de las nuevas paginas
57      * @var string $orientacion
58      * @access protected
59      */
60     var $_orientacion;
61     
62     /**
63      * Class Constructor
64      *
65      * @param &Object $TABLA MECON_HTML_Tabla
66      * @param string $orientacion Orientacion que deben tener las nuevas paginas
67      * que genere la tabla.
68      *
69      * @return void
70      * @access public
71      */
72     function MECON_PDF_Tabla($TABLA, $orientacion = null) {
73         $this->_tabla = $TABLA;
74         $this->_orientacion = $orientacion;
75         $this->_config = include 'MECON/PDF/Tabla/medidas.php';
76     }
77     
78     /**
79      * Funcion que agrega el contenido de la tabla que se este utilizando al
80      * PDF.
81      *
82      * @param &Object $MARCO MECON_PDF_Marco
83      *
84      * @return void
85      * @access public
86      */
87     function toPDF(&$MARCO) {
88         $this->_marco =& $MARCO;
89         $this->_agregarContenido();
90     }
91
92     /**
93      * Funcion que devuelve la posicion X en donde se debe escribir un texto
94      * segun su ubicacion en la celda
95      *
96      * @param int $row Indicador de la fila
97      * @param int $col Indicador de la columna
98      * @param string $texto Texto a escribir
99      * @param array $attr Atributos internos de la celda
100      * @param array $estilo Estilo del texto
101      *
102      * @return int
103      * @access protected
104      */
105     function _obtenerAlineacionTexto($row, $col, $texto, $attr, $estilo) {
106         
107         $at = $this->_tabla->getCellAttributes($row, $col);
108
109         if (@$at['colspan']) {
110             $offset = $at['colspan'];
111         }
112         else {
113             $offset = 1;
114         }
115         
116         if (@$at['align'] == 'center') {
117             $tam = $this->_marco->strlen($texto, $estilo);
118             $init = $attr[$col] + ($attr[$col+$offset] - $attr[$col] - $tam) / 2;
119         }
120         elseif (@$at['align'] == 'right') {
121             $tam = $this->_marco->strlen($texto, $estilo);
122             $init = $attr[$col+$offset] - $tam + 1;
123         }
124         else {
125             $init = $attr[$col];
126         }
127         return $init + 1;
128     }
129
130     /**
131      * Funcion que devuelve el estilo de la celda segun la configuracion.  
132      *
133      * @param int $row Indicador de la fila
134      * @param int $col Indicador de la columna
135      *
136      * @return array
137      * @access protected
138      */
139     function _obtenerEstiloCelda($row, $col) {
140         $clase = $this->_tabla->getCellAttributes($row, $col);
141         if (@$clase['cabecera']) {
142             $estilo = $this->_config['celda_cabecera'];
143         }
144         elseif (@$clase['titulo']) {
145             $estilo = $this->_config['celda_titulo'];
146         }
147         elseif (@$clase['oscura']) {
148             $tmp = $this->_config['celda_comun'];
149             $tmp['fillcolor'] = $this->_config['celda_cabecera']['fillcolor'];
150             $tmp['fill'] = $this->_config['celda_cabecera']['fill'];
151             $estilo = $tmp;
152         }
153         elseif (@$clase['clara']) {
154             $tmp = $this->_config['celda_comun'];
155             $tmp['fillcolor'] = $this->_config['celda_titulo']['fillcolor'];
156             $tmp['fill'] = $this->_config['celda_titulo']['fill'];
157             $estilo = $tmp;
158         }
159         else {
160             $estilo = $this->_config['celda_comun'];
161         }
162         if (@$clase['colspan']) {
163             $estilo['colspan'] = $clase['colspan'];
164         }
165         return $estilo;
166     }
167
168     /**
169      * Funcion que calcula el ancho de las columnas de la tabla.  
170      *
171      * @return array
172      * @access protected
173      */
174     function _obtenerAnchoColumnas() {
175         $ancho_pagina = $this->_marco->getWidth($this->_marco->refPage(),
176                 $this->_marco->getOrientation());
177         for ($row = 0; $row<$this->_tabla->getRowCount(); $row++) {
178             for ($i=0; $i<$this->_tabla->getColCount(); $i++ ) {
179                 $tmp = $this->_tabla->getCellAttributes($row,$i);
180                 if(@intval($tmp['width']) != 0)
181                     $attr[$i] = intval($tmp['width']);
182                 if(@count($attr) == $this->_tabla->getColCount())
183                   break 2;
184             }
185         }
186         
187         if (!isset($attr))
188             die ('Todas las columnas tienen que tener un ancho asignado');
189         
190         $tmp = array_sum($attr);
191         
192         $attr2[0] = 0;
193         for ($i=1; $i<count($attr); $i++) {
194             $attr2[$i] = intval(($ancho_pagina * $attr[$i-1] / $tmp) +
195                     $attr2[$i-1]);
196         }
197         $attr2[$i] = $ancho_pagina;
198         return $attr2;
199     }
200     /**
201      * Funcion que se encarga de crear las nuevas paginas.
202      *
203      * @return void
204      * @access protected
205      */
206     function _newPage() {
207         $tmp = ($this->_orientacion) ? $this->_orientacion :
208             $this->_marco->getOrientation();
209         $this->_marco->newPage($this->_marco->tamanio, $tmp);               
210     }
211
212     /**
213      * Funcion que agrega las filas y columnas a la pagina.                  
214      *
215      * @return void
216      * @access protected
217      */
218     function _agregarContenido() {
219         $alto = $this->_marco->espacioDisponible;
220         $orientacion = $this->_marco->getOrientation();
221         if ($alto <= 0 || ($this->_orientacion && $this->_orientacion !=
222                     $orientacion) ) {
223             $this->_newPage();               
224             $orientacion = $this->_marco->getOrientation();
225             $alto = $this->_marco->espacioDisponible;
226         }
227         $attr2 = $this->_obtenerAnchoColumnas();
228         for ($i = 0; $i < $this->_tabla->getRowCount(); $i++) {
229             $max = 0;
230             for ($j = 0; $j < $this->_tabla->getColCount(); $j++) {
231                 $estilo = $this->_obtenerEstiloCelda($i, $j);
232
233                 //Actuo por el colspan
234                 if (@$estilo['colspan']) {
235                     if ($estilo['colspan'] > $this->_tabla->getColCount()) {
236                         $estilo['colspan'] = 
237                             $this->_tabla->getColCount() - $j;
238                     }
239                     $ancho_columna = $attr2[$j+$estilo['colspan']] - 
240                         $attr2[$j];
241                 }
242                 else {
243                    $ancho_columna = $attr2[$j+1] - $attr2[$j];
244                 }
245                 $txt = $this->_marco->wordWrap(
246                         @$this->_tabla->getCellContents($i,$j), $ancho_columna, 
247                         $estilo);
248                 
249                 $txtt[$j] = $txt; //Esto es para no hacer el wordWrap siempre
250                 $max = max($estilo['alto_linea'] * count($txt), $max);
251                 
252                 $rep = array ();
253                 $rep = $this->_tabla->getCellAttributes($i, $j);
254                 if (@$rep['cabecera'] || @$rep['titulo']) {
255                     $repetir[$i][$j] = $txt;
256                     $repetir[$i]['max'] = $max;
257                 }
258             }
259             if ($alto <= 0) 
260             {
261                 $this->_newPage();               
262                 $alto = $this->_marco->espacioDisponible;
263                 
264                 foreach ($repetir as $ii => $value) {
265                     $alto -= $repetir[$ii]['max'];
266                     for ($jj = 0; $jj < $this->_tabla->getColCount(); $jj++) {
267                         $estilo = $this->_obtenerEstiloCelda($ii, $jj);
268
269                         //Actuo por el colspan
270                         if (@$estilo['colspan']) {
271                             if ($estilo['colspan'] > $this->_tabla->getColCount()) {
272                                 $estilo['colspan'] =
273                                     $this->_tabla->getColCount() - $jj;
274                             }
275                             $der = $attr2[$jj+$estilo['colspan']];
276                             $izq = $attr2[$jj];
277                         }
278                         else {
279                            $der = $attr2[$jj+1];
280                            $izq = $attr2[$jj];
281                         }
282
283                         
284                         $this->_marco->addRectangle($izq, $alto, $der, 
285                                 $alto+$repetir[$ii]['max'], @$estilo['fill'], 
286                                 null, $orientacion);
287                         $alto1 = $alto + $repetir[$ii]['max'];
288                         foreach ($repetir[$ii][$jj] as $t) {
289                             $alto1 -= $estilo['alto_linea'];
290
291                             //Ubico el texto segun su alineacion
292                             $init = $this->_obtenerAlineacionTexto($ii, $jj, $t, $attr2,
293                                     $estilo);
294                             
295                             $this->_marco->addText($init, $alto1 + 2,
296                                     $t, $estilo, null, $orientacion);
297                         }
298
299                         if (@$estilo['colspan']) {
300                             $jj += $estilo['colspan'] -1;
301                         }
302                         
303                     }
304                 }
305                 
306             }
307             
308             $alto -= $max;
309             for ($j = 0; $j < $this->_tabla->getColCount(); $j++) {
310                 
311                 $estilo = $this->_obtenerEstiloCelda($i, $j);
312                  
313                 //Actuo por el colspan
314                 if (@$estilo['colspan']) {
315                     if ($estilo['colspan'] > $this->_tabla->getColCount()) {
316                         $estilo['colspan'] = $this->_tabla->getColCount()  - 1;
317                     }
318                     $der = $attr2[$j+$estilo['colspan']];
319                     $izq = $attr2[$j];
320                 }
321                 else {
322                    $der = $attr2[$j+1];
323                    $izq = $attr2[$j];
324                 }
325
326                 
327                 $this->_marco->addRectangle($izq, $alto, $der, $alto+$max, 
328                         @$estilo['fill'], null, $orientacion);
329                 
330                 $alto1 = $alto + $max;
331                 if (@$txtt[$j]) {
332                     foreach ($txtt[$j] as $t) {
333                         $alto1 -= $estilo['alto_linea'];
334
335                         //Ubico el texto segun su alineacion
336                         $init = $this->_obtenerAlineacionTexto($i, $j, $t, $attr2,
337                                 $estilo);
338                         
339                         $this->_marco->addText($init, $alto1 + 2,
340                                 $t, $estilo, null, $orientacion);
341                     }
342                 }
343                 if (@$estilo['colspan']) {
344                     $j += $estilo['colspan']-1;
345                 }
346
347             }
348         }
349         $this->_marco->espacioDisponible = $alto;
350     }
351 }
352 ?>