Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <?php
- /*
- Code by Tim Simpus
- For further information about this software, please contact:
- Raharjo (masjojok@gmail.com), or
- Albert (albert.pratama@gmail.com)
- */
- class XlsdiagnosiComponent extends Object
- {
- function excel($content){
- $export_file = "excel.xls";
- $fp = fopen($export_file, "wb");
- if (!is_resource($fp)){die("Cannot open $export_file");}
- fwrite($fp, $content);
- fclose($fp);
- header ("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
- header ("Last-Modified: " . gmdate("D,d M YH:i:s") . " GMT");
- header ("Cache-Control: no-cache, must-revalidate");
- header ("Pragma: no-cache");
- header ("Content-type: application/x-msexcel");
- header ("Content-Disposition: attachment; filename=\"" . basename($export_file) . "\"" );
- header ("Content-Description: PHP/INTERBASE Generated Data" );
- readfile($export_file);
- }
- function nominal($num){
- $data = (number_format($num, 0, ',', '.'));
- return $data;
- }
- function date_for_mysql($ref){
- $tanggal = explode("-",$ref);
- if(empty($tanggal[0]) || empty($tanggal[1]) || empty($tanggal[2]))
- $tanggal = "";
- else
- $tanggal = $tanggal[2]."-".$tanggal[1]."-".$tanggal[0];
- return $tanggal;
- }
- function diagnosispasien($datas,$tgl1,$tgl2,$filter){
- $content = "
- <h2>DATA DIAGNOSIS PASIEN RUMAH SAKIT</h2>
- Periode : ".$tgl1." s/d ".$tgl2."<br>";
- if(!empty($filter)){
- foreach($filter AS $filter2){
- $content .= $filter2[0]." ".$filter2[1]." ".$filter2[2]."<br>";
- }
- }
- $content .= "
- <table class='grid' border='1'>
- <tr>
- <th>No Registrasi</th>
- <th>Kode Diagnosi</th>
- <th>Diagnosis</th>
- <th>ICDX</th>
- <th>Tanggal</th>
- <th>Nama</th>
- <th>Nama KK</th>
- <th>Suku</th>
- <th>Pekerjaan</th>
- <th>Dusun</th>
- <th>Desa</th>
- <th>Asal Pasien</th>
- <th>Tempat Periksa</th>
- <th>Petugas</th>
- <th>JK</th>
- <th>Kelompok<br>Umur</th>
- <th>Pengirim</th>
- <th>Diagnosi Kasus</th>
- <th>Jenis<br>Pasien</th>
- <th>Tindak<br>Lanjut</th>
- <th>Hari</th>
- <th>Bulan</th>
- <th>Tahun</th>
- <th>Unit</th>
- <th>Poli Rujuk</th>
- <th>Rumah Sakit</th>
- <th>Wilayah</th>
- <th>Kartu Sehat</th>
- <th>Kepesertaan</th>
- </tr>";
- if(!empty($datas)){
- foreach ($datas as $data){
- $content .= "<tr><td align='right'>".$data['Visit']['id']."</td>";
- $content .= "<td>".$data['Diagnosi']['disease_id']."</td>";
- $content .= "<td>".$data['Disease']['nama']."</td>";
- $content .= "<td>".$data['Disease']['icdx']."</td>";
- $content .= "<td>".$this->date_for_mysql($data['Visit']['tanggal'])."</td>";
- $content .= "<td>".$data['Visit']['nama']."</td>";
- $content .= "<td>".$data['Visit']['nama_kk']."</td>";
- $content .= "<td>".$data['Tribe']['suku']."</td>";
- $content .= "<td>".$data['Work']['pekerjaan']."</td>";
- $content .= "<td>".$data['Orchard']['dusun']."</td>";
- $content .= "<td>".$data['Village']['desa']."</td>";
- $content .= "<td>".$data['Asal']['desa']."</td>";
- $content .= "<td>".$data['Poscheck']['nama']."</td>";
- $content .= "<td>".$data['Worker']['nama']."</td>";
- $content .= "<td>".$data['Sex']['singkatan']."</td>";
- $content .= "<td>".$data['Groupage']['kelompok_umur']."</td>";
- $content .= "<td>".$data['Consignor']['pengirim']."</td>";
- $content .= "<td>".$data['Groupvisit']['kelompok_kunjungan']."</td>";
- $content .= "<td>".$data['Typepatient']['jenis']."</td>";
- $content .= "<td>".$data['Action']['tindak_lanjut']."</td>";
- $content .= "<td align='right'>".$data['Visit']['harilahir']."</td>";
- $content .= "<td align='right'>".$data['Visit']['bulanlahir']."</td>";
- $content .= "<td align='right'>".$data['Visit']['umur']."</td>";
- $content .= "<td>".$data['Unit']['unit']."</td>";
- $content .= "<td>".$data['Polireference']['polirujukan']."</td>";
- $content .= "<td>".$data['Hospital']['rs']."</td>";
- $content .= "<td>".(($data['Village']['wilayah'] == 'T') ? 'Dalam Wilayah' : 'Luar Wilayah')."</td>";
- $content .= "<td>".$data['Visit']['no_kartu']."</td>";
- $content .= "<td>".$data['Visit']['kepesertaan']."</td></tr>";
- }
- }
- $content .= "</table>";
- $this->excel($content);
- }
- }
- ?>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement