Entendiendo la sección PROCEDURE DIVISION en COBOL
La sección PROCEDURE DIVISION en COBOL contiene la lógica del programa, es decir, el conjunto de instrucciones que se ejecutarán para realizar una tarea específica. Aquí es donde se escriben las instrucciones de procesamiento, cálculos, entrada/salida y control de flujo.
Programa A: Suma de dos números
Supongamos que tenemos un programa COBOL llamado CALC_SUM que calcula la suma de dos números. La sección PROCEDURE DIVISION contiene las instrucciones necesarias para realizar el cálculo.
IDENTIFICATION DIVISION.
PROGRAM-ID. CALC-SUM.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 NUM1 PIC 9(5) VALUE 1000.
01 NUM2 PIC 9(5) VALUE 2000.
01 RESULT PIC 9(7).
PROCEDURE DIVISION.
COMPUTE RESULT = NUM1 + NUM2.
DISPLAY "La suma de " NUM1 " y " NUM2 " es: " RESULT.
EXIT PROGRAM.
Programa B: Multiplicación de dos números
El siguiente programa, MULTIPLY_NUMBERS, multiplica dos números. La sección PROCEDURE DIVISION contiene las instrucciones necesarias para realizar la operación de multiplicación.
IDENTIFICATION DIVISION.
PROGRAM-ID. MULTIPLY-NUMBERS.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 NUM3 PIC 9(5) VALUE 500.
01 NUM4 PIC 9(5) VALUE 600.
01 RESULT2 PIC 9(7).
PROCEDURE DIVISION.
COMPUTE RESULT2 = NUM3 * NUM4.
DISPLAY "El resultado de multiplicar " NUM3 " por " NUM4 " es: " RESULT2.
EXIT PROGRAM.
En estos ejemplos, la sección PROCEDURE DIVISION contiene las instrucciones que realizan la tarea principal del programa, ya sea sumar dos números o multiplicarlos. Esta sección es donde se escribe la lógica del programa.
Puntos Clave:
- La sección PROCEDURE DIVISION en COBOL contiene la lógica del programa.
- Esta sección es donde se escriben las instrucciones de procesamiento, cálculos, entrada/salida y control de flujo.
- Es importante organizar y estructurar la lógica del programa de manera clara y concisa en la sección PROCEDURE DIVISION para facilitar su comprensión y mantenimiento.
¡Ahora estás listo para utilizar la sección PROCEDURE DIVISION en tus programas COBOL para escribir la lógica y realizar tareas específicas!
No hay comentarios:
Publicar un comentario