otomatik kdv hesaplama

Access'te Kdv hesaplamaları ile ilgili yıllar önce epey bir kıvranmıştım. Yazınızı görünce o günleri hatırladım. Durum aslında çok da basit değil. Zor değil ama kafa karıştırıyor. Hatta önce programı yanlış yapmıştım ve müşteri arayıp "100 lira kdv dahil kestiğimde kdv 18 lira çıkıyor" demişti. Doğruydu, çünkü ben kdv eklemeyi doğru yapmıştım ama kdv dahilin içindeki ana değeri çıkartırken yanlışlık yapmıştım. Program sanki 100-18= 82 lira kdv hariç değer çıkartıyordu.
Ancak tabloda bir ürünün kdv'siz değeri vardır bir de kdv oranı. Bu genelde 18 veya 8 olarak girilmiştir. (O zamanlar 25 de vardı) Durum böyle olunca kdv dahil değer için mesela 100 liralık bir mal için 100*1,18 olması gereken hesaplama için 1,18 değerini oluşturmak gerekir. Kdv her zaman 18 olmadığı için tablodan gelen 18 veya 8'in 1,18 veya 1,08'e dönüşmesi gereklidir.

formül şu
Kdvli_toplam = (kdvsiz_fiat * kdv / 100 + kdvsiz_toplam)

Sayılarla şöyle örnekleyebilirim:

Kdvli_toplam = (100 * 18 / 100 + 100)

Access'in mantığı bu. Bu işlemin sonucu 118 lira çıkar.

Gelelim kdvli girilen değerden kdv matrahını çıkarmaya:

Kdvsiz_toplam = kdvdahil(girilen) * 100 / (Kdv + 100)

Böylece de kdvdahil girilen bir değerin içinden kdv hariç değer çıkarılmış olur.

Örnek olsaydı daha iyi anlaşılabilirdi. Ben de örnek hazırlamaya erindim doğrusu) Belki birazdan hazırlarım..

Örnekte fatura ekranımın örneği vardır.

Formulü:

Me.IskBedel = (Me.BirimFiyat * Me.Adet) * (Me.IskYuzde / 100)
Me.KDVTutar = ((Me.BirimFiyat * Me.Adet) - Me.IskBedel) * (Me.KDVYuzde / 100)
Me.SatirToplami = ((Me.BirimFiyat * Me.Adet) - Me.IskBedel) + Me.KDVTutar

yorumlarını esirgemeyen herkese çok teşekkür ederim. aslında basit fakat bir o kadar da karışık olabiliyor. sayın Ercan Şahin kdvyi düşüp daha sonra ekleyebileceğimi söylemişsiniz fakat 4 TL olan bir ürünün %18'i 0,72 iken düştüğümüzde 3,28 olur fakat geri eklemek istersek 3,28 TL %18'i malesef 0,72 değil yani 5ten 2 çıkarsa 3 kalır tekrar 2 eklersek 5 olur gibi değil malesef. bütün yorumları dikkatlice takip ettim ve şimdi sırayla uygulayacağım. tekrar teşekkür ederim

evet sayın Mehmet DEMIRAL bu konuda epey kıvranmış ve neticeye ulaşmışsınız,bir örnek yaptım ve söylediğiniz gibi tuttu Teşekkür eder ve Bol Accesstr'li bir yaşam dilerim.
Saygılarımla

çözdüğünüze sevimdim Access (accesstr) de kesin çözümü vardır.

Sevindim.