Estructura Basica De Un Programa en COBOL

Tue, Jun 30, 2020

COBOL sigue una estructura fija, la cual está compuesta del programa, sus divisiones, secciones, párrafos, sentencias, declaraciones y caracteres.

Las divisiones

son partes del programa que lo dividen lógicamente y son 4:

división de identificación

es la primera y única división obligatoria del programa. El párrafo PROGRAM-ID es el único obligatorio, este identifica el nombre del programa y consta de 1 a 30 caracteres.

división de ambiente

se utiliza para especificar los archivos de entrada y salida del programa consta de dos secciones:

• sección de configuración: especifica la arquitectura actual y la arquitectura objetivo
• sección de entrada-salida (input-output) consiste de dos párrafos:
  • Control de archivos: provee información sobre los conjuntos de datos usados en el programa
  • Control de entrada-salida (I-O control) provee información de los archivos usados en el programa.

división de datos

se utiliza para definir las variables usadas en el programa, consta de 4 secciones:

• seccion de archivos: define la estructura de archivos del programa
• working-storage: se utiliza para declarar las variables temporales y estructuras de archivos del programa
• local-storage similar a working-storage, la única diferentcia es que las variables se asignan e inicializan cada vez que se ejecuta el programa.
• linkage se utiliza para describir los nombres de datos que se reciben de un programa externo.

división de procedimientos

lleva la lógica del programa y debe terminar con STOP RUN o EXIT PROGRAM dependiendo si el programa llama o es llamado por otros programas.

Secciones

Las secciones son las subdivisiones lógicas del programa. Una sección en una colección de párrafos.

Párrafos

Los párrafos son subdivisiones de una sección o división, y consta de un nombr definido por el usuario o predefinido seguido de un punto y consiste de una o mas oraciones.

Oraciones

Las oraciones o sentencias son una combinación de uno o mas declaraciones. Las sentencias sólo aparecen en la división de procedimientos. Una sentencia debe terminar en punto.

Declaraciones

Las declaraciones son palabras válidas en COBOL que llevan a cabo una acción.

Caracteres

Los caracteres son la jerarquía mas baja y no son divisibles.

Ejemplo de la estructura de un programa COBOL

       IDENTIFICATION DIVISION.
       PROGRAM-ID. ADDTWO.
       
       ENVIRONMENT DIVISION.

       DATA DIVISION.
       WORKING-STORAGE SECTION.

       01    NUMBER1   PIC 9.
       01    NUMBER2   PIC 9.
       01    ANSWER    PIC 99.

       PROCEDURE DIVISION.
       GET-NUMBERS.
           DISPLAY 'KEY IN A SINGLE-DIGIT NUMBER'.
           ACCEPT NUMBER1.
           DISPLAY 'KEY IN ANOTHER SINGLE-DIGIT NUMBER'.
           ACCEPT NUMBER2.
       CALCULATE-ANSWER.
          COMPUTE ANSWER = NUMBER1 + NUMBER2.
       DISPLAY-ANSWER.
          DISPLAY 'THE ANSWER IS ' ANSWER.
       FINISH-ROUTINE.
          STOP RUN.