Panduan Praktikum. Pemrograman Basis Data

Panduan Praktikum Pemrograman Basis Data

UPT LABORATORIUM STMIK AKAKOM 2004

KATA PENGANTAR Panduan praktikum pemrograman basis data ini disusun dalam rangka melengkapi sarana praktikum pemrograman Basisa Data di STMIK AKAKOM, sehingga mahasiswa dapat melaksanakan praktikum dengan labih terarah dan lebih mudah. Buku ini disusun dengan menggunakan 2 jenis bahasa pemrograman basis data yakni yang non web dengan Visual Foxpro dan web-base programming yaitu PHP dan My SQL dengan harapan pengguna dapat langsung memahami program basis data yang diperlukan untuk keperluan yang sangat luas saat ini baik untuk keperluan skala kecil menengah (dengan non Web) maupun skala besar (web). Karena kajian utama pengenai programan basis data maka kami tidak mengupas lebih dalam tetang instalasi PHP dan My SQL, sehingga lebih didekatkan pada penyelesdaian basis data dengan bahasa tersebut. Penulis mengucapkan terima kasih kepada semua fihak dan khususnya kepada Ibu Pulut Suryani,S.Kom. (alumni STMIK AKAKOM) dan Saudara Bunafit Nugroho (mahasiswa STMIK AKAKOM) yang telah berkenan membantu penyelesaian panduan praktikum ini. Semoga buku ini memberi manfaat bagi pembaca, kritik dan saran kami harapkan agar buku ini lebih sempuirna di masa yang akan datang

Yogyakarta, 2-9-2004 Penyusun

M. Guntara

Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 1

Pemrograman Basis Data Modul 1 – 8

menggunakan FOXPRO 6


hal 2

MODUL I. PENGENALAN PEMROGRAMAN MAKSUD DAN TUJUAN •

Mahasiswa dapat memahami dasar pemrogramam dengan Visual Foxpro 6.

•

Mahasiswa dapat mengenal komponen dasar pemrograman

•

Mahasiswa dapat membuat form dengan Visual Foxpro 6.

DASAR TEORI Memrograman Basis data dapat diselesaikan dengan beberapa Aplikasi salah satunya adalah Visual Foxpro. Dengan menggunakan pernagkat lunak ini pembuatan program aplikasi yang melibatkan basis data dapat dilakukan dengan mudah dan cepat. Antar muka yang menarik dan mudah dipakai dapat dibuat secara visual dan tanpa harus banyak menuliskan kode.

PRAKTIK •

Menjalankan Visual Foxpro 6.0

•

Dari jendela Command pindah ke Direktori kerja anda ketikan : SET DEFA TO H: Atau CD H: ! Direktori kerja

Pengenalan Objek Objek pda Visual Foxpro dibedakan 2 golongan yaitu : Kontrol (missal : Text box, list box, combo Box, label dll) "# Kontainer (missal : Form, database, dll) "# •

Membuat form Pilih menu File – New, maka akan tampail kotak dialog New File, maka akan muncul opsi Form, kemudian klik tombol New File, maka akan muncul beberapa jendela yang tersedia yaitu : 1. Jendela Form designer Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 3

2. Jendela Form 3. Jendela Form Kontrol 4. Jendela Properti Seperti tampak berikut

•

Simpan ke Direktori kerja anda dengan nama latih1 (Form disimpan dengan ekstensi .scx ( Latih1.scx). Dalam perancangan, form berapa pada jendela Forn Designer Form Control merupakan jendela yang memuat berbagai control yang disediakan Visual Foxpro. Anda perlu memilih control yang terdapat pada jendela ini sebelum menempatkan pada Form. Bila jendela Form Control tidak terlihat, dapat dimunculkan dengan pilih menu View – Form Control Toolbar Jendela property merupakan tempat untuk mengatur hal-hal yang berkaitan dengan control yang terdapat pda form. Selain istilah property (Karakteristrik atau sifat yang mendasari suatu control seperti warna teks, ukuran dll ) terdapat. o Kejadian (Event) : menyatakan suatu tidakan seperi saat mouse di gerakan, tombol ditekan (Click Event), dll.

•

Pengenalan Control Buat Form seperti berikut :


hal 4

o Membuat Label pada form Untuk menuliskan label atau keterangan No.Mhs dilakukan dengan

1. Aktifkan jendela Form Controls 2. Klik ikon label

pada Form Control

3. Klik pada lokasi pada Form tempat teks akan ditempatkan 4. Lebarkan tulisan yang dihasilkam pada langkah 3 (berupa tulisan : label1) jika diperlukan – dengan cara menarik ujung kanannya. 5. Aktifkan jendela properties 6. Pada Tab Layout, Sorotlah property dengan nama Caption. Isi semula berupa label1 diganti dengan No.Mhs Dan tekan Enter 7. Agar ukuran label sesuai dengan Tulisan yang anda buat pada Properties Autosize dari .F. False ganti dengan .T. True Dengan cara yang sama buatlah di bawah No.Mhs yang lain ( Nama, Jenjang, Jurusan, Tahun Masuk)

o Membuat Kotak Teks Petunjuk untuk membuat Kotak Teks yang terletak disebelah kanan label No.Mhs

1. Aktifkan jendela Form Control


hal 5

2. Klik Ikon Text Box (

)

3. Klik pada lokasi pada Form tempat kontak teks akan ditempatkan 4. Lebarkan kotak yang dihasilkan pada langkah 3 dengan cara menarik ujung kanannya – jika diperlukan. 5. Aktifkan Jendela Properties 6. Pada Tab Order, sorotlah Properties dengan nama Name, Gantilah dengan TextNomhs TextNomhs adalah nama untuk kode teks yang telah anda buat Nama ini nantinya akan akacu pada kode yang akan anda tuliskan Dengan cara serupa buatlah Kotak Teks disebal label nama denagan Properties Name = TextNama o Membuat Optiongroup Petunjuk untuk membuat optiongroup 1. Klik pada Icon

pada form Controls

2. Klik pada bagian Form, tempat option group akan diletakkan 3. Klik tombol Kanan mouse pada Kontrol Option Group yang terdapat pada Form. 4. Pilih Builder… pada mem Pop –up yang ganti Number Of Button = 2 (jumlah item pada option group) dan pada caption tuliskan S! dan D3 sebagai berikut :


hal 6

5. Klik pada Tab berjudul Layout 6. Klik pada tombol radio Horizontal 7. Pilihlah BorderStyle, berupa None (tanpa Bingkai), Klik Tombol OK 8. Ubahlah Properties Name dengan Opgjenjang Dengan cara yang sama buatlah Optiongroup untuk Jurusan dengan nama Opgjurusan

o Membuat Spinner Spinner adalah suatu kotak pengentri nilai numeris yang dapat ditambah atau dikurangi melalui suatu penaik atau penurun

Petunjuk Membuat Spinner 1. Klik pada icon spinner

pada Form control

2. Klik pada bagian Form, tempat spinner akan diletakkan 3. Lebarkan kotak yang dihasilkan pada langkah 2 dengan cara menarik ujung kanannya. 4. Ubahlah Properties Name dengan Spintahun Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 7

5. Ubahlah Properties Value = 2000

o Membuat Tombol Perintah (Command) Tombol perintah digunakan untuk melakukan suatu tindakakn kiranya pengguna untuk mengkliknya. Berikut merupakan petunjuk untuk menambahkan tombol perintah yang

Berjudul keluar 1. Kliklah pada icon Command Button

pada form control

2. Gerakkan penunjuk ke form, tempatkan pada lokasi tombol perintah tersebut hendak ditempatkan 3. Lebarkan tombol perintah ini secukupnya 4. Aktifkan jendela Properties 5. Ubahlah Properties Caption dengan \
Kode pada Click Event Tombol Hapus Thisform.textnomhs.value = ‘’ Thisform.textnama.value = ‘’ Thisform.opgjenjang.value = 1 Thisform.opgjurusan.value = 1 Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 8

Thisform.spintahun.value = year(date())

o Menguji Aplikasi Meskipun antar muka belum dibuat dengan lengkap kita dapat menguji form yang dibuat dengan cara : 1. Pilihlah menu Form (Alt-M) 2. Kemudian pilih Run – Form Atau dengan cara yang lebih singkat, klik pada icon Run

o Mengakhiri pengaksesan dan kembali ke Form Designer klik tombol

D. TUGAS 1. Lakukan pengubahan pada judul form dengan Daftar Mahasiswa 2.

Lakukan pengubahan warna form, jenis huruf serta tampilan sesuai yang

anda suka


hal 9

Modul 2. Perekaman data dari FORM ke Tabel

2.1 Tujuan 1. Agar mahasiswa dapat memahami cara membuat tabel 2. Agar mahasiswa dapat membuat kode program untuk perekaman data ke tabel

2.2 Landasan Teori 2.2.1 Manipulasi record Manipulasi record adalah proses yang dapat dilakukan terhadap suatu record menambah, menghapus dan mengubah. 1. Menambahkan record kosong Intruksi : Append Blank 2. Menyisipkan recod baru Intruksi : INSERT INTO nama_tabel ( field_a, field_b, …, field_n) VALUE ; (‘data_a’, ‘data_b’,’…’,’data_n’) 3. Menganti record Intruksi REPLACE field_a WITH var1, ; Field_b WITH var2,; Dst 4. Membuka / mengaktifkan table Intruksi : USE nama_tabel 5. Memindahkan pointer ke table yang sudah aktif Intruksi SELECT nama_tabel 6. Menutup/menonaktifklan tabel Intruksi : CLOSE Database Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 10

7. Menciptakan struktur tabel baru Intruksi : CREATE nama_tabel (field_a fieldtype(nfieldwidth),; field_b fieldtype(nfieldwidth, …)

8. Mengubah/memodifikasi struktur tabel yang sudah diaktifkan Intruksi MODI STRU 9. Melihat isi tabel Intruksi BROWSE

2.3 Langkah Praktikum 1. Buatlah tabel dengan nama tabel : Mahasiswa.Dbf dengan langkah 1. Klik : File – New – Table – New File Ketik : mahasiswa.Dbf – Save 2. Isi Table Designer dengan struktur sebagai berikut:

3. Setelah selesai mengisi struktur tabel klik OK 4. Setelah itu muncul Input Record Data Now, Klik NO

2. Buatlah Form dan properties seperti dibawah ini


hal 11

1 2 3 4

5

0

Keterangan Form Nomor Kontrol

Control

Properties

0

Form

Name : form1(default)

1

TextBox

Name : TextNomhs

2

TextBox

Name : TextNama

3

TextBox

Name : TextKd_Jur

4

Command button

Caption : \
5

Command Button

Caption : \
Kode Program Nomor Kontrol : 0 Form1-Methode-loadEvent Ketik : USE mahasiswa.dbf

Nomor Kontrol : 4 REKAM – Click Event Ketik : N1 = thisform.textnomhs.value N2 = thisform.textnama.value N3 = thisform.textKd_jur.value * memasukkan data record dalam tabel mahasiswa INSERT INTO mahasiswa (nomhs, nama, kd_jur ) VALUE ( N1,N2,N3) Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 12

Nomor Kontrol 5 KELUAR – Click Event Ketik : CLOSE Data Thisform.Release() //Menutup Form

Daftar Isi Tabel Jurusan Kd_Jur

Jurusan

J01

Teknik Informatika

J02

Sistem Informasi

J03

Manajemem Informatika

J04

Teknik Komputer

J05

Komputer Akuntansi

3. Simpan form diatas dengan nama form : rekam.scx 4. Jalankan form tersebut 5. Isikan data pada form dan rekam dengan ketik BROWSE pada Command Window. 6. Bila sudah terekam, isilah tabel menggunakan form tersebut dengan beberapa record lagi. 7. Bila sudah terekam, isilah tabel menggunakan form tersebut beberapa record lagi. 8. Setelah Selesai klik Tombol KELUAR

2.4 Tugas 1. Buat tabel jurusan.dbf untuk menyimpan data jurusan 2. Buat Form baru untuk merekam data jurusan ( lihat isi tabel jurusan)


hal 13

Modul 3. Menampilkan data dengan Form 3.1 Tujuan 1. Memahai cara mengambil data dari suatu tabel 2. Menampilkan data/ isi tabel ke Form

3.2 Landasan Teori Menampilkan isi tabel secara umum dapat dilakukan dengan 2 cara, yaitu menggunakan Form dan report. Menampilkan data/informasi dengan media form berarti menampilkan data/informasi dengan format dan fasilitas layar, sehingga ukuran dan variasi warna dapat disesuaikan dengan kemampuan layar. Terdapat beberapa cara menampilkan data ke form berdasarkan informasi yang disajikan 1. Menampilkan isi tabel secara umum dapat dilakukan dengan 2 cara, yakni mengunakan Form dan report. Menampilkan data/informasi

dengan

media

form

berarti

menampilkan

data/informasi dengan format dan fasilitas layar, sehingga ukuran dan variasi warna dapat disesuaikan dengan kemampuan layar. -

Mencari data suatu record pada tabel LOCATE FOR field_kunci = data_kunci Keterangan : Field_Kunci : field yang digunakan untuk acuan pencarian Data_Kunci : data yang digunakan sebagai acuan untuk mencari

-

Menampilkan

isi

field

dari

suatu

record

dengan

label/textbox THISFORM.Name.CAPTION/VALUE = nama_field Keterangan : Label

: dengan Caption


hal 14

Textbox

: dengan Value

2. Menampilkan daftar record (Isi Tabel) a. Semua record, dimana data pada semua record ditampilkan b. Sesuai

dengan

criteria

(filtering),

dimana

data

yang

dimunculkan disaring sesuai dengan criteria tertentu. Perintah Filtering SET FILTER TO Field_kunci1 # data_kunci1 ∆ ; Field_kunci2 # data_kunci2 Keterangan : Dengan # adalah =, >, <, >, <> ∆ adalah .and., .OR., .NOR., .XOR., dll 3. Menampilkan rekapitulasi , dimana informasi yang ditampilkan sifatnya rangkuman dari tabel untuk tujuan tertentu

3.3 Langkah Praktikum 3.3.1 Menampilkan data per record 1. Buatlah form sebagai berikut

1 2 3

0

Keterangan Form Nomor Control

Control

Properties

0

Form

Name : Form1(Default)

1

TextBox

Name : Textnomhs

2

Label

Name : Labelnama


hal 15

Caption : labelnama 3

Label

Name : Labeljurusan Caption : labeljurusan

2. Buatlah kode program sebagai berikut Nomor Kontrol 0 Form1 – LoadEvent Ketik : USE mahasiswa.dbf

Nomor Kontrol 1 Ketik GO TOP LOCATE FOR nomhs = RTRIM(Thisform.textnomhs.value) //mencari record IF FOUND() Thisform.labelnama.caption = nama DO CASE CASE kd_jur = ‘J01’ Thisform.labeljurusan.value = ‘Teknik Informatika’ CASE kd_jur = ‘J02’ Thisform.labeljurusan.value = ‘Sistem Informatika’ CASE kd_jur = ‘J03’ Thisform.labeljurusan.value = ‘Manajemen Informatika’ CASE kd_jur = ‘J04’ Thisform.labeljurusan.value = ‘Teknik Komputer’ CASE kd_jur = ‘J05’ Thisform.labeljurusan.value = ‘Komputer Akuntansi’ END CASE ELSE MESSAGEBOX(‘Data yang dicari Tidak Ada’) Thisform.labelnama.value = ‘’ Thisform.labeljurusan.value = ‘’ Thisform.textnomhs.setfocus() Endif

3. Lengkapi kode untuk keluar dari form 4. Simpan form diatas dan jalankan 5. Masukkan nomor yang akan dicari, cek apakah bila nomor ditemukan data akan muncul dan bila tidak ditemukan akan muncul pesan tidak ditemukan

3.4 Tugas Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 16

1.

Modifikasilah aplikasi diatas, dengan data kunci pencarian berupa nama mahasiswa

Modul 4. Pengurutan dan Penyaring ( Filtering)

4.1 Tujuan 1. Agar dapat memahami cara menampilkan semua data di Form 2. Agar dapat memahami cara mengurutkan data di form 3. Agar dapat memahami cara menampilkan data di form dengan Kriteria tertentu (disaring) 4.

Agar mahasiswa dapat menggunakan control : ListBox, Grid, dan RadioButton/ OptionGroup

4. 2 Landasan Teori 4.2.1 Pengurutan Pengurutan suatu tabel dapat dilakukan dengan cara mengindex tabel sesuai dengan field kunci indexnya. Terdapat 2 jenis index a. Index tunggal, bila tabel tersebut hanya diindex atas dasar 1 field saja Menciptakan File index: INDEX ON field_kunci To nama_File_index.IDX Untuk Mengaktifkan : SET INDEX TO nama_file_index.IDX

b. Index majemuk (Compound index), bila dalam 1 tabel field kunci index lebih dari satu Menciptakan File Index majemuk INDEX ON Field_kunci1 TAG nama_index1 INDEX ON Field_kunci2 TAG nama_index2 …. Untuk mengaktifkan SET ORDER TO nama_indek1, bila ingin urut atas dasar field kunci1, dst Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 17

Catatan : File index majemuk tersimpan dalam file dengan nama sesuai dengan nama tabel extensi .CDX dan otomatis diaktifkan saat tabel dibuka. Nama Idex han digunakan sebagai tanda (tag) sesaui dengan field kunci indenya c. Pengidexkan dalam tabel dapat juga dilakukan lewat Modifikasi Strutur tabel yaitu dengan Cara: Pada Command Window Ketik : MODI STRU Sehingga akan tampil sebagai berikut :

1

Keterangan : 1. Klik Index untuk mengindek field tabel secara Ascending atau Descending 2. Untuk mengaktifkan index : SET ORDER TO nama_indek ( Nama_Index secara otomatis sesuai dengan nama field )

4.2.2 Penyaringan Data yang terekam di basis data sifatnya masih mentah dalam arti semua data terrekam disana. Agar informasi yang dihasilkan lebih berguna dapat dilakukan penyringan dari data mentah tersebut. Intruksi : SET FITER TO field_kunci = data Kunci Suatu tabel yang sudah di filter maka semua proses yang ada hanya terkait dengan record yang terfilter tersebut. Untuk mengembalikan ke posisi awal/ record semula gunakan perintah SET FILTER TO 4.2.3 Control dan Fungsinya Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 18

Var

: THISFORM.name.Value/Caption, bila diambil dari / untuk

Form : Variabel memori biasa K

: Konstanta

Control

Kegunaan

Mengambil data dari control

Optiongroup

Memilih 1 pilih sengan cacah alternative pilihan sedikit (2-3)

Do Case Case name = 1 tombol pertama di klik Proses1 Case name = 2 tombol kedua di klik Proses2 … dst ENDCASE

Grid

Menampilkan isi record dalam bentu tabel Menampilkan isi tabel (file) dalam bentuk format tabel analag

ListBox

4.3

Var = Thisform..name.value Mengambil nilai saat di klik If ListIndex>0 Var = this.list(this.listIndex) Endif

Langkah Praktikum

1. Buatlah Form seperti dibawah ini

1

2

3

0

Keterangan Form Nomor Control 0 1 2 3

Control Form Optiongroup ListBox Grid

Properties Name : Form1(default) Name : pil Name : Jurusan Name : Grid1 (Default)


hal 19

2. Buatlah kode program sebagai berikut : No control 0 : Form – LoadEvent USE Mahasiswa.dbf No control 0 : Form – InitEvent Public Jurusan Thisform.grid1.recordsourcetype = 6 Thisform.grid1.recordsource = ‘mahasiswa’ Thisform.grid1.columncount = 3 Thisform.grid1.column1.controlsource = ‘mahasiswa.nomhs’ Thisform.grid1.column2.controlsource = ‘mahasiswa.nama’ Thisform.grid1.column3.controlsource = ‘mahasiswa.Kd_jur’

Pastikan untuk field nomhs dan nama dalam tabel mahasiswa telah di index Dapat diindek lewat modifikasi tabel MODI STRU Nomhs secara Ascending Nama secara Ascending

No Control 1 : Pil – ClickEvent Do Case Case thisform.pil.value = 1 Set order to nomhs Case thisform.pil.value = 2 Set order to nama Endcase Thisform.grid1.refesh()

No Control 2 : Jurusan – ClickEvent If this.listindex > 0 Jurusan = this.list(this.listindex) Endif If RTRIM(jurusan) = ‘Semua’ Set Filter To Else Set filter To Set filter to kd_jur = rtrim(jurusan) Endif Thisform.grid1.refresh()

3. Isi caption/text pada Optiongroup ( no control 1) dengan cara 1. 2. 3. 4.

Letakkan kursor diatas control no.1, kemudian di klik Pindahkan kursor ke jendela Properties Klik bagian combo ( pada teks: pil) Klik Option1 Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 20

5. Klik Layout – Caption 6. Ketik ‘No Mahasiswa’, kemuadian tekan Enter 7. Klik bagian Combo 8. Klik Option2 9. Klik layout- Caption 10. Ketik ‘Nama’, kemudian tekan Enter 4. Buatlah desain Grid seperti diatas dengan cara 1. Letakkan kursor diatas Grid (no control 2) kemudian di klik 2. pindahkan kursor keProperties 3. Klik Layout – ColumnCount : 3 4. Klik Header1 5. Isikan pilihan jurusan pada listbox (no control 2) dengan 1. Arahkan kursor ke control listbox, kemudian di klik 2. Arahkan kursor ke properties 6. Simpan form 7. jalankan, kemudian dicoba pilihan pengurutan, amati apakah urutan berubah ( dari urut no mahasiswa menjadi urut nama dan sebaliknya) 8. Pilih jurusan pada listbox, amati hasilnya

4.4 Tugas Buatlah pengurutan atas dasar Kode Jurusan, dengan menambah 1 item pilihan pada OptionGroup sehingga pilihan pengurutan menjadai : No.Mahasiswa, Nama, Kode Jurusan. Catatan : Jangan lupa tambahkan indek Kode Jurusan pada Form1- load Event.


hal 21

Modul 5. Relasi Antar Tabel

5.1 Tujuan 1. Agara memahami cara penghubung 2 tabel untuk menghasilkan 1 laporan 2. Agar dapat mengatur properties Grid menggunakan jendela properties (pda modul mengunakan prosedur)

5. 2. Landasan Teori Pada suatu pengolahan data dengan pendekatan basis data maka 1 laporan dapat dihasilkan dari 2 table yang terkait atau lebih. Untuk menghubungkan antar tabel diperlukan kunci penghubung. Bila dalam suatu proses memerlukan 2 tabel atau lebih maka dalam memmbuak tabel harus didahului dengan SELECT, sehinga kodenya sebagai berikut : SELECT 1 Use table1 [ALIAS alias1] SELECT 2 Use table2 [ALIAS alias2] … dst Unruk proses selanjutnya bila akan memindahkan pointer dari tabel satu ke yang lain cukup dengan SELECT 1 atau SELECT alias1 , bila ingin mengaktifkan tabel 1 Dan seterusnya Bila ALIAS (nama lain tabel) tidak digunkan maka ALIAS sama dengan nama tabelnya. Untuk merelasikan ke tabel lain memiliki algoritma sebagai berikut 1. Aktifkan tabel pokok/tabel referensi/tabel transaksi yaitu tabel yang berisi data pokok / tabel yang akan ditampilkan/diproses 2. lakukan rwelasi ke tabel indul dengan catatan tabel induk ini diidex atas dasar kunci primernya. Perintah untuk merelasikan SET RELATION TO kunci_tamu INTO nomor area tabel induk Atau SET RELATION TO Kunci_tamu INTO alias dari tabel induk Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 22

Atau bisa juga lewat data Environment yaitu dengan cara 1. Klik kanan mouse dalam form sehingga muncul option berikut :

2. Pilih Data Environment, selanjutnya masukan tabel yang akan digunakan yang pertama adalah tabel induk, kemudian masukan lagi tabel transaksi ( dapat dengan klik Other, atau jika sudah dalam jendela data environment Klik kanan Mouse pilih Add, pilih tabel transaksi) 3. Selanjutknya tarik field tabel yang akan direlasikan dengan field kunci yang akan direlasikan seperti tampak pada gambar berikut :

Catatan : Penggunaan data Environment

tidak untuk berlaku untuk

multisuser 3. Untuk mengambil data dari tabel induk sementara pointer pada posisi tabel transaksi Var = alias tabel induk.nama_field Atau Var = alias tabel induk -> nama_field 5.3 Langkah Praktikum


hal 23

1. Buatlah tabel baru yaitu tabel Jurusan.dbf, dengan struktur sebagai berikut: Field Name Kd_jur Jurusan

Type C C

Witdh 3 30

2. Dengan Command Windows isilah data, dengan perintah, APPEND, sehingga tabel menjadi sebagai berikut : Kd_Jur

Jurusan Teknik Informatika Sistem Informasi Manajemem Informatika Teknik Komputer Komputer Akuntansi

J01 J02 J03 J04 J05

3. Cek apakah tabel mahasiswa yang sudah dibuat masih ada, jika tidak buat tabel mahasiswa.Dbf, dengan struktur data seperti modul 2. Isilah data pda tabel tersebut kurang lebih 10 record dengan jenjang yang berbeda 4. Buatlah form untuk menampilkan data sebagai berikut :

1 2

Keterangan Form Nomor Kontrol 0 1 2

Kontrol

Properties

Form ComboBox Grid

Name : Form1(default) Name: ComboJurusan Name : grid1(default)

5. Pengaturan Grid ( menggunakan jendela properties) Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 24

a. membuat nama kolom -

klik jendela Grid1

-

klik combo grid pada properties

-

Klik Column1 – header1 : No.Mahasiswa

-

Klik Column2 – header1 : Nama

-

Klik Column3 – header1 : Jurusan

b. menentukan lebar kolom -

Klik Column (kolom No.Mahasiswa)

-

Klik garis vertical klolom (disebelah kanan kolom) tombol tetap di tekan gerakkan kursor kekiri/kanan sesuai lebar yang dikehendaki

-

Lepaskan tombol

-

Dengan cara yang sama atur lebar kolom 2 (kolom nama) dan kolom 3 ( kolom jurusan)

c. menghubungkan grid ke basis data -

Klik Data- RecordSourceType : 1 – Alias

-

Klik RecodSource: mahasiswa

-

Klik ComboGrid1

-

Klik

Column1

–

data

controSource

:

controSource

:

controSource

:

mahasiswa.nomhs -

Klik

Column2

–

data

mahasiswa.nama -

Klik

Column1

–

data

jurusan.namajur 6. Buatlah kode untuk memvbuka tabel pada form1 – loadEvent SELECT 1 USE mahasiswa.dbf SELECT 2 USE jurusan.dbf SELECT 1 SET RELATION TO kd_jur INTO 2

7. Buat kode untuk pemilihan jurusan pada ComboJenjangclickEvent Public kodejurusan, nmjurusan

Nmjurusan = this.value SELECT 2 LOCATE FOR namajur = RTRIM(nmjurusan) Kodejurusan = Kd_jur


hal 25

SELECT 1 SET FILTER TO SET FILTER TO kd_jur = Kodejurusan Thisform.grid1.refresh()

8. Jalankan form tersebut pilihlah salah satu Jurusan pada combo, apakah isi tabel berubah?

5.4 Tugas 1. Tambahkan pada data ‘Semua’ pada tabel Jurusan dan tambahkan kode program pda Combojurusan-ClickEvent, sehingga bila dipilh JUrusan ‘Semua’, amka semua record akan tampil di Grid (lihat modul 4)


hal 26

Modul 6. Report

6.1 Tujuan 1. Agar memahami cara membuat laporan dengan report 2. Agar memahami cara mengelola file-file menjadi 1 project 3. Agar memahami cara merancang dan menggunakan menu

6.2 Landasan teori 6.2.1

Report

Report adalah keluaran dari suatu proses dalam format kertas. Report ini dapat ditampilkan lewat monitor maupu printer A. Flowchart sistem menampilkan pada report Tabel Mahasiswa.dbf Nomhs 015410089 003110034 003110056 015410078

Nama Ida Ayu Kurniawan Wahyu Bayu Prasetyo

Kd_jur J01 J03 J03 J01

Tabel jurusan.dbf Kd_Jur J01 J02 J03 J04 J05

Jurusan Teknik Informatika Sistem Informasi Manajemem Informatika Teknik Komputer Komputer Akuntansi PROSES CETAK

REPORT 1 DAFTAR MAHASISWA Nomhs 015410089 003110034 003110056 015410078

Nama Ida Ayu Kurniawan Wahyu Bayu P.

Jurusan Teknik Informatika Manajemen Informasi Manajemen Informasi Teknik Informatika

REPORT 2 DAFTAR MAHASISWA PER JURUSAN Jurusan : Teknik Informatika NoMhs Nama 015410089 Ida Ayu 015410078 Bayu P

Algoritma menampilkan data 1. Aktifkan semua tabel yang saling terkait dan buat relasinya Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 27

2. Masukkan criteria data yang ditampilkan dengan Form 3. Panggil report

B. Report Designer Report Designer adalah media untuk merancang laporan dan sekaligus menghubungkan ke basis data. Jendela report designer seperti terlihat dibawah ini

Penempatan Judul dan Nama Kolom

Penempayan Isi Kolom Penempatan Footer

Jendela data Environment Report Control

Secara umum Report designer terdiri atas 3 jendela : 1. Page Header, digunakan untuk menempatkan judul laporan, nama kolom dan keterangan tentang laporan lainnya. 2. Detail, digunakan untuk menempatkan field, variable dan isi kolom lainnya. 3. Page Footer, digunakan untuk catatan, keterangan halaman dan lain-lain pada bagian bawah kertas Untuk memanipulasi Report terdapat 2 tool pokok 1. Report Control, berisi alat-alat untuk merancang report : membuat teks, menempatkan field tabel ke report, membuat garis-garis dan aksesories lainnya. 2. Data Environment, digunakan untuk menghubungkan report ke basis data/tabel


hal 28

6.3 Langkah Praktikum 1. Buatlah Report baru dengan : File- New – report – new file 2. Selanjutnya baut Judul Laporan “Daftar Mahasiswa” dan judul kolom “No.Mahasiswa”, “Nama”, “Jurusan” dengan klik

pada report

control, sehingga Report menjadi seperti dibawah ini

Penempatan Judul dan Nama Kolom

Penempayan Isi Kolom Penempatan Footer

Jendela data Environment Report Control

3. Tampilkan jendela Data Enviroment dengan cara klik tombol ke-2 saat kursor diatas Report, kemudian pilih Data Environment pada context menu 4. Masukan tabel-tabel yang terkait dengan Report tersebut, dengan cara a. tempatkan kursor pada jendela Data Environment b. klik tombol ke – 2 mouse c. klik Add, pada context menu d. Pilih tabel : mahasiswa.dbf e. Ulangi langkah (1) untuk menambahkan tabel Jurusan.dbf ke Data Environment

5. Masukkan field ke Report

dengan cara ‘menyeret’ field pada Data

Environment ke jendela Detail,

field Nomhs ke kolom

No

mahasiswa, nama ke kolom Nama, dan namaJur ke kolom Jurusan 6. Rekam Report tersebut, missal dengan nama file : DAFTAR.FRX Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 29

7. Jalankan Report diatas dengan cara a. tempatkan kursor pada Report b. Klik tombol ke-2 c. Klik Preview 8. Amatilah apa yang terjadi? Apakah jenjang sudah sesuai dengan mahasiswa masing-masing? Bila belum mengapa hal itu terjadi? (jawablah pertanyaan ini dalam laporan sementara) 9. Membuat relasi antar tabel dan pengendali Report, untuk membuat dagtar mahasiswa a. buatlah form seperti dibawah ini

b. Buat Kode pada Form1 – LoadEvent Select 1 Use Mahasiswa Select 2 Use Jurusan Set Relation to Kd_jur into Jurusan

Tombol Tampil – ClickEvent REPORT FORM daftar.frx PREVIEW

Tombol Cetak-ClickEvent REPORT FORM daftar.frx TO Print

c. Simpan form tersebut dan jalankan d. Cobalah klik tombol TAMPIL, amati apakah data yang tampil sudah benar, bila belum cek kodenya e. Agar hasil laporan tercetak ke printer, klik CETAK 6.3.1 Tugas Sempurnakanlah Report tersebut dengan memberikan garis-garis vertical maupun horizontal


hal 30

Modul 7. Project dan Menu

7.1 Tujuan 1. Agar memahami cara menyatukan file-file dalam suatu aplikasi pada suatu project 2. Agar memahami cara membuat menu untuk menjalankan aplikasi

7.2 Landasan Teori 7.2.1 Project Project dalam Visual Foxpro adalah upaya untuk mengelola semua file yang diperlukan dalam suatu aplikasi ke dalam satu sistem Elemen dalam project ini terdiri atas : -

Data, yaitu berisi database, Free table, maupun query

-

Document, berisi file-file : Form (.scx), Report (.Frx), label (.lbx)

-

Code, berisi kode program

-

Other, berisi file-file : menu (.mnx), textfile, dll

7.2.2 Menu Menu adalah sekumpulan perintah untuk mengoperasikan suatu proses yang disusun dengan criteria tertentu. Pada FoxPro sistem menu yang digunakan adalah menu pull – Down. Menu Pul-Down memiliki sejumlah pilihan dimana pilihan tersebut disajikan secara hirarkhis/berjenjang. Jenjang paling tinggi disebut dengan menu utama (menu Bar dalam Foxpro), setiap menu utama dapat memiliki sub menu dan sub menu dapat memiliki sub-sub menu dan seterusnya.

7.3 Langkah Praktikum 7.3.1 Membuat Project 1.

Klik New-Project-New File : Akakom (missal nama project-nya :

Akakom.pjx) 2. Kemudian klik Save, selanjutnya akan muncul Jendela Project Manager sebagai berikut : Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 31

3. Untuk memasukkan tabel-tabel ke Project, klik + di sebelah kiri text Data kemudian klik Free Table sehingga teks ini tersorot (warna dasar biru) 4. Klik Add, akan muncul jendela Open, pilihlah tabel yang pernah dibuat missal : tabel Mahasiswa.dbf 5. Untuk menambahkan tabel lagi missal tabel Jurusan.dbf pada project Akakom.pjx, lakukan langkah seperti no 4 diatas 6. Untuk melihat tabel-tabel terdapat dalam project klik + pada kiri Free table. Sedangkan untuk melihat struktur tabel (field-field pada tabel) klik + sebelah kiri tabel yang terkait 7. Masukkan Form-form yang telah dibuat ke Project dengan klik + Documents pada Project Manajer, kemudian klik Form, lakukan langkah seperti no. 4 dan seterusnya 8. Dengan langkah yang sama masukkan pula file Report dengan klik + Document – Report. 9. Cetaklah struktur project tersebut, agar semua file terlihat klik kelompok tyang masih bertanda + sehingga menjadi - . 10. Untuk keluar dari Project Manajer, klik x , pada jendela kanan atas.

* Untuk laporan sementara, cetak struktur file yang terdapat dalam Project Manajer.


hal 32

7.3.2

Membuat Menu dan menjalankannya

1. Klik

New-Menu-New File-Menu, selanjutnya akan muncul sebagai

berikut

2. Untuk membuat menu utama ketik “Masuk” pada kolom “Prompt”, kemudian klik tombol ↓ , kemudian ketik “Tampil”, klik tombol ↓ , ketik “Cetak”,klik tombol ↓ ketik “Keluar”. 3. untuk membuat sub menu pada Menu “Masuk”, klik “Masuk”, kemudian pilih Sub menu pada kolom Result, kemudian klik “Create” maka akan muncul sub menu editor. Ketik “Data Mahasiswa” dan “Jenjang”berturut turut baris ke – 1 dan ke – 2 pada kolom Prompt. 4. Agar menu dapat menjalankan suatu perintah, misalnya akan memasukkan data mahasiswa pada saat menu data mahasiswa di klik, •

klik menu ‘Data Mahasiswa’

•

pilihlah perintah Command pada kolom Result, kemudian klik Create. Catatan : Result pada menu designer berfungsi untuk menentukan tindakan apa bila menu di Klik, terdiri atas Command bila menjalankan perintah tertentu, misal - Menjalankan Form dengan Do nama Form.scx menjalankan Report dengan Report Form nama_report.frx Submenu, bila menu ini diklik akan muncul submenu Procedure, bila menjalankan suatu prosedur

•

Ketik : DO form rekam.scx pada kotak sebelah kanan Command (rekam.scx adalah nama form untuk pemasukan data mahasiswa. Bila diberi nama lain sesuaikan). Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 33

5. Atur menu dengan View – General Option , Klik Append , dan beri tanda pada Top Level Form sehingga menjadi sebagai berikut :

6. Klik OK 7. Simpan file menu ini (.mnx) missal dengan nama file : Pilihan.mnx 8. Agar menu ini dapat dijalankan bersama Form utama, Klik Menu – generate, pada menu utama visual Foxpro, Klik GENERATE pada jendela Generate Menu seperti di bawah ini

9. Generate menu ini akan menghasilkan file menu dengan ekstensi.mpr

* Untuk laporan sementara cetak menu dan form utama yang sedang dijalankan

7.3.3 Menggabungkan menu dengan form utama 1. Menu yang sudah dibuat dan degenerate diatas belum bisa langsung dijalnkan masih butuh pengabungan dengan form sebagai form utamanya, oleh karena itu buatlah form baru dengan New- Form – New File 2. Aturlah properties form : Form1 – Layout- Show Window : 2 – As Top Level Form Catatan : Shoe window digunakan untuk menempatkan posisi form 0 – In Screen , forn berada dalam layar bersam ajendela Visual Foxpro Panduan Praktikum Pemrograman Basis Data – Foxpro

hal 34

1 – In Top level, form berada dalam form/jendela utama 2 – AS Top Lovel Form, form sebagai Jendela Utama 3. Pada Form1-Methode-InitEvent, ketik : Do pilihan.mpr WITH THIS Simpan form utama ini dan jalankan 4. Cobalah di Klik Masuk – Data Mahasiswa, apakah form pemasukan data muncul, kalau belum kemungkinan ada kesalahan penulisan nama form tersebut

7.4 Tugas 1. Lengkapi menu utama dengan sub menu yang diperlukan dan isi command untuk menjalankan prosesnya (form/report) (jangan lupa setiap perubahan menu, harus degenerate lagi) 1. Buatlah background pada menu utama dengan gambar bebas Petunjuk : atur properties Form1-Layout-Picture 2. Masukkan file form utama ke Project yang telah dibuat


hal 35

Modul 8. Gambar (image) 8.1 Tujuan 1. Agar dapat merancang database untuk gambar 2. Agar memahami cara merekam gambar dengan form 3. Agar memahami cara menampilkan gambar .

8.2. Landasan teori Media yang sampai saat ini sering digunakan untk berinteraksi antara lain media teks, gambar dan suara, dan melalui media film. Tidak menutup kemungkinan dimasa yang akan datang media komunikasi dapat melalui bau, sensor saraf, dan lain sebagainya. File

gambar

memiliki

berbagai

jenis

dari

BMP,JPG,PCX,JPEG,TIF,GIF dan lain sebagainya. File gambar dasar adalah BMP, sedangkan yang lain adalah hasil kompresi dari BMP sehingga ukuran filenya selalu lebih kecil dari BMP.

8.3 Langkah Praktikum 1. Buat tabel :barang.dbf Field : nama_brg C(30) $ nama dari barang Gambar c(15) $nama file gambarnya (.bmp) 2. Buatlah form untuk memasukkan gambar dan suara sebagai berikut.

1

2 3

4

5


hal 36

Kode dari control sebagai berikut. : Ket : Bold : nilai default (dapat diubah bila perlu) Bold Italic : diketik

Data Environtment Gambar.dbf

No control 1 Control : textbox Name : text1 No control 2 Control : ListBox Name : list1 ClickEvent : thisform.image1.picture=thisform.list1.value No control 3 Control : Image Name : image1 No control 4 Control : Command1 Caption : Rekam ClickEvent: INSERT INTO GAMBAR(NAMA_GB,GAMBAR) VALUE (thisform.text1.value,thisform.list1.value); No control 5 Control : Command1 Caption :Keluar ClickEvent: THISFORM.RELEASE()

3. Jalankan form tersebut dan masukkan nama dari barang kemudian pilih gambar yang sesuai 4. Cek pada tabel apakah sudah terekam atau belum dengan command line: browse. Bila belum ada data , cek di kode apakah sudah tertulis semua atau belum 5. Buat form untuk menampilkan gambar sekaligus suara seperti di bawah ini


hal 37

2

1

3

Data Environtment Gambar.dbf

No control 1 Control : listbox Name : list1 Clickevent: thisform.image1.picture=gambar $ menampilkan image dari nama field yg berisi nama file gambar

pada

control

No control 2 Control : optionroup (radio button) Name : optiongroup1 ClickEvent : do case case thisform.optiongroup1.value=1 thisform.image1.stretch=0 case thisform.optiongroup1.value=2 thisform.image1.stretch=2 endcase


hal 38

No control 3 Control : image Name : image1

6. Jalankan form tersebut dan amati tampilan gambar dengan memilih nama barang/obyek pada list barang. 7. Pilihlah mode gambar Clip/Strecth pada radio button pilih mode amati hasilnya/perbedaannya.

8.4. Latihan Gantilah listbox pada pada form tersebut dengan combo box . 8.5. Tugas Jawab pertanyaan dibawah ini pada laporan sementara ! Apakah perbedaan gambar pada image mode clip dan stretch ?


hal 39

Panduan Praktikum. Pemrograman Basis Data

Recommend Documents