This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
psdokter=koneksi.prepareStatement("select kd_dokter,nm_dokter from dokter where kd_dokter<>'-' and status='1' and kd_dokter like ?");
pstanggal=koneksi.prepareStatement("select reg_periksa.tgl_registrasi from reg_periksa where reg_periksa.no_rawat not in(select no_rawat from kamar_inap) and "+
"reg_periksa.kd_dokter=? and reg_periksa.tgl_registrasi between ? and ? group by reg_periksa.tgl_registrasi");
pspasien=koneksi.prepareStatement("select reg_periksa.no_rawat,pasien.nm_pasien from reg_periksa inner join pasien "+
"on reg_periksa.no_rkm_medis=pasien.no_rkm_medis where reg_periksa.no_rawat not in(select no_rawat from kamar_inap) and "+
"reg_periksa.kd_dokter=? and reg_periksa.tgl_registrasi=?");
"reg_periksa.kd_dokter=? and reg_periksa.tgl_registrasi=? and reg_periksa.kd_pj like ? ");
psobat=koneksi.prepareStatement("select detail_pemberian_obat.kode_brng,databarang.nama_brng,sum(detail_pemberian_obat.jml) as jml,"+
"(sum(detail_pemberian_obat.total)-sum(detail_pemberian_obat.embalase+detail_pemberian_obat.tuslah)) as total,"+
"sum(detail_pemberian_obat.embalase) as embalase,sum(detail_pemberian_obat.tuslah) as tuslah "+
"from detail_pemberian_obat inner join databarang on detail_pemberian_obat.kode_brng=databarang.kode_brng where "+
"detail_pemberian_obat.no_rawat not in(select no_rawat from kamar_inap) and detail_pemberian_obat.no_rawat=? "+
"and detail_pemberian_obat.tgl_perawatan=? group by detail_pemberian_obat.kode_brng");
} catch (SQLExceptione) {
} catch (Exceptione) {
System.out.println(e);
}
@@ -139,6 +177,8 @@ public void windowDeactivated(WindowEvent e) {}
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters