Arsip: Menentukan harga Pembelian

 
user image
more 11 years ago

selviani_id

MInta tolong pencerahannya dong, cara menentukan harga beli barang saat terjadi transaksi penjualan : contoh: senin : beli 1 pcs harga beli 1000 selasa : beli 5 pcs harga beli 1500 rabu : beli 10 pcs harga beli 1250 Kamis : terjadi transaksi jual 10 pcs. Gimana nentuin harga belinya menggunakan metode fifo dan menghabiskan barang yg pertama dibeli? apa yg salah dengan kode ini : qtys:=qty; hBeli:=0; n:=tTempSBarang.RecordCount; tTempSBarang.Last; while n>=1 do begin nSel:=tTempSBarang['TERIMA']-tTempSBarang['STOCK']; if nSel=0 then begin if n=1 then hbeli:=hbeli+(tTempSBarang['HARGABELI']qtys); n:=n-1; tTempSBarang.Prior; end else begin if nSel<qtys then begin hbeli:=hbeli+(tTempSBarang['HARGABELI'] nsel); qtys:=qty-nSel; end else if nSel>=qtys then begin hbeli:=hbeli+(tTempSBarang['HARGABELI']*qtys); n:=1; end; n:=n-1; tTempSBarang.Prior; end; end; Thanks
user image
more 11 years ago

alvonz

senin : beli 1 pcs harga beli 1000 selasa : beli 5 pcs harga beli 1500 rabu : beli 10 pcs harga beli 1250
yang di atas itu kita beli ato jual?? kalo berdasarkan tgl pembelian di urut gimana?
user image
more 11 years ago

selviani_id

saya urut berdasarkan id, terus di cari yg terakhir dulu. itu harga beli-nya. maunya pas transaksi penjualan harga beli dan harga jualnya masuk ke tabel histori, biar gampang nyari keuntungan bersih-nya.
user image
more 11 years ago

selviani_id

ada cara yg lebih simple g buat nyari harga beli barang tersebut. misal : kalo jual 10 berarti 1 pcs X 1000 = 1000 (stock brg pertama beli) 5 pcs x 1500 = 5000 (stock brg pembelian kedua) sisa 4 pcs x 1250 = 5000 (stock brg pembelian ketiga) berarti harga belinya per pcs-nya menjadi 5000+1500+1000/10 pcs = 1350/pcs..... nah harga ini yg sy cari dan dimasukin ke table histori penjualan. gimana ya code programnya?
user image
more 11 years ago

selviani_id

salah denk yg bener misal : kalo jual 10 berarti 1 pcs X 1000 = 1000 (stock brg pertama beli) 5 pcs x 1500 = 7500 (stock brg pembelian kedua) sisa 4 pcs x 1250 = 5000 (stock brg pembelian ketiga) berarti harga belinya per pcs-nya menjadi 5000+7500+1000/10 pcs = 1350/pcs..... nah harga ini yg sy cari dan dimasukin ke table histori penjualan. gimana ya code programnya?
user image
more 11 years ago

zones

klo dilihat diatas kamu langsung potong dari program yahc ?? klo dari database bisa ndak, jadinya query semua barang yang masuk di kurangin semua barang yang keluar kan ketemu tuch hasil akhirnya. Nanti utk locking kamu proses seperti tutup buku utk memasukkan sisa barangnya. Unutk perhitungan 1350, prosesnya sich hampir sama, jadi kamu tinggal ambil dari record yang keluar databasenya saja lalu dihitung dech menurut saya itu lebih mudah. hee.... :D
more ...
  • Pages:
  • 1
Share to
Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com