AccessTr.neT

(15/02/2020, 16:25)userx yazdı: [ -> ]Sayın Oğuz Türkyılmaz Tekli ve Toplu Borçlandırma Ekleme Sorgusu ile ilgili ekteki dosyada

1-Taksit sayısını elle girerseniz öyle hesaplar elle girmezseniz üst kısımdaki tarihten yıl sununa kadar taksitlendirir. Hem tarih hemde taksit sayısını da elle girerseniz eğer taksit sayısı yıl sonunu aşmıyorsa girdiğiniz değerlere göre hesaplar. Eğer aşıyorsa yıl sonuna kadar taksit sayısını otomatik düzelterek hesaplar.
2-Tekli eklemede T_0_MemberAccount ve T_1_MemberDues normal kayıt girilir
3-Çoklu eklemede T_0_MemberAccount tablosuna normal eklenir T_1_MemberDues tablosundaki eski kayıtların hepsi silinir yeni kayıtlar girilir. Yılda bir defa toplu kayıt girileceği düşünüldüğünden bu şekilde tasarladım. Yıl içinde gelecek yeni üyeler tekli kayıtla girilebilir.

 Merhaba @userx   

Elinize saglik duzenlediginiz dosyada ilk tespitlerim 
1-eski kayitlari sil dedigimde parametre sordu ve hepsine tamam dememe ragmen silme islemi gerceklesmedi bir yerde hatami yaptim.
2- Toplu Borclandirmada Uyelerin T_1_MemberDues tablosuna Aylik taksitlendirme bilgileri kaydolmuyor.
3- tek uye borclandirildiginda Hesaplamalar da Islem tarihini ocak ayina cekip 12 ay taksid yaptim. Taksidleri ocaktan baslatti ama 11 aya bolup Aralik ayini borclandirmadi.





tek uye takstle borclandirildiginda 

51. Mesajdaki dosyayı inceleme imkanınız oldu mu Oğuz bey?

(15/02/2020, 17:31)berduş yazdı: [ -> ]51. Mesajdaki dosyayı inceleme imkanınız oldu mu Oğuz bey?

Emin degilim surmenaj oldum  
hemen bakacagim

(15/02/2020, 17:35)Oğuz Türkyılmaz yazdı: [ -> ]Emin degilim surmenaj oldum  

Bir de bizi düşünün)

Siz gönderdiğim TF_1_MemberDues formunu F_1_MemberDefinition formunun içinden kullandığınız için hata oluşuyor.
T_1_MemberDues_Ekle sorgusunu aşağıdaki sorguyla değiştirin.

INSERT INTO T_1_MemberDues ( UyeNo, Tarih, AidatTutari, TaksitSayisi, Aciklama, Ocak, Subat, Mart, Nisan, Mayis, Haziran, Temmuz, Agustos, Eylul, Ekim, Kasim, Aralik )

SELECT T_1_MemberDefinition.UyeNo, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues].[Form]![txtTarih]) AS Tarih, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAidatTutari]) AS AidatTutari, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtTaksitSayisi]) AS TaksitSayisi, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAciklama]) AS Aciklama, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy1]) AS Ocak, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy2]) AS Subat, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy3]) AS Mart, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy4]) AS Nisan, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy5]) AS Mayis, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy6]) AS Haziran, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy7]) AS Temmuz, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy8]) AS Agustos, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy9]) AS Eylul, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy10]) AS Ekim, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy11]) AS Kasim, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy12]) AS Aralik

FROM T_1_MemberDefinition LEFT JOIN T_1_MemberDues ON T_1_MemberDefinition.UyeNo = T_1_MemberDues.UyeNo;

Tekli hesaplamada önce tarihi seçin daha sonra diğer alanlardaki işlemleri yapın.

(15/02/2020, 17:46)userx yazdı: [ -> ]Siz gönderdiğim TF_1_MemberDues formunu F_1_MemberDefinition formunun içinden kullandığınız için hata oluşuyor.
T_1_MemberDues_Ekle sorgusunu aşağıdaki sorguyla değiştirin.

INSERT INTO T_1_MemberDues ( UyeNo, Tarih, AidatTutari, TaksitSayisi, Aciklama, Ocak, Subat, Mart, Nisan, Mayis, Haziran, Temmuz, Agustos, Eylul, Ekim, Kasim, Aralik )

SELECT T_1_MemberDefinition.UyeNo, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues].[Form]![txtTarih]) AS Tarih, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAidatTutari]) AS AidatTutari, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtTaksitSayisi]) AS TaksitSayisi, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAciklama]) AS Aciklama, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy1]) AS Ocak, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy2]) AS Subat, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy3]) AS Mart, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy4]) AS Nisan, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy5]) AS Mayis, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy6]) AS Haziran, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy7]) AS Temmuz, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy8]) AS Agustos, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy9]) AS Eylul, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy10]) AS Ekim, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy11]) AS Kasim, Nz([Formlar]![F_1_MemberDefinition]![TF_1_MemberDues]![txtAy12]) AS Aralik

FROM T_1_MemberDefinition LEFT JOIN T_1_MemberDues ON T_1_MemberDefinition.UyeNo = T_1_MemberDues.UyeNo;

Tekli hesaplamada önce tarihi seçin daha sonra diğer alanlardaki işlemleri yapın.

Sn.Userx Toplu Hesaplamada Sadece silme sorgusu msgbox da belirttigi uzereT_1_ MemberDues 12 aylik tablosunu siliyor ama Toplu Borclandirma  T_0_MemberAccount tablosunda da uyeyi borclandirdigindan bu tabloda olusan borc kayitlarinida sildirmek gerekiyor. Bu yapildiginda toplu borclandirma olayi dogru sekilde calisiyor olacak.