$up = $up . " no_resi like '%" . $_GET["no_resi"] . "%'";
$ada++;
}
if (!empty($_GET["pengurusan"])) {
if ($ada > 1) {
$up = $up . " and ";
}
$up = $up . " id_pengurusan = '" . $_GET["pengurusan"] . "'";
$ada++;
}
}
if (!empty($_GET["tgl1"]) || !empty($_GET["tgl2"]) || !empty($_GET["cari"]) || !empty($_GET["no_resi"]) || !empty($_GET["pengurusan"])) {
$query = mysql_query("select no_resi,tgl_masuk,pengurusan,nama,pemohon,alamat,alamat_pemohon from vw_info_berkas where id is not null and isDisposisi='0' and " . $up . "");
} else {
$query = mysql_query("select no_resi,tgl_masuk,pengurusan,nama,pemohon,alamat,alamat_pemohon from vw_info_berkas where id is not null and isDisposisi='0' and id_pengurusan='03'");
}
//$t=mysql_fetch_array($qtotal);
$i = 1;
while ($m1 = mysql_fetch_row($query)) {
$worksheet1->write_string($i + 4, 1, $i, $fList);
$worksheet1->write_string($i + 4, 2, $m1[0], $fList);
$worksheet1->write_string($i + 4, 3, $m1[1], $fList);
$worksheet1->write_string($i + 4, 4, $m1[2], $fList);
$worksheet1->write_string($i + 4, 5, $m1[3], $fList);
$worksheet1->write_string($i + 4, 6, $m1[4], $fList);
$worksheet1->write_string($i + 4, 7, $m1[5], $fList);
$worksheet1->write_string($i + 4, 8, $m1[6], $fList);
$i++;
}
$workbook->close();
}
function result_as_xls($result, $mycolumnname, $filebase)
{
$myresult = $result;
$cache = APACHE_CACHE_DIR;
if (!file_exists("/tmp/" . $cache)) {
mkdir("/tmp/" . $cache, 0750);
}
$xlsfile = $filebase . ".xls";
$workbook = new Workbook("/tmp/" . $cache . $xlsfile);
$worksheet =& $workbook->add_worksheet("Sheet 1");
$format_hdr =& $workbook->add_format();
$format_hdr->set_bold();
$format_hdr->set_align('center');
$rowctr = 0;
$colctr = 0;
foreach ($mycolumnname as $header) {
$worksheet->write($rowctr, $colctr, "{$header}", $format_hdr);
$colctr++;
}
while ($myresult->fetchInto($row)) {
$rowctr++;
$colctr = 0;
$keys = array_keys($row);
foreach ($keys as $key) {
if (isset($mycolumnname[$key]) && !($mycolumnname[$key] == 'hidden')) {
$worksheet->write($rowctr, $colctr, $row[$key]);
$colctr++;
}
}
}
$workbook->close();
echo "<P>Excel file: <A href=\"" . $cache . rawurlencode($xlsfile) . "\">" . $xlsfile . "</A></P>\n";
}
function createResultXls()
{
require_once "vendor/write_excel/OLEwriter.php";
require_once "vendor/write_excel/BIFFwriter.php";
require_once "vendor/write_excel/Worksheet.php";
require_once "vendor/write_excel/Workbook.php";
global $_fullname_sql, $SEM_TYPE, $SEM_CLASS, $TMP_PATH;
if (is_array($this->sem_browse_data['search_result']) && count($this->sem_browse_data['search_result'])) {
if (!is_object($this->sem_tree)) {
$the_tree = TreeAbstract::GetInstance("StudipSemTree");
} else {
$the_tree =& $this->sem_tree;
}
list($group_by_data, $sem_data) = $this->getResult();
$tmpfile = $TMP_PATH . '/' . md5(uniqid('write_excel', 1));
// Creating a workbook
$workbook = new Workbook($tmpfile);
$head_format =& $workbook->addformat();
$head_format->set_size(12);
$head_format->set_bold();
$head_format->set_align("left");
$head_format->set_align("vcenter");
$head_format_merged =& $workbook->addformat();
$head_format_merged->set_size(12);
$head_format_merged->set_bold();
$head_format_merged->set_align("left");
$head_format_merged->set_align("vcenter");
$head_format_merged->set_merge();
$head_format_merged->set_text_wrap();
$caption_format =& $workbook->addformat();
$caption_format->set_size(10);
$caption_format->set_align("left");
$caption_format->set_align("vcenter");
$caption_format->set_bold();
//$caption_format->set_text_wrap();
$data_format =& $workbook->addformat();
$data_format->set_size(10);
$data_format->set_align("left");
$data_format->set_align("vcenter");
$caption_format_merged =& $workbook->addformat();
$caption_format_merged->set_size(10);
$caption_format_merged->set_merge();
$caption_format_merged->set_align("left");
$caption_format_merged->set_align("vcenter");
$caption_format_merged->set_bold();
// Creating the first worksheet
$worksheet1 =& $workbook->addworksheet(_("Veranstaltungen"));
$worksheet1->set_row(0, 20);
$worksheet1->write_string(0, 0, _("Stud.IP Veranstaltungen") . ' - ' . $GLOBALS['UNI_NAME_CLEAN'], $head_format);
$worksheet1->set_row(1, 20);
$worksheet1->write_string(1, 0, sprintf(_(" %s Veranstaltungen gefunden %s, Gruppierung: %s"), count($sem_data), $this->sem_browse_data['do_search'] ? _("(Suchergebnis)") : '', $this->group_by_fields[$this->sem_browse_data['group_by']]['name']), $caption_format);
$worksheet1->write_blank(0, 1, $head_format);
$worksheet1->write_blank(0, 2, $head_format);
$worksheet1->write_blank(0, 3, $head_format);
$worksheet1->write_blank(1, 1, $head_format);
$worksheet1->write_blank(1, 2, $head_format);
$worksheet1->write_blank(1, 3, $head_format);
$worksheet1->set_column(0, 0, 70);
$worksheet1->set_column(0, 1, 25);
$worksheet1->set_column(0, 2, 25);
$worksheet1->set_column(0, 3, 50);
$row = 2;
foreach ($group_by_data as $group_field => $sem_ids) {
switch ($this->sem_browse_data["group_by"]) {
case 0:
$semester = SemesterData::GetSemesterArray();
$headline = $semester[$group_field]['name'];
break;
case 1:
if ($the_tree->tree_data[$group_field]) {
$headline = $the_tree->getShortPath($group_field);
} else {
$headline = _("keine Studienbereiche eingetragen");
}
break;
case 3:
$headline = $SEM_TYPE[$group_field]["name"] . " (" . $SEM_CLASS[$SEM_TYPE[$group_field]["class"]]["name"] . ")";
break;
default:
$headline = $group_field;
break;
}
++$row;
$worksheet1->write_string($row, 0, $headline, $caption_format);
$worksheet1->write_blank($row, 1, $caption_format);
$worksheet1->write_blank($row, 2, $caption_format);
$worksheet1->write_blank($row, 3, $caption_format);
++$row;
if (is_array($sem_ids['Seminar_id'])) {
$semester = SemesterData::GetSemesterArray();
while (list($seminar_id, ) = each($sem_ids['Seminar_id'])) {
$sem_name = key($sem_data[$seminar_id]["Name"]);
$seminar_number = key($sem_data[$seminar_id]['VeranstaltungsNummer']);
$sem_number_start = key($sem_data[$seminar_id]["sem_number"]);
$sem_number_end = key($sem_data[$seminar_id]["sem_number_end"]);
if ($sem_number_start != $sem_number_end) {
$sem_name .= ' (' . $semester[$sem_number_start]['name'] . ' - ';
$sem_name .= ($sem_number_end == -1 ? _("unbegrenzt") : $semester[$sem_number_end]['name']) . ')';
} elseif ($this->sem_browse_data['group_by']) {
$sem_name .= ' (' . $semester[$sem_number_start]['name'] . ")";
}
$worksheet1->write_string($row, 0, $sem_name, $data_format);
//create Turnus field
$temp_turnus_string = Seminar::GetInstance($seminar_id)->getFormattedTurnus(true);
//Shorten, if string too long (add link for details.php)
if (strlen($temp_turnus_string) > 245) {
$temp_turnus_string = substr($temp_turnus_string, 0, strpos(substr($temp_turnus_string, 245, strlen($temp_turnus_string)), ",") + 246);
$temp_turnus_string .= "...(mehr)";
}
$worksheet1->write_string($row, 1, $seminar_number, $data_format);
$worksheet1->write_string($row, 2, $temp_turnus_string, $data_format);
$doz_name = array_keys($sem_data[$seminar_id]['fullname']);
$doz_position = array_keys($sem_data[$seminar_id]['position']);
if (is_array($doz_name)) {
if (count($doz_position) != count($doz_name)) {
$doz_position = range(1, count($doz_name));
}
array_multisort($doz_position, $doz_name);
$worksheet1->write_string($row, 3, join(', ', $doz_name), $data_format);
}
++$row;
}
}
}
$workbook->close();
}
return $tmpfile;
}
function jbxl_download_data($format, $datas, $filename = '')
{
global $CFG;
if (empty($datas->data)) {
return;
}
if (empty($filename)) {
$filename = 'jbxl_download_' . date('YmdHis');
}
//
if ($format === 'xls') {
$excellib_version = 0;
if (file_exists($CFG->dirroot . '/lib/excellib.class.php')) {
$excellib_version = 2;
$tocode = 'UTF-8';
require_once $CFG->dirroot . '/lib/excellib.class.php';
} else {
$excellib_version = 1;
$tocode = 'sjis-win';
require_once $CFG->dirroot . '/lib/excel/Worksheet.php';
require_once $CFG->dirroot . '/lib/excel/Workbook.php';
}
//
header("Content-type: application/vnd.ms-excel");
header("Content-Disposition: attachment; filename=\"{$filename}.xls\"");
/// Creating a workbook
if ($excellib_version == 2) {
$workbook = new MoodleExcelWorkbook('-', 'Excel5');
$workbook->send($filename);
} else {
$workbook = new Workbook('-');
}
$myxls = $workbook->add_worksheet('data');
//
$i = 0;
foreach ($datas->data as $line => $data) {
$j = 0;
foreach ($data as $colm => $val) {
if ($datas->attr[$line][$colm] === 'number') {
$myxls->write_number($i, $j++, $val);
} else {
$myxls->write_string($i, $j++, mb_convert_encoding($val, $tocode, 'auto'));
}
}
$i++;
}
$workbook->close();
} else {
if ($format === 'txt') {
$tocode = 'UTF-8';
//
header("Content-Type: application/download\n");
header("Content-Disposition: attachment; filename=\"{$filename}.txt\"");
foreach ($datas->data as $data) {
foreach ($data as $val) {
echo mb_convert_encoding($val, $tocode, 'auto') . "\t";
}
echo "\r\n";
}
}
}
return;
}
