00001 <?php 00031 require_once LIBRARY_PATH.'excel/main.php'; 00041 function xls($result, $sumArray, $title, $weightArray, $headerArray){ 00042 00043 error_reporting(0); 00044 00045 $file = md5(uniqid()); 00046 $config = Config::read("config.ini"); 00047 $active_app = Router::get_application(); 00048 00049 $workbook = new Spreadsheet_Excel_Writer("public/temp/$file.xls"); 00050 $worksheet =& $workbook->addWorksheet(); 00051 00052 $titulo_verdana =& $workbook->addFormat(array('fontfamily' => 'Verdana', 00053 'size' => 20)); 00054 $titulo_verdana2 =& $workbook->addFormat(array('fontfamily' => 'Verdana', 00055 'size' => 18)); 00056 00057 $workbook->setCustomColor(12, 0xF2, 0xF2, 0xF2); 00058 00059 $column_title =& $workbook->addFormat(array('fontfamily' => 'Verdana', 00060 'size' => 12, 00061 'fgcolor' => 12, 00062 'border' => 1, 00063 'bordercolor' => 'black', 00064 "halign" => 'center' 00065 )); 00066 00067 $column =& $workbook->addFormat(array( 'fontfamily' => 'Verdana', 00068 'size' => 11, 00069 'border' => 1, 00070 'bordercolor' => 'black', 00071 )); 00072 00073 $column_centered =& $workbook->addFormat(array( 'fontfamily' => 'Verdana', 00074 'size' => 11, 00075 'border' => 1, 00076 'bordercolor' => 'black', 00077 "halign" => 'center' 00078 )); 00079 00080 $worksheet->write(0, 0, strtoupper($config->$active_app->name), $titulo_verdana); 00081 $worksheet->write(1, 0, "REPORTE DE ".strtoupper($title), $titulo_verdana2); 00082 $worksheet->write(2, 0, "FECHA ".date("Y-m-d"), $titulo_verdana2); 00083 00084 for($i=0;$i<=count($headerArray)-1;$i++){ 00085 $worksheet->setColumn($i, $i, $weightArray[$i]); 00086 $worksheet->write(4, $i, $headerArray[$i], $column_title); 00087 } 00088 00089 $l = 5; 00090 foreach($result as $row){ 00091 for($i=0;$i<=count($row)-1;$i++){ 00092 if(!is_numeric($row[$i])){ 00093 $worksheet->writeString($l, $i, $row[$i], $column); 00094 } else { 00095 $worksheet->writeString($l, $i, $row[$i], $column_centered); 00096 } 00097 } 00098 $l++; 00099 } 00100 00101 $workbook->close(); 00102 00103 error_reporting(E_ALL ^ E_STRICT); 00104 00105 if(isset($raw_output)){ 00106 print "<script type='text/javascript'> window.open('".KUMBIA_PATH."temp/".$file.".xls', null); </script>"; 00107 } else { 00108 Generator::forms_print("<script type='text/javascript'> window.open('".KUMBIA_PATH."temp/".$file.".xls', null); </script>"); 00109 } 00110 00111 } 00112 00113 00114 ?>