>Hi David,
>You could also introduce a microsleep into the UDF
>

>FUNCTION GetUniqueID()
>    inkey(0.001)
>    return sys(2015)
>ENDFUNC
>

>or alternatively use Declare Sleep etc etc
>
>Peter Easson, Sydney
Hi Peter
I don't think that's necessary. I've never heard of a duplicate value being returned from a single processor.

x= ' '
ok= .T.
t= seconds()
for i = 1 to 100000
	y= x
	x= sys(2015)
	if x = y
		ok= .F.
	endif
endfor

? seconds() - m.t
? iif(m.ok, 'Passed', 'Failed')