[SORGU] Ödeme Planı Oluşturmak (Başlangıç Tarihi ve Üyelik Süresi Verilerinden)
#7
Merhaba..

İstediğiniz işlem için ayrıca bir ödeme planı tablosu oluşturmanız şart.. Tersi bir durum veritabanı mantığına ters olur zaten.. "Ödeme planını elle değil de otomatik oluşturayım derseniz" bunu form üzerinde yapmak durumundasınız.. Basit bir döngü bu amaca hizmet eder..:


Visual Basic
  1. For i = 1 To Me.SURE
  2.  
  3. With DoCmd
  4. .SetWarnings 0
  5. .RunSQL "insert into TOdemePlani (odemetarihi, uye) " _
  6. & " select DateAdd('m'," & i & ",[Forms]![UYELER]![BASTRH])," _
  7.   & " [Forms]![UYELER]![kimlik]"
  8. .SetWarnings -1
  9. End With
  10. Next



Açılan formda denemeler yapıp kontrol ediniz.. Tüm ödeme planı içinde iki tablonun birleşiminden bir sorgu hazırladım.. Formun üst kısmındaki düğme ile açabilirisiniz..


Eklenti Dosyaları
.rar   Yeni Microsoft Office Access 2007 Veritabanı.rar (Boyut: 23,5 KB / İndirilme: 83)



  Alıntı
Bu mesajı beğenenler: hmuratg
#8
Hocam Teşekkür ederim ilginiz için...
Galiba ayrı bir tablo ile işlem yapmaya devam edeceğiz...

DECLARE @SS INT
SET @SS=1
WHILE @SS <= (SELECT SURE FROM DNM WHERE UYENO=250)
BEGIN
(SELECT UYENO, BASTRH, SURE, DATEADD(MONTH,@SS,BASTRH) AS ODEMEZAMANLARI FROM DNM WHERE UYENO=250]
SET @SS= @SS+1
END

Şöyle bir sorgu yazdım...Bu sorgu çalışıyor...Ancak üyelik süresi 7 ay ise 7 farklı tablo oluşturuyor..Sonuçları doğru ama...

Üstteki sorguyu,bu tabloları birleştirecek şekilde düzenleyebilir miyiz acaba?



  Alıntı
Bu mesajı beğenenler:
#9
Merhab ssomar;
Sql server bilgim yok. Fakat Taruz Hocamızın verdiği bilgi access'te istediğiniz kriterlerde tablo oluşturmak için ideal. Kolay gelsin.



  Alıntı
Bu mesajı beğenenler:
#10
Merhaba, 
Taruz hocam ellerinize sağlık bu kodu kendi çalışmama ekledim. Çalışıyor fakat şöyle bir sorun yaşadım. Ödeme planını 3 ay giriyorum 4 ay olarak atıyor. Bir ay fazladan atıyor. Bunu nasıl düzeltebelirim. Tşk.



  Alıntı
Bu mesajı beğenenler:
#11
[Resim: attachment.php?aid=26586]
BASTRH alanı taksitlerin başlangıç tarihi olarak belirlemek isterseniz.



Visual Basic
  1. Private Sub Komut25_Click()
  2. For i = 1 To Me.SURE
  3.  
  4.    With DoCmd
  5.        .SetWarnings 0
  6.        .RunSQL "insert into TOdemePlani (odemetarihi, uye) " _
  7.                & " select DateAdd('m'," & IIf(i = 1, 0, i - 1) & ",[Forms]![UYELER]![BASTRH])," _
  8.                 & " [Forms]![UYELER]![kimlik]"
  9.        .SetWarnings -1
  10.    End With
  11. Next
  12. Alt12.Requery
  13. End Sub



şeklinde değişiklik yapılabilir.


Eklenti Dosyaları
.jpg   Ekran Alıntısı.JPG (Boyut: 48,14 KB / İndirilme: 69)



  Alıntı
Bu mesajı beğenenler:
#12
dsezgin hocam,
Çok Teşekkür ederim. Oldu



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Teslim Tarihi Alanına Göre Süzme, Filtreleme programmer67 14 1.118 09-05-2024, 23:27
Son Mesaj: programmer67
  [SORGU] Benzer Veriye Göre Sorgu Oluşturmak toros333 2 585 16-09-2023, 22:38
Son Mesaj: toros333
  [FORM] Gezinti Formu Ile Alt Form Oluşturmak abahceci 2 562 09-08-2023, 15:09
Son Mesaj: abahceci
  Listbox'ta Tarihi Seçtiğimde Sadece O Tarihe Kadar Trend Grafiğini Getirmesi YENIFENER 1 518 21-12-2022, 17:32
Son Mesaj: dsezgin
  Günü Yaklaşan Tarihi Uyarı Ile Bildirmek Kaptan64 6 948 24-05-2022, 20:47
Son Mesaj: Kaptan64
  Formda Kaydedilen Her Bir Veriye , Dosyaya Ulaşmak Için Köprü Oluşturmak tarkanaykın 6 940 19-04-2022, 21:28
Son Mesaj: tarkanaykın
access-sql-4 önceki 3 Aylık Dönem Başlama Ve Bitiş Tarihi alperalper 5 679 03-04-2022, 23:14
Son Mesaj: dsezgin
access-sql-6 [VBA] Tarih Aralığına Denk Gelen Tarihi Bulma alperalper 2 575 01-04-2022, 21:05
Son Mesaj: alperalper

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi