MECON_PDF hace un setlocale(LC_ALL,"en_US") en el constructor. Esto es porque si...

[mecon/meconlib.git] / test / PDF / test.php

diff --git a/test/PDF/test.php b/test/PDF/test.php
index 9c34cb74b0886921cf16b6ed0967e189a2fbf862..156db6afacd0ec0be16507d8f68a303f59d604b3 100755 (executable)
--- a/test/PDF/test.php
+++ b/test/PDF/test.php
@@ -1,5 +1,8 @@
 <?php
 
 <?php
 

+//ini_set('max_execution_time', 200);
+
+

 require_once 'MECON/general.php';
 prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
 
 require_once 'MECON/general.php';
 prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
 


@@ -7,6 +10,7 @@ require_once 'MECON/HTML/Tabla.php';
 require_once 'MECON/PDF/Marco.php';
 require_once 'MECON/PDF/Tabla.php';
 require_once 'MECON/PDF/Texto.php';
 require_once 'MECON/PDF/Marco.php';
 require_once 'MECON/PDF/Tabla.php';
 require_once 'MECON/PDF/Texto.php';

+require_once 'MECON/PDF/SaltoPagina.php';

 
 $TABLA =& new MECON_HTML_Tabla();
 
 
 $TABLA =& new MECON_HTML_Tabla();
 


@@ -14,7 +18,7 @@ $TABLA->addRow(array ('1erCabecera', '2daCabecera para que la corete',
             '3erCabecera'), 'cabecera');
 $TABLA->addRow(array ('1erColumna', '2daColumna para que la corete',
             '3erColumna'), 'clara');
             '3erCabecera'), 'cabecera');
 $TABLA->addRow(array ('1erColumna', '2daColumna para que la corete',
             '3erColumna'), 'clara');

-for ($i=0; $i<20; $i++) {
+for ($i=0; $i<10; $i++) {

     if ($i == 50) {
         $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');
     }
     if ($i == 50) {
         $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');
     }


@@ -26,6 +30,8 @@ for ($i=0; $i<20; $i++) {
         $TABLA->addRow(array ('Fila: '.$i.'Col: 1 ', 'Fila: '.$i.'Col: 2', 'Fila: '.$i.'Col: 3'), 'comun');
     }
 }
         $TABLA->addRow(array ('Fila: '.$i.'Col: 1 ', 'Fila: '.$i.'Col: 2', 'Fila: '.$i.'Col: 3'), 'comun');
     }
 }

+$TABLA->updateCellAttributes(0,0, 'colspan="2"');
+$TABLA->updateCellAttributes(5,1, 'colspan="2"');

 $TABLA->updateColAttributes(0, 'width="50%"');
 $TABLA->updateColAttributes(1, 'width="25%"');
 $TABLA->updateColAttributes(2, 'width="35%"');
 $TABLA->updateColAttributes(0, 'width="50%"');
 $TABLA->updateColAttributes(1, 'width="25%"');
 $TABLA->updateColAttributes(2, 'width="35%"');


@@ -34,7 +40,7 @@ $TABLA->updateCellAttributes(2,1, 'align="center"');
 $TABLA->updateCellAttributes(2,2, 'align="right"');
 
 
 $TABLA->updateCellAttributes(2,2, 'align="right"');
 
 

-$PDF_TEXTO =& new MECON_PDF_Texto;
+$PDF_TEXTO =& new MECON_PDF_Texto ('portrait');

 
 $PDF_TEXTO->addContent(array (
             "Texto a la izquierda",
 
 $PDF_TEXTO->addContent(array (
             "Texto a la izquierda",


@@ -50,7 +56,7 @@ $PDF_TEXTO->setEstilo(2,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
 $PDF_TEXTO->addContent("PARRAFO 1 -> Si se omite tamano, se suprime todo desde el desplazamiento hasta el final de la matriz. Si se especifica el tamano y es positivo, se suprimirán tantos elementos como se especifica. Si fuera negativo, el final de la porción eliminada estará a tantos elementos del final de la matriz. Truco: para eliminar todo desde el desplazamiento hasta el final de la matriz cuando también se especifica sustitucion,utilice  como tamano.\nPARRAFO 2 ->Si se especifia la matriz de sustitucion, entonces los elementos suprimidos son reemplazados con los elementos de dicha matriz. Si los valores de desplazamiento y tamano son tales que nada es borrado, los elementos de la matriz sustitucion  se insertarán en la posición indicada por el desplazamiento. Truco: si sólo se va a sustituir algo por un elemento nada más, no hace falta poner alrededor del mismo, salvo que dicho elemento sea una matriz en sí mismo.");
 
 
 $PDF_TEXTO->addContent("PARRAFO 1 -> Si se omite tamano, se suprime todo desde el desplazamiento hasta el final de la matriz. Si se especifica el tamano y es positivo, se suprimirán tantos elementos como se especifica. Si fuera negativo, el final de la porción eliminada estará a tantos elementos del final de la matriz. Truco: para eliminar todo desde el desplazamiento hasta el final de la matriz cuando también se especifica sustitucion,utilice  como tamano.\nPARRAFO 2 ->Si se especifia la matriz de sustitucion, entonces los elementos suprimidos son reemplazados con los elementos de dicha matriz. Si los valores de desplazamiento y tamano son tales que nada es borrado, los elementos de la matriz sustitucion  se insertarán en la posición indicada por el desplazamiento. Truco: si sólo se va a sustituir algo por un elemento nada más, no hace falta poner alrededor del mismo, salvo que dicho elemento sea una matriz en sí mismo.");
 
 

-$PDF_TEXTO2 =& new MECON_PDF_Texto;
+$PDF_TEXTO2 =& new MECON_PDF_Texto ('portrait');

 $PDF_TEXTO2->addContent("El jefe de Gobierno porteño, Aníbal Ibarra, advirtió que su gestión no otorgará beneficios a los piqueteros que durante el fin de semana último ocuparon un predio en el barrio de Palermo.\n Si uno privilegia la situación de irregularidad, es que ponemos patas para arriba a toda la sociedad, enfatizó Ibarra, quien advirtió que no avalará situaciones de fuerza por sobre lo que hacen cientos de miles de ciudadanos que pagan sus créditos y que se anotan (en planes) para viviendas, esperando a veces durante muchos años.\n En declaraciones periodísticas, Ibarra remarcó que no se puede obtener una vivienda ni autorización para construir viviendas sobre la presión y mucho menos sobre una situación de ilegalidad.");
 $PDF_TEXTO2->setEstilo(1,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
             'align'  => 'center'));
 $PDF_TEXTO2->addContent("El jefe de Gobierno porteño, Aníbal Ibarra, advirtió que su gestión no otorgará beneficios a los piqueteros que durante el fin de semana último ocuparon un predio en el barrio de Palermo.\n Si uno privilegia la situación de irregularidad, es que ponemos patas para arriba a toda la sociedad, enfatizó Ibarra, quien advirtió que no avalará situaciones de fuerza por sobre lo que hacen cientos de miles de ciudadanos que pagan sus créditos y que se anotan (en planes) para viviendas, esperando a veces durante muchos años.\n En declaraciones periodísticas, Ibarra remarcó que no se puede obtener una vivienda ni autorización para construir viviendas sobre la presión y mucho menos sobre una situación de ilegalidad.");
 $PDF_TEXTO2->setEstilo(1,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
             'align'  => 'center'));


@@ -59,18 +65,22 @@ $PDF_TEXTO2->setEstilo(0,  array ('font'   => 'Helvetica-Bold', 'height' => 8,
 
 //print '<PRE>MARTIN FIN </PRE>';
 
 
 //print '<PRE>MARTIN FIN </PRE>';
 

-$PDF_MARCO =& new MECON_PDF_Marco ('a4', 'landscape');
+$PDF_MARCO =& new MECON_PDF_Marco ('a4', 'portrait');

 $PDF_MARCO->seccion   = 'Prueba de la libreria de PDF\'s';
 $PDF_MARCO->titulo    = 'Alberto Giordano';
 $PDF_MARCO->subtitulo = 'Filosofo Estilista, guacho pulenta si los hay';
 
 $PDF_MARCO->seccion   = 'Prueba de la libreria de PDF\'s';
 $PDF_MARCO->titulo    = 'Alberto Giordano';
 $PDF_MARCO->subtitulo = 'Filosofo Estilista, guacho pulenta si los hay';
 

-$PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA), false);
-$PDF_MARCO->addContent($PDF_TEXTO, false);
-$PDF_MARCO->addContent($PDF_TEXTO2, true);
-$PDF_MARCO->addContent($PDF_TEXTO2, true);
-$PDF_MARCO->addContent($PDF_TEXTO2, true);
-$PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA), true);
+$PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA, 'portrait'), false);
+//$PDF_MARCO->addContent($PDF_TEXTO, false);
+//$PDF_MARCO->addContent($PDF_TEXTO2, true);
+//$PDF_MARCO->addContent(new MECON_PDF_SaltoPagina(), false);
+//$PDF_MARCO->addContent($PDF_TEXTO2, true);
+//$PDF_MARCO->addContent($PDF_TEXTO2, true);
+//$PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA), true);
+//$PDF_MARCO->addContent(new MECON_PDF_Tabla ($TABLA, 'landscape'), false);
+

 
 

+//$TABLA->display();

 $PDF_MARCO->display();
 
 ?>
 $PDF_MARCO->display();
 
 ?>