x

{PRDNOR|PRDUNI}(seed, output)

onde:

PRDNOR

Gera números aleatórios de precisão dupla passíveis de reprodução que normalmente são distribuídos com um meio aritmético 0 e um desvio padrão 1.

PRDUNI

Gera números aleatórios de precisão dupla passíveis de reprodução que são distribuídos uniformemente entre 0 e 1.

seed

Numérico

É a seed ou o campo que contém a seed, até nove bytes. A seed é truncada para um número inteiro.

No z/OS,os números não se reproduzem.

saída

Precisão dupla

É o nome do campo que contém o resultado ou o formato do valor de saída posto entre aspas simples.

Topo da página

Exemplo: Como Gerar números aleatórios reproduzíveis

PRDNOR atribui números aleatórios e os armazena em RAND. Estes valores são utilizados para escolher de forma aleatória cinco registros de funcionários identificados pelos valores nos campos LAST NAME e FIRST NAME. A seed é 40. para produzir um conjunto diferente de números, altere a seed.

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

A saída é:

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