load(); // Aplikasi Billing 2000 function billing_api($url = '',$method = 'GET',$object_only = false, $body = '') { $main_url = $_ENV['BILLING_DB_URL']; $url_request = $main_url.$url; if($method == 'GET') { $content_type = 'application/json; charset=utf-8'; } elseif($method == 'POST' || $method == 'PUT') { $content_type = 'application/x-www-form-urlencoded'; } $client = new GuzzleHttp\Client(); $request = new Request( $method, // GET,POST,PUT $url_request, // URL [ 'Accept' => 'application/json', 'Content-type' => $content_type ], $body // Post / Put Body (text) ); $obj_request = $client->send($request); if($method == 'GET') { $json_request = ($obj_request->getStatusCode() == 200) ? $obj_request->getBody()->getContents() : []; } elseif($method == 'POST' || $method == 'PUT') { $json_request = ($obj_request->getStatusCode() == 201) ? $obj_request->getBody()->getContents() : []; } if($object_only == TRUE) { return $json_request; } else { // echo (array) json_decode($json_request); return $json_request; } } function mr_jk($jk) { return ($jk == 'L') ? 'PRIA' : 'WANITA'; } function mr_kelurahan($string) { return preg_replace("/Kelurahan/i", "", $string); } function mr_kec($string) { return preg_replace("/Kecamatan/i", "", $string); } function mr_kabkota($string) { if(preg_match("/Kabupaten/i", $string)) { $kabupaten = preg_replace("/Kabupaten|Kota/i", "", $string); $kota = ''; } elseif(preg_match("/Kota/i", $string)) { $kota = preg_replace("/Kabupaten|Kota/i", "", $string); $kabupaten = ''; } return ['kab'=>$kabupaten,'kota'=>$kota]; } function mr_jenisbayar($jb) { if($jb == 'JKN' || $jb == 'JKMM' || $jb == 'SPM') { $cb = 'ASKES'.$jb; } elseif($jb == 'PKS' || $jb == 'UMUM') { $cb = $jb; } return $cb; } function mr_status($string) { return strtoupper($string); } function mr_pendidikan($string) { if(preg_match("/SD/i", $string)) { return 'SD'; } elseif(preg_match("/SLTP/i", $string)) { return 'SMP'; } elseif(preg_match("/SMA/i", $string)) { return 'SMU'; } elseif(preg_match("/D3/i", $string)) { return 'SARJANA'; } elseif(preg_match("/Universitas/i", $string)) { return 'SARJANA'; } elseif(preg_match("/Tidak/i", $string)) { return 'TIDAK SEKOLAH'; } } function mr_subsistem($string) { if(preg_match("/UTAMA|EKSEKUTIF/", $string)) { return 'POLIPU'; } elseif(preg_match("/REGULER/", $string)) { return 'POLI'; } elseif(preg_match("/EMERGENCY/", $string)) { return 'TRIAGE'; } } function mr_caramasuk($string,$sistem) { if(preg_match("/PUSKESMAS/", $string)) { if($sistem == 'IRJA') { return 'PKMIRJA'; } elseif($sistem == 'IRD') { return 'PKMIRD'; } } elseif(preg_match("/RUMAH/", $string)) { if($sistem == 'IRJA') { return 'RSLIRJA'; } elseif($sistem == 'IRD') { return 'RSUIRD'; } } elseif(preg_match("/DOKTER/", $string)) { if($sistem == 'IRJA') { return 'DRUIRJA'; } elseif($sistem == 'IRD') { return 'DRUIRD'; } } elseif($string == 'TR') { if($sistem == 'IRJA') { return 'DSIRJA'; } elseif($sistem == 'IRD') { return 'DSIRD'; } } } function mr_ruangan($ruang,$jeniskelamin) { $arr_relation = [ 'DALAM'=>['L'=>'DP','P'=>'DW'], 'ANAK'=>'IKA', 'BEDAH'=>'BDH', 'GIGI dan MULUT'=>'GIMU', 'PSIKIATRI' => 'PSY', 'ANESTESI' => 'ANAS', 'IGD'=>'P1', 'RADIOTERAPI'=>'RJRADT', 'THT' => 'THT', 'MATA' => 'MATA', 'PARU' => 'PARU', 'JANTUNG' => 'CARDIO', 'KULIT' => 'KK', 'REHAB MEDIK' => 'REMED', 'SARAF' => 'NEUR', 'GIZI'=>'GIZI', 'OBG'=>'OBG', 'ONKOLOGI'=>'ONKOT', 'KOMPLEMENTER'=>'KOMP', 'GCU'=>'GCU', 'HEMATO-ONKOLOGI'=>'HOAM' ]; if($ruang != 'DALAM') { return $arr_relation[$ruang]; } else { return $arr_relation[$ruang][$jeniskelamin]; } } function mr_jeniskelas($ruang) { } function increment($num) { return ((int) ($num)+1); } $nomr = $_REQUEST['nomr']; $idxdaftar = $_REQUEST['idxdaftar']; $simpan_mr = $_REQUEST['simpan_mr']; echo '
'; echo $bootstrap_css; echo $fontawesome_css; echo $datatable_bootstrap4_css; echo $select2_css; echo ''; echo ' '; if($nomr != '' && $idxdaftar != '' && $simpan_mr == null) { $myquery = "SELECT a.nomr,a.kdpoly,a.kddokter,a.masukpoly,a.keluarpoly,e.namadokter,a.tglreg,b.nama,b.alamat,b.jeniskelamin,b.tgllahir,c.nama as carabayar, a.idxdaftar, d.nama as poly, e.namadokter,a.kdcarabayar, a.subspesialis, a.kelas_daftar, a.kdrujuk, (select nobill from t_billrajal where idxdaftar = a.idxdaftar and nomr = a.nomr limit 1) as nobill,st_pelayanan,b.notelp,kel.namakelurahan as txt_kelurahan,kec.namakecamatan as txt_kecamatan,kot.namakota as txt_kota,b.txt_provinsi,b.txt_status,UPPER(b.txt_agama) as txt_agama,b.txt_pendidikan,upper(b.kebangsaan) as kebangsaan,upper(b.suku) as suku,b.pekerjaan,b.noktp,k.st_pekerjaan,a.st_asal_masuk,r.alias as rujuk_dari,a.ketrujuk,a.catatan as keluhan,a.jamreg FROM t_pendaftaran a join m_pasien b on a.nomr = b.nomr join m_carabayar c on a.kdcarabayar = c.kode join m_ruang d on a.kdpoly = d.no left join m_dokter e on a.kddokter = e.kddokter left join m_pekerjaan k on b.pekerjaan = k.nmpekerjaan left join m_rujukan r on a.kdrujuk = r.kode left join m_kelurahan kel on b.kelurahan = kel.idkelurahan left join m_kecamatan kec on b.kdkecamatan = kec.idkecamatan left join m_kota kot on b.kota = kot.idkota where a.idxdaftar = $idxdaftar"; $get = $db->query($myquery); $userdata = $get->fetchFirst(); $a = datediff($userdata['tgllahir'], date("Y-m-d")); if(mr_subsistem($userdata['st_asal_masuk']) == 'TRIAGE') { $sistem_masuk = 'IRD'; } else { $sistem_masuk = 'IRJA'; } $last_mutasi = json_decode(billing_api('lastmutasi')); $idmr_mutasi = increment($last_mutasi[0]->Idmr_Mutasipasien); $last_tempat = json_decode(billing_api('lasttempat')); $idmr_tempat = increment($last_tempat[0]->IdMr_tempatlayanan); $idmr_ruang = mr_ruangan($userdata['poly'],$userdata['jeniskelamin']); $tmp_ruang = json_decode(billing_api('ruangan/'.$idmr_ruang)); $idmr_jeniskelas = $tmp_ruang[0]->idmr_jeniskelas; echo '