Cómo declarar constantes en COBOL
En COBOL, las constantes no se definen explícitamente como en otros lenguajes modernos, pero se pueden implementar mediante el uso de niveles 78 o literales figurativos. Estas técnicas aseguran que ciertos valores permanezcan inmutables en el programa.
Declarar constantes en COBOL
1. Usando el nivel 78
El nivel 78 es la forma estándar de definir constantes en COBOL. Estas se declaran en la DIVISIÓN DATA, dentro de la sección WORKING-STORAGE o LINKAGE, y no ocupan espacio en memoria.
Sintaxis:
78 CONSTANTE-NOMBRE VALUE valor.Ejemplo:
WORKING-STORAGE SECTION.
78 PI VALUE 3.14159.
78 MAX-ITEMS VALUE 100.2. Usando literales figurativos
COBOL incluye literales predefinidos que actúan como constantes simbólicas. Por ejemplo:
-
ZERO,ZEROSoZEROES: Representa el valor 0. -
SPACEoSPACES: Representa un espacio en blanco. -
HIGH-VALUEoHIGH-VALUES: Representa el valor más alto del conjunto de caracteres. -
LOW-VALUEoLOW-VALUES: Representa el valor más bajo del conjunto de caracteres.
Ejemplo:
MOVE ZEROS TO CONTADOR.
MOVE SPACES TO NOMBRE.Ejemplo práctico de constantes en COBOL
IDENTIFICATION DIVISION.
PROGRAM-ID. EJEMPLO-CONSTANTES.
DATA DIVISION.
WORKING-STORAGE SECTION.
78 PI VALUE 3.14159.
78 MAX-EDAD VALUE 120.
PROCEDURE DIVISION.
DISPLAY "El valor de PI es: " PI.
DISPLAY "La edad máxima permitida es: " MAX-EDAD.
STOP RUN.Salida:
El valor de PI es: 3.14159
La edad máxima permitida es: 120Tabla de métodos para declarar constantes
| Método | Descripción | Ejemplo |
|---|---|---|
| Nivel 78 | Define constantes simbólicas en la división DATA |
78 NOMBRE VALUE "CONSTANTE".
|
| Literales figurativos | Constantes predefinidas en COBOL |
MOVE SPACES TO CAMPO.
|
Referencia oficial
Para más información sobre COBOL, consulta la documentación de IBM COBOL:
Jorge García
Fullstack developer