Explicación del relleno en un programa COBOL

En el lenguaje de programación COBOL, usted define todas las variables y campos de datos en una sección de su programa llamada División de Datos. Aquí, configura registros para archivos de disco, diseños de impresión, contadores y almacenamiento de trabajo para cálculos. Puede definir la mayoría de los campos de datos dándoles nombres únicos, pero la palabra clave FILLER le permite reservar espacio en la memoria sin la necesidad de un nombre.

RELLENO

FILLER es una palabra reservada, lo que significa que no puede usar la palabra para nombrar campos o registros más que para definir elementos de memoria individuales. Utiliza FILLER inmediatamente después de un número de nivel y antes de una cláusula PICTURE que define el tamaño y el tipo de datos de un campo. COBOL restringe el uso de FILLER a la División de Datos; no se aplica a las divisiones de Identificación, Medio Ambiente o Procedimiento.

Video del día

Diseños de registro

Uno de los usos más comunes de FILLER es para las definiciones de registros de datos. Si usa un archivo de datos con una longitud de registro de 150 caracteres y no necesita etiquetar cada campo en él, puede definir los caracteres innecesarios como FILLER, como en el siguiente código:

01 registro de cliente. 05 RELLENO FOTO X (10). 05 nombre del cliente PIC X (30). 05 dirección del cliente PIC X (30). 05 cliente-ciudad PIC X (30). 05 RELLENO FOTO X (50).

Esto le permite leer un registro de 150 caracteres e identificar los campos que desea (el nombre del cliente, la dirección y la ciudad) mientras ignora el resto del registro.

Extracción de subcadenas

Puede utilizar la palabra clave FILLER para ayudar en la extracción de subcadenas de una cadena más grande. Por ejemplo, para extraer los primeros cinco dígitos de un código postal, puede configurar las siguientes declaraciones en la sección Trabajo-Almacenamiento:

01 código postal completo. 05 cremallera primaria PIC X (5). 05 RELLENO FOTO X (5).

En la División de Procedimientos, mueve un código postal más 4 a un código postal completo y luego mueve el código postal principal a un campo de destino. Al hacerlo, descarta todo después de los primeros cinco dígitos.

LLENADOR y VALOR

En un registro, un campo FILLER reserva espacio en la memoria y acepta cualquier tipo de datos que usted mueva a él. También puede definir un campo RELLENO para que tenga un valor. Los programadores utilizan esta técnica con frecuencia para configurar encabezados de informes, como en el siguiente ejemplo:

01 línea de impresión. 05 FILLER PIC X (10) ESPACIOS DE VALOR. 05 FILLER PIC X (15) VALOR "INFORME DE FIN DE AÑO". 05 ESPACIOS DE VALOR FILLER PIC X (20). 05 FILLER PIC X (5) VALOR "PÁGINA". 05 número de página PIC ZZZ9.

Tenga en cuenta que los títulos y el espaciado del encabezado de la página del informe se realiza con FILLER, excepto un campo con nombre que muestra un número de página.