Menghilangkan tanda titik di delphi

Menghilangkan tanda titik dengan program delphi pada text field Deklarasi fungsi type : private atau public function ilangintitik(angka :string):string; Listing program sbb : function TForm1.ilangintitik(angka :string) : string; var a : string; i : integer; begin a:=”; for i:=1 to length(angka) do if angka[i]<>’.’ then a:=a+angka[i]; result :=a; end;   Penggunaan fungsi : procedure TForm1.EdTKHChange(Sender: … Read more

Kasus Koding ICD

DU = katarak diabetika DS = DM KODE = [break] DU = Decomp cordis DS = hipertensi KODE = DU = Decubitus Ulcer DS = DM KODE = DU = N. Infeksi DS = BBLR KODE = DU = preterm delivery DS = partus spontan KODE = DU = Decomp Cordis DS = Hipertensi, Insuficiensi … Read more

INACBG 4 – error (Licensed Expired)

// INACBG ERROR ‘Licensed expired’ dikarenakan listrik mati ataupun regional setting diubah. Ada beberapa hal yang dapat dilakukan. 1. Pastikan tanda checkbox pada XAMPP Control Panel Application tidak di centang. 2. Pastikan anda menggunakan regional setting dengan konsisten, tidak berubah-ubah pada komputer tersebut. Gunakan format Indonesia. 3. Langkah berikutnya jika belum terselesaikan juga dengan terpaksa … Read more

Sasaran Kerja Pegawai (PNS) Pelengkap DP3

Sasaran kerja pegawai (SKP) Pegawai Negeri Sipil (PNS) SKP adalah Sasaran Kerja Pegawai yang ada dalam salah satu unsur di dalam Penilaian Prestasi Kerja PNS yang diatur dalam Peraturan Pemerintah Nomor 46 Tahun 2011. Peraturan Pemerintah  Nomor 46 Tahun 2011 tentang Penilaian Prestasi Kerja Pegawai Negeri Sipil PNS bertujuan untuk meningkatkan prestasi dan kinerja PNS. … Read more

Jabatan fungsional dan angka kredit perekam medis terbaru (PERMENPAN NO. 30 TAHUN tahun 2013)

ANGKA KREDIT JABATAN FUNGSIONAL PEREKAM MEDIS Angka kredit jabatan fungsional adalah satuan nilai dari tiap butir kegiatan dan atau akumulasi nilai butir-butir kegiatan yang harus dicapai oleh pemegang jabatan fungsional. Angka kredit jabatan fungsional merupakan penilaian prestasi kerja sebagai salah satu syarat untuk pengangkatan, kenaikan jabatan dan/atau pangkat. Penilaian prestasi dan kinerja pemegang jabatan fungsional … Read more

Membuat laporan RL 4b Morbiditas Rawat Jalan

Membuat laporan RL 4b Morbiditas Rawat Jalan jika dilakukan secara manual memang merepotkan. Mengkoding ICD, DTD, kelompok umur jenis kelamin, kasus baru lama per jenis kelamin, Oleh karena itu diperlukan sebuah aplikasi yang dapat merekap secara otomatis data kunjungan rawat jalan. Untuk hal ini sementara hanya akan membahas data kunjungan rawat jalan saja. Konsep aplikasi … Read more