function list_semua_kunjungan($hal, $pasien_id) {
$paging = new MyPagina;
$paging->hal = $hal;
$paging->rows_on_page = 5;
$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,
kmr.nama as kamar,
kk.tgl_periksa as tgl_periksa,
d.nama as nama_dokter
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)
LEFT JOIN dokter d ON (d.id = kk.dokter_id)
WHERE
p.id = '".$pasien_id."'
ORDER BY
kk.id ASC
";
$paging->sql = $sql;
$paging->onclick_func = "xajax_list_semua_kunjungan";
$paging->setOnclickValue($pasien_id);
$paging->get_page_result();
$data = $paging->data;
$no = $paging->start_number();
$navi = $paging->navi();
$objResponse = new xajaxResponse();
//$objResponse->addAssign('debug', 'innerHTML', $sql);
$objResponse->addScriptCall("buka_semua_kunjungan");
$ret .= "<br /><b>No.RM : " . $data[0][no_rm] . "</b>";
$ret .= "<br /><b>Pasien : " . $data[0][nama] . "</b>";
$ret .= "<hr />";
for($i=0;$i<sizeof($data);$i++) {
$ret .= "<table cellpadding=\"0\" cellspacing=\"2\" border=\"0\">";
$ret .= "<tr><td colspan=\"2\"><b>Kunjungan Ke-" . $data[$i][kunjungan_ke] ."</b></td></tr>";
$ret .= "<tr><td style=\"width:150px\">Tanggal Kunjung</td><td>" . tanggalIndo($data[$i][tgl_periksa], "j F Y") . "</td></tr>";
$ret .= "<tr><td>Pelayanan</td><td>" . $data[$i][kamar] . "</td></tr>";
$ret .= "<tr><td>Dokter</td><td>" . $data[$i][nama_dokter] . "</td></tr>";
$ret .= "</table>";
$ret .= "<hr />";
}
$modal = new Modal;
$modal->setNavi($navi);
$modal->setTitle("Daftar Kunjungan");
$modal->setContent($ret);
$modal->setCloseButtonOnclick("tutup_semua_kunjungan()");
$modal_cnt = $modal->build();
//$objResponse->addAssign("list_semua_kunjungan_navi", "innerHTML", $navi);
$objResponse->addAssign("list_semua_kunjungan", "innerHTML", $modal_cnt);
return $objResponse;
}
