Enterprise COBOL for z/OS, Version 4.2
Você pode controlar como o computador armazena itens de dados numéricos codificando a cláusula USAGE em suas entradas de descrição de dados.
Você pode querer controlar o formato por qualquer um dos vários motivos, como estes:
- A aritmética realizada com tipos de dados computacionais é mais eficiente do que com os tipos de dados USAGE DISPLAY ou USAGE NATIONAL.
- O formato decimal compactado requer menos armazenamento por dígito do que os tipos de dados USAGE DISPLAY ou USAGE NATIONAL.
- O formato decimal compactado converte de e para o formato DISPLAY ou NATIONAL com mais eficiência do que o formato binário.
- O formato de ponto flutuante é adequado para operandos aritméticos e resultados com escala amplamente variável, enquanto mantém o número máximo de dígitos
significativos.
- Você pode precisar preservar os formatos de dados ao mover dados de uma máquina para outra.
Os dados numéricos que você usa em seu programa terão um dos seguintes formatos disponíveis com COBOL:
- Decimal externo (USAGE DISPLAY ou USAGE NATIONAL)
- Ponto flutuante externo (USAGE DISPLAY ou USAGE NATIONAL)
- Decimal interno (USAGE PACKED-DECIMAL)
- Binário (USAGE BINARY)
- Binário nativo (USAGE COMP-5)
- Ponto flutuante interno (USAGE COMP-1 ou USAGE COMP-2)
COMP e COMP-4 são sinônimos de BINARY e COMP-3 é sinônimo de PACKED-DECIMAL.
O compilador converte os números exibíveis na representação interna de seus valores numéricos antes de usá-los em operações aritméticas.
Por exemplo:
05 INITIAL-COUNT PIC S9(4) USAGE BINARY VALUE 1000.
Independentemente de qual cláusula USAGE você usa para controlar a representação interna de um valor, você usa as mesmas convenções de cláusula PICTURE e valor
decimal na cláusula VALUE (exceto para dados de ponto flutuante interno, para os quais você não pode usar uma cláusula PICTURE).
Examples: numeric data and internal representation -
Exemplos: dados numéricos e representação interna
Conceitos relacionados
Tarefas relacionadas
Related references
© Copyright IBM Corp.
|