The Ultimate IBM Tool
Posted: Tue Mar 17, 2009 6:54 pm
Code: Select all
FUNCTION RandomTLA(Arg1)
Ans = Char(65+Rnd(26)) : Char(65+Rnd(26)) : Char(65+Rnd(26))
RETURN(Ans)Code: Select all
FUNCTION RandomTLA(Arg1)
Ans = Char(65+Rnd(26)) : Char(65+Rnd(26)) : Char(65+Rnd(26))
RETURN(Ans)