Есть, маленькая тонкость, приведенный Hel!Riser алгоритм поиска возвратит верный результат при отношении один к одному, в противном случае результат будет неверным
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
CREATE CURSOR cParent (ID i, TParent c( 20 ))
CREATE CURSOR cChild (ID i, TChild c( 20 ))
FOR i = 1 TO 2
INSERT INTO cParent (id, TParent) VALUES (i, 'cParent ' + TRANSFORM(i))
FOR j = 1 TO 2
INSERT INTO cChild (id, tChild) VALUES (i, 'cChild ' + TRANSFORM(i))
ENDFOR
ENDFOR
SELECT cParent
INDEX ON id TAG id
SELECT cChild
INDEX ON id TAG id
SELECT a.ID as ParentID, MyRecnoInA(a.ID) as RecnoParent, b.ID ChildID, MyRecnoInB(b.ID) as RecnoChild ;
FROM cParent a INNER JOIN cChild b ON a.ID = b.ID
FUNCTION MyRecnoInA (tcID)
=SEEK(tcID,'cParent','ID')
RETURN RECNO('cParent')
FUNCTION MyRecnoInB (tcID)
=SEEK(tcID,'cChild','ID')
RETURN RECNO('cChild')
как видим, RecnoChild всегда будет первое найденное по SEEK
