Dateidefinition und File-Control

In COBOL ist die Verwaltung externer Dateien (wie Textdateien oder Binärdatensätze auf der Festplatte) eine der wichtigsten Funktionen für Batch-Unternehmensanwendungen. Da COBOL lange vor modernen Datenbanken entwickelt wurde, fungieren Dateien auf der Festplatte als Primärspeicher.

Die Verbindung zwischen den auf dem Betriebssystem gespeicherten physischen Dateien und den internen Variablen des Programms erfolgt in zwei Phasen:

1. Logisch-physische Verknüpfung in der ENVIRONMENT DIVISION.
2. Definition des Datensatzes in der DATA DIVISION.

1. Verknüpfung: FILE-CONTROL und SELECT ASSIGN

Im Kapitel über die Programmstruktur haben wir die ENVIRONMENT DIVISION kennengelernt. Darin befindet sich die INPUT-OUTPUT SECTION, in der die Sektion FILE-CONTROL die vom Programm verwendeten externen Dateien deklariert.

Um eine logische Datei des Programms (z. B. SALES-FILE) mit einer echten physischen Datei auf der Festplatte (z. B. sales.dat) zu verknüpfen, wird die Anweisung SELECT ... ASSIGN TO ... verwendet:

       ENVIRONMENT DIVISION.
       INPUT-OUTPUT SECTION.
       FILE-CONTROL.
           SELECT SALES-FILE ASSIGN TO "sales.dat"
               ORGANIZATION IS LINE SEQUENTIAL.

• SELECT SALES-FILE: Definiert den logischen Namen, den das Programm für den Zugriff auf die Datei verwendet.
• ASSIGN TO "sales.dat": Gibt den physischen Dateinamen (oder Pfad) auf der Festplatte an.
• ORGANIZATION IS LINE SEQUENTIAL (optional): Gibt an, dass es sich bei der Datei um eine normale Textdatei handelt, bei der jede Zeile einen Datensatz darstellt (durch ein Zeilenumbruchzeichen getrennt).

2. Deklaration: FILE SECTION und FD

Nachdem wir die Datei in der ENVIRONMENT DIVISION verknüpft haben, müssen wir die Struktur ihrer Datensätze in der DATA DIVISION definieren. Dazu verwenden wir einen speziellen Abschnitt namens FILE SECTION (der der WORKING-STORAGE SECTION vorangestellt ist).

Jede ausgewählte Datei muss einen Eintrag FD (File Description) haben, der die Struktur des Datensatzes deklariert:

       DATA DIVISION.
       FILE SECTION.
       FD SALES-FILE.
       01 SALES-RECORD.
           05 EMP-ID       PIC 9(5).
           05 EMP-NAME     PIC X(20).
           05 EMP-SALARY   PIC 9(6)V99.

• FD SALES-FILE.: Identifiziert die Dateibeschreibung für den logischen Namen SALES-FILE. Beachten Sie, dass sie mit einem Punkt endet.
• 01 SALES-RECORD.: Gibt die mit der Datei verknüpfte Gruppenstruktur (Datensatz) an. Jede Lese-/Schreiboperation tauscht Daten unter Verwendung dieser Struktur im Speicher aus.

Probier es selbst aus