>>>>>Does anyone know why a seek(value,table,index) would cause a "uniqueness of index" error.
>>>>>The index is the PK. Table is buffered. I thought the uniqueness error was only if it was being updated.
>>>>>Isn't the seek just a optimized lookup? The table's PK has a related table.
>>>>
>>>>Is the table record-level buffered? If yes, then seek will cause a record movement and if you added a new record, it will try to commit it.
>>>>
>>>>Try using INDEXSEEK instead or use table-buffering (buffering = 5)
>>>
>>>I do use table-buffering = 5 and I want the pointer to move so I can capture other data related to the found record.
>>
>>I think you may want to post some relevant code then.
>
>Here is the code:
>

>WITH This.Parent
>IF ! SEEK(This.Value,'contacts','corgcode')
>       MESSAGEBOX('NO CONTACT FOR THIS ORG CODE EXIST'+CHR(13);
>	+'PLEASE ENTER NEW INFORMATION';
>	,64,'UPDATE CONTACT')
>       llFocus=.F.	
>ELSE
>       .txtAddress.Value = ALLTRIM(contacts.cAddress)
>       .txtCity.Value = ALLTRIM(contacts.cCity)
>       .txtState.Value = ALLTRIM(contacts.cState)
>       .txtZip.Value = ALLTRIM(contacts.cZip)
>       .txtMailSt.Value = ALLTRIM(contacts.cMailSt)
>       .txtContact.Value = ALLTRIM(contacts.cContact)
>       .txtPhone_num.Value = ALLTRIM(contacts.cCont_phone)
>ENDIF	&& seek
>ENDWITH
>

You could use INDEXSEEK() - that doesn't move the pointer....