COBOL

TEMA 1. INTRODUCCIÓN A COBOL
Un programa fuente Cobol es un conjunto de instrucciones, párrafos y secciones que se agrupan en cuatro DIVISIONES que, escritas en orden, son las siguientes:IDENTIFICATION DIVISION.
ENVIRONMENT DIVISION.
DATA DIVISION.
PROCEDURE DIVISION.
En el apartado DATA DIVISION declararemos las variables, ficheros o tablas que vamos a utilizar en nuestro programa, y elalgoritmo, se escribirá después de la división PROCEDURE DIVISION.
En cobol, tendremos que tener cuidado en que columna escribiremos nuestro código. Debemos seguir la siguiente estructura:
Columnas 1a 3 – Sirven para numerar las páginas del programa. No es obligatorio.
Columnas 4 a 6 – Sirven para numerar las líneas de cada página. No es obligatorio.
Columna 7 – Sólo pueden aparecer loscaracteres * y –, para introducir comentarios.
Columnas 8 a 72 – Es la parte donde se escribe el programa. Se divide en dos áreas:
8 a 11 – Area A. Para la declaración de variables, ficheros, párrafos,etc…
12 a 72 – Area B. El resto de declaraciones y sentencias del programa.
Columnas 73 a 80 - Son ignoradas por el compilador.
Las instrucciones en cobol suelen terminar con un punto.
En cobolexisten unos comandos para ejecutar las instrucciones, estas instrucciones se escribirán en el Área B, las más simples son las siguientes:
DISPLAY – Para imprimir por pantalla. Ejemplo: DISPLAY “HOLA”.ACCEPT – Para leer un dato desde la pantalla e introducirlo en la variable especificada. Por ejemplo: ACCEPT NUMERO.
IDENTIFICATION DIVISION.
PROGRAM-ID. PRUEBA.
DATA DIVISION.
WORKING-STORAGESECTION.
77 NUM1 PIC 9 VALUE ZEROS.
77 FIN PIC A.
PROCEDURE DIVISION.
MULTIPLICACION.
DISPLAY "INTRODUCE EL NUMERO ".
ACCEPT NUM1.
ACCEPT FIN.

TEMA 2. VARIABLES
Número de Nivel ...... Nombrede campo ...... PIC, VALUE, REDEFINES, OCCURS, JUST, SIGN, SYNC. Cada campo declarado debe de llevar un número de nivel que le informe al compilador del tipo de campo que es:
Número de Nivel
El...