KumbiaPHP  beta2
Framework PHP
 Todo Estructuras de Datos Namespaces Archivos Funciones Variables Páginas
xls.php
Ir a la documentación de este archivo.
1 <?php
22 require_once LIBRARY_PATH.'excel/main.php';
32 function xls($result, $sumArray, $title, $weightArray, $headerArray){
33 
34  error_reporting(0);
35 
36  $file = md5(uniqid());
37  $config = Config::read('config');
38  $active_app = Router::get_application();
39 
40  $workbook = new Spreadsheet_Excel_Writer("public/temp/$file.xls");
41  $worksheet =& $workbook->addWorksheet();
42 
43  $titulo_verdana =& $workbook->addFormat(array('fontfamily' => 'Verdana',
44  'size' => 20));
45  $titulo_verdana2 =& $workbook->addFormat(array('fontfamily' => 'Verdana',
46  'size' => 18));
47 
48  $workbook->setCustomColor(12, 0xF2, 0xF2, 0xF2);
49 
50  $column_title =& $workbook->addFormat(array('fontfamily' => 'Verdana',
51  'size' => 12,
52  'fgcolor' => 12,
53  'border' => 1,
54  'bordercolor' => 'black',
55  "halign" => 'center'
56  ));
57 
58  $column =& $workbook->addFormat(array( 'fontfamily' => 'Verdana',
59  'size' => 11,
60  'border' => 1,
61  'bordercolor' => 'black',
62  ));
63 
64  $column_centered =& $workbook->addFormat(array( 'fontfamily' => 'Verdana',
65  'size' => 11,
66  'border' => 1,
67  'bordercolor' => 'black',
68  "halign" => 'center'
69  ));
70 
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);
74 
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);
78  }
79 
80  $l = 5;
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);
85  } else {
86  $worksheet->writeString($l, $i, $row[$i], $column_centered);
87  }
88  }
89  $l++;
90  }
91 
92  $workbook->close();
93 
94  error_reporting(E_ALL ^ E_STRICT);
95 
96  if(isset($raw_output)){
97  print "<script type='text/javascript'> window.open('".KUMBIA_PATH."temp/".$file.".xls', null); </script>";
98  } else {
99  Generator::forms_print("<script type='text/javascript'> window.open('".KUMBIA_PATH."temp/".$file.".xls', null); </script>");
100  }
101 
102 }
103 
104 
105 ?>