El Proyecto | Sobre nosotros | Contribuir | Donaciones | Licencia
HOME Mis cursos Finalizados
◄ Anterior
◄

Variables y Constantes

Siguiente ►
►

En este tema, aprenderemos sobre las variables y constantes en COBOL, cómo declararlas y utilizarlas en un programa. Las variables y constantes son fundamentales para almacenar y manipular datos en cualquier lenguaje de programación, y COBOL no es una excepción.

Contenido

  1. Declaración de Variables
  2. Tipos de Variables
  3. Declaración de Constantes
  4. Ejemplos Prácticos
  5. Ejercicios
  6. Conclusión

Declaración de Variables

En COBOL, las variables se declaran en la DATA DIVISION del programa. La DATA DIVISION se subdivide en varias secciones, pero la más común para declarar variables es la WORKING-STORAGE SECTION.

Sintaxis Básica

DATA DIVISION.
WORKING-STORAGE SECTION.
01 variable-name PIC data-type.
  • 01 es el nivel de jerarquía de la variable.
  • variable-name es el nombre de la variable.
  • PIC (Picture) define el tipo y formato de la variable.
  • data-type especifica el tipo de datos (por ejemplo, X para caracteres, 9 para números).

Ejemplo

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME PIC X(20).
01 WS-AGE  PIC 99.

En este ejemplo:

  • WS-NAME es una variable de tipo carácter con una longitud de 20.
  • WS-AGE es una variable numérica con una longitud de 2.

Tipos de Variables

COBOL soporta varios tipos de datos, los más comunes son:

Tipo de Dato Descripción
X(n) Carácter alfanumérico de longitud n.
9(n) Número entero de longitud n.
V Punto decimal implícito.
S9(n) Número entero con signo de longitud n.
COMP Número almacenado en formato binario.
COMP-3 Número almacenado en formato decimal empaquetado.

Ejemplo de Declaración de Diferentes Tipos de Variables

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME      PIC X(20).
01 WS-AGE       PIC 99.
01 WS-SALARY    PIC 9(5)V99.
01 WS-BALANCE   PIC S9(7)V99.
01 WS-BINARY    PIC 9(4) COMP.
01 WS-PACKED    PIC 9(4) COMP-3.

Declaración de Constantes

Las constantes en COBOL se declaran utilizando la cláusula VALUE en la WORKING-STORAGE SECTION. Una constante es una variable cuyo valor no cambia durante la ejecución del programa.

Sintaxis Básica

DATA DIVISION.
WORKING-STORAGE SECTION.
01 constant-name PIC data-type VALUE literal.
  • constant-name es el nombre de la constante.
  • literal es el valor constante asignado.

Ejemplo

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-MAX-SIZE PIC 99 VALUE 50.
01 WS-GREETING PIC X(20) VALUE 'Hello, World!'.

En este ejemplo:

  • WS-MAX-SIZE es una constante numérica con un valor de 50.
  • WS-GREETING es una constante de carácter con el valor 'Hello, World!'.

Ejemplos Prácticos

Ejemplo 1: Uso de Variables y Constantes

IDENTIFICATION DIVISION.
PROGRAM-ID. Example1.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME      PIC X(20).
01 WS-AGE       PIC 99.
01 WS-GREETING  PIC X(20) VALUE 'Hello, '.

PROCEDURE DIVISION.
    DISPLAY 'Enter your name: '.
    ACCEPT WS-NAME.
    DISPLAY 'Enter your age: '.
    ACCEPT WS-AGE.
    DISPLAY WS-GREETING WS-NAME '!' ' You are ' WS-AGE ' years old.'.
    STOP RUN.

Ejemplo 2: Cálculo con Variables

IDENTIFICATION DIVISION.
PROGRAM-ID. Example2.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NUM1      PIC 9(3).
01 WS-NUM2      PIC 9(3).
01 WS-SUM       PIC 9(4).

PROCEDURE DIVISION.
    DISPLAY 'Enter first number: '.
    ACCEPT WS-NUM1.
    DISPLAY 'Enter second number: '.
    ACCEPT WS-NUM2.
    ADD WS-NUM1 TO WS-NUM2 GIVING WS-SUM.
    DISPLAY 'The sum is: ' WS-SUM.
    STOP RUN.

Ejercicios

Ejercicio 1: Declaración y Uso de Variables

Instrucciones:

  1. Declara una variable para almacenar el nombre de un producto.
  2. Declara una variable para almacenar el precio del producto.
  3. Declara una constante para el impuesto (por ejemplo, 0.15).
  4. Calcula el precio total (precio del producto + impuesto) y muéstralo.

Solución:

IDENTIFICATION DIVISION.
PROGRAM-ID. Exercise1.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-PRODUCT-NAME  PIC X(30).
01 WS-PRICE         PIC 9(5)V99.
01 WS-TAX           PIC 9V99 VALUE 0.15.
01 WS-TOTAL-PRICE   PIC 9(5)V99.

PROCEDURE DIVISION.
    DISPLAY 'Enter product name: '.
    ACCEPT WS-PRODUCT-NAME.
    DISPLAY 'Enter product price: '.
    ACCEPT WS-PRICE.
    COMPUTE WS-TOTAL-PRICE = WS-PRICE + (WS-PRICE * WS-TAX).
    DISPLAY 'The total price of ' WS-PRODUCT-NAME ' is: ' WS-TOTAL-PRICE.
    STOP RUN.

Ejercicio 2: Uso de Constantes

Instrucciones:

  1. Declara una constante para el valor de PI (3.14159).
  2. Declara una variable para el radio de un círculo.
  3. Calcula el área del círculo (PI * radio^2) y muéstralo.

Solución:

IDENTIFICATION DIVISION.
PROGRAM-ID. Exercise2.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-RADIUS       PIC 9(3)V99.
01 WS-PI           PIC 9V99999 VALUE 3.14159.
01 WS-AREA         PIC 9(5)V99.

PROCEDURE DIVISION.
    DISPLAY 'Enter the radius of the circle: '.
    ACCEPT WS-RADIUS.
    COMPUTE WS-AREA = WS-PI * WS-RADIUS * WS-RADIUS.
    DISPLAY 'The area of the circle is: ' WS-AREA.
    STOP RUN.

Conclusión

En esta sección, hemos aprendido cómo declarar y utilizar variables y constantes en COBOL. Hemos visto la sintaxis básica para la declaración de variables y constantes, los diferentes tipos de datos que se pueden utilizar, y hemos trabajado con ejemplos prácticos y ejercicios para reforzar los conceptos. Con esta base, estarás preparado para manejar datos de manera efectiva en tus programas COBOL. En el próximo módulo, profundizaremos en las operaciones aritméticas y cómo manipular datos numéricos en COBOL.

◄ Anterior
◄
Siguiente ►
►
El Proyecto | Sobre nosotros | Contribuir | Donaciones | Licencia
© Copyright 2024. Todos los derechos reservados