saya bantu dikit ya... untuk menghitung laba secara fifo. pertama diperlukan field-filed tambahan (*) di table transaksi.
contoh : table_beli -id pembelian -id barang -id fifo * -jumlah beli -jumlah terjual * -stock fifo * -harga beli table_jual -id penjualan -id barang -id fifo * -jumlah jual -harga beli -harga jual Kedua 1. setiap transaksi pembelian, baca id fifo maksimal pada barang yg dibeli 2. pada saat insert row, masukan id fifo=id fifo + 1, jumlah terjual=0,stock fifo=jumlah beli Ketiga setiap penjualan, baca - stock fifo >0, jika jumlah penjualan=<stock fifo di id fifo terkecil, langsung aja kurangi stock fifo nya, tambah jumlah jual, di tabel beli dengan jumlah penjualan. tapi jumlah jual>stock fifo di id fifo terkecil, kurangi stock fifo nya, tambah jumlah jual, di tabel beli dengan stock fifo. selisih jumlah penjualan dengan stock fifo, di looping sampai jumlah penjualan =0, berurut dari id fifo terkecil. langkah ketiga di atas, dibarengi dengan insert row di table jual. semoga membantu Muhamad Devi Riswandi Jadikom +6285659000789 +6281809391789 +62-22-91797789 m...@jadikom.com mdr...@yahoo.com http://www.jadikom.com > >From: Toni R <toni.rah...@gmail.com> >To: Programmer-VB@yahoogroups.com >Sent: Wednesday, October 7, 2009 11:58:53 AM >Subject: [Programmer-VB] Cara ngambil laba secara FIFO > > >> > >Dear all >ada yang tahu logika cara menghitung >selisih harga pembelian - penjualan secara fifo ? contoh... > >pembelian 1 >tanggal : 20/2/2009 >jumlah : >10 >harga : 10.000 > >pembelian 2 >tanggal : 22/2/2009 >jumlah : >5 >harga : 11.000 > >pembelian 3 >tanggal : 23/2/2009 >jumlah : >8 >harga : 9.000 > >Jika ada penjualan pada tanggal 23/2/2009 sebanyak >17 dengan harga jual 13.000 >maka perhitungannya : > >laba = penjualan - pembelian >laba = (10 x 13.000 >- 10 x 10.000) + (5 x 13.000 - 5 x 11.000) + (2 x 13.000 - 2 x 9.000) >laba = >30.000 + 10.000 + 8.000 >laba = 48.000 > >ada yang tahu perhitungan secara coding atau querry >nya ? > >Thanks sebelumnya > > >
