cobol
División de datos
Buscar..
Introducción
DIVISIÓN DE DATOS es una de las cuatro partes que conforman un programa COBOL. Contiene declaraciones que describen los datos utilizados por el programa. Consta de cuatro secciones: SECCIÓN DE ARCHIVO, SECCIÓN DE ALMACENAMIENTO DE TRABAJO, SECCIÓN DE ALMACENAMIENTO LOCAL y SECCIÓN DE ENLACE.
Secciones en la división de datos
Las SECCIONES en COBOL pueden ser requeridas u opcionales, según la DIVISIÓN en la que se encuentren.
DATA DIVISION.
FILE SECTION.
FD SAMPLE-FILE
01 FILE-NAME PIC X(20).
WORKING-STORAGE SECTION.
01 WS-STUDENT PIC A(10).
01 WS-ID PIC 9(5).
LOCAL-STORAGE SECTION.
01 LS-CLASS PIC 9(3).
LINKAGE SECTION.
01 LS-ID PIC 9(5).
En el ejemplo anterior, 01 son números de nivel.
Número de nivel
El número de nivel se utiliza para especificar el nivel de datos en un registro. Se utilizan para diferenciar entre elementos elementales y elementos de grupo. Los elementos elementales se pueden agrupar para crear elementos grupales.
- 01: Registro de entrada de descripción. Número de nivel de grupo es siempre 01.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME PIC X(25). ---> ELEMENTARY ITEM
01 WS-SURNAME PIC X(25). ---> ELEMENTARY ITEM
01 WS-ADDRESS. ---> GROUP ITEM
05 WS-HOUSE-NUMBER PIC 9(3). ---> ELEMENTARY ITEM
05 WS-STREET PIC X(15). ---> ELEMENTARY ITEM
- 02 a 49: Artículos elementales
- 66: Renombrar artículos
- 77: Elementos que no pueden ser subdivididos.
- 88: El nivel 88 es un número de nivel especial que se utiliza para mejorar la legibilidad de los programas COBOL y para mejorar las pruebas de FI. Un nivel 88 parece un nivel debajo de otra variable, pero no lo es. No tiene una IMAGEN, pero tiene un valor. Un nivel 88 siempre está asociado con otra variable y es un nombre de condición para esa variable.
01 YES-NO PIC X.
88 ANSWER-IS-YES VALUE "Y".
Las dos condiciones siguientes comprueban si YES-NO es igual a "Y":
IF YES-NO = "Y"
IF ANSWER-IS-YES
Se puede utilizar un nombre de condición de nivel 88 para una variable alfanumérica o numérica.
Cláusula de imagen
La CLÁUSULA DE IMAGEN define dos cosas acerca de una variable: el tamaño de la variable (el número de bytes utilizados en la memoria para el valor) y el tipo de datos que se pueden almacenar en la variable.