Claudio,

You can use something like this:

LOCAL lcNumber, llExists

RAND(-1)

DO WHILE NOT llExists
   lcNumber = PADL(INT(RAND()*100000000),8,'0') 
   llExists = SEEK(lcNumber,'cTableAlias')
ENDDO    

HTH,
>Hello
>
>I need to create a procedure to raffle (randon) N records (by it keys) among the area/records in a table..
>
>For example.. I'd like to get 3 randon items of the list below.. Different on each time that I run my procedure..
>
>00000124
>00000334
>00000454
>00000455
>00001888
>00001993
>00030001
>00045540
>00012222
>00344445
>00554442
>
>Does anyone could help me on it, please ?
>
>TIA
>
>Claudio