> di form MASTER - sediakan satu textbox nama: GrandTotal.

> di form DETAIL (biasanya datasheet / continoues)- di section form footer -
buat satu textbox berisi SumTotalDETAIL. Control Source diisi dgn misalnya:
Sum([Harga])

Betul pak saya menggunakan continues form untuk detailnya.

> GrandTotal - di Control Sourcenya bapak isi dengan: [form
DETAIL]!SumTotalDETAIL

> Maksudnya adalah GrandTotal ini akan selalu melihat isi dari subform [form
DETAIL] di textbox SumTotalDETAIL

> nilai GrandTotal akan selalu up to date sesuai dengan detailnya.

Sebelum ke Form Master, Pada Form Detail bagian Footer saya punya textbox
c_txtGrandTotal yang control sourcenya berisi Sum([Total]) //saya pakai
Total karena kebetulan Field saya namanya Total

Masalahnya Sum([Total]) ini tidak otomatis terupdate ketika saya mengisikan
data pada form detail.

Seharusnya setiap saya melakukan penambahan,penghapusan,pengupdatetan data
pada Form Detail, 

Textbox c_txtGrandTotal akan otomatis terisi jumlah dari Total ->
Sum([Total]).

Tetapi masih belum mau jalan,

Contoh :

No | A  | B   | SubTotal | Total

1   | 10 | 20  | 30          | 60

2   | 20 | 40  | 60          | 120

3   | 30 | 60  | 90          | 180

Grand Totalnya cuman  60;

Karena No 1 saya isi dulu kemudian saya close formnya kemudian saya isi no 2
dan 3.

Jadi pada saat diisi No 2 dan 3 GrandTotalnya tidak mau ngejumlah.

Maunya ngejumlah bila sudah di close dan di buka kembali

 

Setelah saya lakukan penyelidikan hal ini mungkin terjadi karena (CMIIW) ,

Field "Total" pada Form Detail saya lakukan update secara manual pada Event
Before Update

Me![SubTotal] = c_txtSubTotal 
Me![Total] = c_txtTotal ' c_txtTotal = f(c_txtSubTotal)

c_txtSubTotal & c_txtTotal berisi hasil kalkulasi,
Saya melakukan ini karena saya memerlukan penjumlahan Sum of GrandTotal
secara cepat,
Sebab kalau saya melakukan Sum([anu + anu * anu / anu * anu . dst ) nantinya
saya takut akan menghabiskan waktu yang lama.
Oleh sebab itu saya menyimpan hasil c_txtSubTotal ke Me![SubTotal] dan
c_txtTotal ke Me![Total] 

Saya pernah menghitung GrandTotal tetapi Field Total yang pada form Detail
diisikan secara manual oleh user,
GrandTotalnya otomatis terhitung. Tetapi kenapa jika saya lakukan proses
pengisian secara manual / programming menggunakan Event Before Update ,
GrandTotalnya tidak otomatis menghitung jika ada penambahan / penghapusan
maupun pengeditan data.
Grand Totalnya akan menghitung jika Form saya close dan form saya buka
kembali.

Gitu pak,

Saya masih mandek nih  .

Mohon pencerahannya 

 

Terima kasih

  _____  

From: [email protected] [mailto:[email protected]]
On Behalf Of Edy WIYONO
Sent: Saturday, December 27, 2008 8:17 AM
To: [email protected]
Subject: Re: [belajar-access] Requery tidak jalan
Importance: High

 

Bapak Gede Darmawan,

 

Saya coba ilustrasikan dengan sbb:

 

di form MASTER - sediakan satu textbox nama: GrandTotal.

di form DETAIL (biasanya datasheet / continoues)- di section form footer -
buat satu textbox berisi SumTotalDETAIL. Control Source diisi dgn misalnya:
Sum([Harga])

   

GrandTotal - di Control Sourcenya bapak isi dengan: [form
DETAIL]!SumTotalDETAIL

 

Maksudnya adalah GrandTotal ini akan selalu melihat isi dari subform [form
DETAIL] di textbox SumTotalDETAIL

nilai GrandTotal akan selalu up to date sesuai dengan detailnya.

tidak usah pake requery.

 

Tapi bila masih ingin menyimpan data ke form MASTER. lakukah sbb:

 

di form DETAIL - event form CURRENT isikan sbb:

   Forms![form MASTER]!GrandTotal = Me.txtSumTotal.value

 

Control Source dari GrandTotal skrg adalah nama Kolom / Field tempat bapak
ingin menyimpan angka kalkulasi ini.

 

Mudah-mudahan bisa membantu.

 

Salam Hangat dan Jabat Erat,

 

 

Edy WIYONO

 

----- Original Message ----- 

From: I Putu Gede <mailto:[email protected]>  Darmawan 

To: belajar-access@ <mailto:[email protected]> yahoogroups.com 

Sent: Friday, December 26, 2008 08:51

Subject: [belajar-access] Requery tidak jalan

 

Dear all,

 

Saya mau tanya mengenai MS Access.

Saya punya Master Detail Form.

 

Pada Form Detail terdapat Field pada Tabel yang merupakan hasil kalkulasi.

Agar hasil kalkulasi dapat saya simpan ke table maka saya "Pasang" (apa yach
istilah pasang ini kok saya lupa) Event Handler : Before Update.

Jadi pada EventHandler Before Update ,

Saya isikan : 

Me![SubTotal] = c_txtSubTotal 'c_txtSubTotal & c_txtTotal berisi hasil
kalkulasi

Me![Total] = c_txtTotal 

 

Pada bagian footer dari Form Detail saya buatkan textbox yang isinya : 

=Sum([Total])

 

Dan Event AfterUpdate pada Form Detail saya isikan :

c_txtFooterTotal.Requery 

dengan maksud agar c_txtFooterTotal berisikan Jumlah / SUM dari Field Total 

Sayangnya ketika ada penambahan data baru dan perubahan data lama 

C_txtFooterTotal tidak berubah.

Padahal seperti kode diatas,

Setiap ada perubahan (AfterUpdate) saya lakukan Requery.

 

Seharusnya c_txtFooterTotal berubah setiap ada penambahan/ penghapusan/
pengubahan data / pengupdatetan data..

Tapi hasilnya tidak demikian.

Tapi jika form saya tutup dan form saya buka kembali 

C_txtFooterTotal hasilnya cocok.

 

Adakah diantara rekan - rekan yang bisa membantu saya ?

 

Sebelumnya atas tanggapan dan solusi rekan rekan saya ucapkan terima kasih

 

 

 

No virus found in this incoming message.
Checked by AVG - http://www.avg.com
Version: 8.0.176 / Virus Database: 270.10.0/1865 - Release Date: 12/26/2008
1:01 PM


Kirim email ke