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;
}
public static function import()
{
$source_http = PHPWS_SOURCE_HTTP;
$script = "<script src='{$source_http}mod/rss/javascript/feed.js'></script>";
javascript('jquery');
\Layout::addJSHeader($script);
PHPWS_Core::requireConfig('rss');
if (!ini_get('allow_url_fopen')) {
$tpl['TITLE'] = dgettext('rss', 'Sorry');
$tpl['CONTENT'] = dgettext('rss', 'You must enable allow_url_fopen in your php.ini file.');
return $tpl;
}
PHPWS_Core::initCoreClass('DBPager.php');
PHPWS_Core::initModClass('rss', 'Feed.php');
$content = NULL;
$template['ADD_LINK'] = '<button class="btn btn-success edit-feed"><i></i> Add Feed</button>';
/*
$vars['address'] = 'index.php?module=rss&command=add_feed';
$vars['label'] = dgettext('rss', 'Add feed');
$vars['width'] = '450';
$vars['height'] = '350';
$template['ADD_LINK'] = javascript('open_window', $vars);
*
*/
$template['TITLE_LABEL'] = dgettext('rss', 'Title');
$template['ADDRESS_LABEL'] = dgettext('rss', 'Address');
$template['DISPLAY_LABEL'] = dgettext('rss', 'Display?');
$template['ACTION_LABEL'] = dgettext('rss', 'Action');
$template['REFRESH_TIME_LABEL'] = dgettext('rss', 'Refresh feed');
$modal = new \Modal('rss-modal');
$modal->addButton('<button class="btn btn-primary" id="save-feed"><i class="fa fa-save"></i> Save</button>');
$modal_content = RSS_Admin::editFeed();
$modal->setContent($modal_content);
$modal->setTitle('Edit feed');
$modal->setWidthPixel('400');
$template['MODAL'] = $modal->get();
$pager = new DBPager('rss_feeds', 'RSS_Feed');
$pager->setModule('rss');
$pager->setTemplate('admin_feeds.tpl');
$pager->addPageTags($template);
$pager->addRowTags('pagerTags');
$content = $pager->get();
$tpl['TITLE'] = dgettext('rss', 'Import RSS Feeds');
$tpl['CONTENT'] = $content;
if (!defined('ALLOW_CACHE_LITE') || !ALLOW_CACHE_LITE) {
$tpl['MESSAGE'] = dgettext('rss', 'Please enable Cache Lite in your config/core/config.php file.');
}
return $tpl;
}
function buka_tbi($idkk) {
unset($_SESSION[ranap][kunjungan][jasa_cetak]);
$kon = new Konek;
//$kon->debug = 1;
$objResponse = new xajaxResponse;
//get data pasien
$kon->sql = "
SELECT
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,
p.nama as nama,
p.tgl_lahir as tgl_lahir,
CONCAT(p.alamat, ' ', IF(p.rt = '','',CONCAT(' RT ', p.rt)), IF(p.rw = '','',CONCAT(' RW ', p.rw)), ', ', des.nama, ', ', kec.nama, ', ', kab.nama) as alamat,
kk.tgl_periksa as tgl_periksa,
pel.nama as nama_pelayanan,
p.sex as jk,
kk.cara_bayar as cara_bayar,
kk.jenis_askes as jenis_askes,
kk.nomor as nomor
FROM
kunjungan_kamar kk
JOIN kunjungan k ON (k.id = kk.kunjungan_id)
JOIN pasien p ON (p.id = k.pasien_id)
JOIN kamar kmr ON (kmr.id = kk.kamar_id)
JOIN pelayanan pel ON (pel.id = kmr.pelayanan_id)
JOIN ref_desa des ON (des.id = p.desa_id)
JOIN ref_kecamatan kec ON (kec.id = des.kecamatan_id)
JOIN ref_kabupaten kab ON (kab.id = kec.kabupaten_id)
JOIN ref_propinsi prop ON (prop.id = kab.propinsi_id)
WHERE
kk.id = '".$idkk."'
GROUP BY
p.id
";
$kon->execute();
$data_pasien = $kon->getOne();
$arr_usia = hitungUmur($data_pasien[tgl_lahir], $data_pasien[tgl_periksa]);
$usia = empty($arr_usia[tahun])?"":$arr_usia[tahun] . " thn ";
$usia .= empty($arr_usia[bulan])?"":$arr_usia[bulan] . " bln ";
$usia .= empty($arr_usia[hari])?"":$arr_usia[hari] . " hr ";
$tabel = new Table;
$tabel->scroll = false;
$tabel->css_table = "";
$tabel->cellspacing = "5";
$tabel->anime_bg_color = "";
$tabel->extra_table = "style=\"width:10cm;\"";
$tabel->addRow("Bangsal", $data_pasien[nama_pelayanan]);
$tabel->addExtraTd("style=\"width:3cm\"");
$tabel->addRow("No. RM", $data_pasien[id_display]);
$tabel->addRow("Nama", $data_pasien[nama]);
$tabel->addRow("Usia", $usia);
$tabel->addRow("Jenis Kelamin", $data_pasien[jk]);
$tabel->addRow("Alamat", $data_pasien[alamat]);
$tabel->addRow("Tgl Periksa", tanggalIndo($data_pasien[tgl_periksa], 'j F Y'));
$tabel->addRow("Cara Pembayaran", $data_pasien[cara_bayar]);
$tabel->addRow("Jenis Askes", empty($data_pasien[jenis_askes])?"-":$data_pasien[jenis_askes]);
$tabel->addRow("Nomor", empty($data_pasien[nomor])?"-":$data_pasien[nomor]);
$tabel_pasien = $tabel->build();
$tabel = new Table;
$tabel->scroll = false;
$tabel->extra_table = "style=\"width:10cm;\"";
$tabel->addTh("No", "Jasa", "Harga");
$tabel->addExtraTh("style=\"width:0.7cm;\"", "style=\"width:6.5cm;\"", "");
//get data tindakan
$kon->sql = "
SELECT
CONCAT(i.kode, ' - ', i.nama) as nama
FROM
icopim i
JOIN kunjungan_kamar_icopim kki ON (kki.icopim_id = i.id)
JOIN kunjungan_kamar kk ON (kk.id = kki.kunjungan_kamar_id)
WHERE
kk.id = '".$idkk."'
GROUP BY
kki.id
";
$kon->execute();
$data_tindakan = $kon->getAll();
if(!empty($data_tindakan)) {
$tabel->addRow("","<b>Tindakan</b>","");
for($i=0;$i<sizeof($data_tindakan);$i++) {
$tabel->addRow(
($i+1),
" - " . $data_tindakan[$i][nama],
""
);
}
}
//get data bhp
$kon->sql = "
SELECT
b.nama as nama
FROM
bhp b
JOIN kunjungan_kamar_bhp kkb ON (kkb.bhp_id = b.id)
JOIN kunjungan_kamar kk ON (kk.id = kkb.kunjungan_kamar_id)
WHERE
kk.id = '".$idkk."'
GROUP BY
kkb.id
";
$kon->execute();
$data_bhp = $kon->getAll();
if(!empty($data_bhp)) {
$tabel->addRow("","<b>Bahan Habis Pakai</b>","");
for($i=0;$i<sizeof($data_bhp);$i++) {
$tabel->addRow(
($i+1),
" - " . $data_bhp[$i][nama],
""
);
}
}
//get data imunisasi
$kon->sql = "
SELECT
im.nama as nama
FROM
imunisasi im
JOIN kunjungan_kamar_imunisasi kkim ON (kkim.imunisasi_id = im.id)
JOIN kunjungan_kamar kk ON (kk.id = kkim.kunjungan_kamar_id)
WHERE
kk.id = '".$idkk."'
GROUP BY
kkim.id
";
$kon->execute();
$data_imunisasi = $kon->getAll();
if(!empty($data_imunisasi)) {
$tabel->addRow("","<b>Imunisasi</b>","");
for($i=0;$i<sizeof($data_imunisasi);$i++) {
$tabel->addRow(
($i+1),
" - " . $data_imunisasi[$i][nama],
""
);
}
}
$tabel->addRow("","<b>Total</b>","");
$tabel_jasa = $tabel->build();
$modal = new Modal;
$modal->cetak_lebar = 400;
$modal->cetak_tinggi = 600;
$modal->setTitle("Daftar Pemberian Tindakan, BHP, dan Imunisasi");
$modal->setContent($tabel_pasien);
$modal->setContent($tabel_jasa);
$modal->setCloseButtonOnclick("tutup_daftar_tbi()");
$modal->setPrintButtonUrl(URL . "ranap/kunjungan_jasa_cetak/");
$modal_cnt = $modal->build();
$_SESSION[ranap][kunjungan][jasa_cetak] = $tabel_pasien . $tabel_jasa;
$objResponse->addClear("list_daftar_tbi", "style.display");
$objResponse->addAssign("list_daftar_tbi", "innerHTML", $modal_cnt);
return $objResponse;
}
