BELAJAR
PROGRAM MEGGUNAKAN POWER BUILDER Dengan SQL-SERVER
MOHAMAD HUSEN
Teknik
Informatika PEMROGRAMAN
UNSERA(Universitas Serang Raya)
Langkah awal terlebih dahulu kita harus mempunya
masing-masing afllikasinya yaitu power
builder dan sql-server..................!!!!!!!!!!!!!!!!
pertama kita harus membuat data base terlebih dahulu.membuat database menggunakan sql-server
Berikut langkah-langkah caranya:
1-klik STAR pada Dektop atau keyboard
2-pilih All Program
3-pilih microsoft SQL-Server
-Buka ”Enterprise Manager”
pertama kita harus membuat data base terlebih dahulu.membuat database menggunakan sql-server
Berikut langkah-langkah caranya:
1-klik STAR pada Dektop atau keyboard
2-pilih All Program
3-pilih microsoft SQL-Server
-Buka ”Enterprise Manager”
maka akan tambil seperti gambar dibawah
Langkah-langkah selanjutnya:
-Klik Kanan mouse menu Database
-pilih New Database
Maka akan tampil Icon seperti gambar di bawah!
-pilih New Database
Maka akan tampil Icon seperti gambar di bawah!
Buat Nama Database yang akan kita
buat misal: ( “sekolah”)
-Lalu pilih data file(Pilih Lokasi dimana Database kita akan kita simpan).misal folder Database kita di data E:maka akan terpilih dengan nama” E:\Database\Sekolah_Data.MDF”
-Lalu pilih Transaction Log.Sama saja dengan pengisian data file di atas namun di sini kita buat dua.
Lokasi 1
E:\Database\Sekolah_Log.LDF di Ubah Menjadi E:\Database\Sekolah_Log.LOG
Lokasi 2(Bisa Langsung Cofy/Paste di Location 1)
E:\Database\Sekolah_Log.LDF di Ubah Menjadi E:\Database\Sekolah_Log.MDF
-Lalu Klik OK
-Lalu pilih data file(Pilih Lokasi dimana Database kita akan kita simpan).misal folder Database kita di data E:maka akan terpilih dengan nama” E:\Database\Sekolah_Data.MDF”
-Lalu pilih Transaction Log.Sama saja dengan pengisian data file di atas namun di sini kita buat dua.
Lokasi 1
E:\Database\Sekolah_Log.LDF di Ubah Menjadi E:\Database\Sekolah_Log.LOG
Lokasi 2(Bisa Langsung Cofy/Paste di Location 1)
E:\Database\Sekolah_Log.LDF di Ubah Menjadi E:\Database\Sekolah_Log.MDF
-Lalu Klik OK
Maka akan Tampil seperti gambar di bawah ini:
Selajutnya Membuat TABLE di Database kita
pilih Menu Tools seperti pada gambar dibawah ini!!!
pilih Menu Tools seperti pada gambar dibawah ini!!!
Pilih SQL Query Analyzer di sini saya contohkan pembuatan Table-Table dengan coding program
Maka akan Tampil seperti gambar
di bawah ini yang berupa documen kosong dimana kita akan membuat sebuah table
database kita.
Selanjutnya Membuat Table Untuk
membuat Program Data yang akan kita buat:
Masukan Syntak Tablenya!!!
Sebagai contoh Masukan Syntak Table di bawah ini!!!
Sebagai contoh Masukan Syntak Table di bawah ini!!!
CREATE TABLE GURU(
KD_GURU CHAR(15),
NAMA_GURU VARCHAR(35),
ALAMAT VARCHAR (50),
TLP VARCHAR (25),
FAX VARCHAR (25),
JABATAN VARCHAR (40),
PRIMARY KEY (KD_GURU)
);
CREATE TABLE SISWA(
KD_SISWA CHAR (15),
NAMA_SISWA VARCHAR (35),
TTL_SISWA VARCHAR (25),
KELAS_SISWA VARCHAR (50),
ALAMAT_SISWA VARCHAR (50),
NO_TELEPON NUMERIC (20),
PRIMARY KEY (KD_SISWA)
);
CREATE TABLE SISWA_BARU(
KD_SISWA CHAR (15),
NAMA_SISWA VARCHAR (25),
TTL_SISWA VARCHAR (25),
ALAMAT VARCHAR (50),
TLP VARCHAR (25),
PRIMARY KEY (KD_SISWA)
);
CREATE TABLE GAJI_GURU(
KD_GURU CHAR (15),
NAMA_GURU VARCHAR (35),
GAJI_POKOK VARCHAR (25),
POTONGAN VARCHAR (25),
KOPERASI VARCHAR (30),
PRIMARY KEY (KD_GURU),
FOREIGN KEY (KD_GURU)
REFERENCES GURU
);
CREATE TABLE ADMIN(
UANG_MASUK VARCHAR (15),
UANG_PENGELUARAN VARCHAR (20),
KOPERASI VARCHAR (20),
TOTAL VARCHAR (20),
TANGGAL VARCHAR (15),
);
|
Penjelasan:
CREATE
digunakan untuk membuat database, membuat tabel, membuat view dan membuat index.
digunakan untuk membuat database, membuat tabel, membuat view dan membuat index.
CHAR
Tipe data yang digunakan untuk
bilangan real.dalam sql biasanya di gunakan untuk kata kunci atau kode
pencarian data dsb
Varchar
Tipe data berbasis string atau
bisa berupa angka,huruf,simbol dan lain sebagainya
Primary key
Kunci atau kode
References
Pengambilan kode dalam sebuah
tabel.
Dan
untuk mengetesnya/mengetahui bahwa syntak program table yang kita buat telah
benar kita harus memblock masing-masing tabel tersebut.
Misal: CREATE TABLE
GURU(
KD_GURU CHAR(15),
NAMA_GURU VARCHAR(35),
ALAMAT VARCHAR (50),
TLP VARCHAR (25),
FAX VARCHAR (25),
JABATAN VARCHAR (40),
PRIMARY KEY (KD_GURU)
);
Lalu pilih Execute Query atau bisa juga menekan (F5)
pd keyboard.
Seperti pada gambar di bawah ini.
Kalau Sudah selesai semua pembuatan Database dan Table-nya tinggal Close/keluar.Lalu Buka Aflikasi PowerBuilder.
dengan cara :
Klik STAR pilih All Program pilih Sybase pilih PowerBuilder
Membuat Workspace baru
dengan cara klik New pilih Workspace Oke Lalu simpan di
folder kita.lalu save dan workspace buatan kita telah jadi namun bagi yang baru
menggunakan program PB pasti akan bingung dimana Workspace buatan kita,apabila
nama workspace buatan kita sudah ada namanya maka workspacenya sudah kita buat
untuk melihat data-datanya klik icon(+) pada Workspacenya. langkah selanjutnya buat aplication
dengan cara pilih New pilih target pilih Application klik OK
.Application Name harus sama dengan nama Database kita. contoh:(sekolah)
Library dan Target pilih location folder kita dimana data aflicationnya akan di
simpan.
maka
langkah awal pembuatan program kita atau pembuatan Application sudah selesai .
Selanjutnya Mengkoneksikan
Database kita dengan cara:
Pilih Database di menu icon
seperti pada gambar di bawah ini yang di tandai lingkaran merah
Lalu Klik kanan MSS
Microsoft SQL Server pilih
New
Profile
Maka akan tampil seperti gambar dibawah....!
Isi Profile name”terserah mau
pakai nama apa aja”
isi server dengan Syarat Harus server komputer/laptop yang sedang kita gunakan.
Untuk mengetahui server,caranya:Klik STAR pilih all program pilih SQL-Server pilih Service Manager.
isi server dengan Syarat Harus server komputer/laptop yang sedang kita gunakan.
Untuk mengetahui server,caranya:Klik STAR pilih all program pilih SQL-Server pilih Service Manager.
copy-Paste Servernya lalu
isikan pada kolom Server.isi Login ID dengan “sa” atau apa saja.password dikosongkan Database Harus sama
dengan Database buatan kita(sekolah).Setelah
itu kita tes koneksinya pilih preview
maka akan tampil
Klik Test Connection Apabila Succefully maka koneksinya
sudah berhasil lalu Copy Database Connection Syntax-nya Langsung klik oke.
Maka akan tampil profile data
kita
Setelah itu Klik kanan Lalu pilih
Connect untuk mengkoneksikan apabila sudah connect maka akan nampak sepeti
gambar dibawah
Lalu Klik
Application yang tadi sudah kita buat dalam workspace kita double klik Aflication
sekolah dan paste Syntax yang di copy
tadi pada scrip sekolah contoh gambar Lalu tambahkan syntax ” connect;” di
bawahnya agar programnya bisa di jalankan.
Kalau
sudah kita membuat Application menu dnegan cara pilih New pilih PB
Object dan pilih Menu maka akan tampil seperti pada gambar dibawah
lalu klik OK
Disini kita akan membuat suatu tampilan menu-menu atau bisa juga
membuat icon-icon barmenu,caranya Klik Kanan pd Untiled0 pilih Insert
Submenu Item
lalu Buat menu-menun yang akan kita buat seperti
gambar di bawah.
Penjelasan:
Inset Submenu Item(pembuatan
menu untuk di bawahnya tidak rata ataubisa juga disebut anak menu) dan Insert Menu Item At End(pembuatan menu yang di bawahnya rata dengan
menu di atasnya).
CONTOH GAMBAR PEMBUATAN MENU SAYA
Anda juga bisa jika mau memperbanyak menu atau icon
tergantung program apa yang akan anda buat.
Apabila sudah selesai membuat
menu jangan lupa di simpan/clik tombol Ctrl+s.dan beri nama m_menu
untuk membedakan data-data yang lainnya.
Untuk mengetes Menu Hasil Pembuatan kita terlebih dahulu kita harus membuat Window dengan cara:
Klik New pilih PB Object pilih Window seperti pada gambar dibawah:
Untuk mengetes Menu Hasil Pembuatan kita terlebih dahulu kita harus membuat Window dengan cara:
Klik New pilih PB Object pilih Window seperti pada gambar dibawah:
maka akan tampil seperti gambar dibawah
Kasih nama title terserah mau dengan napa apa aja lalu selec
MenuName pilih (m_menu )klik OK dan save dengan nama w_menu.setelah itu tambah
syntak di Application sekolah atau syntak awal.dan tambahkan open(w_menu)
Contoh:
// Profile UCEH
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "sekolah"
SQLCA.ServerName = "USER-PC"
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
connect;
open(w_menu)
Lalu coba lihat hasilnya dengan
cara pilih icon Run atau bisa juga menekan tombol Ctrl+R
Hasilnya:
Hasilnya:
Kalau Muncul Menu buatan kita berarti kita telah berhasil
membuat suatu menu sederhana.
Setelah membuat Menu Langkah selanjutnya kita Buat data windowsnya.Untuk mengkoneksikan menu-menu yang diatas.sebagai contoh saya akan mengkoneksikan menu (GURU) dengan database kita.,langkah pertama kita harus membuat Datawindows terlebih dahulu.
caranya kita Klik New Lalu pilih DataWindow Lalu pilih Tabular klik OK
Setelah membuat Menu Langkah selanjutnya kita Buat data windowsnya.Untuk mengkoneksikan menu-menu yang diatas.sebagai contoh saya akan mengkoneksikan menu (GURU) dengan database kita.,langkah pertama kita harus membuat Datawindows terlebih dahulu.
caranya kita Klik New Lalu pilih DataWindow Lalu pilih Tabular klik OK
Seperti pada gambar dibawah!
Maka akan tampil
Lalu
pilih Quick Select dan pilih table data yang akan kita buat contoh Guru
Klik Ok dan sesuaikan kolom-kolom datanya lihat contoh gambar di bawah
Kalau tabelnya rata tidak apa-apa
apabila ingin mengaturnya tinggal tarik pakai kursor atau mouse lalu simpan dan
beri nama (dw_guru) tanpa dalam
kurung.
Selanjutnya kita buat dw_grid-nya
yaitu dengan cara:
Klik New pilih DataWindow Lalu pilih Grid seperti pada contoh dibawah
lakukan seperti contoh di atas.......!!!!
Jika kita ingin mempercantik tampilannya bisa rubah
baik warna font ataupun kolomnya jangan lupa di simpan atau save dengan nama dw_guru.
Kalau kedua data ini sudah dibuat,Langkah selanjutnya kita
buat Window baru Untuk menu guru caranya:
Pilih new pilih PB Object pilih window
klik OK
lalu pilih/Klik Create DataWindow Control pada icon menu seperti pada gambar dibawah ini
lalu pilih/Klik Create DataWindow Control pada icon menu seperti pada gambar dibawah ini
Maka akan
tampil seperti di bawah lalu pilih DataObjectnya seperti pada gambar
dibawah yang dilingkar warna merah
buat 2 Create DataWindow Control.Dan
buat juga tombol add,save,cancle,edit dan close di Create ComanButton Control.
Hasilnya akan seperti gambar dibawah!
Dan Langkah Terakhir yang harus di lakukan yaitu memasukan syntak-sytak pada form ,dw_2,dan juga pada tombol
add,save,cancle,edit,delete dan close.
(SYNTAX-SYNTAX-nya)
========================================================
Form
========================================================
dw_1.settransobject(sqlca)
dw_2.settransobject(sqlca)
dw_2.retrieve()
dw_1.object.datawindow.readonly='yes'
cb_add.enabled=true
cb_cancle.enabled=false
cb_save.enabled=false
cb_edit.enabled=true
cb_delete.enabled=true
========================================================
dw_2
========================================================
dw_2.selectrow(0,false)
dw_2.selectrow(row,true)
dw_2.setrowfocusindicator(hand!)
========================================================
Tombol Add
========================================================
long a
a=dw_1.insertrow(0)
dw_1.scrolltorow(a)
dw_1.setfocus()
dw_1.setcolumn(1)
dw_1.object.datawindow.readonly='no'
cb_add.enabled=false
cb_cancle.enabled=true
cb_save.enabled=true
cb_edit.enabled=false
cb_delete.enabled=false
========================================================
Tombol Save
========================================================
if messagebox("pesan","simpan
data?",question!,yesno!,2)=1 then
dw_1.update()
commit;
dw_2.retrieve()
messagebox("pesan","sukses",information!)
cb_add.enabled=true
cb_cancle.enabled=false
cb_save.enabled=false
cb_edit.enabled=true
cb_delete.enabled=true
dw_1.object.datawindow.readonly='yes'
else
messagebox("pesan","Batal",information!)
end if
========================================================
Tombol Cancle
========================================================
dw_1.retrieve()
dw_1.object.datawindow.readonly='yes'
cb_add.enabled=true
cb_cancle.enabled=false
cb_save.enabled=false
cb_edit.enabled=true
cb_delete.enabled=true
========================================================
Tommbol Edit
========================================================
dw_1.object.datawindow.readonly='no'
dw_1.setfocus()
dw_1.setcolumn(2)
cb_add.enabled=false
cb_cancle.enabled=true
cb_save.enabled=true
cb_edit.enabled=false
cb_delete.enabled=false
========================================================
Tombol Delete
========================================================
integer a
a=messagebox("pesan","Hapus
Data",question!,yesno!)
if a=1 then
dw_1.deleterow(0)
dw_1.update()
commit;
dw_2.retrieve()
messagebox("pesan","sukses",information!)
cb_add.enabled=true
cb_cancle.enabled=false
cb_save.enabled=false
cb_edit.enabled=true
cb_delete.enabled=true
else
messagebox("pesan","Batal",information!)
end if
========================================================
Tombol Close
========================================================
close(parent)
|
Lalu buat Argument nya agar Program dapat Bejalan dengan Lancar
Name : DOS
Type :String
Pilih (“ KODE_DOSEN - = - Argument :DOS; ”)
Selesai..............Jalankan Program
semoga Sukses
klik Link Download di bawah Untuk Tutorial Documen
klik Link Download di bawah Untuk Tutorial Documen
| Download Doc Tutoria |






























silahkan beri komentar
EmoticonEmoticon