Igor ---

The violation is probably due to having Eff_date ControlSource for the textbox. Therefore, you are setting up a uniqueness error that happens the instant you fire off a Lostfocus or a Valid.

To resolve this, unbind the ControlSource and do a REPLACE eff_Date with THIS.Value *after* you have validated eff_Date.


>Hi,
>
>I have a table:
> Rate_Memb N 12 2
> Eff_date D
>
>Index Eff_date on Eff_date is a candidate index.
>Buffering mode is optimistic table buffering.
>
>Users should enter Rate_memb and Eff_date manually.
>In the textbox Valid event I validate This.Value:
>
>Local lRet
>
>lRet = !Seek(This.Value,"ratememb","eff_date")
>if !lRet
> =MessageBox("Duplicate effective date.",16,"Members rate")
>endif
>
>Return lRet
>
>But On Seek() I got error on uniqness violation.
>
>What are solutions of the problem?
>
>Sincerely.