Estructura de un programa COBOL

La estructura de un programa COBOL Consiste de 4 divisiones:

· Identification Division
· Environment Division
· Data Division
· Procedure Division.

Identification Division

La Identification Division es obligatoria. Las otras tres son opcionales, pero si se las codifica, estas deben ser invocadas en orden. Cada división tiene un propósito especifico y usa Cláusulas, Frases, instrucciones y Sentencias para cumplir con dicho objetivo.
La Identification Division es la primer división que se escribe en un programa COBOL. Especifica el nombre del programa y provee de información adicional, tal como el autor del programa y la fecha de compilación. La Identification Division debe comenzar con las
palabras IDENTIFICATION DIVISION o ID DIVISION. El párrafo PROGRAM-ID es obligatorio y debe ser el primero de la identificación. Los restantes párrafos son opcionales y pueden ser escritos en cualquier orden.

Environment Division

La Environment Division de un programa COBOL brinda información sobre las características físicas especificas del ambiente en el que correrá el programa. Especifica información sobre la computadora en que se generó el programa y aquella en la que se correrá. También relaciona los archivos de entrada y salida del programa con los
dispositivos de hardware específicos. La Environment Division se compone de dos secciones “section”:

*Configuration Section
*Input-Output Section.

Data Division

La Data Division describe las estructuras de datos a ser procesadas por el programa COBOL. Puede contener hasta cinco secciones (dependiendo del cobol en uso, las primeras tres comunes a todos), todas son opcionales:

* File Section
* Working-Storage Section
* Linkage Section
* Screen Section
* Local Section

Estas secciones, en orden, están compuestas por la descripción de los archivos, las descripciones de entrada de datos necesarias para ejecutar el programa, las descripciones de áreas de datos para recibir parámetros, las descripciones de las áreas para describir el formato de los datos a ser mostrados y recibidos desde pantalla y la descripción de las entradas de datos que permitirán generar distintas instancias de las variables en aquellos
programas recursivos.

Procedure Division

La Procedure Division es la cuarta y ultima división dentro de un programa COBOL. Contiene los procedimientos, secciones, párrafos, declaraciones, sentencias e instrucciones necesarias para ejecutar el procesamiento de la función y resolver el problema de procesamiento de los datos. Una sección declarativa “Declaratives Section” puede aparecer al comienzo de la procedure division. Esta especifica procesos declarativos a ser procesados cuando se produce una condición de excepción que no puede ser tratada por los testeos ordinarios. La sentencia USE debe ser la primer sentencia de cada sección especificada dentro de la Declaratives Section. Esta identifica el tipo de procesos declarativos provistos. (En la actualidad esta sección es muy poco usada dada las posibilidades de testeos de condiciones de excepción que tienen las sentencias actuales).