Skip to Content

Blog dr. Salim Mulyana

Dokter, Opreker

[SIMKES Khanza] Cara Membuat Menu Surat Keterangan Berobat

Be First!
by Juli 11, 2019 SIMKesKhanza

Cara Membuat Menu Surat Keterangan Berobat

Pada tutorial kali ini kita akan belajar cara membuat menu Surat Keterangan Berobat.

Buka source SIMKES Khanza dengan menggunakan Netbeans 11, dan buka DlgReg.java, karena kita akan meletekan menunya di menu registrasi. Pilih JMenu4

Klik kanan di JMenu4, Add From Palette, Menu Item

Diklik kanan di menu yang sudah dibuat, Change Variable Name

Buat namanya jadi MnSuratBerobat

Letaknya rubah sehingga menjadi dibawah MnSuratSakit3

Sekarang masukan codingnya. Dengan cara klik kanan MnSuratBerobat, Events, Action, Action Performed

Tempatkan codingannya ditempat yang tersedia

Paste baris berikut ini

             if(TPasien.getText().trim().equals(“”)){

            JOptionPane.showMessageDialog(null,”Maaf, Silahkan anda pilih dulu pasien…!!!”);

        }else{

            this.setCursor(Cursor.getPredefinedCursor(Cursor.WAIT_CURSOR));

            Map<String, Object> param = new HashMap<>();

            param.put(“namars”,akses.getnamars());

            param.put(“alamatrs”,akses.getalamatrs());

            param.put(“kotars”,akses.getkabupatenrs());

            param.put(“propinsirs”,akses.getpropinsirs());

            param.put(“kontakrs”,akses.getkontakrs());

            param.put(“emailrs”,akses.getemailrs());

            param.put(“norawat”,TNoRw.getText());

            param.put(“logo”,Sequel.cariGambar(“select logo from setting”));

            Valid.MyReport(“rptSuratBerobat.jasper”,param,”::[ Surat Keterangan Berobat ]::”);

            this.setCursor(Cursor.getDefaultCursor());

        }

Sekarang buka Jaspersoft Studio 6.8.0 dan buat Reportnya. Tambahkan parameter namars,alamatrs,kotars,propinsirs,kontakrs,emailrs,norawat,logo

Buat juga querynya

select reg_periksa.tgl_registrasi,dokter.nm_dokter, pasien.nm_pasien,pasien.keluarga,pasien.namakeluarga,pasien.pekerjaanpj,concat(pasien.alamat,’, ‘,kelurahan.nm_kel,’, ‘,kecamatan.nm_kec,’, ‘,kabupaten.nm_kab) as alamat

 from reg_periksa inner join pasien inner join dokter inner join kelurahan inner join kecamatan inner join kabupaten

 on reg_periksa.no_rkm_medis=pasien.no_rkm_medis and reg_periksa.kd_dokter=dokter.kd_dokter and pasien.kd_kel=kelurahan.kd_kel and pasien.kd_kec=kecamatan.kd_kec and pasien.kd_kab=kabupaten.kd_kab where reg_periksa.no_rawat=$P{norawat}

Lalu tarik parameter dan field ke lembar JasperSoft Studio 6.8.0

Lalu lakukan compile di Jasper dan netbeansnnya. Lalu dicoba menunya

Previous
Next

Leave a Reply

Your email address will not be published. Required fields are marked *

*