Buscar este blog

jueves, 8 de agosto de 2013

COBOL - Estructuras de un programa en COBOL

DIVISIONES, SECCIONES Y PÁRRAFOS

IDENTIFICATION DIVISION.
[ENVIRONMENT DIVISION.]
[DATA DIVISION.]
PROCEDURE DIVISION.


IDENTIFICATION DIVISION.
PROGRAM-ID. EJEMPLO.
AUTHOR. EUI.
DATE-WRITTEN. 01-ENERO-93.
DATE-COMPILED. 01-ENERO-93.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM PERSONAL COMPUTER.
OBJECT-COMPUTER. IBM PERSONAL COMPUTER.
SPECIAL-NAMES.
DECIMAL-POINT IS COMMA.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT IMPRESORA ASSING TO PRINTER.


DIVISIONES EN COBOL
IDENTIFICATION DIVISION
PROPÓSITO: Identificar el programa de forma que se distinga de
los otros, además de proporcionar el nombre del autor, cuando se
escribió etc.

PÁRRAFOS
PROGRAM-ID.
AUTHOR.
INSTALLATION.
DATE-WRITTEN.
DATE-COMPILED.
SECURITY.
REMARKS.

ENVIRONMENT DIVISION
PROPÓSITO: En esta división se describe el
entorno físico en el cual se va a desarrollar el
programa. Entendiéndose por entorno, la clase de
sistema que se va a utilizar así como los dispositivos
de entrada/salida.

SECCIONES EN COBOL


CONFIGURATION SECTION.
INPUT-OUPUT SECTION.


CONFIGURATION SECTION.
PROPÓSITO: Tiene como finalidad describir las características del computador usado para compilar y ejecutar el programa, todo ello a nivel de comentarios
PÁRRAFOS
SOURCE-COMPUTER. Modelo de ordenador.
OBJECT-COMPUTER. Modelo de ordenador.
SPECIAL-NAMES.
[[Nombre de función IS nombre nemotécnico]
[CURRENCY SIGN IS literal]
[DECIMAL-POINT IS COMMA].]

INPUT-OUTPUT SECTION.
PROPÓSITO: Declarar los ficheros utilizados y la asignación a los dispositivos de E/S.
PÁRRAFOS
FILE-CONTROL
Nombre de función es un nombre reconocido por el compilador y nombre nemotécnico es un nombre creado por el programador. De esta forma podemos poner:
CONSOLE IS CONSOLA
SYSOUT IS ARCHI-PANTALLA

La función de CURRENCY SING es indicar que el sistema
tiene que utilizar un carácter monetario distinto del que tiene
por defecto ($). El carácter sustituto de éste, tiene que ser
uno solo y alfabético.

La función del DECIMAL-POINT IS COMMA es indicar que el
sistema tiene que sustituir la notación anglosajona por la
castellana en la función del punto decimal y la coma, en los
campos de edición.

DATA DIVISION
PROPÓSITO: En este apartado se definen los datos que van a ser utilizados, tales como ficheros, los registros de cada fichero etc. Cualquier dato utilizado en la codificación del programa debe de estar definido en esta DIVISION.
PÁRRAFOS
WORKING-STORAGE SECTION.
FILE SECTION.
PROCEDURE DIVISION
PROPÓSITO: Es en esta DIVISION donde se codifica el algoritmo propiamente dicho, esto es, donde se especifican las instrucciones adecuadas para resolver el problema.







HOJA DE CODIFICACION.







MARGEN A
Cabeceras de división: IDENTIFICATION DIVISION
Cabeceras de sección: CONFIGURATION SECTION
Cabeceras de párrafos: PROGRAM-ID.
Nombre de procedimientos: ABRIR-FICHEROS
Descripción de nivel FD: FD IMPRESO.
Los números de nivel: 01 y 77
MARGEN B
Todo aquello que no esté en los apartados anteriores.
Casi todas estas reglas son innecesarias hoy en día, con la simple elección de un editor adecuado y un estilo de programación racional y estructurado.




REGLAS DE CODIFICACIÓN
Los nombres de división, sección y párrafos deben escribirse solos en
una línea y finalizar con un punto.
Cada entrada y cada sentencia del programa debe finalizar con un punto.
Si a lo largo de una línea física no se encuentra un punto, la siguiente
línea será tomada como continuación de la anterior, esto es, cada
entrada y cada sentencia del programa puede ocupar varias líneas físicas.
Si una entrada o una sentencia del programa no cabe en una línea física, se continúa en la línea o líneas siguientes pero en el área B.
No es obligatorio llenar totalmente una línea física.
Se deben dejar líneas en blanco.
El punto, la coma y el punto y coma no deben ir precedidos de un espacio, pero sí seguidos de un espacio. La coma y el punto y coma son opcionales y cuando se utilizan es para hacer más clara la redacción del programa.
Si se utiliza más de un espacio como separador entre palabras, el
compilador lo interpreta como uno solo.




ESTRUCTURA GENERAL


IDENTIFICATION DIVISION.
PROGRAM-ID. nombre de programa.
[ AUTHOR. comentarios... ]
[ INSTALLATION. comentarios... ]
[ DATE-WRITTEN. comentarios... ]
[ DATE-COMPILED. comentarios... ]
[ SECURITY. comentarios... ]
[ REMARKS. comentarios... ]

ENVIRONMENT DIVISION. DATA DIVISION
[ CONFIGURATION SECTION. [ FILE SECTION.]
SOURCE-COMPUTER. modelo-ord. [ WORKING-STORAGE SECTION.]
OBJECT-COMPUTER. modelo-ord.
SPECIAL-NAMES. nombres especiales]

[ INPUT-OUTPUT SECTION. PROCEDURE DIVISION.
{ FILE CONTROL. control de archivos.} nombre-de-párrafo.
[ I-O CONTROL. control entrada/salida.]] {Sentencia}...}...
nombre-de-párrafo.
{Sentencia}...}…


No hay comentarios:

Publicar un comentario