Bridging INA-CBG5 SIMRS dengan visual basic 6 dan PHP (PART 2)
Postingan ini adalah lanjutan dari Bridging INA-CBG5 SIMRS dengan visual basic 6 dan PHP (PART 1).
Kembali ke pembahasan sebelumnya. Postingan ini ada 3 part.
Sekarang kita mencoba memanggil service-service yang sudah kita buat di PHP dengan Rest Client.
Rest Client adalah software yang digunakan untuk melakukan test pada Web Api/Web Service.
Kalau kamu suka aplikasi desktop kamu bisa mendownload insomnia. Kalau saya suka memakai Advanced Rest Client. Advanced Rest Client adalah ekstention dari Google Chrome. Google Chrome adalah browser buatan Google. Google adalah mesin pencari terpopuler.
Web service yang kita buat kemarin menggunakan method "POST". Kenapa? karena dengan method "POST " kita lebih mudah melempar parameter dari aplikasi kita ke Web Service.
Tampilan Advanced Rest Client bisa dilihat dibawah ini
Kembali ke pembahasan sebelumnya. Postingan ini ada 3 part.
LAMAN TERKAIT
Sekarang kita mencoba memanggil service-service yang sudah kita buat di PHP dengan Rest Client.
Rest Client adalah software yang digunakan untuk melakukan test pada Web Api/Web Service.
Kalau kamu suka aplikasi desktop kamu bisa mendownload insomnia. Kalau saya suka memakai Advanced Rest Client. Advanced Rest Client adalah ekstention dari Google Chrome. Google Chrome adalah browser buatan Google. Google adalah mesin pencari terpopuler.
Web service yang kita buat kemarin menggunakan method "POST". Kenapa? karena dengan method "POST " kita lebih mudah melempar parameter dari aplikasi kita ke Web Service.
Tampilan Advanced Rest Client bisa dilihat dibawah ini
 |
| Test Web Service dengan Advance Rest Client
Tanda Panah paling atas adalah tempat alamat url Web Service lokal kita
dibawahnya ada "Method" Web Service. Pilih method "POST" (Karena web service kita menggunakan method "POST")
Raw Headers diisi "Content-Type: application/x-www-form-urlencoded".
Tanda Panah paling bawah adalah parameter POST yang dikirim ke web service.
Sekarang kita coba service-nya satu persatu. hasil keluaran web service tetap berupa JSON, karena format ini sangat populer dan parsernya (penerjemah JSON ke format lain) sudah ada di banyak bahasa pemrograman.
Buat Klaim Baru
Digunakan untuk membuat klaim dan pasien baru INACBG. Kalau di aplikasi E-Klaim kita membuat pasien baru kemudian baru membuat klaim baru. Kalau dari bridging kita juga harus mengirim no SEP.
di Klaim baru ini yang jadi key-nya nomor SEP, jadi nomor SEP tidak boleh kembar.
parameter yang dikirim
Cara menggunakannya seperti ini
Url : http://xxx.xxx.x.x/BridgingInaCBG/BuatKlaimBaru
Method : POST
Raw Header : Content-Type: application/x-www-form-urlencoded
Parameter POST/Raw Payload : nokartu=testnokartu&nosep=testnosep&norm= testnorm&namapasien=testnamapasien&tgllahir=2004-01-01&jeniskelamin=1
ISI/UPDATE KLAIM
Service ini digunakan untuk mengisi klaim, jika klaim sudah ada maka otomatis akan di update
Parameter yang dikirim:
Url : http://xxx.xxx.x.x/BridgingInaCBG/IsiDataKlaim
Method : POST
Raw Header : Content-Type: application/x-www-form-urlencoded
Parameter POST/Raw Payload : nosep=testnosep&nokartu=testnokartu&tgl_masuk=2017-01-01 00:00:00&tgl_pulang=2017-01-01 00:00:00&tgllahir=2017-01-01 00:00:00&jenis_rawat=2&kelas_rawat=3&adl_sub_acute=&adl_chronic=&icu_indicator=&icu_los=&ventilator_hour=&upgrade_class_ind=&
upgrade_class_class=&upgrade_class_los=&birth_weight=&discharge_status=&diagnosa=N86&procedure=91.46&tarif_rs=50000&tarif_poli_eks=0& nama_dokter=Eko&kode_tarif=BP&payor_id=3&payor_cd=JKN&coder_nik=xxxxxxxxxxxxxxxxxxxx GROUPER 1 Setelah Isi/Update Klaim langkah selanjutnya adalah menggrouper. parameter yang dikirim cuma NoSEP
Url : http://xxx.xxx.x.x/BridgingInaCBG/Grouper1
Method : POST
Raw Header : Content-Type: application/x-www-form-urlencoded
Parameter POST/Raw Payload : nosep=testnosep
Kalau digrouper 1 ditemukan Special cmg, maka grouper 2 wajib dilakukan (kalau nggak mau sih nggak apa-apa). Tetapi kalau tidak ada ya nggak usah dilakukan.
Parameter yang dikirim:
Url : http://xxx.xxx.x.x/BridgingInaCBG/Grouper2
Method : POST
Raw Header : Content-Type: application/x-www-form-urlencoded
Parameter POST/Raw Payload : nosep=testnosep&special_cmg=YY01#RR04
FINAL KLAIM
Parameter yang dikirm
Url : http://xxx.xxx.x.x/BridgingInaCBG/FinalKlaim
Method : POST
Raw Header : Content-Type: application/x-www-form-urlencoded
Parameter POST/Raw Payload : nosep=testnosep&coder_nik=3374132708800008
KIRIM DATA ONLINE
Kirim data online ini masuk ke katalog web service lokal juga, tapi nggak usah
dibuat kodingnya. Soalnya sudah aku panggil langsung waktu menjalankan servire Final Klaim
Parameter yang dikirim : nosep
Url : http://xxx.xxx.x.x/BridgingInaCBG/KirimOnline
Method : POST
Raw Header : Content-Type: application/x-www-form-urlencoded
Parameter POST/Raw Payload : nosep=testnosep
Kalau sudah khatam dibagian ini kita langsung nyoba aja Mengakses Web Service Jembatan dari Visual Basic 6
|
Terima kasih buat tutorial dan ilmunya. semoga berkah dan bermanfaat ilmunya.
ReplyDeletegan saya baru coba ws ini dan bikin fungsi baru untuk mengecek data saja dulu karena masih takut jalankan fungsi input kalau salah data, tapi pas saya jalankan fungsiku tertluis response : SIGNATURE_NOT_MATCH
ReplyDeleteapanya itu gan..?
function GetClaimData($request, $response, $args) {
$json = '{
"metadata":{
"method":"get_claim_data"
},
"data":{
"nomor_sep":"'.$request->getParsedBody()['nosep'].'"
}}';
$json = mc_encrypt ($json, getKey());
$ch = curl_init(getUrlWS());
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, $json);
curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
$result = curl_exec($ch);
curl_close($ch);
$result = str_replace ('----BEGIN ENCRYPTED DATA----', '', $result);
$result = str_replace ('----END ENCRYPTED DATA----', '', $result);
$result = mc_decrypt (getKey(), $result);
$response->write($result);
return $response;
}
Signature not match berarti key signaturenya salah pak, coba generate ulang key signaturenya
Deletesama2 pak, terima kasih sudah mampir dan menggunakan script dari saya, semoga bermanfaat
ReplyDelete