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