B. Kondisi awal: Tabel di dalam database
tabel: Barang
| kdBrg | NamaBrg | HrgSat |
| 11111 | Apel Manalagi | 5000 |
| 11112 | Apel Malang | 4000 |
| 11114 | Durian Bangkok | 10000 |
| 11119 | Belimbing | 3000 |
tabel: Order
| NoOrder | tgl | total |
| 00001 | 10-agu-08 | 0 |
| 00002 | 10-agu-08 | 0 |
| 00003 | 10-agu-08 | 0 |
| 00012 | 11-agu-08 | 0 |
| 00013 | 11-agu-08 | 0 |
| 00014 | 11-agu-08 | 0 |
| 00015 | 11-agu-08 | 0 |
tabel: OrderDetail
| 00001 | 11111 | 5 |
| 00001 | 11114 | 3 |
| 00002 | 11111 | 3 |
| 00002 | 11112 | 5 |
| 00002 | 11114 | 10 |
| 00003 | 11119 | 10 |
| 00012 | 11114 | 5 |
| 00012 | 11119 | 5 |
| 00013 | 11111 | 10 |
| 00014 | 11112 | 8 |
| 00015 | 11119 | 12 |
C. Proses dengan Query
Query1
| SELECT * FROM Order, Barang, OrderDetail WHERE ((Order.NoOrder = OrderDetail.NoOrder) and (Barang.Kdbrg = OrderDetail.Kdbrg)) |
Tujuan Query1 : untuk menampilkan semua rincian order dengan orderDetail-nya
Query2
| SELECT Order.NoOrder, OrderDetail.kdBrg, Barang.NamaBrg, Barang.HrgSat, OrderDetail.Qty, (OrderDetail.Qty * Barang.HrgSat) AS subTotal FROM Order, Barang, OrderDetail WHERE ((Order.NoOrder = OrderDetail.NoOrder) and (Barang.Kdbrg = OrderDetail.Kdbrg)) |
Tujuan Query2 : untuk menampilkan semua rincian order dengan orderDetail-nya sambil menghitung subTotal per barang yang dibeli dalam suatu order.
Query3
| SELECT Order.NoOrder, sum (OrderDetail.Qty * Barang.HrgSat) as Total FROM [Order], Barang, OrderDetail WHERE (((Order.NoOrder)=OrderDetail.NoOrder) AND ((Barang.kdBrg)=OrderDetail.Kdbrg)) group by Order.NoOrder; |
Tujuan Query3 : untuk menampilkan semua order sambil menghitung Total per order.
D. Hasil Query
Hasil Query1
Hasil Query2
Hasil Query3
Anda tinggal memasukkan perintah query itu ke dalam perintah pemrograman Delphi Anda.
:-)
