>>
>>Just a guess:
>>

>>? MyRandom(382622)
>>
>>
>>FUNCTION MyRandom(lnSeed)
>>RETURN m.lnSeed + (DATETIME()-datetime(1900,1,1,0,0,0))
>>

>
>Something I don't understand. Please help me.
>
>How do you equate the number returned by MyRandom() function to the seed number?

Oops, that part of the question I skipped :o)
Sorry, something like:

lnRandom = MyRandom(382622)
? "Random", lnRandom.RandomNumber
? "Seed", lnRandom.RandomNumber - lnRandom.GetBack


FUNCTION MyRandom(lnSeed)

    LOCAL loEmpty
    loEmpty = CREATEOBJECT("Empty")
    ADDPROPERTY(loEmpty,"RandomNumber",0)
    ADDPROPERTY(loEmpty,"GetBack",0)
    loEmpty.GetBack = (DATETIME()-datetime(1900,1,1,0,0,0))
    loEmpty.RandomNumber = m.lnSeed + loEmpty.GetBack

RETURN loEmpty