Pada website E-Health ini memiliki fitur insert, update, dan delete, sehingga dapat memudahkan untuk seorang administrator atau dokter dalam menginputkan data pasien yang tersedia. Berikut ini adalah fungsi dari masing - masing insert update, dan delete.
1. Menampilkan data pasien
Pada halaman data pasien disini fungsinya adalah untuk melihat data - data pasien yang tersedia dalam database, data pasien disini merupakan data dari Rumah Sakit Advent Bandar Lampung, untuk data pasien dapat dilihat seperti gambar berikut :
Berikut adalah program dari edit data pasien :
1. Menampilkan data pasien
Pada halaman data pasien disini fungsinya adalah untuk melihat data - data pasien yang tersedia dalam database, data pasien disini merupakan data dari Rumah Sakit Advent Bandar Lampung, untuk data pasien dapat dilihat seperti gambar berikut :
2. Penambahan Data Pasien
Fungsi disini adalah digunakan untuk menambahkan data pasien dimana diantaranya adalah nama pasien, alamat, tempat tanggal lahir, serta diagnosa medis ketika seorang pasien mendatangi rumah sakit, untuk fungsi tambah data pasien adalah seperti berikut :
Berikut adalah program untuk tambah data :
protected void btnSave_Click(object sender,EventArgs e)
{
DataPasienDataContext db = new DataPasienDataContext();
Pasien ps = new Pasien();
ps.namaPasien = txtNama.Text;
ps.jenisKelamin = txtJk.Text;
ps.umur = Convert.ToInt32(txtUmur.Text.ToString());
ps.tempatLahir = txtTmptLahir.Text;
ps.tglLahir = txtTglLahir.Text;
ps.agama = txtAgama.Text;
ps.pendidikan = txtpendidikan.Text;
ps.alamat = txtAlamat.Text;
ps.tglMasukRs = txtTglMasukRs.Text;
ps.tglCekSblm = txtTglCekSblm.Text;
ps.tglCekSsdh = txtTglCekSsdh.Text;
ps.noMedis = txtNoMedis.Text;
//ps.namaOrtu = txtNamaOrtu.Text;
ps.notelp = txtNotelp.Text;
ps.pekerjaan = txtPekerjaan.Text;
ps.status = txtStatus.Text;
ps.diagnosaMedis = txtDiagnosa.Text;
db.Pasiens.InsertOnSubmit(ps);
db.SubmitChanges();
Response.Redirect("DataPasien.aspx");
}
3. Edit Data Pasien
Fungsi edit data pasien disini adalah mengupdate data pasien apabila ada kesalahan penginputan data, untuk melakukan edit data pasien dapat dilihat seperti gambar berikut :
Berikut adalah program dari edit data pasien :
public partial class EditPasien : System.Web.UI.Page
{
DataPasienDataContext db = new DataPasienDataContext();
public string nama_pasien,jenis_kelamin,umur,tempat_lahir,tgl_lahir,
agama,pendidikan,alamat,tgl_masuk_rs,tgl_operasi,tgl_cek_sblm,
tgl_cek_ssdh,no_medis,nama_ortu,no_telp,pekerjaan,status_pernikahan,diagnosa_medis;
protected void Page_Load(object sender, EventArgs e)
{
nama_pasien = txtNama.Text;
jenis_kelamin = txtJk.Text;
umur = txtUmur.Text;
tempat_lahir = txtTmptLahir.Text;
agama = txtAgama.Text;
pendidikan = txtpendidikan.Text;
alamat = txtAlamat.Text;
tgl_masuk_rs = txtTglMasukRs.Text;
tgl_operasi = txtTglOperasi.Text;
tgl_cek_sblm = txtTglCekSblm.Text;
tgl_cek_ssdh = txtTglCekSsdh.Text;
no_medis = txtNoMedis.Text;
nama_ortu = txtNamaOrtu.Text;
no_telp = txtNotelp.Text;
pekerjaan = txtPekerjaan.Text;
status_pernikahan = txtStatus.Text;
diagnosa_medis = txtDiagnosa.Text;
if(Request.QueryString["id"] != null)
{
var query = from m in db.Pasiens
where m.Id_Pasien == Convert.ToInt32(Request.QueryString["Id_Pasien"].ToString())
select m;
foreach(var q in query)
{
txtNama.Text = q.namaPasien;
txtJk.Text = q.jenisKelamin;
txtUmur.Text = q.umur.ToString();
txtTmptLahir.Text = q.tempatLahir;
txtTglLahir.Text = q.tglLahir;
txtAgama.Text = q.agama;
txtpendidikan.Text = q.pendidikan;
txtAlamat.Text = q.alamat;
txtTglMasukRs.Text = q.tglMasukRs;
txtTglOperasi.Text = q.tglOperasi;
txtTglCekSblm.Text = q.tglCekSblm;
txtTglCekSsdh.Text = q.tglCekSsdh;
txtNoMedis.Text = q.noMedis;
//txtNamaOrtu.Text = q.namaOrtu;
txtNotelp.Text = q.notelp;
txtPekerjaan.Text = q.pekerjaan;
txtStatus.Text = q.status;
txtDiagnosa.Text = q.diagnosaMedis;
}
}
getData();
}
private void getData()
{
var query = from m in db.Pasiens
where m.Id_Pasien == Convert.ToInt32(Request.QueryString["Id_Pasien"].ToString())
select m;
foreach(var q in query)
{
txtNama.Text = q.namaPasien;
txtJk.Text = q.jenisKelamin;
txtUmur.Text = q.umur.ToString();
txtTmptLahir.Text = q.tempatLahir;
txtTglLahir.Text = q.tglLahir;
txtAgama.Text = q.agama;
txtpendidikan.Text = q.pendidikan;
txtAlamat.Text = q.alamat;
txtTglMasukRs.Text = q.tglMasukRs;
txtTglOperasi.Text = q.tglOperasi;
txtTglCekSblm.Text = q.tglCekSblm;
txtTglCekSsdh.Text = q.tglCekSsdh;
txtNoMedis.Text = q.noMedis;
//txtNamaOrtu.Text = q.namaOrtu;
txtNotelp.Text = q.notelp;
txtPekerjaan.Text = q.pekerjaan;
txtStatus.Text = q.status;
txtDiagnosa.Text = q.diagnosaMedis;
}
}
protected void btEdit_Click(object sender,EventArgs e)
{
}
protected void Button1_Click(object sender, EventArgs e)
{
Session["namaPasien"] = nama_pasien;
Session["jenisKelamin"] = jenis_kelamin;
Session["umur"] = umur;
Session["tempatLahir"] = tempat_lahir;
Session["tglLahir"] = tgl_lahir;
Session["agama"] = agama;
Session["pendidikan"] = pendidikan;
Session["alamat"] = alamat;
Session["tglMasukRs"] = tgl_masuk_rs;
Session["tglOperasi"] = tgl_operasi;
Session["tglCekSblm"] = tgl_cek_sblm;
Session["tglCekSsdh"] = tgl_cek_ssdh;
Session["noMedis"] = no_medis;
Session["namaOrtu"] = nama_ortu;
Session["notelp"] = no_telp;
Session["pekerjaan"] = pekerjaan;
Session["status"] = status_pernikahan;
Session["diagnosaMedis"] = diagnosa_medis;
Response.Redirect("ConfirmPasien.aspx?Id_Pasien=" + Request.QueryString["Id_Pasien"].ToString());
}
}
Ketika data akan diedit maka akan tampil halaman konfirmasi untuk melakukan edit atau tidak seperti gambar berikut :
Berikut adalah program dari konfirmasi edit data pasien :
public partial class Admins_ConfirmPasien : System.Web.UI.Page
{
DataPasienDataContext db = new DataPasienDataContext();
protected void Page_Load(object sender, EventArgs e)
{
}
protected void btYes_Click(object sender,EventArgs e)
{
var query = from m in db.Pasiens
where m.Id_Pasien == Convert.ToInt32(Request.QueryString["Id_Pasien"].ToString())
select m;
foreach(var q in query)
{
q.namaPasien = Session["namaPasien"].ToString();
q.jenisKelamin = Session["jenisKelamin"].ToString();
q.umur = Convert.ToInt32(Session["umur"].ToString());
q.tempatLahir = Session["tempatLahir"].ToString();
q.tglLahir = Convert.ToDateTime(Session["tglLahir"]).ToString();
q.agama = Session["agama"].ToString();
q.pendidikan = Session["pendidikan"].ToString();
q.alamat = Session["alamat"].ToString();
q.tglMasukRs = Session["tglMasukRs"].ToString();
q.tglOperasi = Session["tglOperasi"].ToString();
q.tglCekSblm = Session["tglCekSblm"].ToString();
q.tglCekSsdh = Session["tglCekSsdh"].ToString();
q.noMedis = Session["noMedis"].ToString();
//q.namaOrtu = Session["namaOrtu"].ToString();
q.notelp = Session["notelp"].ToString();
q.pekerjaan = Session["pekerjaan"].ToString();
q.status = Session["status"].ToString();
q.diagnosaMedis = Session["diagnosaMedis"].ToString();
}
db.SubmitChanges();
Response.Redirect("DataPasien.aspx");
}
protected void btNo_Click(object sender,EventArgs e)
{
Response.Redirect("DataPasien.aspx");
}
}
