PDF de programación - Lenguaje orientado a sistemas de gestión - Elementos del lenguaje Cobol

LENGUAJE ORIENTADO A

SISTEMAS DE GESTIÓN

ELEMENTOS DEL
LENGUAJE COBOL

LENGUAJE COBOL
Cobol, es un lenguaje de alto nivel (3ª generación) de tipo imperativo y

COBOL significa:

orientado a resolver problemas de gestión.
• Common
• Business
• Oriented
Lenguaje
• Fue creado en 1.960, por la comisión CODASYL (Conference on Data System
Lenguaje), formada por fabricantes, usuarios y gobierno USA, esta comisión
además han dado normas sobre Bases de Datos, Comunicaciones, etc..

• Existen numerosas versiones, las mas importantes son, las del 60, 65, 74 y 85;

siendo los compiladores más utilizados los de:

• MICROFOCUS
• MICROSOFT
• RM/COBOL (McFarland)
• COBOL2 (IBM)

LENGUAJE COBOL

2

1

ELEMENTOS DEL LENGUAJE
Caracteres de Cobol

• Caracteres numéricos. 0/9.
• Caracteres alfabéticos. A/Z.
• Caracteres especiales. $, blanco, +, .........

• { $, (, ), ,, ; }
• { +, -, *, **, /, =, (, ) }

• Caracteres empleados en puntuación
• Caracteres aritméticos.
• Caracteres empleados en declaraciones
condicionales.

• { <, >, = }

LENGUAJE COBOL

3

ELEMENTOS DEL LENGUAJE
Constantes

[ +/- ] mantisa E [ +/- ] exponente

• Literales numéricos

• Literales de coma fija
• Literales de coma flotante.

• Literales no numéricos.
• Constantes figurativas.

• ZERO.
• SPACE.
• ALL ‘carácter’.
• HIGH-VALUE .
• LOW-VALUE.

LENGUAJE COBOL

4

2

ELEMENTOS DEL LENGUAJE
Palabras Reservadas.

• Identificadores predefinidos que tienen un significado especial en
• Por ejemplo: IDENTIFICATION, FILLER, ADD, COMPUTE, READ,

COBOL.

REWRITE

Identificadores

siguientes: dígitos (0/9), letras (A/Z) y el guión (-).

• Son los nombres creados por el programador.
• Se forman por la combinación de los tres grupos de caracteres
• Estan compuesto por una combinación de 30 caracteres como
• No pueden comenzar ni finalizar con un guión.
• Deberán comenzar por un carácter alfabético, excepto los
• No pueden tener el mismo nombre que una palabra reservada.

nombres de párrafos.

máximo.

LENGUAJE COBOL

5

ELEMENTOS DEL LENGUAJE
Operadores.

• Los operadores son símbolos que indican cómo son

manipulados los datos

Operadores Aritméticos
Operador
+
-
*
/
**
=
( )

Significado
Suma
Resta
Producto
División
Exponenciación
Asignación
Dar Prioridad

Ejemplo
A + B
A - B
A * B
A / B
A ** B
C = A + B
D = (A + B)*C

LENGUAJE COBOL

6

3

ELEMENTOS DEL LENGUAJE

Operadores de Relación

=

<

>

<=

>=

Operadores Lógicos

NOT

AND

OR

Igual que

Menor que

Mayor que

Menor o igual que

Mayor o igual que

Negación

Conjunción

Disyunción

A = B

A < B

A > B

A <= B

A >= B

NOT ( A = B )

A = B AND A > B

A = B OR A < B

LENGUAJE COBOL

7

ELEMENTOS DEL LENGUAJE
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.

• El punto, punto y coma o coma no pueden ir

precedidos por un espacio, pero si tienen que ir
seguidos por un espacio.

• Un paréntesis izquierdo no puede ir seguido por un

espacio, un paréntesis derecho no puede ir precedido
por un espacio.

• Un operador aritmético o un signo igual tiene que ir
precedido por un espacio y seguido por un espacio.

LENGUAJE COBOL

8

4

ELEMENTOS DEL LENGUAJE
Expresiones Aritméticas.

• A la hora de evaluar una expresión

• Primero se evalúan las operaciones entre
paréntesis, del más interno al más externo.
• Después se evalúan los operadores con la
prioridad siguiente:
• + y - unarios
• **
• *, /
• +,-

LENGUAJE COBOL

9

ELEMENTOS DEL LENGUAJE
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.
A >= 30 AND B = C

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

LENGUAJE COBOL

10

5

LENGUAJE ORIENTADO A

SISTEMAS DE GESTIÓN

ESTRUCTURA DE UN
PROGRAMA EN COBOL

DIVISIONES, SECCIONES Y
PÁRRAFOS

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

LENGUAJE COBOL

12

6

DIVISIONES, SECCIONES Y
PÁRRAFOS

IDENTIFICATION DIVISION. división

PROGRAM-ID. EJEMPLO.
AUTHOR. EUI. párrafo
DATE-WRITTEN. 01-ENERO-93.
DATE-COMPILED. 01-ENERO-93.

ENVIRONMENT DIVISION.

CONFIGURATION SECTION. sección

SOURCE-COMPUTER. IBM PERSONAL COMPUTER.
OBJECT-COMPUTER. IBM PERSONAL COMPUTER.
SPECIAL-NAMES. párrafo

DECIMAL-POINT IS COMMA. cláusula

INPUT-OUTPUT SECTION. sección
FILE-CONTROL. párrafo
SELECT IMPRESORA ASSING TO PRINTER.

cláusulas

LENGUAJE COBOL

13

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.

LENGUAJE COBOL

14

7

DIVISIONES EN COBOL
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

• CONFIGURATION SECTION.
•

INPUT-OUPUT SECTION.

LENGUAJE COBOL

15

DIVISIONES EN COBOL





•

•

•
•

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

LENGUAJE COBOL

16

8

DIVISIONES EN COBOL

•
•







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.

LENGUAJE COBOL

17

DIVISIONES EN COBOL





•

•

•

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 estar definido en esta
división.
PÁRRAFOS
• WORKING-STORAGE SECTION.
•

FILE SECTION.

PROCEDURE DIVISION

PROPÓSITO: Es en esta división donde se codifica el
algoritmo propiamente dicho, esto es, donde se
especifican las instrucciones adecuadas para resolver el
problema.

LENGUAJE COBOL

18

9

HOJA DE CODIFICACIÓN
123456

12 A 72

7

8 A 11

73 A 80

Se utilizaban para
indicar los números de
secuencia, permitiendo
ordenar fácilmente el
programa

MARGEN B

MARGEN A
Son opcionales, se utilizan normalmente
para escribir comentarios que identifican
el programa.

Se utiliza para poner un carácter especial (*) que
indica comienzo de un comentario. Si el carácter
especial que se incluye en esta columna es (-) indica
que es continuación de un literal no numérico, cuando
la longitud de éste, ocupa más de una línea.

LENGUAJE COBOL

19

HOJA DE CODIFICACIÓN

•
•
•
•
•
•

•







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...
Descripciones 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.

LENGUAJE COBOL

20

10

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.

LENGUAJE COBOL

21

ESTRUCTURA GENERAL

IDENTIFICATION DIVISION.

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