(30/11/2018, 23:36)haliliyas yazdı:

(30/11/2018, 16:05)notrino yazdı: Sonuç olarak teklif hiç revize edilmediyse revizyona açık olmalı ama bir veya birden fazla revize edildiyse hep en son revize edilen teklif revizyona açık olmalı onun altındakiler revizyona kapalı olmalı.
Nasıl yapılabilir?

sayın notrino tam olarak istediğiniz gibi olmadı ama dilerim işinize yarar 
tıklandığında olayında uyarı veriyor. revize edilmiyor

Private Sub Komut399_Click()

If Me.MTN_REV_ID = DMax("REV_ID", "S_TEKLIFLIST") Then 'Me.Komut399.Enabled = True

DoCmd.OpenForm "F_TEKLIF_REV", acNormal, , "[TEKLIF_ID]=" & Me.TEKLIF_ID

DoCmd.GoToControl "Alt2_R"

DoCmd.FindRecord Me.MTN_REV_ID

Else

MsgBox ("eski revizyonlar düzenlenemez")

End If

End Sub

Merhaba Halil Bey,
Evet kısmen doğru çalışıyor ama ekteki gibi başka bir firmaya daha teklif verdiğimde ve revize ettiğimde göreceğiniz üzere alttaki firmaların tüm teklifleri revizyona kapalı oluyor. (Teklifler listesi tüm firmalara verilen teklifleri içeriyor.) Halbuki AAA firmasının 1-R1 teklifi revizyona açık, 1-R0 teklifi revizyona kapalı olmalıdır. Yani her firmanın en üst revizyon  sayılı teklifi revizyona açık olmalıdır.