Explicación de relleno en un programa COBOL

En el lenguaje de programación COBOL, se definen todas las variables y los campos de datos en una sección de su programa llamado la División de Datos. A continuación, configure los registros de archivos de disco, diseños de impresión, mostradores y almacenamiento de trabajo para los cálculos. Se define la mayoría de los campos de datos, dándoles nombres únicos, pero la palabra clave RELLENO le permite dejar de lado el espacio de memoria sin necesidad de un nombre.

RELLENO

Filler es una palabra reservada, lo que significa que no puede utilizar la palabra para nombrar los campos o registros distintos para definir los elementos de memoria individuales. RELLENO utiliza inmediatamente después de un número de nivel y que precede a una cláusula de imagen que define el tamaño y tipo de datos de un campo. COBOL restringe el uso de material de relleno a la División de datos; no se aplica a las divisiones de identificación, el medio ambiente o procedimiento.

diseños de registro

Uno de los usos más comunes de relleno es para las definiciones de registros de datos. Si utiliza un archivo de datos con una longitud de registro 150 caracteres y que no es necesario etiquetar todos los campos en ella, puede definir los caracteres que no sean necesarios como relleno, como en el siguiente código:

01 al cliente a grabar.

05 FILLER PIC X(10).
05 customer-name PIC X(30).
05 customer-address PIC X(30).
05 customer-city PIC X(30).
05 FILLER PIC X(50).

Esto le permite leer un registro de 150 caracteres e identificar los campos que desee - el nombre del cliente, dirección y ciudad - sin tener en cuenta el resto del registro.

Extracción subcadena

Se puede utilizar la palabra clave de relleno 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 Trabajo de almacenamiento:

01 enteros de código postal.

05 primary-zip PIC X(5).
05 FILLER PIC X(5).

En la División de Procedimiento, se mueve un código postal-más-4 a la totalidad-CP, a continuación, pasar primaria-zip en un campo de destino. Al hacerlo, se le cae todo después de los primeros cinco dígitos.

RELLENO y VALUE

En un registro, un espacio de memoria de campo reservas de relleno y acepta cualquier tipo de datos se mueve en él. También puede definir un campo de relleno para tener un valor. Los programadores utilizan esta técnica con frecuencia para la creación de las partidas del informe, como en el siguiente ejemplo:

01 de impresión de línea.

05 FILLER PIC X(10) VALUE SPACES.
05 FILLER PIC X(15) VALUE “YEAR END REPORT”.
05 FILLER PIC X(20) VALUE SPACES.
05 FILLER PIC X(5) VALUE “PAGE “.
05 page-number PIC ZZZ9.

Tenga en cuenta que los títulos de cabecera de página y el espaciado informe se hace todo con un relleno, excepto un campo llamado que muestra un número de página.