If you have an ILE language then I would call the CEERAN0 API. It takes two
parms, a seed value (pass a zero) and a float where it returns a random
number between 0 and 1 exclusive. So if you want a random number between 1
and 99999 simply multiply the return value by 100000 and you're all set.

-Walden

-----Original Message-----
From: mcsnet!midrange.com!midrange-l-owner@Mcs.Net
[mailto:mcsnet!midrange.com!midrange-l-owner@Mcs.Net]On Behalf Of
boothm@ibm.net
Sent: Wednesday, December 17, 1997 7:41 PM
To: MIDRANGE-L@midrange.com
Subject: re: Random Number generator


I need to generate a random 5-digit number on an AS/400.  What is good?
Is this a Rexx job?

----------------------------------------------------
Booth Martin
---------------------------------------------------



+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact [javascript protected email address].