Random

Geração de número aleatório.

Sintaxe

Random INTO número-sorteado

Argumento

número-sorteado

Campo numérico de até 18 dígitos que recebe o valor sorteado.


Codificação COBOL

EXEC COBOLware Radom
           INTO sorteio
END-EXEC