>I am happy to take your advice. What I am doing now is generating the number
>and , in a DO WHILE loop, SEEKing it and re-generating it until !FOUND(). If I put
>the primary key in a table, how do I generate it? By just adding 1 to its existing
>value? In a busy network, am I liable to face contention problems?
USE KeyTable
IF Seek(lcAlias, 'cTableName')
RLOCK()
liRetVal = iKeyVal
REPLACE iKeyVal WITH iKeyVal + 1
UNLOCK
ENDif
RETURN liRetVal