TUTORIAL membuat PROGRAM MEGGUNAKAN POWER BUILDER Dan SQL-SERVER


Download ButtonDownload Doc Tutoria


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
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!
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

Maka akan Tampil seperti gambar di bawah ini:


Selajutnya Membuat TABLE di Database kita
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!!!
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.
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.

Hasil Table yang telah dibuat tadi akan Muncul pada Table DataBase

 

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.
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:


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:


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
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 

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
Download Button
Download Doc Tutoria

silahkan beri komentar
EmoticonEmoticon