AccessTr.neT

Bul · 27/02/2009, 12:57

Öncelikle herkese merhabalar;

Geçenlerde taksitlendirme hakkında yardım istemiştim ve sağolsun Sn. CELOYCE bana bir taksitlendirme örneği gönderdi ve bende bunu kendime göre uyarladım. Ben birde taksit işlemi yaptığımız zaman taksit sıra numarası vermesini istiyorum.(bu örnekte yok) Çünkü taksitlendirme işlemi yapan olan ortaklara tarih aralığına göre ihbarname ya da ödeme emri vs. göndereceğim ve bu ihbarnamelerde kaçıncı taksitleri olduğunu prosedür gereği yazmam gerekecek. O yüzden taksit sıra numarası bana çok lazım olacak. Ekte yaptığım örneği gönderiyorum. Bana bu konuda yardımcı olabilirseniz çok sevinirim.

Saygılarımla,

Bul · 27/02/2009, 16:25

Değerli üstatlar;

Bana bu konuda yardımcı olamıyacak mısınız acaba?

Bul · 27/02/2009, 16:50

senin sıra no yine sende olan kodlar ile halledildi bu kodla

Kod:

Function sıra(ByVal CustomerID As Variant, ByVal RecordID As Variant) As Double



    Dim sıram As String

     Dim Qst1 As String

    Dim rst As DAO.Recordset 

    sıram = 0

    If CustomerID > 0 And RecordID > 0 Then

    Else

        GoTo ExitPoint

    End If   

    Qst1 = "Select * From taksit " & _

            " Where musid = " & CustomerID & _

            " Order By tarih, takid;"

    Set rst = CurrentDb.OpenRecordset(Qst1)

    

    If rst.EOF And rst.BOF Then

        GoTo ExitPoint

    End If

    

    rst.FindFirst "takid = " & RecordID

    If rst.NoMatch Then

        GoTo ExitPoint

    End If

    

    Do While Not rst.BOF

         sıram = sıram + 1

        rst.MovePrevious

    Loop



ExitPoint:

    On Error Resume Next

    sıra = sıram

    rst.Close

    Set rst = Nothing

    On Error GoTo 0

End Function

kulanılma aynı sorguda boş alana Taksitsırası: sıra([musid];[takid]) şeklinde yazma ile bu kodu diğer arkadaşlarda almalı özellikle alt formlarda kullanılmak üzere

örneğin ekte

not :taksit koduda yürüyen bakiye koduda bana aittir. Buna birde sıralam kodunu eklemiş oldum sayende teşekkürler böyle bir soru sorduğun için

Bul · 27/02/2009, 17:05

Sayın esrefigit hocam;
öncelikle ilginize çok teşekkür ediyorum. bizler gibi acemilerle bıkmadan usanmadan uğraşıyorsunuz. bu haklarınız nasıl ödenir bilemiyorum vallahi. elinize sağlık diyorum çok ama çok teşekkür ederim.

birde;
kodların size ait olduğunu bilmiyordum, çünkü örneği sayın celoyce hocam eklemişti. ama tabi yine de sizden çok özür dilerim.

esrefigit hocam eklediğiniz örneği inceledim, sıra numarası sorunu çözülmüş fakat özür dilerim ama ben belirtmeyi unutmuşum. sıra numarasının tabloya da işlenmesi gerekir. Sizden ricam, bu konuyada el atsanız ya da bana bir yol gösterseniz çok sevinirim.

Bul · 27/02/2009, 19:47

Aman beyler ben alıntı diye örneğin üzerine yazmıştım,kim yapmışsa yine eline sağlık

https://accesstr.net/20-taksitten-fazlas...-2089.html
ayrıca 2. mesajdır.... Img-grin

Bul · 27/02/2009, 19:54

Teşekkürler,
Emeği geçen tüm arkadaşların eline sağlık,
Hayırlı çalışmlar dilerim.

AccessTr.neT

taksitlendirme işleminde sıra numarası sorunu

taksitlendirme işleminde sıra numarası sorunu

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Giriş yap

Hesap oluştur

Konu Linkleri