Tolong pilih kategori sesuai, jenis posting (diskusi atau bukan) dan sertakan tag/topik yang sesuai seperti komputer, java, php, mysql, dll. Promosi atau posting tidak pada tempatnya akan kami hapus!
- Bagi Anda yang ingin mendaftar, baca link berikut:
http://diskusiweb.com/discussion/50491/how-to-registrasi-diskusiweb-com-baca-ini-terlebih-dahulu
- Cara menyisipkan kode program supaya tampil rapi dan terformat dengan baik di diskusiweb.com: http://www.diskusiweb.com/discussion/50415/cara-menyisipkan-kode-program-di-diskusiweb-com
- Cara posting gambar/image di post Anda: http://www.diskusiweb.com/discussion/47345/cara-menyisipkan-menyertakan-image-pada-posting/p1

Perulangan Penjumlahan antara 2 tabel Adotable delphi

Permisi, Mau nanya cara melakukan perulangan di dbgrid, dengan button hitung misalnya:
data di dbgrid 1 ada tiga kolom        : kode,nama,stok
data di dbgrid 2 juga ada tiga kolom : kode, nama, barangbaru
misalnya ada 100 data dalam tabel tersebut dan saya hanya mau melakukan penjumlahan antara kolom stok di dbgrid1 dengan kolom barangbaru di dbgrid2 dengan kondisi Kalau ada kode barang ada yang sama maka otomatis dbgrid1.stok + dbgrid2.barangbaru. 

saya sudah coba memakai perulangan dengan if  then tapi hanya baris pertama saja yang terjumlah, data dibaris selanjutnya tidak ada yang terjumlah,
kode yang saya coba
adotable1.edit;
if adotable1.fieldbyname('Kode').value = adotable2.fieldbyname('kode').value then
begin
adotable1.fieldbyname('stok').value = adotable1.fieldbyname('stok').value + adotable2.fieldbyname('barangbaru').value;
adotable1.post;
end;

mohon bantuannya, bagaimana cara supaya data dalam baris tabel - tabel tersebut bisa terjumlah semua . terima kasih banyak sebelumnya.    




Tagged:
Sign In or Register to comment.