x

{PRDNOR|PRDUNI}(seed, output)

donde:

PRDNOR

Genera números aleatorios reproducibles de precisión doble, distribuidos normalmente con una media aritmética de 0 y una desviación estándar de 1.

PRDNOR

Genera números aleatorios reproducibles de precisión doble, distribuidos uniformemente entre 0 y 1

seed

Numérico

Es la semilla o el campo que contiene la semilla, de hasta 9 dígitos. La semilla queda truncada en un número entero.

En z/OS, los números no se reproducen.

output

Doble precisión

Es el nombre del campo que contiene el resultado, o el formato del valor de salida puesto entre comillas solas.

Principio de página

Ejemplo: Cómo generar números aleatorios reproducibles

PRDNOR asigna números aleatorios y los guarda en RAND. Después, los valores se utilizan para elegir de forma aleatoria cinco registros de empleados identificados por los valores en los campos LAST NAME y FIRST NAME. La semilla es 40. Para producir un conjunto de números diferente, cambie la semilla.

DEFINE FILE EMPLOYEE
RAND/D12.2 WITH LAST_NAME = PRDNOR(40, RAND);END

TABLE FILE EMPLOYEE
PRINT LAST_NAME AND FIRST_NAME
BY HIGHEST 5 RAND
END

La salida es:

RAND  LAST_NAME        FIRST_NAME 
----  ---------        ---------- 
1.38  STEVENS          ALFRED 
1.12  MCCOY            JOHN 
 .55  SMITH            RICHARD 
 .21  JONES            DIANE 
 .01  IRVING           JOAN