Assalamu'alaikum..wr..wb..??
Selamat pagi, siang, sore n' malam buat semua pembaca..
Salam sejahtera..
Pada pokok pembahasan kali ini, saya akan membahas tentang "Cyber Law", dimana ini adalah salah satu tugas dari
mata kuliah Etika Profesi, yang di ajarkan oleh Yth Ibu Detri Puspitasari, s.Pd.
Sangat banyak istilah-istilah yang ada didunia maya (Cyber Space), antara lain :
- Cyber Crime : kejahatan konvensional yang MODERN adalah MODUS OPERANDI.
- Cyber Law : istilah hukum atau undang-undang yang mengatur kegiatan dunia maya yang dipakai di Indonesia, dll
Telah kita ketahui bahwa Teknologi Informasi dan Komunikasi sudah tidak asing lagi bagi kehidupan manusia.
Dengan adanya Teknologi informasi, hidup akan lebih terasa mudah dan menyenangkan, aktifitas seperti pekerjaan,
bisnis, pendidikan dan hiburan juga berkaitan dengan manfaat teknologi informasi.
seperti didunia nyata, dalam dunia maya kita mendapat atau memperoleh hal yang baik, namun ada juga tindak
kejahatan yang dapat merugikan.
Dalam pengertian awam Cyber yaitu Istilah yang digunakan orang untuk menyatakan sesuatu yang berhubungan dengan
Internet atau dunia maya dan Law yaitu undang-undang atau hukum. Jika digabung kan arti dari kedua kata tersebut
maka Cyber Law adalah hukum yang mengatur dalam aktifitas berinternet didunia maya.
Cyber Law adalah istilah hukum atau undang-undang yang mengatur kegiatan dunia maya yang dipakai di Indonesia, Cyberlaw
sendiri merupakan istilah yang berasal dari Cyberspace Law.
a. Defenisi Cyber Law
Seperti yang kita ketahui, dengan kemajuan teknologi dunia maya tidak hanya menguntung kan, namun bisa
juga merugikan. Maka dari itu, kita kenal sebagai Cyber Law, yaitu Hukum yang mengatur atau yang barkaitan dengan
kegiatan kita didunia maya.
b. Pengertian Cyber Law
Cyber Law ialah Hukum Sistem Informasi atau Hukum Informasi atau Hukum Telematika (Telekomunikasi dan
Informatika).
Cyber Law dapat juga diartikan sebagai ilmu yang memuat atau membicarakan mengenai aspek-aspek hukum
yang berkaitan dengan aktivitas manusia di dunia maya atau yang kita kenal sebagai Internet.
c. Etika dalam Cyber Law
Disini akan dijelaskan etika-etika dalam cyber law atau hukum yang mengatur adanya cyber law :
d. Ruang Lingkup Cyber Law
1. Hak Cipta
Disini yang dimaksud dengan hak cipta ialah adanya penipuan dan pelanggaran dari sesuatu yang diciptakan
oleh pencipta asli.
2. Hak Merk
Yang dimaksudkan dengan hak merk iyalah merk suatu produk yang disalah gunakan oleh para pemalsu produk.
3. Pencemaran nama baik
Yakni, dalam aktifitas dunia maya (cyber space) bisa saja terjadinya pencemaran nama baik dari suatu
produk.
4. Fitnah, Penistaan, Penghinaan
Dalam dunia maya, bisa saja terjadi fitnah, penistaan dan penghinaan yang tidak diinginkan.
5. Serangan terhadap fasilitas komputer
Penyebaran virus yang dapat merusak komputer dari pengakses dunia maya atau jaringan internet.
6. Pengaturan sumber daya internet seperti IP-Address, domain name
7. Kenyamanan Individu
8. Prinsip kehati-hatian (Duty care)
9. Tindakan kriminal biasa yang menggunakan TI sebagai alat
10. Isu prosedural seperti yuridiksi, pembuktian, penyelidikan
11. Kontrak / transaksi elektronik dan tanda tangan digital
12. Pornografi
13. Pencurian melalui Internet
14. Perlindungan Konsumen
15. Pemanfaatan internet dalam aktivitas keseharianseperti e-commerce, e-government, e-education dll
Dari pejelasan diatas, dapat disimpulkan bahwa :
a. Cyber Law adalah Undang-undang yang mengatur aktivitas berinternet yang benar.
b. Cyber Law adalah istilah hukum atau undang-undang yang mengatur kegiatan dunia maya yang dipakai di Indonesia.
Demikianlah penjelasan yang dapat saya sampaikan, lebih dan kurangnya saya mohon maaf.
Semoga ini dapat bermanfaat buat pembaca semua.
Terima kasih. wassalamu'alaikum wr..wb..
Senin, 01 November 2010
Rabu, 13 Oktober 2010
Tugas Program C++
Assalamualaikum Wr...Wb...??
Dalam Blog ini, saya membahas tentang menyelesaikan soal latihan Mata Kuliah C++ yang diajarkan oleh Bapak Hasanudin, S.Kom selaku Dosen yang mengajarkan Mata Kuliah C++.
Langsung saya saya uraikan beberapa langkah sebagai berikut :
Soal Nomor 1 :
Buatlah program untuk menghitung nilai rata-rata dari seorang siswa, dengan ketentuan sebagai berikut:
- Nama siswa, Nilai Pertandingan I, Nilai Pertandingan II, Nilai Pertandingan III diinput.
- Nilai rata-rata merupakan hasil dari Nilai Pertandingan I, II, III dibagi dengan 3.
Dimana Tampilan yang diinginkan ialah seperti dibawah ini :
"PROGRAM HITUNG NILAI RATA-RATA"
Nama Siswa :
Nilai 1 :
Nilai 2 :
Nilai 3 :
Layar Keluaran Yaitu :
Siswa yang bernama ..... Memperoleh Nilai Rata-rata ..... dari hasil perlombaan yang diikuti.
Adapun perintah yang harus dibuat di program C++ adalah sebagai berikut :
Adapun Hasil Keluarannya adalah seperti gambar dibawah ini :
Soal Nomor 2 :
Buatlah program untuk menghitung nilai akhir seorang siswa dari kursus yang diikutinya. Dengan ketentuan sebagai berikut :
- Nama Siswa, Nilai Keaktifan, Nilai Tugas dan Nilai Ujian Diinput.
- Proses yang dilakukan untuk mendapatkan nilai murni dari masing-masing nilai, adalah :
- Nilai Murni Keaktifan = Niali Keaktifan dikalikan dengan 20%.
- Nilai Murni Tugas = Nilai Tugas dikalikan dengan 30%.
- Nilai Murni Ujian = Nilai Ujian dikalikan dengan 50%.
- Nilai Akhir adalah niali Murni Keaktifan + Nilai Murni Tugas + Nilai Murni Ujian.
- Tampilan yang diinginkan sebagai berikut :
Layar Masukkan :
PROGRAM HITUNG NILAI AKHIR
--------------------------
Nama : (........)
Nilai Keaktifan : (........)
Nilai Tugas : (........)
Niali Ujian : (........)
Dimana perintah yang harus dibuat di program C++ adalah sebagai Berikut :
Adapun Hasil Keluarannya adalah seperti gambar dibawah ini :
Demikianlah Penjelasan dari saya, lebih dan kurangnya saya mohon maaf, karena saya juga baru belajar.
Kepada bapak Hasanudin, S.Kom Selaku Dosen yang mengajar mata kuliah C++ ini, saya ucapkan terima kasih.
Wassalamualaikum..wr..wb..??
Dalam Blog ini, saya membahas tentang menyelesaikan soal latihan Mata Kuliah C++ yang diajarkan oleh Bapak Hasanudin, S.Kom selaku Dosen yang mengajarkan Mata Kuliah C++.
Langsung saya saya uraikan beberapa langkah sebagai berikut :
Soal Nomor 1 :
Buatlah program untuk menghitung nilai rata-rata dari seorang siswa, dengan ketentuan sebagai berikut:
- Nama siswa, Nilai Pertandingan I, Nilai Pertandingan II, Nilai Pertandingan III diinput.
- Nilai rata-rata merupakan hasil dari Nilai Pertandingan I, II, III dibagi dengan 3.
Dimana Tampilan yang diinginkan ialah seperti dibawah ini :
"PROGRAM HITUNG NILAI RATA-RATA"
Nama Siswa :
Nilai 1 :
Nilai 2 :
Nilai 3 :
Layar Keluaran Yaitu :
Siswa yang bernama ..... Memperoleh Nilai Rata-rata ..... dari hasil perlombaan yang diikuti.
Adapun perintah yang harus dibuat di program C++ adalah sebagai berikut :
Adapun Hasil Keluarannya adalah seperti gambar dibawah ini :
Soal Nomor 2 :
Buatlah program untuk menghitung nilai akhir seorang siswa dari kursus yang diikutinya. Dengan ketentuan sebagai berikut :
- Nama Siswa, Nilai Keaktifan, Nilai Tugas dan Nilai Ujian Diinput.
- Proses yang dilakukan untuk mendapatkan nilai murni dari masing-masing nilai, adalah :
- Nilai Murni Keaktifan = Niali Keaktifan dikalikan dengan 20%.
- Nilai Murni Tugas = Nilai Tugas dikalikan dengan 30%.
- Nilai Murni Ujian = Nilai Ujian dikalikan dengan 50%.
- Nilai Akhir adalah niali Murni Keaktifan + Nilai Murni Tugas + Nilai Murni Ujian.
- Tampilan yang diinginkan sebagai berikut :
Layar Masukkan :
PROGRAM HITUNG NILAI AKHIR
--------------------------
Nama : (........)
Nilai Keaktifan : (........)
Nilai Tugas : (........)
Niali Ujian : (........)
Dimana perintah yang harus dibuat di program C++ adalah sebagai Berikut :
Adapun Hasil Keluarannya adalah seperti gambar dibawah ini :
Demikianlah Penjelasan dari saya, lebih dan kurangnya saya mohon maaf, karena saya juga baru belajar.
Kepada bapak Hasanudin, S.Kom Selaku Dosen yang mengajar mata kuliah C++ ini, saya ucapkan terima kasih.
Wassalamualaikum..wr..wb..??
Selasa, 25 Mei 2010
Tugas terstruktur 2 manipulasi Database Rumah Sakit Dengan Visual Basic
Tugas Terstruktur 2
Kembali lagi dengan kami berdua Normiyati dan Rini Wahyuningsih, di tugas Terstruktur 2 Sistem Basis Data.
Disini kami akan mencoba untuk menguraikan atau menjelaskan langkah-langkah atau cara Manipulasi Data dengan menggunakan My SQL.
Dalam penjelasan ini kami juga menggunakan Aplikasi atau Bahasa Pemograman Visual Basic 6.0, karena sesuai dengan apa yang telah kami pelajari,
dan instruksi dari dosen yaitu Bapak Farly Detrias, S.Kom selaku dosen mata kuliah Sistem Basis Data.
Langsung saja kita mulai untuk langkah-langkahnya seperti dibawah ini :
Pertama-tama kami akan menjelaskan apa saja perintah-perintah yang ada pada My SQL, yaitu :
1. Perintah DDL (Data Definition Language) iyalah perintah untuk mendefenisikan suatu database.
Perintah-perintah yang termasuk dalam DDL yaitu CREATE, ALTER, RENAME dan DROP.
2. Perintah DML (Data Manipulation Language) iyalah perintah untuk memanipulasi suatu database.
Perintah-perintah yang termasuk dalam DML yaitu SELECT, INSERT UPDATE, dan DELETE.
3. Perintah DCL (Data Control Language) iayalah perintah untuk komponen bahasa DBMS yang digunakan untuk mengatur perekaman atau penyimpanan data secara fisik, lebih tepatnya iyalah untuk mengontrol data pada suatu database.
Perintah-perintah yang termasuk dalam DCL iyalah GRANT dan REVOKE.
Disini yang akan kita bahas terlebih dahulu dengan Perintah Manipulasi (DML) dalam SQL, diantaranya ialah :
1. SELECT
SELECT disini merupakan perintah untuk menampilkan isi atau record dari suatu tabel.
Contoh Penggunaan SELECT yaitu :
SELECT * From Pasien;
Dimana tampilannya yaitu seperti dibawah ini :
2. INSERT
INSERT ialah perintah untuk menambah atau memasukkan record kedalam tabel.
Contoh penggunaan INSERT yaitu :
1. INSERT INTO nama_tabel VALUES (‘nilai1’,’nilai2’,’nilai3’,…’);
2. INSERT INTO nama_tabel ( field1, field2, field3, … ) VALUES (‘nilai1’,’nilai2’,’nilai3’,… );
3. INSERT INTO nama_tabel SET field1=’nilai1’, field2=’nilai2’, field3=’nilai3’, … ;
INSERT INTO pasien set kode_pasien='20013',nama_pasien='Micha',Jenis_kelamin='P',gol_darah='B',umur='22',alamat='Sepakat 1';
jika perintah diatas berhasil dieksekusi maka akan muncul pesan :
Query OK, 1 row affected (0.13 sec)
dimana tampilannya ialah seperti dibawah ini :
3. UPDATE
UPDATE ialah merupakan perintah untuk merubah inputan record pada suatu tabel.
Contoh penggunaan UPDATE yaitu :
UPDATE Pasien SET nama_dokter=’MimiRomi’ WHERE nama_dokter='Micha';
jika perintah diatas berhasil dieksekusi maka akan muncul pesan :
Query ok, 2 rows affected (0.06 sec)
Rows matched : 2 Changed : Warnings :0
dimana tampilannya ialah seperti dibawah ini :
4. DELETE
ialah merupakan perintah untuk menghapus tabel pada suatu database.
Contoh penggunaan perintah DELETE yaitu :
DELETE FROM Pasien WHERE kode_pasien='20011';
jika perintah diatas berhasil dieksekusi maka akan tampil pesan seperti dibawah ini :
Query Ok, 1 row affected (0.06 sec)
dimana tampilannya ialah seperti dibawah ini :
5. ALTER
Ialah merupakan perintah untuk mengubah suatu struktur tabel.
ada beberapa jenis perintah ALTER yaitu
Contoh penggunaan perintah ALTER ialah :
ALTER TABLE pasien ADD telpon text (15);
jika perintah diatas berhasil dieksekusi maka akan tampil pesan :
Query Ok, 2 rows affected (0.59 sec)
dimana tampilan dari perintah diatas yaitu seperti dibawah ini :
Dalam Visual Basic 6.0 iyalah seperti dibawah ini :
Visual Basic 6.0 merupakan suatu bahasa pemograman yang sangat dikenal, sebuah aplikasi yang dapat melakukan manipulasi data dalam basis data.
Didalam lingkungan Visual Basic terdiri dari beberapa menu khusus yaitu diantaranya Toolbox, Toolbar, Form Windows, Project Explore, Jendela Properties, Form Layout Window, dan Jendela kode.
1. Toolbox yaitu suatu objetc yang akan menjadi penghubung antara program aplikasi dan menggunakannya, dan kesemuaannya harus diletakkan didalam jendela form.
2. Toolbar merupakan sebuah batang yang berisi kumpulan tombol yang terletak dibagian bawah menu bar yang dapat digunakan untuk menjalankan suatu perintah.
3. Form Window yaitu daerah kerja utama, dimana dapat digunakan untuk membuat program-program aplikasi Visual Basic.
4. Jendela Project Explore ialah jendela yang mengandung semua file didalam aplikasi visual basic.
5. Jendela Properties adalah jendela yang mengandung semua informasi mengenai object yang terdapat pada aplikasi visual basic.
6. Form Layout window merupakan sebuah jendela yang dipergunakan untuk mengatur posisi dari form pada form pada saat program dijalankan.
7. Jendela kode adalah salah satu jendela yang paling penting didalam visual basic.
Disini kita membutuhkan Ms. Access untuk pembuatan database nya, Ms. Access juga aplikasi yang bisa digunakan untuk manipulasi data.
Database nya yaitu :
Sebelumnya kita buat dulu form yang dibutuhkan yaitu Form Pasien, Dokter, Kamar, Layanan dan Medical_record dan MDI from sebagai tampilan utama pada saat di jalankan.
setelah itu kita buat command-command yang dibutuhkan.
Dimana tampilan form dan Syntax nya iyalah seperti dibawah ini :
a. Form Pasien
c. Form Kamar
d. Form Layanan
e. Form Medikal Record (Catatan Medik Pasien)
Private Sub Form_Load()
Call KoNeK
cboKK.AddItem "K01-VIP"
cboKK.AddItem "K02-Kls1"
cboKK.AddItem "K03-Kls2"
cboKK.AddItem "K04-Kls3"
cboKK.AddItem "K05-Ekonomi"
Set TblMedicalRecord = New ADODB.Recordset
TblMedicalRecord.Open "select * from Medical_Record", conn, adOpenDynamic, adLockOptimistic
'perintah SQL nya yaitu untuk menampilkan database ke datagrid
Set DataGrid1.DataSource = TblMedicalRecord
Dim list As ADODB.Recordset
Dim tulisan As String
tulisan = "select kode_layanan from Medical_Record"
Set list = conn.Execute("select jenis_layanan from Jenis_Layanan")
list.MoveFirst
While Not list.EOF
cboKL.AddItem list(0)
list.MoveNext
Wend
End Sub
Perintah untuk menampilkan tarif kamar ketika kode kamar Di pilih :
Private Sub cboKK_Change()
If cboKK.Text = "K01-VIP" Then
txttarifk(0).Text = "300000"
ElseIf cboKK.Text = "K02-Kls1" Then
txttarifk(0).Text = "250000"
ElseIf cboKK.Text = "K03-Kls2" Then
txttarifk(0).Text = "200000"
ElseIf cboKK.Text = "K04-Kls3" Then
txttarifk(0).Text = "150000"
ElseIf cboKK.Text = "K05-Ekonomi" Then
txttarifk(0).Text = "100000"
End If
End Sub
Syntax atau perintah dari command baru iyalah:
Private Sub cmdbaru_Click()
txtkodep.Text = ""
txtalamat.Text = ""
txtdiagnosa.Text = ""
txtresep.Text = ""
cboKK.Text = ""
txttarifk(0).Text = ""
cboKL.Text = ""
txttarifl(1).Text = ""
txtkoded(0).Text = ""
txttotal.Text = ""
txtjumlah.Text = ""
txtkembali.Text = ""
txtkodep.SetFocus
End Sub
Syntax dari command hapus iyalah :
Private Sub cmdhapus_Click()
On Error GoTo out
If MsgBox("Apakah Data Ini Ingin Di Hapus", vbExclamation + vbYesNo) = vbYes Then
TblMedical_Record.Delete
'Perintah SQL Delete
Else
MsgBox "Data tidak jadi dihapus", vbInformation
End If
Exit Sub
out:
End Sub
Syntax atau perintah untuk command Cari :
Private Sub Command1_Click()
Dim cari As ADODB.Recordset
If Combo1.Text = "Kode Pasien" Then
Set cari = conn.Execute("select * from medical_record where kode_pasien='" & Text1.Text & "'")
If Not cari.EOF Then
Set DataGrid1.DataSource = cari
Else
MsgBox "Data tidak ditemukan"
Set DataGrid1.DataSource = TblMedicalRecord
End If
ElseIf Combo1.Text = "Alamat" Then
Set cari = conn.Execute("select * from medical_record where alamat='" & Text1.Text & "'")
If Not cari.EOF Then
Set DataGrid1.DataSource = cari
Else
MsgBox "Data tidak ditemukan"
Set DataGrid1.DataSource = TblMedicalRecord
End If
End If
End Sub
Perintah untuk command Simpan :
Private Sub cmdsimpan_Click()
With TblMedicalRecord
.AddNew
!tanggal_masuk = Date
!kode_pasien = txtkodep.Text
!alamat = txtalamat.Text
!diagnosa = txtdiagnosa.Text
!resep = txtresep.Text
!kode_kamar = cboKK.Text
!kode_layanan = cboKL.Text
!kode_dokter = txtkoded(0).Text
!tarif_Kamar = txttarifk(0).Text
!Tarif_Layanan = txttarifl(1).Text
!tanggal_keluar = Date
.Update
End With
End Sub
Syntax atau perintah untuk command keluar :
Private Sub cmdkeluar_Click()
pesan = MsgBox("anda yakin mau keluar???", vbQuestion + vbYesNo, "konfirmasi")
If pesan = vbYes Then
Unload Me
Else
Cancel = 0
End If
End Sub
Disini kita membutuhkan 1 Form khusus untuk mewakili atau menampilkan form-form diatas yaitu yang disebut dengan MDI form, dan module untuk melakukan koneksi antara database access dengan masing-masing form pada Visual Basic.
Dimana tampilannya iyalah sebagai berikut:
1. MDI Form
Jika tampilan nya telah di pilih maka tampilan nya seperti dibawah ini :
Private Sub DOKTER_Click(index As Integer)
FormDokter.Show
End Sub
Private Sub keluar_Click()
End
End Sub
Private Sub MDIForm_Load()
MDIForm1.Visible = True
End Sub
Private Sub MDIForm_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button And vbRightButton Then
PopupMenu MnuFile
End If
End Sub
Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If Not Me.ActiveForm Is Nothing Then
MsgBox "Masih ada Form yang aktif"
Cancel = True
End If
End Sub
Private Sub MEDICAL_RECORD_Click(index As Integer)
FormMedicalRecord.Show
End Sub
Private Sub Menu_Kamar_Click()
FormKamar.Show
End Sub
Private Sub Menu_Layanan_Click()
FormJenisLayanan.Show
End Sub
Private Sub PASIEN_Click(index As Integer)
FormPasien.Show
End Sub
2. Koneksi Module
Public conn As ADODB.Connection
Public TblKamar As ADODB.Recordset
Public TblDokter As ADODB.Recordset
Public TblJenisLayan As ADODB.Recordset
Public TblMedicalRecord As ADODB.Recordset
Public TblPasien As ADODB.Recordset
Public Sub KoNeK()
'On Error GoTo out
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\RUMAH_SAKIT.mdb;Persist Security Info=False"
conn.CursorLocation = adUseClient
'out:
'MsgBox "Koneksi gagal..!!"
'End
End Sub
Demikianlah beberapa penjelasan mengenai penggunaan perintah Manipulasi di My SQL dan pembuatan prgram dengan Visual Basic 6.0 yang dapat kami jelaskan, mohon maaf jika ada kesalahan atau kekurangan,
karena kami juga masih dalam tahap pembelajaran dan belum terlalu mahir dalam menggunakan SQL dan VB. Terimakasih kepada bapak Farly Detrias selaku dosen Mata Kuliah Sistem Basis Data ini yang telah memberikan waktu kepada kami.
Semoga tugas terstruktur ini dapat bermanfaat untuk kita semua, kami sangat membutuhkan kritik dan saran yang sifatnya membangun, agar dikemudian hari dapat membuat tugas yang lebih baik lagi.
Wassalamualaikum wr...wb...!!
Kuliah...?
BSI Aja !!
Chayooo..!!!!
C_U Bye...
Normiyati 12080189
Rini wahyuningsih 12080188
Kembali lagi dengan kami berdua Normiyati dan Rini Wahyuningsih, di tugas Terstruktur 2 Sistem Basis Data.
Disini kami akan mencoba untuk menguraikan atau menjelaskan langkah-langkah atau cara Manipulasi Data dengan menggunakan My SQL.
Dalam penjelasan ini kami juga menggunakan Aplikasi atau Bahasa Pemograman Visual Basic 6.0, karena sesuai dengan apa yang telah kami pelajari,
dan instruksi dari dosen yaitu Bapak Farly Detrias, S.Kom selaku dosen mata kuliah Sistem Basis Data.
Langsung saja kita mulai untuk langkah-langkahnya seperti dibawah ini :
Pertama-tama kami akan menjelaskan apa saja perintah-perintah yang ada pada My SQL, yaitu :
1. Perintah DDL (Data Definition Language) iyalah perintah untuk mendefenisikan suatu database.
Perintah-perintah yang termasuk dalam DDL yaitu CREATE, ALTER, RENAME dan DROP.
2. Perintah DML (Data Manipulation Language) iyalah perintah untuk memanipulasi suatu database.
Perintah-perintah yang termasuk dalam DML yaitu SELECT, INSERT UPDATE, dan DELETE.
3. Perintah DCL (Data Control Language) iayalah perintah untuk komponen bahasa DBMS yang digunakan untuk mengatur perekaman atau penyimpanan data secara fisik, lebih tepatnya iyalah untuk mengontrol data pada suatu database.
Perintah-perintah yang termasuk dalam DCL iyalah GRANT dan REVOKE.
Disini yang akan kita bahas terlebih dahulu dengan Perintah Manipulasi (DML) dalam SQL, diantaranya ialah :
1. SELECT
SELECT disini merupakan perintah untuk menampilkan isi atau record dari suatu tabel.
Contoh Penggunaan SELECT yaitu :
SELECT * From Pasien;
Dimana tampilannya yaitu seperti dibawah ini :
Gambar 1.1 Tampilan Perintah SELECT
2. INSERT
INSERT ialah perintah untuk menambah atau memasukkan record kedalam tabel.
Contoh penggunaan INSERT yaitu :
1. INSERT INTO nama_tabel VALUES (‘nilai1’,’nilai2’,’nilai3’,…’);
2. INSERT INTO nama_tabel ( field1, field2, field3, … ) VALUES (‘nilai1’,’nilai2’,’nilai3’,… );
3. INSERT INTO nama_tabel SET field1=’nilai1’, field2=’nilai2’, field3=’nilai3’, … ;
INSERT INTO pasien set kode_pasien='20013',nama_pasien='Micha',Jenis_kelamin='P',gol_darah='B',umur='22',alamat='Sepakat 1';
jika perintah diatas berhasil dieksekusi maka akan muncul pesan :
Query OK, 1 row affected (0.13 sec)
dimana tampilannya ialah seperti dibawah ini :
Gambar 1.2 Tampilan Perintah Insert
3. UPDATE
UPDATE ialah merupakan perintah untuk merubah inputan record pada suatu tabel.
Contoh penggunaan UPDATE yaitu :
UPDATE Pasien SET nama_dokter=’MimiRomi’ WHERE nama_dokter='Micha';
jika perintah diatas berhasil dieksekusi maka akan muncul pesan :
Query ok, 2 rows affected (0.06 sec)
Rows matched : 2 Changed : Warnings :0
dimana tampilannya ialah seperti dibawah ini :
Gambar 1.3 Tampilan Perintah UPDATE
4. DELETE
ialah merupakan perintah untuk menghapus tabel pada suatu database.
Contoh penggunaan perintah DELETE yaitu :
DELETE FROM Pasien WHERE kode_pasien='20011';
jika perintah diatas berhasil dieksekusi maka akan tampil pesan seperti dibawah ini :
Query Ok, 1 row affected (0.06 sec)
dimana tampilannya ialah seperti dibawah ini :
Gambar 1.4 Tampilan Perintah Delete
5. ALTER
Ialah merupakan perintah untuk mengubah suatu struktur tabel.
ada beberapa jenis perintah ALTER yaitu
Contoh penggunaan perintah ALTER ialah :
ALTER TABLE pasien ADD telpon text (15);
jika perintah diatas berhasil dieksekusi maka akan tampil pesan :
Query Ok, 2 rows affected (0.59 sec)
dimana tampilan dari perintah diatas yaitu seperti dibawah ini :
Gambar 1.5 Tampilan Perintah ALTER
Dalam Visual Basic 6.0 iyalah seperti dibawah ini :
Visual Basic 6.0 merupakan suatu bahasa pemograman yang sangat dikenal, sebuah aplikasi yang dapat melakukan manipulasi data dalam basis data.
Didalam lingkungan Visual Basic terdiri dari beberapa menu khusus yaitu diantaranya Toolbox, Toolbar, Form Windows, Project Explore, Jendela Properties, Form Layout Window, dan Jendela kode.
1. Toolbox yaitu suatu objetc yang akan menjadi penghubung antara program aplikasi dan menggunakannya, dan kesemuaannya harus diletakkan didalam jendela form.
2. Toolbar merupakan sebuah batang yang berisi kumpulan tombol yang terletak dibagian bawah menu bar yang dapat digunakan untuk menjalankan suatu perintah.
3. Form Window yaitu daerah kerja utama, dimana dapat digunakan untuk membuat program-program aplikasi Visual Basic.
4. Jendela Project Explore ialah jendela yang mengandung semua file didalam aplikasi visual basic.
5. Jendela Properties adalah jendela yang mengandung semua informasi mengenai object yang terdapat pada aplikasi visual basic.
6. Form Layout window merupakan sebuah jendela yang dipergunakan untuk mengatur posisi dari form pada form pada saat program dijalankan.
7. Jendela kode adalah salah satu jendela yang paling penting didalam visual basic.
Disini kita membutuhkan Ms. Access untuk pembuatan database nya, Ms. Access juga aplikasi yang bisa digunakan untuk manipulasi data.
Database nya yaitu :
Gambar 1.6 Tampilan Database Menggunakan Ms. Access
Sebelumnya kita buat dulu form yang dibutuhkan yaitu Form Pasien, Dokter, Kamar, Layanan dan Medical_record dan MDI from sebagai tampilan utama pada saat di jalankan.
setelah itu kita buat command-command yang dibutuhkan.
Dimana tampilan form dan Syntax nya iyalah seperti dibawah ini :
a. Form Pasien
Gambar 1.7 Tampilan Form Pasien
Gambar 1.8 Tampilan Data Pasien
b. Form Dokter
Gambar 1.9 Tampilan Form Dokter
Gambar 1.10 Tampilan Data Dokter
c. Form Kamar
Gambar 1.11 Tampilan Form Kamar
Gambar 1.12 Tampilan Data Kamar
d. Form Layanan
Gambar 1.13 Tampilan Form Layanan
Gambar 1.14 Tampilan Data Layanan
Gambar 1.15 Tampilan Form Medical Record
Gambar 1.16 Tampilan Data Medical Record
Syntax atau perintah Form LoadPrivate Sub Form_Load()
Call KoNeK
cboKK.AddItem "K01-VIP"
cboKK.AddItem "K02-Kls1"
cboKK.AddItem "K03-Kls2"
cboKK.AddItem "K04-Kls3"
cboKK.AddItem "K05-Ekonomi"
Set TblMedicalRecord = New ADODB.Recordset
TblMedicalRecord.Open "select * from Medical_Record", conn, adOpenDynamic, adLockOptimistic
'perintah SQL nya yaitu untuk menampilkan database ke datagrid
Set DataGrid1.DataSource = TblMedicalRecord
Dim list As ADODB.Recordset
Dim tulisan As String
tulisan = "select kode_layanan from Medical_Record"
Set list = conn.Execute("select jenis_layanan from Jenis_Layanan")
list.MoveFirst
While Not list.EOF
cboKL.AddItem list(0)
list.MoveNext
Wend
End Sub
Perintah untuk menampilkan tarif kamar ketika kode kamar Di pilih :
Private Sub cboKK_Change()
If cboKK.Text = "K01-VIP" Then
txttarifk(0).Text = "300000"
ElseIf cboKK.Text = "K02-Kls1" Then
txttarifk(0).Text = "250000"
ElseIf cboKK.Text = "K03-Kls2" Then
txttarifk(0).Text = "200000"
ElseIf cboKK.Text = "K04-Kls3" Then
txttarifk(0).Text = "150000"
ElseIf cboKK.Text = "K05-Ekonomi" Then
txttarifk(0).Text = "100000"
End If
End Sub
Syntax atau perintah dari command baru iyalah:
Private Sub cmdbaru_Click()
txtkodep.Text = ""
txtalamat.Text = ""
txtdiagnosa.Text = ""
txtresep.Text = ""
cboKK.Text = ""
txttarifk(0).Text = ""
cboKL.Text = ""
txttarifl(1).Text = ""
txtkoded(0).Text = ""
txttotal.Text = ""
txtjumlah.Text = ""
txtkembali.Text = ""
txtkodep.SetFocus
End Sub
Syntax dari command hapus iyalah :
Private Sub cmdhapus_Click()
On Error GoTo out
If MsgBox("Apakah Data Ini Ingin Di Hapus", vbExclamation + vbYesNo) = vbYes Then
TblMedical_Record.Delete
'Perintah SQL Delete
Else
MsgBox "Data tidak jadi dihapus", vbInformation
End If
Exit Sub
out:
End Sub
Syntax atau perintah untuk command Cari :
Private Sub Command1_Click()
Dim cari As ADODB.Recordset
If Combo1.Text = "Kode Pasien" Then
Set cari = conn.Execute("select * from medical_record where kode_pasien='" & Text1.Text & "'")
If Not cari.EOF Then
Set DataGrid1.DataSource = cari
Else
MsgBox "Data tidak ditemukan"
Set DataGrid1.DataSource = TblMedicalRecord
End If
ElseIf Combo1.Text = "Alamat" Then
Set cari = conn.Execute("select * from medical_record where alamat='" & Text1.Text & "'")
If Not cari.EOF Then
Set DataGrid1.DataSource = cari
Else
MsgBox "Data tidak ditemukan"
Set DataGrid1.DataSource = TblMedicalRecord
End If
End If
End Sub
Perintah untuk command Simpan :
Private Sub cmdsimpan_Click()
With TblMedicalRecord
.AddNew
!tanggal_masuk = Date
!kode_pasien = txtkodep.Text
!alamat = txtalamat.Text
!diagnosa = txtdiagnosa.Text
!resep = txtresep.Text
!kode_kamar = cboKK.Text
!kode_layanan = cboKL.Text
!kode_dokter = txtkoded(0).Text
!tarif_Kamar = txttarifk(0).Text
!Tarif_Layanan = txttarifl(1).Text
!tanggal_keluar = Date
.Update
End With
End Sub
Syntax atau perintah untuk command keluar :
Private Sub cmdkeluar_Click()
pesan = MsgBox("anda yakin mau keluar???", vbQuestion + vbYesNo, "konfirmasi")
If pesan = vbYes Then
Unload Me
Else
Cancel = 0
End If
End Sub
Disini kita membutuhkan 1 Form khusus untuk mewakili atau menampilkan form-form diatas yaitu yang disebut dengan MDI form, dan module untuk melakukan koneksi antara database access dengan masing-masing form pada Visual Basic.
Dimana tampilannya iyalah sebagai berikut:
1. MDI Form
Jika tampilan nya telah di pilih maka tampilan nya seperti dibawah ini :
Gambar 1.20 Tampilan MDI Form Pilihan
Perintah yang ada di MDI Form Pilihan Transaksi :Private Sub DOKTER_Click(index As Integer)
FormDokter.Show
End Sub
Private Sub keluar_Click()
End
End Sub
Private Sub MDIForm_Load()
MDIForm1.Visible = True
End Sub
Private Sub MDIForm_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button And vbRightButton Then
PopupMenu MnuFile
End If
End Sub
Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If Not Me.ActiveForm Is Nothing Then
MsgBox "Masih ada Form yang aktif"
Cancel = True
End If
End Sub
Private Sub MEDICAL_RECORD_Click(index As Integer)
FormMedicalRecord.Show
End Sub
Private Sub Menu_Kamar_Click()
FormKamar.Show
End Sub
Private Sub Menu_Layanan_Click()
FormJenisLayanan.Show
End Sub
Private Sub PASIEN_Click(index As Integer)
FormPasien.Show
End Sub
2. Koneksi Module
Public conn As ADODB.Connection
Public TblKamar As ADODB.Recordset
Public TblDokter As ADODB.Recordset
Public TblJenisLayan As ADODB.Recordset
Public TblMedicalRecord As ADODB.Recordset
Public TblPasien As ADODB.Recordset
Public Sub KoNeK()
'On Error GoTo out
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\RUMAH_SAKIT.mdb;Persist Security Info=False"
conn.CursorLocation = adUseClient
'out:
'MsgBox "Koneksi gagal..!!"
'End
End Sub
Demikianlah beberapa penjelasan mengenai penggunaan perintah Manipulasi di My SQL dan pembuatan prgram dengan Visual Basic 6.0 yang dapat kami jelaskan, mohon maaf jika ada kesalahan atau kekurangan,
karena kami juga masih dalam tahap pembelajaran dan belum terlalu mahir dalam menggunakan SQL dan VB. Terimakasih kepada bapak Farly Detrias selaku dosen Mata Kuliah Sistem Basis Data ini yang telah memberikan waktu kepada kami.
Semoga tugas terstruktur ini dapat bermanfaat untuk kita semua, kami sangat membutuhkan kritik dan saran yang sifatnya membangun, agar dikemudian hari dapat membuat tugas yang lebih baik lagi.
Wassalamualaikum wr...wb...!!
Kuliah...?
BSI Aja !!
Chayooo..!!!!
C_U Bye...
Normiyati 12080189
Rini wahyuningsih 12080188
Selasa, 13 April 2010
DATABASE RUMAH SAKIT MENGGUNAKAN MY SQL
Assalamualaikum Wr... Wb...
Selamat Pagi, siang,Sore...
Pertama-tama kami :
1. Normiyati "12080189"
2. Rini wahyuningsih "12080188"
Mengucapkan alhamdulillah karena dapat menyelesaikan Tugas ini dengan tuntas,yaah meskipun masih jauh dari sempurna..
Tidak lupa kami berterima kasih kepada Modul atau buku panduan dari ACHMATIM.NET yang telah membantu untuk menjelaskan bagaimana mengoperasikan Software MySQL, serta terima kasih juga kepada Bapak Fafly Detrias yang telah memberikan dukungan untuk kami menyusun tugas ini, serta teman-teman seperjuangan, kelas 12.4A.40 Jurusan Manajemen Informatika Bina Sarana Informatika Cabang Pontianak.
Disini kami mengambil atau mencoba untuk membuat Database Rumah Sakit, dimana terdiri dari 5 tabel yaitu :
1. Tabel Pasien
2. Tabel Dokter
3. Tabel Kamar
4. Tabel Jenis_Layanan
5. Tabel Medical Record
Adapun alasan kami mengambil atau memilih Database Rumah Sakit ini ialah karena kami ingin mengetahui apa saja yang dibutuhkan pada Rumah Sakit, kami juga berharap ini bisa untuk menambah Ilmu pengetahuan tentang perlengkapan apa saja yang diperlukan pada Rumah Sakit.
Untuk menampilkan database RUMAH_SAKIT langkah perama harus membuat database apabila database tidak dibuat terlebih dahulu database tidak bisa ditampilkan, langkah-langkah pertama yang kita ketikan dalam mysql ialah:
Pertama-tama kita Buka terlebih dahulu Command SQL yang telah kita instal, Kemudian masukkan password yang telah kita setting ketika menginstal SQL nya.
kemudian ketikkan perintah seperti dibawah ini:
CREATE DATABASE RUMAH_SAKIT;
(perintah ini ialah untuk pembuatan Database awal)
Jika perintah tersebut berhasil dieksekusi atau tanpa error, maka akan muncul pesan :
Query Ok, 1 row affected (0.08 sec)
Dan perintah untuk melihat apakah DATABASE yang kita buat sudah ada di Server My SQL ialah dengan cara mengetikkan perintah :
SHOW DATABASES;
dimana tampilan gambarnya seperti dibawah ini;
Sebelum kita membuat tabel kita harus mengaktifkan atau masuk ke Database yang telah kita buat, yaitu database RUMAH_SAKIT dengan mengetikkan perintah;
USE RUMAH_SAKIT;
Ingat !! Setiap perintah harus selalu diakhiri dengan tanda titik koma ( ; ).
Selanjutnya ialah langkah untuk membuat tabel, yang pertama yaitu tabel PASIEN, perintahnya Seperti di bawah ini :
CREATE TABLE PASIEN (
KODE_PASIEN VARCHAR (5) NOT NULL,
NAMA_PASIEN VARCHAR (30),
JENIS_KELAMIN VARCHAR (1),
GOL_DARAH VARCHAR (3),
UMUR VARCHAR (3),
ALAMAT VARCHAR (30),
PRIMARY KEY (KODE_PASIEN)
);
Jika langkah tersebut sukses, maka akan tampil pesan :
Query OK, 0 row affected (0.17 sec)
Tampilannya seperti gambar di bawah ini;
Yang selanjutnya ialah tabel DOKTER, dimana perintahnya adalah sebagai berikut:
CREATE TABLE DOKTER (
KODE_KAMAR VARCHAR (5) NOT NULL,
NAMA_DOKTER VARCHAR (30),
JENIS_KELAMIN VARCHAR (1),
TELPON VARCHAR (15),
ALAMAT VARCHAR (30),
KEAHLIAN VARCHAR (50),
PRIMARY KEY (KODE_DOKTER)
);
Kemudian perintah Untuk membuat Tabel Kamar :
CREATE TABLE KAMAR (
KODE_KAMAR VARCHAR (5) NOT NULL,
JENIS_KAMAR VARCHAR (50),
TARIF_PERMALAM INT,
FASILITAS VARCHAR (100),
PRIMARY KEY (KODE_KAMAR)
);
Selanjutnya ialah perintah atau Syntax untuk tabel Jenis_Layanan :
CREATE TABLE JENIS_LAYANAN (
KODE_LAYANAN VARCHAR (5) NOT NUL,
JENIS_LAYANAN VARCHAR (50),
TARIF_LAYANAN INT,
PRIMARY KEY (KODE_LAYANAN),
);
Dan yang terakhir ialah tabel Medical_Record, dimana perintah untuk membuatnya ialah:
CREATE TABLE MEDICAL_RECORD (
NOMOR_URUT VARCHAR (5) NOT NULL PRIMARY KEY,
TANGGAL_MASUK DATE,
DIAGNOSA TEXT,
KODE_PASIEN VARCHAR (5),
ALAMAT VARCHAR (30),
TARIF_KAMAR INT,
TARIF_LAYANAN INT,
KODE_DOKTER VARCHAR (5),
KODE_LAYANAN VARCHAR (5),
KODE_KAMAR VARCHAR (5)
);
Kemudian untuk menambahkan atau memasukkan record-record kedalam tabel bisa menggunakan perintah, diantaranya :
1. INSERT INTO nama_tabel VALUES (‘nilai1’,’nilai2’,’nilai3’,…’);
2. INSERT INTO nama_tabel ( field1, field2, field3, … )
VALUES (‘nilai1’,’nilai2’,’nilai3’,… );
3. INSERT INTO nama_tabel
SET field1=’nilai1’, field2=’nilai2’, field3=’nilai3’, … ;
Disini kami menggunakan perintah yang pertama, karena menurut kami, perintah ini yang lumayan mudah. Yang pertama yaitu penginputan record ke tabel PASIEN, yaitu :
INSERT INTO PASIEN VALUES ('A-001','ANJANI AURA','P','AB','29','JL.SERDAM');
Kemudian perintah untuk menampilkan struktur tabel yang telah diinput data yaitu :
SELECT * FROM nama_tabel ;
Tampilan dari pengimputan record diatas ialah seperti gambar berikut:
Selanjutnya ialah untuk memasukkan record kedalam Tabel Dokter:
INSERT INTO DOKTER VALUES ('D-001','ANITA','P','0561-774569','JL.SERDAM','KANDUNGAN');
INSERT INTO KAMAR VALUES ('K-001','VIP','980000','AC,TV,WC,untuk satu pasien');
Yang selanjutnya yaitu perintah input record pada Tabel Jenis_Layanan :
INSERT INTO JENIS_LAYANAN VALUES ('J-003','OPERASI KANGKER OTAK','7000000');
Yang terakhir ialah perintah input data atau record kedalam tabel Medical_Record :
INSERT INTO MEDICAL_RECORD VALUES (‘MR-11’,’2010-3-14’,’Gagal Nafas’,’P-001’,’JL. Tanjung Pura’,’500000’,’6500000’,’D-002’,’L-003’,’K-001’);
Tampilan dari input data Medical_Record ialah seperti dibawah ini :
Demikianlah Penjelasan mengenai perintah-perintah dalam pembuatan Database RUMAH_SAKIT yang kami jelaskan secara sederhana, kami mohon maaf karena database ini masih sangat jauh dari sempurna karena masih kurang dalam penyajian datanya, karena kami pun kurang terlalu mengerti apa saja yang dibutuhkan atau perlengkapan apa saja biasanya disediakan lagi di Rumah sakit-rumah sakit pada umumnya.
Jika ada kekurangan, mohon kritik dan sarannya yang mudah-mudahan kedepannya dapat membantu pembuatan Database-database yang lain.
Kami cukupkan sampai disini, terima kasih sebelumnya kepada bapak Farly Detrias S. Kom selaku Dosen Mata Kuliah Sistem Basis Data ini, semoga selalu sehat walafiat, bahagia dan panjang umur, amin yarabbal’alamin..!!
Wassalamu’alaikum wr…wb…!!
Kuliah…? BSI Aja..!!
BSI… Oi.. Oi.. Oi.. !!
Selamat Pagi, siang,Sore...
Pertama-tama kami :
1. Normiyati "12080189"
2. Rini wahyuningsih "12080188"
Mengucapkan alhamdulillah karena dapat menyelesaikan Tugas ini dengan tuntas,yaah meskipun masih jauh dari sempurna..
Tidak lupa kami berterima kasih kepada Modul atau buku panduan dari ACHMATIM.NET yang telah membantu untuk menjelaskan bagaimana mengoperasikan Software MySQL, serta terima kasih juga kepada Bapak Fafly Detrias yang telah memberikan dukungan untuk kami menyusun tugas ini, serta teman-teman seperjuangan, kelas 12.4A.40 Jurusan Manajemen Informatika Bina Sarana Informatika Cabang Pontianak.
Disini kami mengambil atau mencoba untuk membuat Database Rumah Sakit, dimana terdiri dari 5 tabel yaitu :
1. Tabel Pasien
2. Tabel Dokter
3. Tabel Kamar
4. Tabel Jenis_Layanan
5. Tabel Medical Record
Adapun alasan kami mengambil atau memilih Database Rumah Sakit ini ialah karena kami ingin mengetahui apa saja yang dibutuhkan pada Rumah Sakit, kami juga berharap ini bisa untuk menambah Ilmu pengetahuan tentang perlengkapan apa saja yang diperlukan pada Rumah Sakit.
Untuk menampilkan database RUMAH_SAKIT langkah perama harus membuat database apabila database tidak dibuat terlebih dahulu database tidak bisa ditampilkan, langkah-langkah pertama yang kita ketikan dalam mysql ialah:
Pertama-tama kita Buka terlebih dahulu Command SQL yang telah kita instal, Kemudian masukkan password yang telah kita setting ketika menginstal SQL nya.
kemudian ketikkan perintah seperti dibawah ini:
CREATE DATABASE RUMAH_SAKIT;
(perintah ini ialah untuk pembuatan Database awal)
Jika perintah tersebut berhasil dieksekusi atau tanpa error, maka akan muncul pesan :
Query Ok, 1 row affected (0.08 sec)
Dan perintah untuk melihat apakah DATABASE yang kita buat sudah ada di Server My SQL ialah dengan cara mengetikkan perintah :
SHOW DATABASES;
dimana tampilan gambarnya seperti dibawah ini;
Gambar 1.1 Tampilan pembuatan Database Awal
Sebelum kita membuat tabel kita harus mengaktifkan atau masuk ke Database yang telah kita buat, yaitu database RUMAH_SAKIT dengan mengetikkan perintah;
USE RUMAH_SAKIT;
Ingat !! Setiap perintah harus selalu diakhiri dengan tanda titik koma ( ; ).
Selanjutnya ialah langkah untuk membuat tabel, yang pertama yaitu tabel PASIEN, perintahnya Seperti di bawah ini :
CREATE TABLE PASIEN (
KODE_PASIEN VARCHAR (5) NOT NULL,
NAMA_PASIEN VARCHAR (30),
JENIS_KELAMIN VARCHAR (1),
GOL_DARAH VARCHAR (3),
UMUR VARCHAR (3),
ALAMAT VARCHAR (30),
PRIMARY KEY (KODE_PASIEN)
);
Jika langkah tersebut sukses, maka akan tampil pesan :
Query OK, 0 row affected (0.17 sec)
Tampilannya seperti gambar di bawah ini;
Gambar 1.2 Tampilan Bentuk Tabel Pasien
Yang selanjutnya ialah tabel DOKTER, dimana perintahnya adalah sebagai berikut:
CREATE TABLE DOKTER (
KODE_KAMAR VARCHAR (5) NOT NULL,
NAMA_DOKTER VARCHAR (30),
JENIS_KELAMIN VARCHAR (1),
TELPON VARCHAR (15),
ALAMAT VARCHAR (30),
KEAHLIAN VARCHAR (50),
PRIMARY KEY (KODE_DOKTER)
);
Gambar 1.3 Tampilan Tabel Dokter
Kemudian perintah Untuk membuat Tabel Kamar :
CREATE TABLE KAMAR (
KODE_KAMAR VARCHAR (5) NOT NULL,
JENIS_KAMAR VARCHAR (50),
TARIF_PERMALAM INT,
FASILITAS VARCHAR (100),
PRIMARY KEY (KODE_KAMAR)
);
Gambar 1.4 Tampilan Tabel Kamar
Selanjutnya ialah perintah atau Syntax untuk tabel Jenis_Layanan :
CREATE TABLE JENIS_LAYANAN (
KODE_LAYANAN VARCHAR (5) NOT NUL,
JENIS_LAYANAN VARCHAR (50),
TARIF_LAYANAN INT,
PRIMARY KEY (KODE_LAYANAN),
);
Gambar 1.5 Tampilan Tabel Jenis_Layanan
Dan yang terakhir ialah tabel Medical_Record, dimana perintah untuk membuatnya ialah:
CREATE TABLE MEDICAL_RECORD (
NOMOR_URUT VARCHAR (5) NOT NULL PRIMARY KEY,
TANGGAL_MASUK DATE,
DIAGNOSA TEXT,
KODE_PASIEN VARCHAR (5),
ALAMAT VARCHAR (30),
TARIF_KAMAR INT,
TARIF_LAYANAN INT,
KODE_DOKTER VARCHAR (5),
KODE_LAYANAN VARCHAR (5),
KODE_KAMAR VARCHAR (5)
);
Gambar 1.6 Tampilan Dari Tabel Medical_Record
Kemudian untuk menambahkan atau memasukkan record-record kedalam tabel bisa menggunakan perintah, diantaranya :
1. INSERT INTO nama_tabel VALUES (‘nilai1’,’nilai2’,’nilai3’,…’);
2. INSERT INTO nama_tabel ( field1, field2, field3, … )
VALUES (‘nilai1’,’nilai2’,’nilai3’,… );
3. INSERT INTO nama_tabel
SET field1=’nilai1’, field2=’nilai2’, field3=’nilai3’, … ;
Disini kami menggunakan perintah yang pertama, karena menurut kami, perintah ini yang lumayan mudah. Yang pertama yaitu penginputan record ke tabel PASIEN, yaitu :
INSERT INTO PASIEN VALUES ('A-001','ANJANI AURA','P','AB','29','JL.SERDAM');
Kemudian perintah untuk menampilkan struktur tabel yang telah diinput data yaitu :
SELECT * FROM nama_tabel ;
Tampilan dari pengimputan record diatas ialah seperti gambar berikut:
Gambar 1.7 Tampilan Record Tabel Pasien
Selanjutnya ialah untuk memasukkan record kedalam Tabel Dokter:
INSERT INTO DOKTER VALUES ('D-001','ANITA','P','0561-774569','JL.SERDAM','KANDUNGAN');
Gambar 1.8 Tampilan Record Tabel Dokter
Dan yang selanjutnya ialah input record kedalam Tabel Kamar;INSERT INTO KAMAR VALUES ('K-001','VIP','980000','AC,TV,WC,untuk satu pasien');
Gambar 1.9 Tampilan Record Tabel Kamar
Yang selanjutnya yaitu perintah input record pada Tabel Jenis_Layanan :
INSERT INTO JENIS_LAYANAN VALUES ('J-003','OPERASI KANGKER OTAK','7000000');
Gambar 1.10 Tampilan Record Tabel Jenis_Layanan
Yang terakhir ialah perintah input data atau record kedalam tabel Medical_Record :
INSERT INTO MEDICAL_RECORD VALUES (‘MR-11’,’2010-3-14’,’Gagal Nafas’,’P-001’,’JL. Tanjung Pura’,’500000’,’6500000’,’D-002’,’L-003’,’K-001’);
Tampilan dari input data Medical_Record ialah seperti dibawah ini :
Gambar 1.11 Tampilan Record Tabel Medical_Record
Demikianlah Penjelasan mengenai perintah-perintah dalam pembuatan Database RUMAH_SAKIT yang kami jelaskan secara sederhana, kami mohon maaf karena database ini masih sangat jauh dari sempurna karena masih kurang dalam penyajian datanya, karena kami pun kurang terlalu mengerti apa saja yang dibutuhkan atau perlengkapan apa saja biasanya disediakan lagi di Rumah sakit-rumah sakit pada umumnya.
Jika ada kekurangan, mohon kritik dan sarannya yang mudah-mudahan kedepannya dapat membantu pembuatan Database-database yang lain.
Kami cukupkan sampai disini, terima kasih sebelumnya kepada bapak Farly Detrias S. Kom selaku Dosen Mata Kuliah Sistem Basis Data ini, semoga selalu sehat walafiat, bahagia dan panjang umur, amin yarabbal’alamin..!!
Wassalamu’alaikum wr…wb…!!
Kuliah…? BSI Aja..!!
BSI… Oi.. Oi.. Oi.. !!
Langganan:
Postingan (Atom)