Kdv Ana Para

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
zengin
Üye
Mesajlar: 233
Kayıt: 06 Ağu 2003 10:13

Kdv Ana Para

Mesaj gönderen zengin »

merhaba degerli arkadaşlar herkese kolay gelsin

programımda kullandıgım kdv toptutar alanına örnek 1000.000 TL ana parasını 847.45762711864 olarak de ana parayı nasıl bulabilirim

bana bu konuda yardımcı olun lütven saygılarımla

Ftable1toptutar.Value:=fTable1tutar.Value/1.18;
Zengin
Misafir

cevabı yazmıssın

Mesaj gönderen Misafir »

son yazdıgın formul doğru. ama bir konuya dikkat etmelisin. türkiyede üç değişik kdv ve bunlara ilaveten ötv uygulaması var. yani oran her zaman yüzde 18 değildir. 1 veya 8 de olabilir. ötv de 6,7 dir. dolayısı ile vergi tanımları içinde bir tablo oluşturmalısın ve stok tanımları içinden stoğun vergi grubunu belirlemelisin.

kolay gelsin
zengin
Üye
Mesajlar: 233
Kayıt: 06 Ağu 2003 10:13

Mesaj gönderen zengin »

hocam ilgilendigin icin teşekkürler bende aynı düşüncede oldugum icin
yazmış oldugum kodun yalnızca 18 hitap ettigini biliyorum fakat

dogru kodu tanımlayamadım oyüzden siz degerli üstatların bilgilerine
ihtiyacım var dogru kod hakkında bana yardımlarınızı bekliyorum
Zengin
Misafir

kdv

Mesaj gönderen Misafir »

şimdi iki tane tablo olsun bir kdv diğeri stok

kdv :

KDV_ID...KDV_KOD....KDV_ACIKLAMA......KDV_ORAN
1.............01..............%1 kdvlı mallar........1
2.............02..............%8 kdv li mallar.......8
3.............03..............%18 kdvli mallar......18


stok :

STOK_ID...STOK_KOD.....STOK_ISIM......STOK_FIYAT.......STOK_KDV
1..............S001...............EKMEK............1000....................01
2..............S002...............ZEYTIN............2000...................02
3..............S003...............UN..................3500....................01
4..............S004...............SAKIZ.............100.....................03


şimdi diyelimki fiyatlar kdv dahil fiyatlar, biz kdv hariç fiyatları bulacağız;

Kod: Tümünü seç

var 
kdvharicfiyat,kdvoran:extended;
begin
kdv.locate('KDV_KOD',stok.fieldbyname('STOK_KDV').asstring,[loartialkey])  // stok kartından kdv grubunu buluyoruz.
kdvoran:=kdv.fieldbyname('KDV_ORAN').asfloat;
kdvharicfiyat:=stok.fieldbyname('STOK_FIYAT').asfloat/(1+(kdvoran/100));
end;
end;
Cevapla