Membangun aplikasi Rekam Medis Sederhana dengan MSAccess

d4d4ng Fri Feb 24, 2012 6:45 pm

Hallo pak Dadang, salam kenal juga.
Silahkan pak kita berdiskusi tentang database klinik, insya Allah saya senang membantu.

Untuk pertanyaan bapak:

nomor urut bisa diperoleh dari field AutoNumber, atau bisa juga membuat sendiri.
Katakan field nomor urut bernama Nomor, dan field Tanggal.
NomorBaru = Nz(DMax("Nomor","tbl_Medical", "Tanggal=#" & Date() & "#"), 0) + 1

MRN = RIGHT(YEAR(Tanggal), 2) & FORMAT(MONTH(Tanggal), "00") & FORMAT(DAY(Tanggal), "00") & FORMAT(NomorBaru, "00")

Semoga sesuai dengan yang diminta.

MRN itu saya perlukan untuk me-retrieve data pasien lama berdasarkan tanggal kunjungan pertama, misalnya untuk kunjungan ulang.
Jadi sebenarnya, MRN itu bukan sekedar nomor urut, tapi juga mengandung data tanggal kunjungan pertama.
Tapi seandainya Dik Haer mempunyai solusi yang berbeda, saya ingin juga mengetahuinya.