22 require_once LIBRARY_PATH.
'excel/main.php';
32 function xls($result, $sumArray, $title, $weightArray, $headerArray){
36 $file = md5(uniqid());
38 $active_app = Router::get_application();
40 $workbook =
new Spreadsheet_Excel_Writer(
"public/temp/$file.xls");
41 $worksheet =& $workbook->addWorksheet();
43 $titulo_verdana =& $workbook->addFormat(array(
'fontfamily' =>
'Verdana',
45 $titulo_verdana2 =& $workbook->addFormat(array(
'fontfamily' =>
'Verdana',
48 $workbook->setCustomColor(12, 0xF2, 0xF2, 0xF2);
50 $column_title =& $workbook->addFormat(array(
'fontfamily' =>
'Verdana',
54 'bordercolor' =>
'black',
58 $column =& $workbook->addFormat(array(
'fontfamily' =>
'Verdana',
61 'bordercolor' =>
'black',
64 $column_centered =& $workbook->addFormat(array(
'fontfamily' =>
'Verdana',
67 'bordercolor' =>
'black',
71 $worksheet->write(0, 0, strtoupper(
$config->$active_app->name), $titulo_verdana);
72 $worksheet->write(1, 0,
"REPORTE DE ".strtoupper($title), $titulo_verdana2);
73 $worksheet->write(2, 0,
"FECHA ".date(
"Y-m-d"), $titulo_verdana2);
75 for($i=0;$i<=count($headerArray)-1;$i++){
76 $worksheet->setColumn($i, $i, $weightArray[$i]);
77 $worksheet->write(4, $i, $headerArray[$i], $column_title);
81 foreach($result as $row){
82 for($i=0;$i<=count($row)-1;$i++){
83 if(!is_numeric($row[$i])){
84 $worksheet->writeString($l, $i, $row[$i], $column);
86 $worksheet->writeString($l, $i, $row[$i], $column_centered);
94 error_reporting(E_ALL ^ E_STRICT);
96 if(isset($raw_output)){
97 print
"<script type='text/javascript'> window.open('".KUMBIA_PATH.
"temp/".$file.
".xls', null); </script>";
99 Generator::forms_print(
"<script type='text/javascript'> window.open('".KUMBIA_PATH.
"temp/".$file.
".xls', null); </script>");