[ Mini Kiebo ]

Server: Windows NT DESKTOP-5B8S0D4 6.2 build 9200 (Windows 8 Professional Edition) i586 Path: D:/Backup/05122024/htdocs/siakad/akademik/ajax/ [ Home ]
File: r_nilaisiswa_xls.php
<?php
require_once("configure_first.php");
$nmTable = "p_nilai_siswa";

if(isset($_GET["id_ta"]) && $_GET["id_ta"]) $id_ta = $_GET["id_ta"];
if(isset($_GET["id_sem"]) && $_GET["id_sem"]) $id_sem = $_GET["id_sem"];
if(isset($_GET["id_kelas"]) && $_GET["id_kelas"]) $id_kelas = $_GET["id_kelas"];
if(isset($_GET["id_mp"]) && $_GET["id_mp"]) $id_mp = $_GET["id_mp"];

$query = "select * from m_siswa a left join p_akad_siswa b on a.siswa_id = b.id_siswa where b.id_ta = ".$id_ta." and b.id_kelas = ".$id_kelas." order by siswa_nis asc";
$iData=sAllData($query);

$namaFile = "Laporan_Nilai_Siswa.xls";
// $namaFile = "Rekap ".$jenis_nilai_nama.".xls";
// Function penanda awal file (Begin Of File) Excel

function xlsBOF() {
echo pack("ssssss", 0x809, 0x8, 0x0, 0x10, 0x0, 0x0);
return;
}

// Function penanda akhir file (End Of File) Excel

function xlsEOF() {
echo pack("ss", 0x0A, 0x00);
return;
}

// Function untuk menulis data (angka) ke cell excel

function xlsWriteNumber($Row, $Col, $Value) {
echo pack("sssss", 0x203, 14, $Row, $Col, 0x0);
echo pack("d", $Value);
return;
}

// Function untuk menulis data (text) ke cell excel

function xlsWriteLabel($Row, $Col, $Value ) {
$L = strlen($Value);
echo pack("ssssss", 0x204, 8 + $L, $Row, $Col, 0x0, $L);
echo $Value;
return;
}
// header file excel

header("Pragma: public");
header("Expires: 0");
header("Cache-Control: must-revalidate, post-check=0,
        pre-check=0");
header("Content-Type: application/force-download");
header("Content-Type: application/octet-stream");
header("Content-Type: application/download");

// header untuk nama file
header("Content-Disposition: attachment;
        filename=".$namaFile."");

header("Content-Transfer-Encoding: binary ");

// memanggil function penanda awal file excel
xlsBOF();

$baris = 0;
xlsWriteLabel($baris,0,"No.");               
xlsWriteLabel($baris,1,"NIS");              
xlsWriteLabel($baris,2,"Nama");
$query="select * from m_jenis_nilai order by jenis_nilai_urutan asc";
$iDataArray=sAllData($query);
$kolom = 2;
for($a=0,$b=count($iDataArray);$a<$b;$a++) {
	$kolom = $kolom+1;
	xlsWriteLabel($baris,$kolom,$iDataArray[$a]["jenis_nilai_nama"]);               
}
xlsWriteLabel($baris,($kolom+1),"Jumlah");               

for($a=0,$b=count($iData);$a<$b;$a++) {
	$baris = $baris+1;
	xlsWriteLabel($baris,0,($a+1));               
	xlsWriteLabel($baris,1,$iData[$a]["siswa_nis"]);               
	xlsWriteLabel($baris,2,$iData[$a]["siswa_nama"]);               
	$query2="select * from m_jenis_nilai order by jenis_nilai_urutan asc";
	$iDataArray=sAllData($query2);
	$JN = 0;
	$kolom = 2;
	for($c=0,$d=count($iDataArray);$c<$d;$c++) {
		$kolom = $kolom+1;
		$sqlx="select * from ".$nmTable." where id_ta = ".$id_ta." and id_sem = ".$id_sem." and id_siswa = ".$iData[$a]["siswa_id"]." and id_jenis_nilai = ".$iDataArray[$c]["jenis_nilai_id"]." and id_mp = ".$id_mp." and id_kelas = ".$id_kelas;
		$rsx = mysql_query($sqlx);
		$hasilnilaix = mysql_fetch_array($rsx);
		xlsWriteLabel($baris,$kolom,$hasilnilaix["nilai_siswa_angka"]);               
		$JN = ($JN+$hasilnilaix["nilai_siswa_angka"]);
	}
	xlsWriteLabel($baris,($kolom+1),$JN);               
}

xlsEOF();
exit();


?>
<script>window.close();</script>