function list_data($val) { unset($_SESSION[igd][pendapatan]); //get data karcis dan BHP $objResponse = new xajaxResponse; $kon = new Konek; $title = "Laporan Pembagian Jasa IRD"; if($val[jangka_waktu] == "tahun") { $q = "AND YEAR(kw.tgl) BETWEEN '".$val[thn_start]."' AND '".$val[thn_end]."'"; $title .= "\nPeriode " . $val[thn_start] . " - " . $val[thn_end]; } elseif($val[jangka_waktu] == "bulan") { $q = "AND EXTRACT(YEAR_MONTH FROM kw.tgl) BETWEEN '".$val[thn_start].$val[bln_start]."' AND '".$val[thn_end].$val[bln_end]."'"; $title .= "\nPeriode " . bulanIndo($val[bln_start], "F") . " " . $val[thn_start] . " - " . bulanIndo($val[bln_end], "F") . " " . $val[thn_end]; } else { $q = "AND DATE(kw.tgl) BETWEEN '".$val[thn_start]."-".$val[bln_start]."-".$val[tgl_start]."' AND '".$val[thn_end]."-".$val[bln_end]."-".$val[tgl_end]."'"; $title .= "\nPeriode " . tanggalIndo($val[thn_start] . "-" . $val[bln_start] . "-" . $val[tgl_start], "j F Y") . " - " . tanggalIndo($val[thn_end] . "-" . $val[bln_end] . "-" . $val[tgl_end], "j F Y"); } $sql = " SELECT kb.nama as nama, hak.nama as nama_hak, SUM(ROUND(kb.mampu_bayar_bhp * bhp_p)) as bhp_p, SUM(ROUND(kb.mampu_bayar_bhp * bhp_rs_adm)) as bhp_rs_adm, SUM(ROUND(kb.mampu_bayar_bhp * bhp_rs_op)) as bhp_rs_op, SUM(ROUND(kb.mampu_bayar_jasa * jasa_p)) as jasa_p, SUM(ROUND(kb.mampu_bayar_jasa * jasa_rs_adm)) as jasa_rs_adm, SUM(ROUND(kb.mampu_bayar_jasa * jasa_rs_sdm)) as jasa_rs_sdm, SUM(ROUND(kb.mampu_bayar_jasa * jasa_rs_kembang)) as jasa_rs_kembang, SUM(ROUND(kb.mampu_bayar_jasa * jasa_rs_op)) as jasa_rs_op, SUM(ROUND(kb.mampu_bayar_jasa * spesialis * netto)) as spesialis, SUM(ROUND(kb.mampu_bayar_jasa * spesialis_pendamping * netto)) as spesialis_pendamping, SUM(ROUND(kb.mampu_bayar_jasa * perawat_perinatologi * netto)) as perawat_perinatologi, SUM(ROUND(kb.mampu_bayar_jasa * dr_umum * netto)) as dr_umum, SUM(ROUND(kb.mampu_bayar_jasa * dr_gigi * netto)) as dr_gigi, SUM(ROUND(kb.mampu_bayar_jasa * assisten_non_dokter * netto)) as assisten_non_dokter, SUM(ROUND(kb.mampu_bayar_jasa * spesialis_anestesi * netto)) as spesialis_anestesi, SUM(ROUND(kb.mampu_bayar_jasa * aknest * netto)) as aknest, SUM(ROUND(kb.mampu_bayar_jasa * gizi * netto)) as gizi, SUM(ROUND(kb.mampu_bayar_jasa * fisioterapi * netto)) as fisioterapi, SUM(ROUND(kb.mampu_bayar_jasa * analis_pa * netto)) as analis_pa, SUM(ROUND(kb.mampu_bayar_jasa * bidan * netto)) as bidan, SUM(ROUND(kb.mampu_bayar_jasa * perawat * netto)) as perawat, SUM(ROUND(kb.mampu_bayar_jasa * penunjang * netto)) as penunjang, SUM(ROUND(kb.mampu_bayar_jasa * ugp * netto)) as ugp, SUM(ROUND(kb.mampu_bayar_jasa * grabaf * netto)) as grabaf, SUM(ROUND(kb.mampu_bayar_jasa * zakat * netto)) as zakat, SUM(ROUND(pajak * (kb.mampu_bayar_jasa - kb.mampu_bayar_jasa * kb.jasa_p - kb.mampu_bayar_jasa * kb.jasa_rs_op - kb.mampu_bayar_jasa * kb.jasa_rs_kembang - kb.mampu_bayar_jasa * kb.jasa_rs_adm - kb.mampu_bayar_jasa * kb.jasa_rs_sdm))) as pajak, SUM(kb.mampu_bayar_bhp+kb.mampu_bayar_jasa) as mampu_bayar FROM kunjungan_bayar kb JOIN kunjungan_kamar kk ON (kk.id = kb.kunjungan_kamar_id) JOIN hak ON (hak.id = kb.hak_id) JOIN kwitansi kw ON (kw.id = kb.kwid) WHERE (kb.karcis_id IS NOT NULL OR kb.bhp_id IS NOT NULL) AND kw.tempat_pembayaran = 'IRD' $q GROUP BY kb.karcis_id, kb.bhp_id, kb.hak_id "; //$objResponse->addAssign("debug", "innerHTML", nl2br($sql)); $kon->sql = $sql; $kon->execute(); $data_karcis = $kon->getAll(); $table = new Table; $table->anime_bg_color = false; $table->addTh("Jasa", "Pemilik", "BHP", "JASA RS", "Sp", "Sp1", "SpAn", "UGP", "GRABAF", "Prwt", /*"Ass Non Dokter", "Aknest", "Gizi", "Fisio", "Analis PA", "Bidan", */"Pnjg", "Zakat", "Pajak", "Sub Total"); $table->addExtraTh("rowspan=\"2\"", "rowspan=\"2\"", "colspan=\"5\"", "colspan=\"5\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\""); $table->addTh("Pemda", "Adm", "Op", "Rad", "Lab", "Pemda", "Adm", "Sdm", "Bang", "Op"); for($i=0;$i<sizeof($data_karcis);$i++) { $table->addRow( $data_karcis[$i][nama], $data_karcis[$i][nama_hak], $data_karcis[$i][bhp_p], $data_karcis[$i][bhp_rs_adm], $data_karcis[$i][bhp_rs_op], "?", "?", uangIndo($data_karcis[$i][jasa_p], false), uangIndo($data_karcis[$i][jasa_rs_adm], false), uangIndo($data_karcis[$i][jasa_rs_sdm], false), uangIndo($data_karcis[$i][jasa_rs_kembang], false), uangIndo($data_karcis[$i][jasa_rs_op], false), uangIndo($data_karcis[$i][spesialis], false), uangIndo($data_karcis[$i][spesialis_pendamping], false), uangIndo($data_karcis[$i][spesialis_anestesi], false), //uangIndo($data_karcis[$i][dr_umum] + $data_karcis[$i][dr_gigi] + $data_karcis[$i][ugp], false), uangIndo($data_karcis[$i][ugp], false), uangIndo($data_karcis[$i][grabaf], false), //uangIndo($data_karcis[$i][perawat] + $data_karcis[$i][perawat_perinatologi], false), uangIndo($data_karcis[$i][perawat], false), /*uangIndo($data_karcis[$i][assisten_non_dokter], false), uangIndo($data_karcis[$i][aknest], false), uangIndo($data_karcis[$i][gizi], false), uangIndo($data_karcis[$i][fisioterapi], false), uangIndo($data_karcis[$i][analis_pa], false), uangIndo($data_karcis[$i][bidan], false),*/ uangIndo($data_karcis[$i][penunjang], false), uangIndo($data_karcis[$i][zakat], false), uangIndo($data_karcis[$i][pajak], false), uangIndo($data_karcis[$i][mampu_bayar], false) /* $data_karcis[$i][assisten_non_dokter], $data_karcis[$i][aknest], $data_karcis[$i][gizi], $data_karcis[$i][fisioterapi], $data_karcis[$i][analis_pa], $data_karcis[$i][bidan], */ ); $table->addExtraTr("onclick=\"setBg(this);\""); $total[bhp_p] += $data_karcis[$i][bhp_p]; $total[bhp_rs_adm] += $data_karcis[$i][bhp_rs_adm]; $total[bhp_rs_op] += $data_karcis[$i][bhp_rs_op]; $total[jasa_p] += $data_karcis[$i][jasa_p]; $total[jasa_rs_adm] += $data_karcis[$i][jasa_rs_adm]; $total[jasa_rs_sdm] += $data_karcis[$i][jasa_rs_sdm]; $total[jasa_rs_kembang] += $data_karcis[$i][jasa_rs_kembang]; $total[jasa_rs_op] += $data_karcis[$i][jasa_rs_op]; $total[spesialis] += $data_karcis[$i][spesialis]; $total[spesialis_pendamping] += $data_karcis[$i][spesialis_pendamping]; $total[spesialis_anestesi] += $data_karcis[$i][spesialis_anestesi]; //$total[ugp] += $data_karcis[$i][dr_umum] + $data_karcis[$i][dr_gigi] + $data_karcis[$i][ugp]; $total[ugp] += $data_karcis[$i][ugp]; $total[grabaf] += $data_karcis[$i][grabaf]; //$total[perawat] += $data_karcis[$i][perawat]+$data_karcis[$i][perawat_perinatologi]; $total[perawat] += $data_karcis[$i][perawat]; /*$total[assisten_non_dokter] += $data_karcis[$i][assisten_non_dokter]; $total[aknest] += $data_karcis[$i][aknest]; $total[gizi] += $data_karcis[$i][gizi]; $total[fisioterapi] += $data_karcis[$i][fisioterapi]; $total[analis_pa] += $data_karcis[$i][analis_pa]; $total[bidan] += $data_karcis[$i][bidan];*/ $total[penunjang] += $data_karcis[$i][penunjang]; $total[zakat] += $data_karcis[$i][zakat]; $total[pajak] += $data_karcis[$i][pajak]; $total[mampu_bayar] += $data_karcis[$i][mampu_bayar]; } $table->addTfoot( "Total", uangIndo($total[bhp_p], false), uangIndo($total[bhp_rs_adm], false), uangIndo($total[bhp_rs_op], false), "?", "?", uangIndo($total[jasa_p], false), uangIndo($total[jasa_rs_adm], false), uangIndo($total[jasa_rs_sdm], false), uangIndo($total[jasa_rs_kembang], false), uangIndo($total[jasa_rs_op], false), uangIndo($total[spesialis], false), uangIndo($total[spesialis_pendamping], false), uangIndo($total[spesialis_anestesi], false), uangIndo($total[ugp], false), uangIndo($total[grabaf], false), uangIndo($total[perawat], false), /*uangIndo($total[assisten_non_dokter], false), uangIndo($total[aknest], false), uangIndo($total[gizi], false), uangIndo($total[fisioterapi], false), uangIndo($total[analis_pa], false), uangIndo($total[bidan], false), */ uangIndo($total[penunjang], false), uangIndo($total[zakat], false), uangIndo($total[pajak], false), uangIndo($total[mampu_bayar], false) ); $table->addExtraTfoot("colspan=\"2\""); $content = $table->build(); $judul = nl2br($title); $objResponse->addAssign("title", "innerHTML", $judul); $objResponse->addAssign("list_data", "innerHTML", $content); $_SESSION[igd][pendapatan][title] = $judul; $_SESSION[igd][pendapatan][content] = $content; return $objResponse; }
function list_data($hal = 0, $val) { if(!empty($val)) { $val[cari_nama] = addslashes($val[cari_nama]); $q = " AND (kode_icd_group LIKE '%".$val[cari_nama]."%' OR kode_icd LIKE '%".$val[cari_nama]."%' OR no_dtd LIKE '%".$val[cari_nama]."%' OR nama LIKE '%".$val[cari_nama]."%' OR gol_sebab_sakit LIKE '%".$val[cari_nama]."%')"; } $objResponse = new xajaxResponse(); $paging = new MyPagina; $paging->setOnclickValue("xajax.getFormValues('form_icd')"); $paging->sql = " SELECT id, REPLACE(kode_icd_group, '".$val[cari_nama]."','<b>".$val[cari_nama]."</b>') as kode_icd_group, REPLACE(kode_icd, '".$val[cari_nama]."','<b>".$val[cari_nama]."</b>') as kode_icd, REPLACE(no_dtd, '".$val[cari_nama]."','<b>".$val[cari_nama]."</b>') as no_dtd, REPLACE(nama, '".$val[cari_nama]."','<b>".$val[cari_nama]."</b>') as nama, REPLACE(gol_sebab_sakit, '".$val[cari_nama]."','<b>".$val[cari_nama]."</b>') as gol_sebab_sakit FROM icd WHERE 1=1 $q ORDER BY kode_icd "; $paging->rows_on_page = 20; $paging->hal = $hal; $paging->get_page_result(); $data = $paging->data; $no = $paging->start_number(); $navi = $paging->navi(); $_SESSION[modul_setting][penyakit][hal] = $hal; $tabel = new Table; $tabel->tbody_height = 300; $tabel->addTh("No", "Kode ICD Group", "Kode ICD", "No. DTD", "Nama Penyakit", "Gol. Sebab Sakit", "Hapus"); $tabel->addExtraTh(" style=\"width: 50px;\"", " style=\"width: 50px;\"", " style=\"width: 70px;\" ", " style=\"width: 70px;\" ", "", "", " style=\"width: 70px;\" "); for($i=0;$i<sizeof($data);$i++) { $tabel->addExtraTr("id=\"tr_".$i."\""); $tabel->addRow( ($no+$i), $data[$i][kode_icd_group], $data[$i][kode_icd], $data[$i][no_dtd], $data[$i][nama], $data[$i][gol_sebab_sakit], "<a href=\"javascript:void(0)\" title=\"Hapus\" onclick=\"hapus_icd('".$data[$i][id]."', 'tr_".$i."')\" class=\"tombol_hapus\"><img src=\"".IMAGES_URL."remove.png\" alt=\"Hapus\" border=\"0\" /></a>"); $tabel->addOnclickTd( "xajax_get_icd('".$data[$i][id]."')", "xajax_get_icd('".$data[$i][id]."')", "xajax_get_icd('".$data[$i][id]."')", "xajax_get_icd('".$data[$i][id]."')", "xajax_get_icd('".$data[$i][id]."')", "xajax_get_icd('".$data[$i][id]."')" ); } $buka = $tabel->build(); $objResponse->addAssign("list_data", "innerHTML", $buka); $objResponse->addAssign("navi", "innerHTML", $navi); return $objResponse; }
function list_data($hal = 0, $val) { $paging = new MyPagina; $objResponse = new xajaxResponse(); if($val[is_cari] == "1") { if($val[cari_id]) { $q = " AND p.id = '".$val[cari_id]."' "; } else { if($val[cari_nama]) $q .= " AND p.nama LIKE '%".$val[cari_nama]."%' "; if($val[cari_sex]) $q .= " AND p.sex = '".$val[cari_sex]."' "; if($val[cari_alamat]) $q .= " AND p.alamat LIKE '%".$val[cari_alamat]."%' "; if($val[cari_rt]) $q .= " AND p.rt LIKE '%".$val[cari_rt]."%' "; if($val[cari_rw]) $q .= " AND p.rw LIKE '%".$val[cari_rw]."%' "; if($val[cari_telp]) $q .= " AND p.telp LIKE '%".$val[cari_telp]."%' "; /*if($tgl_lahir) $q .= " AND DATE(p.tgl_lahir) = '".$tgl_lahir."' "; */ if ($val[tgl_lahir_thn] == "" && $val[tgl_lahir_bln] == "" && $val[tgl_lahir_tgl] == ""){ $tgl_lahir = ""; } else { $tgl_lahir = $val[tgl_lahir_thn] . "-" . $val[tgl_lahir_bln] . "-" . $val[tgl_lahir_tgl]; $q .= " AND DATE(p.tgl_lahir) = '".$tgl_lahir."' "; } if($val[cari_desa_id]) $q .= " AND des.id = '".$val[cari_desa_id]."' "; elseif($val[cari_kecamatan_id]) $q .= " AND kec.id = '".$val[cari_kecamatan_id]. "' "; elseif($val[cari_kabupaten_id]) $q .= " AND kab.id = '".$val[cari_kabupaten_id]. "' "; elseif($val[cari_propinsi_id]) $q .= " AND prop.id = '".$val[cari_propinsi_id]. "' "; } } $sql = " SELECT p.id as id, CONCAT_WS('-', SUBSTRING(p.id, 1,2), SUBSTRING(p.id, 3,2), SUBSTRING(p.id, 5,2), SUBSTRING(p.id, 7,2)) as id_display, REPLACE((p.nama), ('".$val[cari_nama]."'), ('<b>".$val[cari_nama]. "</b>')) as nama, CONCAT(p.alamat, ' ', 'RT ', p.rt, '/ RW ', p.rw, '<br />',des.nama, ', ', kec.nama, ', ', kab.nama, '<br />', prop.nama) as alamat FROM pasien p LEFT OUTER JOIN ref_desa des ON (des.id = p.desa_id) LEFT OUTER JOIN ref_kecamatan kec ON (kec.id = des.kecamatan_id) LEFT OUTER JOIN ref_kabupaten kab ON (kab.id = kec.kabupaten_id) LEFT OUTER JOIN ref_propinsi prop ON (prop.id = kab.propinsi_id) WHERE 1=1 $q ORDER BY p.nama "; //echo $sql; //$objResponse->addAssign("debug", "innerHTML", $sql); $paging->hal = $hal; $paging->sql = $sql; $paging->setOnclickValue("xajax.getFormValues('cari_pasien')"); $paging->get_page_result(); $data = $paging->data; $no = $paging->start_number(); $navi = $paging->navi(); $table = new Table; $table->tbody_height = 270; $table->addTh("No", "No. RM", "NAMA", "ALAMAT", "HAPUS"); $table->addExtraTh(" style=\"width:40px\" ", " style=\"width:100px\" ", " style=\"width:200px\" ", "", " style=\"width:50px\" "); for($i = 0; $i < sizeof($data); $i++) { $table->addRow(($no + $i), $data[$i][id_display], $data[$i][nama], $data[$i][alamat], "<a href=\"javascript:void(0)\" title=\"Hapus Pasien\" onclick=\"hapus_pasien('". $data[$i][id]."', 'tr_".$i."')\" class=\"tombol_hapus\"><img src=\"".IMAGES_URL. "remove.png\" alt=\"Hapus Pasien\" border=\"0\" /></a>"); $table->addExtraTr("id=\"tr_".$i."\""); $table->addOnclickTd("xajax_get_pasien('".$data[$i][id]."')", "xajax_get_pasien('".$data[$i][id]."')", "xajax_get_pasien('".$data[$i][id]. "')", "xajax_get_pasien('".$data[$i][id]."')"); } $ret = $table->build(); $objResponse->addAssign("cari_navi", "innerHTML", $navi); $objResponse->addAssign("list_data", "innerHTML", $ret); return $objResponse; }
function list_data($hal=0, $val="") { $kon = new konek; if($val[pasien_id]) { $q = " p.no_rm = '".$val[pasien_id]."' "; } elseif($val[nama]) { $tgl_daftar_dari = $val[tgl_mulai_thn] . "-" . $val[tgl_mulai_bln] . "-" . $val[tgl_mulai_tgl]; $tgl_daftar_sampai = $val[tgl_selesai_thn] . "-" . $val[tgl_selesai_bln] . "-" . $val[tgl_selesai_tgl]; $q = " p.nama LIKE '%".$val[nama]."%' AND DATE(kk.tgl_daftar) BETWEEN '".$tgl_daftar_dari."' AND '".$tgl_daftar_sampai."' "; } elseif ($val[pilih]){ $tgl_daftar_dari = $val[tgl_mulai_thn] . "-" . $val[tgl_mulai_bln] . "-" . $val[tgl_mulai_tgl]; $tgl_daftar_sampai = $val[tgl_selesai_thn] . "-" . $val[tgl_selesai_bln] . "-" . $val[tgl_selesai_tgl]; $q = " DATE(kk.tgl_daftar) BETWEEN '".$tgl_daftar_dari."' AND '".$tgl_daftar_sampai."' "; }elseif ($val[telp]){ $q = " p.telp LIKE '%".$val[telp]."%' "; } //$tgl_daftar_dari = $val[tgl_mulai_thn] . "-" . $val[tgl_mulai_bln] . "-" . $val[tgl_mulai_tgl]; //$tgl_daftar_sampai = $val[tgl_selesai_thn] . "-" . $val[tgl_selesai_bln] . "-" . $val[tgl_selesai_tgl]; $paging = new MyPagina; $paging->setOnclickValue("xajax.getFormValues('form_kunjungan')"); $sql = " SELECT k.id as id_kunjungan, kk.id as id_kunjungan_kamar, k.kunjungan_ke as kunjungan_ke, kk.no_antrian as no_antrian, CONCAT_WS('-', SUBSTRING(p.id, 1,2), SUBSTRING(p.id, 3,2), SUBSTRING(p.id, 5,2), SUBSTRING(p.id, 7,2)) as no_rm, p.id as pasien_id, p.nama as nama, pel.nama as pelayanan, kmr.nama as kamar, kk.tgl_daftar as tgl_daftar, kk.tgl_periksa as tgl_periksa, d.nama as dokter, kk.kelanjutan as kelanjutan, pel.jenis as jenis FROM kunjungan k JOIN pasien p ON (p.id = k.pasien_id) JOIN kunjungan_kamar kk ON (kk.kunjungan_id = k.id) JOIN kamar kmr ON (kmr.id = kk.kamar_id) JOIN pelayanan pel ON (pel.id = kmr.pelayanan_id) LEFT JOIN dokter d ON (d.id = kk.dokter_id) WHERE $q ORDER BY k.id DESC, kk.id ASC "; $paging->sql = $sql; $paging->rows_on_page = 20; $paging->hal = $hal; $paging->get_page_result(); $_SESSION[hal] = $hal; $data = $paging->data; $no = $paging->start_number(); $navi = $paging->navi(); $table = new Table; $table->tbody_height = 310; $table->anime_bg_color = ""; $table->addTh( "No", "No.<br />Kjg", "No. RM", "Pasien", "Kjg<br />Ke", "No<br />Antri", "Pelayanan", "Dokter", "Tgl<br />Daftar", "Tgl<br />Periksa", "Kunjungan <br/>Terakhir", "Kelanjutan", "Hapus" ); $table->addExtraTh("style=\"width:30px;\"","style=\"width:30px;\"","style=\"width:80px;\"","style=\"width:200px;\"","","","","","","","","style=\"width:70px;\""); for($i=0;$i<sizeof($data);$i++) { $kunj_sbl = $data[$i][kunjungan_ke]-1 ; $sql_kunjungan = "select kk.tgl_daftar as tgl_daftar from kunjungan k,pasien p, kunjungan_kamar kk where p.id = k.pasien_id and k.id = kk.kunjungan_id and p.id = '".$data[$i][pasien_id]."' and LAST_INSERT_ID(k.id) and k.kunjungan_ke ='".$kunj_sbl."' ORDER BY k.id DESC LIMIT 1"; $kon->sql = $sql_kunjungan; $kon->execute(); $k = $kon->getOne(); if (empty($k[tgl_daftar])): $tgl_daftar = '-'; else: $tgl_daftar = $k[tgl_daftar]; endif; if($data[$i][jenis] == 'RAWAT INAP') { $table->addExtraTr("style=\"background-color:#dcdcdc\""); } else $table->addExtraTr(); $table->addRow( ($no+$i), $data[$i][id_kunjungan], $data[$i][no_rm], $data[$i][nama], $data[$i][kunjungan_ke], $data[$i][no_antrian], $data[$i][kamar], $data[$i][dokter], tanggalIndo($data[$i][tgl_daftar], 'j M Y'), tanggalIndo($data[$i][tgl_periksa], 'j M Y'), $tgl_daftar, $data[$i][kelanjutan], "<a href=\"javascript:void(0)\" title=\"Hapus\" onclick=\"hapus_kunjungan_kamar('".$data[$i][id_kunjungan]."','".$data[$i][id_kunjungan_kamar]."', this)\" class=\"tombol_hapus\"><img src=\"".IMAGES_URL."remove.png\" alt=\"Hapus\" border=\"0\" /></a>"); if($data[$i][jenis] == 'RAWAT INAP') { //jika rawat inap, maka diedit $table->addOnclickTd( "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')", "xajax_buka_edit_ranap('".$data[$i][id_kunjungan_kamar]."', '".$data[$i-1][id_kunjungan_kamar]."')" ); } elseif($data[$i][kelanjutan] == "DIRAWAT" && $data[$i][pasien_id] == $data[$i+1][pasien_id] && $data[$i+1][jenis] == 'RAWAT INAP') { $table->addOnclickTd( "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')", "alert('Pasien sudah mendaftar rawat inap')" ); } else { $table->addOnclickTd( "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_ranap('".$data[$i][id_kunjungan_kamar]."')" ); } } $ret = $table->build(); $objResponse = new xajaxResponse(); //$objResponse->addAssign("debug", "innerHTML", $sql); $objResponse->addAssign("navi", "innerHTML", $navi); $objResponse->addAssign("list_data", "innerHTML", $ret); return $objResponse; }
function list_data($val) { unset($_SESSION[keuangan][lap_keuangan_bulanan]); //get data karcis dan BHP $objResponse = new xajaxResponse; $kon = new Konek; $title = "Laporan Keuangan Bulanan"; $title .= "\nTahun " . $val[tahun]; $sql = " SELECT MONTH(kw.tgl) as bulan, SUM(kb.mampu_bayar_bhp+kb.mampu_bayar_jasa) as bayar, CASE WHEN rk.cara_bayar IS NOT NULL THEN rk.cara_bayar WHEN lk.cara_bayar IS NOT NULL THEN lk.cara_bayar ELSE kk.cara_bayar END as cara_bayar, CASE WHEN rk.jenis_askes IS NOT NULL THEN rk.jenis_askes WHEN lk.jenis_askes IS NOT NULL THEN lk.jenis_askes ELSE kk.jenis_askes END as jenis_askes FROM kunjungan_bayar kb LEFT JOIN kunjungan_kamar kk ON (kk.id = kb.kunjungan_kamar_id) LEFT JOIN lab_kunjungan lk ON (lk.id = kb.lab_kunjungan_id) LEFT JOIN radio_kunjungan rk ON (rk.id = kb.radio_kunjungan_id) JOIN kwitansi kw ON (kw.id = kb.kwid) WHERE YEAR(kw.tgl) = '".$val[tahun]."' AND kb.kwid IS NOT NULL GROUP BY MONTH(kw.tgl), kk.cara_bayar, lk.cara_bayar, rk.cara_bayar, kk.jenis_askes, lk.jenis_askes, rk.jenis_askes ORDER BY MONTH(kw.tgl) "; //$objResponse->addAssign("debug", "innerHTML", nl2br($sql)); $kon->sql = $sql; $kon->execute(); $data = $kon->getAll(); $table = new Table; $table->cellspacing = "0"; $table->anime_bg_color = false; $table->addTh("No", "Bulan", "Cara Pembayaran", "Jumlah", "Kumulatif", "Target", "% Pendapatan", "% Kumulatif"); $table->addExtraTh("rowspan=\"2\"", "rowspan=\"2\"", "colspan=\"7\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\""); $table->addTh("Umum", "Jamsostek", "Dana Reksa Desa", "Kontrak", "Askeskin", "Askes Lain", "Lain-lain"); $table->addTh("1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14"); $new = array(); for($i=0;$i<sizeof($data);$i++) { if($data[$i][bulan] == $data[$i-1][bulan]) { if($data[$i][cara_bayar] == "UMUM") { $new[$data[$i][bulan]][UMUM] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "JAMSOSTEK") { $new[$data[$i][bulan]][JAMSOSTEK] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "DANA REKSA DESA") { $new[$data[$i][bulan]][DANA_REKSA_DESA] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "KONTRAK") { $new[$data[$i][bulan]][KONTRAK] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "ASKES"){ if($data[$i][jenis_askes] == "Askes Kin") { $new[$data[$i][bulan]][ASKESKIN] = $data[$i][bayar]; } else { $new[$data[$i][bulan]][ASKES_LAIN] = $data[$i][bayar]; } } else { $new[$data[$i][bulan]][LAIN] = $data[$i][bayar]; } $new[$data[$i][bulan]][JUMLAH] += $data[$i][bayar]; } else { if($data[$i][cara_bayar] == "UMUM") { $new[$data[$i][bulan]][UMUM] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "JAMSOSTEK") { $new[$data[$i][bulan]][JAMSOSTEK] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "DANA REKSA DESA") { $new[$data[$i][bulan]][DANA_REKSA_DESA] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "KONTRAK") { $new[$data[$i][bulan]][KONTRAK] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "ASKES"){ if($data[$i][jenis_askes] == "Askes Kin") { $new[$data[$i][bulan]][ASKESKIN] = $data[$i][bayar]; } else { $new[$data[$i][bulan]][ASKES_LAIN] = $data[$i][bayar]; } } else { $new[$data[$i][bulan]][LAIN] = $data[$i][bayar]; } $new[$data[$i][bulan]][JUMLAH] = $data[$i][bayar]; } } for($i=1;$i<13;$i++) { $bulan = bulanIndo($i, "F"); $kumulatif += $new[$i][JUMLAH]; $persen_pendapatan = @round($new[$i][JUMLAH]*100/$kumulatif,2); $persen_kumulatif = @round($kumulatif*100/$val["bulan_" . $i],2); $table->addRow( $i, $bulan, uangIndo($new[$i][UMUM], false), uangIndo($new[$i][JAMSOSTEK], false), uangIndo($new[$i][DANA_REKSA_DESA], false), uangIndo($new[$i][KONTRAK], false), uangIndo($new[$i][ASKESKIN], false), uangIndo($new[$i][ASKES_LAIN], false), uangIndo($new[$i][LAIN], false), uangIndo($new[$i][JUMLAH], false), uangIndo($kumulatif, false), uangIndo($val["bulan_" . $i], false), uangIndo($persen_pendapatan, false), uangIndo($persen_kumulatif) ); $table->addExtraTd( "", "", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"" ); $total[UMUM] += $new[$i][UMUM]; $total[JAMSOSTEK] += $new[$i][JAMSOSTEK]; $total[DANA_REKSA_DESA] += $new[$i][DANA_REKSA_DESA]; $total[KONTRAK] += $new[$i][KONTRAK]; $total[ASKESKIN] += $new[$i][ASKESKIN]; $total[ASKES_LAIN] += $new[$i][ASKES_LAIN]; $total[LAIN] += $new[$i][LAIN]; $total[JUMLAH] += $new[$i][JUMLAH]; $total[kumulatif] += $kumulatif; $total[target] += $val["bulan_" . $i]; $table->addExtraTr("onclick=\"setBg(this);\""); } $table->addTfoot( "TOTAL", uangIndo($total[UMUM], false), uangIndo($total[JAMSOSTEK], false), uangIndo($total[DANA_REKSA_DESA], false), uangIndo($total[KONTRAK], false), uangIndo($total[ASKESKIN], false), uangIndo($total[ASKES_LAIN], false), uangIndo($total[LAIN], false), uangIndo($total[JUMLAH], false), uangIndo($total[kumulatif], false), uangIndo($total[target], false), "-","-" ); $table->addExtraTfoot("colspan=\"2\""); $content = $table->build(); $judul = nl2br($title); //$objResponse->addAlert(print_r($new)); $objResponse->addAssign("title", "innerHTML", $judul); $objResponse->addAssign("list_data", "innerHTML", $content); $_SESSION[keuangan][lap_keuangan_bulanan][title] = $judul; $_SESSION[keuangan][lap_keuangan_bulanan][content] = $content; return $objResponse; }
function list_data($hal=0, $semua_pasien = "0", $val="") { if($_SESSION[pelayanan_id]) $s = " AND pel.id = '" .$_SESSION[pelayanan_id]. "'"; if($semua_pasien == "0") $s .= " AND kk.kelanjutan IS NULL"; else { $tgl_daftar_dari = $val[tgl_mulai_thn] . "-" . $val[tgl_mulai_bln] . "-" . $val[tgl_mulai_tgl]; $tgl_daftar_sampai = $val[tgl_selesai_thn] . "-" . $val[tgl_selesai_bln] . "-" . $val[tgl_selesai_tgl]; $s .= "AND DATE(kk.tgl_daftar) BETWEEN '".$tgl_daftar_dari."' AND '".$tgl_daftar_sampai."'"; } $paging = new MyPagina; $paging->setOnclickValue("'".$semua_pasien."'", "xajax.getFormValues('form_kunjungan')"); $sql = " SELECT k.id as id_kunjungan, kk.id as id_kunjungan_kamar, k.kunjungan_ke as kunjungan_ke, kk.no_antrian as no_antrian, CONCAT_WS('-', SUBSTRING(p.id, 1,2), SUBSTRING(p.id, 3,2), SUBSTRING(p.id, 5,2), SUBSTRING(p.id, 7,2)) as no_rm, p.id as pasien_id, p.nama as nama, pel.nama as pelayanan, kmr.nama as kamar, kmr.kelas as kelas, kk.tgl_daftar as tgl_daftar, kk.tgl_keluar as tgl_keluar, d.nama as dokter, kk.kelanjutan as kelanjutan, rk.nomor as no_kamar FROM kunjungan k JOIN pasien p ON (p.id = k.pasien_id) JOIN kunjungan_kamar kk ON (kk.kunjungan_id = k.id) JOIN ref_kamar rk ON (rk.id = kk.no_kamar) JOIN kamar kmr ON (kmr.id = kk.kamar_id) JOIN pelayanan pel ON (pel.id = kmr.pelayanan_id) LEFT JOIN dokter d ON (d.id = kk.dokter_id) WHERE pel.jenis = 'RAWAT INAP' $s ORDER BY kmr.nama, d.nama, kk.no_antrian "; $paging->sql = $sql; $paging->rows_on_page = 20; $paging->hal = $hal; $paging->get_page_result(); $_SESSION[hal] = $hal; $data = $paging->data; $no = $paging->start_number(); $navi = $paging->navi(); $table = new Table; $table->tbody_height = 270; //$table->anime_bg_color = ""; $table->addTh( "No", "No.<br />Kjg", "No. RM", "Pasien", "Kamar", "Dokter", "Tgl<br />Masuk", "Tgl<br />Keluar", "Kelanjutan" /*,"Hapus"*/ ); $table->addExtraTh("style=\"width:30px;\"","style=\"width:30px;\"","style=\"width:80px;\"","style=\"width:200px;\"","","","","","",""/*,"style=\"width:70px;\""*/); $kon = new Konek; for($i=0;$i<sizeof($data);$i++) { /* id kelanjutan == 'PINDAH KAMAR' adalah kelanjutan pindah kamar jika id kelanjutan == 'PINDAH KAMAR' maka diedit, jika diedit, maka harus membawa id child yang merupakan pindahan dari kamar tersebut jika id kelanjutan != 'PINDAH KAMAR' maka ditambah */ if($data[$i][kelanjutan] == "PINDAH KAMAR") { $table->addExtraTr(); $table->extra_td[$i][] = ""; $table->extra_td[$i][] = "style=\"background-color:#dcdcdc\""; $table->extra_td[$i][] = "style=\"background-color:#dcdcdc\""; $table->extra_td[$i][] = "style=\"background-color:#dcdcdc\""; $table->extra_td[$i][] = "style=\"background-color:#dcdcdc\""; $table->extra_td[$i][] = "style=\"background-color:#dcdcdc\""; $table->extra_td[$i][] = "style=\"background-color:#dcdcdc\""; $table->extra_td[$i][] = "style=\"background-color:#dcdcdc\""; $table->extra_td[$i][] = "style=\"background-color:#dcdcdc\""; } else $table->addExtraTr(); $table->addRow( ($no+$i), $data[$i][id_kunjungan], $data[$i][no_rm], $data[$i][nama], $data[$i][kamar], $data[$i][dokter], tanggalIndo($data[$i][tgl_daftar], 'j M Y') . "<br>" . tanggalIndo($data[$i][tgl_daftar], 'H:i'), tanggalIndo($data[$i][tgl_keluar], 'j M Y') . "<br>" . tanggalIndo($data[$i][tgl_keluar], 'H:i'), $data[$i][kelanjutan] /*"<input type=\"button\" value=\"[ x ]\" name=\"hapus\" class=\"inputan\" onclick=\"xajax_hapus_kunjungan_kamar_confirm('".$data[$i][id_kunjungan]."','".$data[$i][id_kunjungan_kamar]."', this)\" />"*/ ); if($data[$i][kelanjutan] == "PINDAH KAMAR") { //maka diedit /* mendapatkan kunjungan kamar setelah dipindah dengan parent id = id_kunjungan_kamar untuk diedit */ $kon->sql = " SELECT id FROM kunjungan_kamar WHERE parent_id = '".$data[$i][id_kunjungan_kamar]."' "; $kon->execute(); $stl_pindah = $kon->getOne(); $table->addOnclickTd( "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')", "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')", "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')", "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')", "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')", "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')", "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')", "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')", "xajax_buka_edit_pindah_kamar('".$data[$i][id_kunjungan_kamar]."', '".$stl_pindah[id]."')" ); } else { $table->addOnclickTd( "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')", "xajax_buka_daftar_pindah_kamar('".$data[$i][id_kunjungan_kamar]."')" ); } } $ret = $table->build(); $objResponse = new xajaxResponse(); //$objResponse->addAssign("debug", "innerHTML", $sql); $objResponse->addAssign("navi", "innerHTML", $navi); $objResponse->addAssign("list_data", "innerHTML", $ret); return $objResponse; }
function list_data($val, $check = '0') { if($check == '1') $str = "AND DATE(trc.tgl_keluar) = '".$val[tgl_keluar_thn]."-".$val[tgl_keluar_bln]."-".$val[tgl_keluar_tgl]."'"; $kon = new Konek; $sql = " SELECT kk.id as kkid, trc.id as trcid, CONCAT_WS('-', SUBSTRING(p.id, 1,2), SUBSTRING(p.id, 3,2), SUBSTRING(p.id, 5,2), SUBSTRING(p.id, 7,2)) as no_rm, p.id as pasien_id, p.nama as nama, kmr.nama as kamar, trc.peminjam as peminjam, trc.keperluan as keperluan, trc.tgl_keluar as tgl_keluar FROM tracer trc JOIN pasien p ON (p.id = trc.pasien_id) LEFT JOIN kunjungan_kamar kk ON (kk.id = trc.kunjungan_kamar_id) LEFT JOIN kamar kmr ON (kmr.id = kk.kamar_id) WHERE trc.tgl_kembali IS NULL $str ORDER BY trc.id "; $kon->sql = $sql; $kon->execute(); $data = $kon->getAll(); $table = new Table; $table->tbody_height = 340; $table->anime_bg_color = ""; $table->addTh( "No", "No. RM", "Pasien", "Pelayanan/<br />Peminjam", "Keperluan", "Tgl<br />Berkas Keluar", "Kembalikan", "Cetak<br />Tracer" ); $table->addExtraTh("style=\"width:50px;\"","style=\"width:80px;\"","style=\"width:200px;\"","","","","style=\"width:50px;\"","style=\"width:50px;\""); for($i=0;$i<sizeof($data);$i++) { if(($i+1) == sizeof($data)) $cekbox = "<input type=\"checkbox\" name=\"kembalikan[]\" id=\"kembalikan_".$i."\" class=\"inputan\" onkeypress=\"focusNext('tgl_kembali_tgl', event, 'kembalikan_".($i-1)."', this)\" onclick=\"setKembalikan('tr_".$i."', this)\" value=\"".$data[$i][trcid]."\" />"; elseif($i==0) $cekbox = "<input type=\"checkbox\" name=\"kembalikan[]\" id=\"kembalikan_".$i."\" class=\"inputan\" onkeypress=\"focusNext('kembalikan_".($i+1)."', event, 'simpan', this)\" onclick=\"setKembalikan('tr_".$i."', this)\" value=\"".$data[$i][trcid]."\" />"; else $cekbox = "<input type=\"checkbox\" name=\"kembalikan[]\" id=\"kembalikan_".$i."\" class=\"inputan\" onkeypress=\"focusNext('kembalikan_".($i+1)."', event, 'kembalikan_".($i-1)."', this)\" onclick=\"setKembalikan('tr_".$i."', this)\" value=\"".$data[$i][trcid]."\" />"; if($data[$i][kkid]) $link = "<a href=\"javascript:void(0)\" title=\"Cetak ini saja\" style=\"display:block;\" onclick=\"cetak('".URL."filing/cetak_tracer_cetak/?kkid=".$data[$i][kkid]."',350,300)\"><img src=\"".IMAGES_URL."printer_hitam.png\" alt=\"Cetak\" border=\"0\" /></a>"; else $link = "<a href=\"javascript:void(0)\" title=\"Cetak ini saja\" style=\"display:block;\" onclick=\"cetak('".URL."filing/cetak_tracer_cetak/?trcid=".$data[$i][trcid]."',350,300)\"><img src=\"".IMAGES_URL."printer_hitam.png\" alt=\"Cetak\" border=\"0\" /></a>"; $table->addRow( ($i+1), $data[$i][no_rm], $data[$i][nama], $data[$i][kamar] . $data[$i][peminjam], $data[$i][keperluan], tanggalIndo($data[$i][tgl_keluar], 'j M Y'), $cekbox, $link); /* $table->addOnclickTd( "xajax_list_semua_kunjungan('0', '".$data[$i][pasien_id]."')", "xajax_list_semua_kunjungan('0', '".$data[$i][pasien_id]."')", "xajax_list_semua_kunjungan('0', '".$data[$i][pasien_id]."')", "xajax_list_semua_kunjungan('0', '".$data[$i][pasien_id]."')", "xajax_list_semua_kunjungan('0', '".$data[$i][pasien_id]."')", "xajax_list_semua_kunjungan('0', '".$data[$i][pasien_id]."')" ); */ $table->addExtraTr("id=\"tr_".$i."\""); } $ret = $table->build(); $objResponse = new xajaxResponse(); //$objResponse->addAssign("debug", "innerHTML", $auto); $objResponse->addAssign("navi", "innerHTML", $navi); $objResponse->addAssign("list_data", "innerHTML", $ret); $objResponse->addAssign("jml_baris", "value", $i); return $objResponse; }
function list_data($val) { unset($_SESSION[keuangan][lap_keuangan_bulanan]); //get data karcis dan BHP $objResponse = new xajaxResponse; $kon = new Konek; $title = "Laporan Keuangan Per Pelayanan"; $title .= "\nPeriode " . tanggalIndo($val[thn_start] . "-" . $val[bln_start] . "-" . $val[tgl_start], "j F Y") . " - " . tanggalIndo($val[thn_end] . "-" . $val[bln_end] . "-" . $val[tgl_end], "j F Y"); $sql = " SELECT CASE WHEN kb.lab_kunjungan_id IS NOT NULL THEN 'LAB' WHEN kb.radio_kunjungan_id IS NOT NULL THEN 'RADIO' ELSE pel.id END as id_pelayanan, CASE WHEN kb.lab_kunjungan_id IS NOT NULL THEN 'Laboratorium' WHEN kb.radio_kunjungan_id IS NOT NULL THEN 'Radiologi' WHEN pel.jenis = 'IGD' THEN 'IRD' ELSE CONCAT_WS(' - ', pel.jenis, pel.nama) END as nama_pelayanan, SUM(kb.mampu_bayar_bhp+kb.mampu_bayar_jasa) as bayar, CASE WHEN rk.cara_bayar IS NOT NULL THEN rk.cara_bayar WHEN lk.cara_bayar IS NOT NULL THEN lk.cara_bayar ELSE kk.cara_bayar END as cara_bayar, CASE WHEN rk.jenis_askes IS NOT NULL THEN rk.jenis_askes WHEN lk.jenis_askes IS NOT NULL THEN lk.jenis_askes ELSE kk.jenis_askes END as jenis_askes FROM kunjungan_bayar kb LEFT JOIN kunjungan_kamar kk ON (kk.id = kb.kunjungan_kamar_id) LEFT JOIN kamar kmr ON (kmr.id = kk.kamar_id) LEFT JOIN pelayanan pel ON (pel.id = kmr.pelayanan_id) LEFT JOIN lab_kunjungan lk ON (lk.id = kb.lab_kunjungan_id) LEFT JOIN radio_kunjungan rk ON (rk.id = kb.radio_kunjungan_id) JOIN kwitansi kw ON (kw.id = kb.kwid) WHERE DATE(kw.tgl) BETWEEN '".$val[thn_start]."-".$val[bln_start]."-".$val[tgl_start]."' AND '".$val[thn_end]."-".$val[bln_end]."-".$val[tgl_end]."' AND kb.kwid IS NOT NULL GROUP BY id_pelayanan, kk.cara_bayar, lk.cara_bayar, rk.cara_bayar, kk.jenis_askes, lk.jenis_askes, rk.jenis_askes ORDER BY 1 "; //$objResponse->addAssign("debug", "innerHTML", nl2br($sql)); $kon->sql = $sql; $kon->execute(); $data = $kon->getAll(); $table = new Table; $table->cellspacing = "0"; $table->anime_bg_color = false; $table->addTh("No", "Pelayanan", "Cara Pembayaran", "Jumlah"); $table->addExtraTh("rowspan=\"2\"", "rowspan=\"2\"", "colspan=\"7\"", "rowspan=\"2\""); $table->addTh("Umum", "Jamsostek", "Dana Reksa Desa", "Kontrak", "Askeskin", "Askes Lain", "Lain-lain"); $table->addTh("1", "2", "3", "4", "5", "6", "7", "8", "9", "10"); $new = array(); $s = 0; for($i=0;$i<sizeof($data);$i++) { if($data[$i][id_pelayanan] == $data[$i-1][id_pelayanan]) { if($data[$i][cara_bayar] == "UMUM") { $new[$s][UMUM] += $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "JAMSOSTEK") { $new[$s][JAMSOSTEK] += $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "DANA REKSA DESA") { $new[$s][DANA_REKSA_DESA] += $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "KONTRAK") { $new[$s][KONTRAK] += $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "ASKES"){ if($data[$i][jenis_askes] == "Askes Kin") { $new[$s][ASKESKIN] += $data[$i][bayar]; } else { $new[$s][ASKES_LAIN] += $data[$i][bayar]; } } else { $new[$s][LAIN] += $data[$i][bayar]; } $new[$s][JUMLAH] += $data[$i][bayar]; } else { if($i !=0 ) $s++; $new[$s][nama_pelayanan] = $data[$i][nama_pelayanan]; if($data[$i][cara_bayar] == "UMUM") { $new[$s][UMUM] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "JAMSOSTEK") { $new[$s][JAMSOSTEK] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "DANA REKSA DESA") { $new[$s][DANA_REKSA_DESA] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "KONTRAK") { $new[$s][KONTRAK] = $data[$i][bayar]; } elseif($data[$i][cara_bayar] == "ASKES"){ if($data[$i][jenis_askes] == "Askes Kin") { $new[$s][ASKESKIN] = $data[$i][bayar]; } else { $new[$s][ASKES_LAIN] = $data[$i][bayar]; } } else { $new[$s][LAIN] = $data[$i][bayar]; } $new[$s][JUMLAH] = $data[$i][bayar]; } } for($i=0;$i<sizeof($new);$i++) { $table->addRow( ($i+1), $new[$i][nama_pelayanan], uangIndo($new[$i][UMUM], false), uangIndo($new[$i][JAMSOSTEK], false), uangIndo($new[$i][DANA_REKSA_DESA], false), uangIndo($new[$i][KONTRAK], false), uangIndo($new[$i][ASKESKIN], false), uangIndo($new[$i][ASKES_LAIN], false), uangIndo($new[$i][LAIN], false), uangIndo($new[$i][JUMLAH], false) ); $table->addExtraTd( "", "", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"", "style=\"text-align:right\"" ); $total[UMUM] += $new[$i][UMUM]; $total[JAMSOSTEK] += $new[$i][JAMSOSTEK]; $total[DANA_REKSA_DESA] += $new[$i][DANA_REKSA_DESA]; $total[KONTRAK] += $new[$i][KONTRAK]; $total[ASKESKIN] += $new[$i][ASKESKIN]; $total[ASKES_LAIN] += $new[$i][ASKES_LAIN]; $total[LAIN] += $new[$i][LAIN]; $total[JUMLAH] += $new[$i][JUMLAH]; $table->addExtraTr("onclick=\"setBg(this);\""); } $table->addTfoot( "TOTAL", uangIndo($total[UMUM], false), uangIndo($total[JAMSOSTEK], false), uangIndo($total[DANA_REKSA_DESA], false), uangIndo($total[KONTRAK], false), uangIndo($total[ASKESKIN], false), uangIndo($total[ASKES_LAIN], false), uangIndo($total[LAIN], false), uangIndo($total[JUMLAH], false) ); $table->addExtraTfoot("colspan=\"2\""); $content = $table->build(); $judul = nl2br($title); //$objResponse->addAlert(print_r($new)); $objResponse->addAssign("title", "innerHTML", $judul); $objResponse->addAssign("list_data", "innerHTML", $content); $_SESSION[keuangan][lap_keuangan_bulanan][title] = $judul; $_SESSION[keuangan][lap_keuangan_bulanan][content] = $content; return $objResponse; }