> replace all ID with 256000 + recno() in table

Но с учетом того, что записи могут быть и помеченные на удаление, то в такой
нумерации будут провалы.

Чтобы не было провалов:

local lnID
lnID=256000

replace all ID with GetNewID(&lnID) in table

func GetNewID
lpara lnID
lnID=lnID+1
retu lnID


Можно конечно и так, но менее предпочтительно:
Чтобы не было провалов:

PRIVATE lnID
lnID=256000

replace all ID with GetNewID() in table

func GetNewID
lnID=lnID+1
retu lnID

Разница в local/PRIVATE и наличии/отсутсвии LPARA


Posted via ActualForum NNTP Server 1.4