Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Newid() not new
Message
General information
Forum:
Visual FoxPro
Category:
The Mere Mortals Framework
Title:
Miscellaneous
Thread ID:
00656406
Message ID:
00659380
Views:
22
>could you post your newid() function, and where do u call newid()

This is an exerpt of the code from MMortals' newid() stored procedure

******
SET REPROCESS TO AUTOMATIC

IF !USED("id")
USE id IN 0
ENDIF
SELECT id

IF SEEK(lcAlias, "id", "keyname")
IF RLOCK()
luID = IIF(id.type = 'C', id.value, VAL(id.value))
REPLACE id.value WITH EVAL(id.incrementprocedure)
UNLOCK
ENDIF
ENDIF

RETURN luID
*****
Previous
Reply
Map
View

Click here to load this message in the networking platform