Spiegazione di Filler in un programma COBOL

Nel linguaggio di programmazione COBOL, definisci tutte le variabili e i campi di dati in una sezione del tuo programma chiamata Data Division. Qui si impostano i record per i file su disco, i layout di stampa, i contatori e la memoria di lavoro per i calcoli. Definisci la maggior parte dei campi dati assegnando loro nomi univoci, ma la parola chiave FILLER ti consente di mettere da parte spazio di memoria senza bisogno di un nome.

RIEMPITIVO

FILLER è una parola riservata, il che significa che non è possibile utilizzare la parola per nominare campi o record se non per definire singoli elementi di memoria. Si utilizza FILLER subito dopo un numero di livello e prima di una clausola PICTURE che definisce la dimensione e il tipo di dati di un campo. COBOL limita l'uso di FILLER alla Divisione Dati; non si applica alle divisioni Identificazione, Ambiente o Procedura.

Layout di record

Uno degli usi più comuni di FILLER è per le definizioni dei record di dati. Se utilizzi un file di dati con una lunghezza record di 150 caratteri e non hai bisogno di etichettare tutti i campi in esso contenuti, puoi definire i caratteri non necessari come FILLER, come nel codice seguente:

01 record cliente. 05 FIGURA RIEMPITORE X(10). 05 nome cliente PIC X(30). 05 indirizzo cliente PIC X(30). 05 cliente-città PIC X(30). 05 FIGURA RIEMPITORE X(50).

Ciò ti consente di leggere un record di 150 caratteri e identificare i campi desiderati - il nome del cliente, l'indirizzo e la città - ignorando il resto del record.

Estrazione di sottostringa

È possibile utilizzare la parola chiave FILLER per facilitare l'estrazione di sottostringhe da una stringa più grande. Ad esempio, per estrarre le prime cinque cifre di un CAP, è possibile impostare le seguenti istruzioni nella sezione Working-Storage:

01 codice postale intero. 05 zip primaria PIC X(5). 05 FIGURA RIEMPITORE X(5).

Nella Divisione Procedure, sposti un codice ZIP-plus-4 in un intero-codice-zip, quindi sposti primary-zip in un campo di destinazione. In tal modo, rilasci tutto dopo le prime cinque cifre.

FILLER e VALUE

In un record, un campo FILLER riserva spazio in memoria e accetta qualsiasi tipo di dato che ci sposti. Puoi anche definire un campo FILLER per avere un valore. I programmatori utilizzano frequentemente questa tecnica per impostare le intestazioni dei rapporti, come nell'esempio seguente:

01 linea di stampa. 05 FILLER PIC X(10) SPAZI VALORE. 05 FILLER PIC X(15) VALUE "RAPPORTO DI FINE ANNO". 05 FILLER PIC X(20) SPAZI VALORE. 05 FILLER PIC X(5) VALORE "PAGINA". 05 numero di pagina PIC ZZZ9.

Tieni presente che i titoli e la spaziatura dell'intestazione della pagina del rapporto vengono tutti eseguiti con FILLER, tranne un campo denominato che visualizza un numero di pagina.