selam arkadaşlar...
yeni bir proje üzerinde çalışıyorum belki forumda beni bilenler maaş işleri ile ilgili olduğumu bilirler ve yeni projemde
sağlık bakanlığı 1.basamakta çalışanlar için eködeme (döner sermaye) hesaplama programı olacak.
fakat öncelikle bir sorunumu çözmem lazım
iki tablom olsun şimdilik ana tema
1.personel
2.maaş
Personelin verilerini personel tablosuna gireceğim.
frm_bordro_hesaplama formunda bir buton yardımı ile hesaplama işlemini gerçekleştirip yapılan hesaplama sonuçlarını forma eklediğim sorgu alt formunda görmek..
ben bir kod yazdım ama başaramadım.
Daha önce terfi farkı hazırlama yapmıştım orda kullanılan bir kodu uyguladım ama başarılı olamadım yardımcı olan arkadaşa teşekkürler..

sayın döndüdedöndü
örneğinizi inceledim
mbürüt * 0.195 deki sayı sabit mi hiç değişmez mi, bunu bir adı var mı a katsayı gibi
Round((rs!mbürüt - rs!mssk_k) * 0.15 0,15 de aynı

---

ayrıca bordro hesaplansa ne olacak hesaplanmasa ne olacak bir kayıt mı yapılacak

sayın hocam ilginize teşekkürler
ben örnek kısa olsun diye basitce rakamlarla yazdım şimdilik.
asıl projemde söz konusu rakamlar birer oran olacaklar ve bir tablodan çektireceğim DLookup ile.
bordro hesaplanıp hesaplanmayacağı şu konuda önemli
örneğin mevcut bir personelin hesaplanacak o dönemki eködemesi(maaş) olmuyor. bir sonraki maaş döneminde olabiliyor.
50 personelim var diyelim personel tablomda ben bunlardan 35 şine bordrohesaplayacağım.onuda hesaplama alanını koydum 1 e eşit olanlar hesaplanıp maaştabloma eklensin istiyorum.
2012 ocakdöneminiseçip hesapla diyecem 35personeliçin
2012 şubat dönemi için personel sayım 40 da olabilir 30 da ...
her dönemihesaplatım maas tabloma ekledikçe sorgularla ilgili dönemlerin maaş raporlarını alabileceğim.
hatırlarsanız TERFİ PROGRAMIMDA DA siz yardım etmişdiniz bana ve mükemmel bi iş oldu çok arkadaşım kullanıyor herkes sizler için allah razı olsun diyor benim içinde diyorlar tabii

---

hocam kısacası siz hesaplama işleriiçin kafanızı yormayın ben bişekilde yapıyorum.
Sağlık Bakanlığı Ek Ödeme Yönetmeliğine göre yapacağım hesaplamaları inşallah.[/u]
TEŞEKKÜRLER

bunların tamamını sorguda tek seferde hesaplatsak diyorum onun için sordum
projenin tamamı bilinince çözüm üretmek kolay oluyor

Hocam şöyle bir sıkıntı oluyor tüm hesaplamarı sorguda yapmaya çalıştığımda sorgu karmaşık gibi hatalar yada çok yavaş çalışması gibi sıkıntılar olmaz mı sizce
çünkü hesaplama yapılacak personel sayısı ortalama 1200 kadar olabilir.
ve hesaplanmış bordrolarında veri tabanında kalması gerekiyor kim ne almış falan
isterseniz tüm detayı ile açıklamlı size göndereblirim proje içeriğini hesaplama aşamaları ile birlikte
sadece gelir vergisinin hesabı örnek olarak ekliyorum.
TMatrah = küm_ver_math + gel_ver_math

If gel_ver_math < 0 Then
rs!hgelir_vergisi = 0

ElseIf TMatrah < DLookup("[dilim_1]", "tbl_katsayi") Then
vergi1 = Round(gel_ver_math * DLookup("[oran_1]", "tbl_katsayi") / 100, 2)

ElseIf TMatrah >= DLookup("[dilim_1]", "tbl_katsayi") And TMatrah < DLookup("[dilim_2]", "tbl_katsayi") Then
Sor = (gel_ver_math - (TMatrah - DLookup("[dilim_1]", "tbl_katsayi")))
If Sor > 0 Then
vergi1 = Round((TMatrah - DLookup("[dilim_1]", "tbl_katsayi")) * DLookup("[oran_2]", "tbl_katsayi") / 100, 2)
vergi2 = Round(Sor * DLookup("[oran_1]", "tbl_katsayi") / 100, 2)
Else:
vergi1 = Round(gel_ver_math * DLookup("[oran_2]", "tbl_katsayi") / 100, 2)
vergi2 = 0
End If


ElseIf TMatrah >= DLookup("[dilim_2]", "tbl_katsayi") And TMatrah < DLookup("[dilim_3]", "tbl_katsayi") Then
Sor = (gel_ver_math - (TMatrah - DLookup("[dilim_2]", "tbl_katsayi")))
If Sor > 0 Then
vergi1 = Round((TMatrah - DLookup("[dilim_2]", "tbl_katsayi")) * DLookup("[oran_3]", "tbl_katsayi") / 100, 2)
vergi2 = Round(Sor * DLookup("[oran_2]", "tbl_katsayi") / 100, 2)
Else:
vergi1 = Round(gel_ver_math * DLookup("[oran_3]", "tbl_katsayi") / 100, 2)
vergi2 = 0
End If


ElseIf TMatrah >= DLookup("[dilim_3]", "tbl_katsayi") Then
Sor = (gel_ver_math - (TMatrah - DLookup("[dilim_3]", "tbl_katsayi")))
If Sor > 0 Then
vergi1 = Round((TMatrah - DLookup("[dilim_3]", "tbl_katsayi")) * DLookup("[oran_4]", "tbl_katsayi") / 100, 2)
vergi2 = Round(Sor * DLookup("[oran_3]", "tbl_katsayi") / 100, 2)
Else:
vergi1 = Round(gel_ver_math * DLookup("[oran_4]", "tbl_katsayi") / 100, 2)
vergi2 = 0
End If
End If

rs!hgelir_vergisi = vergi1 + vergi2

bunun gibi gelir vergisi 2 adet olacak
belki bu bi fonksiyon olarak da tanımlanabilir ama ben becerebilirmiyim bilmiyorum

sorun olacağını düşünmüyorum ayrıca sorgu daima hızlıdır.