public virtual CrystalDecisions.CrystalReports.Engine.ReportDocument CreateReport() { HasilRawat rpt = new HasilRawat(); rpt.Site = this.Site; return(rpt); }
private void Button1_Click(object sender, EventArgs e) { String dd = DateTime.Now.Day.ToString(); String mm = DateTime.Now.Month.ToString(); String yyyy = DateTime.Now.Year.ToString(); if (checkBox1.Checked) { //Penambahan Perawatan String id_pegawai = label3.Text; OracleCommand cmd = new OracleCommand("SELECT ID_PERAWATAN FROM PERAWATAN WHERE NAMA_PERAWATAN = '" + label6.Text + "'", mainParent.oc); String id_rawat = cmd.ExecuteScalar().ToString(); cmd = new OracleCommand("SELECT MAX(CTR_CHECKUP) FROM DTRANS_PERAWATAN_INAP WHERE ID_TRANS='" + id_trans + "'", mainParent.oc); int ctr; if (cmd.ExecuteScalar().ToString() != "") { ctr = Convert.ToInt32(cmd.ExecuteScalar().ToString()) + 1; } else { ctr = 0; } String keterangan = textBox2.Text; String keluhan = textBox1.Text; String tindak_lanjut = textBox3.Text; if (radioButton1.Checked) { tindak_lanjut = "KELUAR"; } else if (radioButton2.Checked) { tindak_lanjut = numericUpDown1.Value.ToString() + ":" + numericUpDown2.Value.ToString() + " - Tindak Lanjut : " + comboBox4.Text; } try { cmd = new OracleCommand("INSERT INTO DTRANS_PERAWATAN_INAP VALUES('" + id_trans + "','" + id_rawat + "','" + id_pegawai + "'," + ctr + ",'" + keterangan + "','" + keluhan + "','" + tindak_lanjut + "',TO_DATE(LPAD('" + dd + "',2,'0')||'/'||LPAD('" + mm + "',2,'0')||'/'||LPAD('" + yyyy + "',4,'0'),'DD/MM/YYYY'),'n')", mainParent.oc); cmd.ExecuteNonQuery(); Invoice formInvoice = new Invoice(); HasilRawat cr1 = new HasilRawat(); cr1.SetDatabaseLogon("system", "michael123", "laptop-c8ps48dq", ""); cr1.SetParameterValue("id_trans", id_trans); cr1.SetParameterValue("dateNow", DateTime.Now); cr1.SetParameterValue("keluhan", keluhan); cr1.SetParameterValue("hasil", keterangan); cr1.SetParameterValue("id_pegawai", id_pegawai); cr1.SetParameterValue("nama_dokter", label4.Text); formInvoice.crystalReportViewer1.ReportSource = cr1; formInvoice.crystalReportViewer1.Refresh(); formInvoice.Show(); } catch (Exception ex) { MessageBox.Show(ex.Message); } } if (checkBox2.Checked) { //TAMBAH SUPPLY String id_pegawai = label3.Text; OracleCommand cmd = new OracleCommand("SELECT MAX(CTR_SUPPLY) FROM DTRANS_SUPPLY WHERE ID_TRANS='" + id_trans + "'", mainParent.oc); int ctr_supply = 0; if (cmd.ExecuteScalar().ToString() != "") { ctr_supply = Convert.ToInt32(cmd.ExecuteScalar().ToString()) + 1; } try { for (int i = 0; i < listBox2.Items.Count; i++) { String[] supply = listBox2.Items[i].ToString().Split('|'); cmd = new OracleCommand("SELECT ID_SUPPLY FROM SUPPLY WHERE NAMA_SUPPLY='" + supply[1] + "'", mainParent.oc); String id_supply = cmd.ExecuteScalar().ToString(); cmd = new OracleCommand("SELECT HARGA_SUPPLY FROM SUPPLY WHERE NAMA_SUPPLY='" + supply[1] + "'", mainParent.oc); int harga = Convert.ToInt32(cmd.ExecuteScalar().ToString()); int subtotal = Convert.ToInt32(supply[0]) * harga; cmd = new OracleCommand("INSERT INTO DTRANS_SUPPLY VALUES('" + id_supply + "','" + id_trans + "','" + id_pegawai + "'," + supply[0] + "," + subtotal + ",'n'," + ctr_supply + ",'n')", mainParent.oc); cmd.ExecuteNonQuery(); } } catch (Exception ex) { MessageBox.Show(ex.Message); } } if (checkBox3.Checked) { //Tambah Ruang String nomor = label20.Text; String nama = namaruangan.Text; if (checkBox4.Checked) { try { OracleDataAdapter oda = new OracleDataAdapter("SELECT R.ID_RUANG, R.HARGA_RUANG, DR.TOTAL_HARI FROM DTRANS_RUANG DR, RUANG R WHERE DR.ID_RUANG = R.ID_RUANG AND DR.ID_TRANS='" + id_trans + "' AND R.STATUS_RUANG='CLOSED'", mainParent.oc); DataTable inap = new DataTable(); oda.Fill(inap); String id_ruang = inap.Rows[0].Field <String>(0); int harga = Convert.ToInt32(inap.Rows[0].Field <int>(1)); int total_hari = Convert.ToInt32(inap.Rows[0].Field <int>(2)); total_hari++; int subtotal = harga * total_hari; OracleCommand cmd = new OracleCommand("UPDATE DTRANS_RUANG SET TOTAL_HARI=" + total_hari + ", SUBTOTAL=" + subtotal + " WHERE ID_RUANG='" + id_ruang + "' AND ID_TRANS='" + id_trans + "'", mainParent.oc); cmd.ExecuteNonQuery(); } catch (Exception ex) { MessageBox.Show(ex.Message); } } } }