Armazenamento de compactados

Olá!

Ao trabalhar com variáveis numéricas compactadas, ocorre a necessidade de interpretar qual a quantidade que será utilizada no armazenamento, e também se o intervalo de valores suportados pela variável é suficiente para a aplicação.

No COBOL há os seguintes formatos de itens compactados:

• COMPUTATIONAL ou COMP (binário)
• Este é equivalente ao binário, a palavra Computational é sinônimo de binário.

• COMPUTATIONAL-1 ou COMP-1 (ponto flutuante)
• Utilizado para itens com ponto flutuante interno com precisão única, esses possuem 4 bytes de comprimento.

• COMPUTATIONAL-2 ou COMP-2 (ponto flutuante longo)
• Utilizado para itens com ponto flutuante interno com precisão dupla, esses possuem 8 bytes de comprimento.

• COMPUTATIONAL-3 ou COMP-3 (decimal interno)
• Equivalente ao PACKED-DECIMAL, apresentado no post: Variáveis numéricas (Computational items).

• COMPUTATIONAL-4 ou COMP-4 (binário)
• Equivalente ao um item binário.

• COMPUTATIONAL-5 ou COMP-5 (binário nativo)
• Os dados armazenados em COMP-5 possuem o truncamento no tamanho do campo binário, em vez do limite especificado pela PICTURE na declaração Cobol.
• Quando um item COMP-5 é referenciado, todo o campo binário é utilizado na operação.
• A opção do compilador TRUNC(BIN) faz com que todos os itens de dados binários (USAGE BINARY, COMP, COMP-4) sejam tratados como itens COMP-5.

A tabela abaixo mostra o armazenamento ocupado e intervalo de valores suportados para cada PICTURE de um item COMP-5.

A PICTURE para um item COMP-5 pode ser definida com o fator de escala, isto é, posições inteiras ou decimais implícitas, por exemplo a declaração PICTURE S99V99 COMP-5 é representado com uma halfword binária. Assim, os valores suportados apresentados na tabela devem ser dimensionados adequadamente para quando ocorrer essa situação.

FELIPE BARBOSA FERREIRA

Até o próximo post!