Code: Select all
FUNCTION RandomTLA(Arg1)
Ans = Char(65+Rnd(26)) : Char(65+Rnd(26)) : Char(65+Rnd(26))
RETURN(Ans)
The Ultimate IBM Tool
Moderators: chulett, rschirm, roy
-
ray.wurlod
- Participant
- Posts: 54595
- Joined: Wed Oct 23, 2002 10:52 pm
- Location: Sydney, Australia
- Contact:
The Ultimate IBM Tool
IBM Software Services Group
Any contribution to this forum is my own opinion and does not necessarily reflect any position that IBM may hold.
Any contribution to this forum is my own opinion and does not necessarily reflect any position that IBM may hold.
