BugFix. Cuando una celda no tenia nada como contenido habia problemas.

[mecon/meconlib.git] / lib / MECON / XLS.php

diff --git a/lib/MECON/XLS.php b/lib/MECON/XLS.php
index 32f508beace6d50b5fa9406c4ccbdf435442828b..84b2a7161938a206e8d99735ab386480adf339bd 100644 (file)
--- a/lib/MECON/XLS.php
+++ b/lib/MECON/XLS.php
@@ -28,19 +28,49 @@ $Id: PDF.php 428 2003-11-18 14:30:30Z mmarre $
  * Liberia base para el manejo de xls's.  
  */
 class MECON_XLS {
+    /**
+      * _xls_data, mantiene el binario temporal del xls  
+      *
+      *
+      */
     var $_xls_data;
+    /**
+      * _tabla, guarda una HTML_Tabla para obtener los datos 
+      *
+      *
+      */
     var $_tabla;
+
+    /**
+     *  MECON_XLS Constructor,
+     *  @attrib tabla HTML_Tabla tabla de la que saca los datos
+     *  @return void
+     */
     function MECON_XLS($tabla)
     {
       $this->_tabla=$tabla;
     }
 
+    /**
+     *  Write Number
+     *  @attrib row numero de fila
+     *  @attrib col numero de columna
+     *  @attrib value valor a poner en la celda
+     *  @return void
+     */
     function _WriteNumber($row,$col,$value)
     {
       $this->_xls_data .= pack("sssss",0x0203,14,$row,$col,0x00);
       $this->_xls_data .= pack("d",$value);
     }
 
+    /**
+     *  Write Text
+     *  @attrib row numero de fila
+     *  @attrib col numero de columna
+     *  @attrib value valor a poner en la celda
+     *  @return void
+     */
     function _WriteText($row,$col,$value)
     {
       $len = strlen($value);
@@ -48,9 +78,18 @@ class MECON_XLS {
       $this->_xls_data .= $value;
     }
 
+    /**
+     *  Write Text
+     *  @attrib row numero de fila
+     *  @attrib col numero de columna
+     *  @attrib value valor a poner en la celda
+     *  @return void
+     */
     function _Write($row,$col,$value)
     {
-      //TODO hacer que guarde segun si es un numero o un texto
+      $tipo = gettype($value);
+      if($tipo == "integer" || $tipo == "double" || $tipo == "float")
+        $this->_WriteNumber($row,$col,$value);
       $this->_WriteText($row,$col,$value);
     }