Suche…


Einführung

DATA DIVISION ist einer der vier Bestandteile eines COBOL-Programms. Es enthält Anweisungen, die die vom Programm verwendeten Daten beschreiben. Es besteht aus vier Abschnitten: DATEI-ABSCHNITT, WORKING-STORAGE-ABSCHNITT, LOKAL-STORAGE-ABSCHNITT und ABSCHNITT.

Abschnitte in der Datenabteilung

ABSCHNITTE in COBOL können erforderlich oder optional sein, abhängig davon, in welchem ​​DIVISION sie sich befinden.

DATA DIVISION.
FILE SECTION.
FD SAMPLE-FILE
01 FILE-NAME PIC X(20).
WORKING-STORAGE SECTION.
01 WS-STUDENT PIC A(10).
01 WS-ID PIC 9(5).
LOCAL-STORAGE SECTION.
01 LS-CLASS PIC 9(3).
LINKAGE SECTION.
01 LS-ID PIC 9(5).

In dem obigen Beispiel sind 01s Ebenennummern.


Level-Nummer

Mit der Ebenennummer wird die Datenebene in einem Datensatz angegeben. Sie werden zur Unterscheidung zwischen Elementarteilen und Gruppenartikeln verwendet. Elementare Elemente können zu Gruppenelementen zusammengefasst werden.

  • 01: Eintrag der Eintragsbeschreibung. Die Gruppenebenenummer ist immer 01.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME               PIC X(25).   ---> ELEMENTARY ITEM 
01 WS-SURNAME            PIC X(25).   ---> ELEMENTARY ITEM    
01 WS-ADDRESS.                        ---> GROUP ITEM   
   05 WS-HOUSE-NUMBER    PIC 9(3).    ---> ELEMENTARY ITEM
   05 WS-STREET          PIC X(15).   ---> ELEMENTARY ITEM 
  • 02 bis 49: Elementare Elemente
  • 66: Elemente der Klausel umbenennen
  • 77: Artikel, die nicht unterteilt werden können.
  • 88: Level 88 ist eine spezielle Levelnummer, die zur Verbesserung der Lesbarkeit von COBOL-Programmen und zur Verbesserung von IF-Tests verwendet wird. Ein Level 88 sieht wie ein Level unter einer anderen Variablen aus, ist es aber nicht. Es hat kein PICTURE, aber einen Wert. Eine Ebene 88 ist immer einer anderen Variablen zugeordnet und ist ein Bedingungsname für diese Variable.
 01 YES-NO PIC X.
 88 ANSWER-IS-YES VALUE "Y".

Die beiden folgenden Bedingungen prüfen, ob JA-NEIN "Y" ist:

 IF YES-NO = "Y"
 IF ANSWER-IS-YES

Ein Bedingungsname der Stufe 88 kann für eine alphanumerische oder numerische Variable verwendet werden.


Bildklausel

Der PICTURE CLAUSE definiert zwei Aspekte einer Variablen: die Größe der Variablen (die Anzahl der im Speicher für den Wert verwendeten Bytes) und den Datentyp, der in der Variablen gespeichert werden kann.



Modified text is an extract of the original Stack Overflow Documentation
Lizenziert unter CC BY-SA 3.0
Nicht angeschlossen an Stack Overflow