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. La mayoría de los campos de datos se definen dándoles nombres únicos, pero la palabra clave FILLER le permite reservar espacio de memoria sin necesidad de un nombre.
RELLENO
RELLENO es una palabra reservada, lo que significa que no puede usar la palabra para nombrar campos o registros que no sean 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 aplica para las divisiones de Identificación, Medio Ambiente o Procedimiento.
Diseños de registros
Uno de los usos más comunes de FILLER es para 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 RELLENO, como en el siguiente código:
01 registro de clientes. 05 FOTO DE RELLENO X(10). 05 nombre-cliente PIC X(30). 05 dirección del cliente PIC X(30). 05 cliente-ciudad PIC X(30). 05 FOTO DE RELLENO 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, ignorando el resto del registro.
Extracción de subcadena
Puede usar 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 de almacenamiento de trabajo:
01 código postal completo. 05 código postal primario PIC X(5). 05 FOTO DE RELLENO 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, elimina todo lo que está después de los primeros cinco dígitos.
RELLENO y VALOR
En un registro, un campo de RELLENO reserva espacio en la memoria y acepta cualquier tipo de datos que mueva a él. También puede definir un campo de RELLENO para que tenga un valor. Los programadores usan esta técnica con frecuencia para configurar encabezados de informes, como en el siguiente ejemplo:
01 línea de impresión. 05 FOTO DE RELLENO X(10) VALOR ESPACIOS. 05 FOTO DE RELLENO X(15) VALOR "INFORME DE FIN DE AÑO". 05 FOTO DE RELLENO X(20) VALOR ESPACIOS. 05 FOTO DE RELLENO X(5) VALOR "PÁGINA". 05 número de página PIC ZZZ9.
Tenga en cuenta que los títulos y el espaciado de los encabezados de las páginas del informe se realizan con RELLENO, excepto un campo con nombre que muestra un número de página.