1

Estructura base de un programa COBOL

Edwin
babbage
16135

No superar las 80 líneas de código, ya que se basa en las tarjetas perforadas las cuales no tenían más de 80 columnas.

El programa cuenta con divisiones, es buena práctica escribir todas las divisiones, las cuales son:

IDENTIFICATION DIVISION

Esta sección contiene información del programa, como nombre, autor, fecha de escritura y fecha compilación, entre otras.

       *---------------------------------------------
	     * COMENTARIOS
	     * Los dos primeros parámetros son obligatorios
       *---------------------------------------------
        IDENTIFICATION DIVISION.
        PROGRAM-ID.
        AUTHOR.
        INSTALLATION.
        DATE-WRITTEN.
        DATE-COMPILED.

ENVIRONMENT DIVISION

Esta sección contiene información del programa, como nombre, autor, fecha de escritura y fecha compilación, entre otras.

       ENVIRONMENT DIVISION.
       CONFIGURATION SECTION.
       SOURCE-COMPUTER.
       OBJECT-COMPUTER.

DATA DIVISION

Contiene 3 secciones internas principalmente, serían los ficheros y variables del programa, también las variables que recibirán otros programas.

       DATA DIVISION.
		  * Referencia a archivos tanto de entrada, como de salida.
       FILE SECTION.
			* Contiene las variables que no tienen relación conel programa tanto de fichero como de salida, si se necesita 
       WORKING-STORAGE SECTION.
			* Contiene las variables que se usarán en otro programa
       LINKAGE SECTION.

PROCEDURE DIVISION

Contiene 3 secciones internas principalmente, serían los ficheros y variables del programa, también las variables que recibirán otros programas.

       *---------------------------------------------
	     * Los párrafos son bloques de código
       *---------------------------------------------
       PROCEDUREDIVISION.
       000-PÁRRAFOS.
           SENTENCIA.

Hola Mundo en COBOL

			* Esto es un comentario en COBOL 
       IDENTIFICATION DIVISION.             
       PROGRAM-ID.                     HOLA.
       ENVIRONMENT DIVISION.                
       DATA DIVISION.                       
       PROCEDUREDIVISION.                  
           DISPLAY 'HOLA, MUNDO'.           
           STOPRUN.

Escribe tu comentario
+ 2
1
961Puntos
2 años

Muchas gracias!