Variáveis e PICTURE

No COBOL, todas as variáveis ​​utilizadas devem ser declaradas dentro de DATA DIVISION. Especificamente, as variáveis ​​temporárias na memória usadas para lógica do programa residem dentro da WORKING-STORAGE SECTION.

Números de nível

A declaração de variáveis ​​COBOL utiliza números de nível para estruturar e organizar dados hierarquicamente:

• 01: Define uma variável principal ou item de grupo (o nível mais alto).
• 05, 10, 15: Defina campos subordinados em um item de grupo de nível 01.
• 77: Variáveis ​​elementares independentes indicadas historicamente que não poderiam ser subdivididas posteriormente.

Na prática moderna, o nível 01 é comumente usado para declarar variáveis ​​​​elementares independentes.

A cláusula PICTURE (ou PIC)

A cláusula PICTURE (abreviada como PIC) especifica o tipo de dados e o comprimento de caracteres da variável. Os três caracteres de formato fundamentais são:

1. X (alfanumérico): pode conter letras, números e caracteres especiais.
   • PIC X(10) declara uma string de exatamente 10 caracteres.
2. 9 (Numérico): só pode conter dígitos numéricos.
   • PIC 9(3) declara um número inteiro composto por 3 dígitos (até 999).
3. V (Ponto Decimal Implícito): Usado em números decimais para representar onde começa a parte fracionária (o ponto decimal não é armazenado fisicamente).
   • PIC 9(3)V99 declara um número com 3 dígitos inteiros e 2 casas decimais.

A cláusula VALOR

Para atribuir um valor inicial a uma variável no momento da declaração, use a cláusula VALUE.

01 WS-PROJECT-NAME PIC X(15) VALUE "ELEARNER".
01 WS-USER-AGE     PIC 9(3)  VALUE 25.

Todas as definições de variáveis ​​devem terminar com um ponto ..

Experimente você mesmo