test/PDF/test.php

   1 <?php
   2
   3 require_once 'MECON/general.php';
   4 prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
   5
   6 require_once 'MECON/HTML/Tabla.php';
   7 require_once 'MECON/PDF/Marco.php';
   8 require_once 'MECON/PDF/Tabla.php';
   9
  10 $TABLA =& new MECON_HTML_Tabla();
  11
  12 $TABLA->addRow(array ('1erCabecera', '2daCabecera para que la corete',
  13             '3erCabecera'), 'cabecera');
  14 $TABLA->addRow(array ('1erColumna', '2daColumna para que la corete',
  15             '3erColumna'), 'clara');
  16 for ($i=0; $i<60; $i++) {
  17     if ($i == 50) {
  18         $TABLA->addRow(array ('1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando', '2daColumna 1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando FILA 50', '3erColumna1erColumna para gonzalo que lo mira por tv desde su casa en ayacucho 1593. Aunque ahora que lo pienso me estoy equivocando'), 'comun');
  19     }
  20     elseif ($i == 30) {
  21         $TABLA->addRow(array ('Esto es para probar', 'como repite las celdas',
  22                     'MECON_PDF_Tabla'), 'titulo');
  23     }
  24     else {
  25         $TABLA->addRow(array ('Fila: '.$i.'Col: 1 ', 'Fila: '.$i.'Col: 2', 'Fila: '.$i.'Col: 3'), 'comun');
  26     }
  27 }
  28 $TABLA->updateColAttributes(0, 'width="50%"');
  29 $TABLA->updateColAttributes(1, 'width="25%"');
  30 $TABLA->updateColAttributes(2, 'width="35%"');
  31 $TABLA->updateCellAttributes(2,0, 'align="left"');
  32 $TABLA->updateCellAttributes(2,1, 'align="center"');
  33 $TABLA->updateCellAttributes(2,2, 'align="right"');
  34
  35 $PDF_MARCO =& new MECON_PDF_Marco ('a4', 'portrait');
  36 $PDF_MARCO->seccion   = 'Prueba de la libreria de PDF\'s';
  37 $PDF_MARCO->titulo    = 'Alberto Giordano';
  38 $PDF_MARCO->subtitulo = 'Filosofo Estilista, guacho pulenta si los hay';
  39
  40 $PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA), false);
  41
  42 $PDF_MARCO->display();
  43
  44 ?>