AS/400 - Números aleatorios

Necesito crear una función que me permita generar un número aleatorio de un dígito, que esté entre dos límites. Por ejemplo, yo le envío a la función un 2 y un 7 y que me devuelva un número aleatorio entre estos dos.
Alguien podría hacerme el favor de darme alguna sugerencia?

Gracias de antemano

No especificas en que lenguaje lo necesitas.
Intenta con la funcion RANDOM(limite_inferior,limite superior) en un procedimiento REXX.
Ojala te sirva.

Perdón, fue un error. Ya un amigo de aquí me envió la rutina en RPG. Muchas Gracias por la ayuda

Por favor nos dices cual es la subrutina o función para generar estos números en RPG . Mil Gracias

este es una solucion:
* Returns a random unsigned integer between low and high.
*
* Inputs: low end of range. Min=1 Max=maxrange
* high end of range Min=2 Max=maxrange + 1
* difference must be at least 2
* Inputs: low end of range. Min=1 Max=maxrange
* high end of range Min=2 Max=maxrange + 1
* difference must be at least 2
*
* Maxrange is a constant, 2147483646, defined in module xxxrandom

D random pr 10u 0 Random number
D low 10u 0 value Low end of range
D high 10u 0 value High end of range




C eval MyLow = 1
C eval MyHigh = 9
C eval MyRandom = random(MyLow:MyHigh)

Did you ever find a solution for this?

We have been using this for several weeks now and it seems to be going nicely. United Healthcare