Capitulo 1

• 1- Elementos del lenguaje COBOL.

IDENTIFICATION DIVISION.

ENVIRONMENT DIVISION.

DATA DIVISION

PROCEDURE DIVISION

• Constantes figurativas:

Una constante figurativa es una constante predefinida en COBOL que puede utilizarse en cualquier parte de la WORKING-STORAGE SECTION o PROCEDURE DIVISION para asignar su valor a un campo.

Zero- Designa el valor 0 en el caso de datos numéricos. También puede ser referenciada por los nombres ZEROS o ZEROES.

Space- Esta constante se utiliza para asignar a un campo no numérico uno o mas espacios en blanco. También puede ser referenciada por el nombre SPACES.

High-value- Se utiliza para asignar a literales alfanuméricos el valor mas alto posible del código de caracteres que estemos utilizando (Valor FF en ASCII). También puede ser referenciada por el nombre de HIGH-VALUES.

Low-Value- Se utiliza para asignar a literales alfanuméricos el valor mas bajo posible del código de caracteres que estemos utilizando (Valor 00 en ASCII). También puede ser referenciada por el nombre de LOW-VALUES.

ALL “literal”- representa una repetición del literal especificado.

• Constantes identificadas por un nombre.

Están formadas por un identificador al que asociamos un valor. Se describen en la DATA DIVISION con nivel 78.

Una constante identificada por un nombre se utiliza en cualquier lugar donde un literal pueda aparecer en un formato.

• Identificadores.

Los identificadores son nombres creados por el programador. Para formar un identificador hay que tener en cuenta las siguientes reglas:

• Un identificador consta de un máximo de 30 caracteres. Estos caracteres pueden ser solamente letras, dígitos y el guión.

• No deben empezar ni terminar en un guión.

• Un identificador definido por el usuario no puede tener el mismo nombre que una palabra reservada.

• Un identificador debe contener obligatoriamente al menos una letra, excepto cuando se trate de un nombre de párrafo o de sección.

Cualquier identificador utilizado en la PROCEDURE DIVISION debe estar previamente definido en la ENVIRONMENT DIVISION o en la DATA DIVISION.

• Operadores.

Los operadores son símbolos que indican como son manipulados los datos.

• Operadores de relación.

Los operadores de relación se utilizan para comparar dos valores numéricos o dos valores alfanuméricos (no numéricos). El resultado puede ser verdadero o falso.

Estos operadores, tienen todos igual prioridad.

• Operadores de Lógicos.

Los operadores lógicos nos permiten combinar varias expresiones de relación. Igual que los operadores de relación, se utilizan normalmente para tomar decisiones. Un operador lógico toma una combinación de valores verdaderos-falsos y devuelve un resultado verdadero o falso.

Los operadores lógicos colocados en orden de prioridad son los siguientes: NOT, AND, OR.

Las tablas de verdad correspondientes a estos operadores son las siguientes:

• Expresiones aritméticas.

Una expresión aritmética puede ser una constante, una variable o un conjunto de constantes y variables unidas por operadores aritméticos.

Para su codificación hay que tener en cuenta que:

* El paréntesis izquierdo no debe ir seguido de un espacio.

* El paréntesis derecho no debe ir precedido de un espacio.

* El signo = u los operadores +, -, *, - y ** deben ir precedidos y seguidos de un espacio.

• Orden de ejecución.

A la hora de evaluar una expresión, la prioridad de las operaciones es la siguiente:

1- Primero se evalúan las operaciones entre paréntesis, de los mas internos a los mas externos.

2- Después, y siguiendo el orden que se describe a continuación se evalúan los operadores aritméticos:

** *, / +,-

Los operadores escritos sobre una misma línea tienen la misma prioridad. Cuando en una expresión intervienen varios operadores con la misma prioridad, estos se evalúan de izquierda a derecha.

• Expresiones de BOOLE.

Una expresión de BOOLE da como resultado un valor verdadero o falso. Los operadores que intervienen en una expresión de BOOLE pueden ser: Operadores de relación y operadores lógicos.

Si en una expresión de BOOLE intervienen varios tipos de operadores primero se evalúan los operadores aritméticos, después los operadores de relación y por ultimo los operadores lógicos.

Ejemplo:

((A = 0) AND ((B*2) NOT = 0)) OR (C=0)

• 2- Estructura de un programa Cobol.

• Descripción General.

Un programa fuente COBOL es un conjunto de sentencias COBOL sintácticamente correctas.

Las sentencias, entradas, párrafos y secciones de un programa COBOL son agrupadas en cuatro divisiones que forman la estructura general de dicho programa.

El formato general y el orden de presentación de las entradas y sentencias que constituyen un programa COBOL es:

IDENTIFICATION DIVISION.

ENVIRONMENT DIVISION.

DATA DIVISION.

PROCEDURE DIVISION.

[END PROGRAM id-programa]

Estos nombres representan las cabeceras de las cuatro divisiones mencionadas y la cabecera de final de programa que es opcional y valida bajo las normas ANS85. En esta ultima, id-programa debe coincidir con el nombre especificado en el parrafo PROGRAM-ID.

• Identification division.

La division de IDENTIFICACION, sirve para proporcionar un nombre para identificar el programa. Opcionalmente se puede especificar información acerca del autor, fecha en que fue escrito, etc..

El formato general para la división es el siguiente.

IDENTIFICATION DIVISION.

PROGRAM-ID. Nombre del programa.

[AUTHOR. Nombre del programador.]

[INSTALATION. Lugar de instalación.]

[DATE-WRITTEN. Fecha en que fue escrito.]

[DATE-COMPILED. Fecha en que fue compilado.]

[SECURITY. Entrada de comentarios.]

Solo las dos primeras lineas, IDENTIFICATION DIVISION y PROGRAM-ID, son obligatorias.

Program-id.

Este parrafo sirve para espeficar el nombre del programa. Este nombre sera utilizado por el compilador o durante la ejecución para indicar en que programa ocurrio algun error.

El nombre del programa debe ajustarse a las reglas de formación de un identificador COBOL, vistas en el capitulo anterior.

El resto de los parrafos son opcionales, pueden aparecer en cualquier orden, y su utilización queda perfectamente definida en el formato descrito.

Si un comentario ocupa mas de una linea, no esta permitido utilizar el guión como caracter de continuación, sin embargo puede ser continuado en las lineas siguientes, comenzando en el margen B.

• Environment division.

La division de ENTORNO permite definir el tipo de ordenador para el que fue escrito el programa, asi como los dispositivos perifericos necesarios para soportar los ficheros utilizados en el programa.

El formato general de la sección es el siguiente:

ENVIRONMENT DIVISION.

[CONFIGURATION SECTION.

SOURCE-COMPUTER. Modelo de ordenador.

OBJECT-COMPUTER. Modelo de ordenador.

SPECIAL-NAMES.

Nombres especiales.]

[INPUT-OUTPUT SECTION.

FILE-CONTROL.

Control de ficheros.

[I-O CONTROL.

Control de entrada / Salida.] ]

Seccion de configuración.

Esta sección es opcional. Su utilidad es documentar el programa COBOL, indicando el modelo de ordenador utilizado y asociar los nombres nemonicos especificados por el programador a nombres utilizados por el compilador. A continuación se describen los parrafos que la componen.

Parrafo SOURCE:

Sirve para especificar el modelo de ordenador que va a compilar el programa. Su formato es el siguiente:

SOURCE COMPUTER. Modelo de ordenador.

[WITH DEBUGING MODE.]

La opción WITH DEBUGING MODE permite introducir en el fichero fuente COBOL, codigo que nos servira de ayuda para depurar el programa.

Parrafo OBJECT:

Sirve para especificar el modelo de ordenador que va a ejecutas el programa. Su formato es el siguiente:

OBJECT COMPUTER. Modelo de ordenador.