Variables y PICTURE

En COBOL, todas las variables utilizadas deben declararse dentro de la DATA DIVISION. Específicamente, las variables temporales en memoria destinadas a la lógica del programa residen en la WORKING-STORAGE SECTION.

Números de Nivel (Level Numbers)

La declaración de variables en COBOL utiliza números de nivel para organizar los datos jerárquicamente:

• 01: Define una variable principal o un registro (el nivel más alto).
• 05, 10, 15: Definen campos subordinados dentro de un registro de nivel 01.
• 77: Históricamente indicaba variables elementales independientes que no podían dividirse más.

En la práctica moderna, se suele utilizar el nivel 01 para declarar variables elementales independientes.

La cláusula PICTURE (o PIC)

La cláusula PICTURE (abreviada como PIC) especifica el tipo de dato y el tamaño en caracteres de la variable. Los tres caracteres de formato fundamentales son:

1. X (Alfanumérico): Puede contener letras, números y caracteres especiales.
   • PIC X(10) declara una cadena de exactamente 10 caracteres.
2. 9 (Numérico): Puede contener únicamente dígitos numéricos.
   • PIC 9(3) declara un entero de 3 dígitos (hasta 999).
3. V (Punto decimal implícito): Usado en números decimales para indicar dónde colocar los decimales (el punto decimal no se almacena físicamente).
   • PIC 9(3)V99 declara un número con 3 dígitos enteros y 2 decimales.

La cláusula VALUE

Para asignar un valor inicial a una variable en el momento de su declaración, se utiliza la cláusula VALUE.

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

Todas las definiciones de variables deben terminar con un punto ..

Pruébalo tú mismo