Hi

You need to set up the keys BEFORE Set Relation:

USE sss
INDEX ON tel TAG tel
USE tty
INDEX ON tel TAG tel
Set Relationship to TEL into SSS

But, if you insist, you CAN of course use locate, instead of INDEXSEEK()

* in your scan loop
Select SSS
Locate for tel = m.Tel
If FOUND()
...
EndIf


>hi ,
>all tables are free,
>i try as under,
>but can i do that with out index,
>

>Set Relationship to TEL into SSS
>USE tty
>INDEX ON tel TAG tel
>USE sss
>INDEX ON tel TAG tel
>
>select TTY
>Scan
>m.tel = tel
>m.typ = typ
>If indexSEEK( m.Tel, .T., "SSS", "TEL")
>Select SSS
>Replace Typ with m.Typ in SSS
>endif
>endscan
>

>thanks
>>>hi,
>>>thank you but i don't have any relation between the 2 tables
>>>* assuming reln. between the tables based on Key TEL, Tag TEL
>>>how ??
>>
>>But surely you've set up persistant relationships between tables in your database designer? Or are all your tables FREE?
>>If they're not already related, as I said, use the Set Relationship command:
>>

>>SET RELATION TO [eExpression1 INTO nWorkArea1 | cTableAlias1
>>   [, eExpression2 INTO nWorkArea2 | cTableAlias2 ...]
>>   [IN nWorkArea | cTableAlias] [ADDITIVE]]
>>

>>
>>i.e. Set Relationship to TEL into SSS
>>
>>You must have both tables indexed on the TEL field.