COBOL - Grundlegende Syntax

Zeichensatz

'Zeichen' sind in der Hierarchie am niedrigsten und können nicht weiter unterteilt werden. Der COBOL-Zeichensatz enthält 78 Zeichen, die unten gezeigt werden -

Sr.Nr.	Charakterbeschreibung
1	A-Z Alphabete (Großbuchstaben)
2	a-z Alphabete (Kleinbuchstaben)
3	0-9 Numerisch
4	Raum
5	+ Pluszeichen
6	- Minuszeichen oder Bindestrich
7	* Sternchen
8	/ Schrägstrich
9	$ Währungszeichen
10	, Komma
11	; Semikolon
12	. Dezimalpunkt oder Punkt
13	" Anführungszeichen
14	( Linke Klammer
15	) Rechte Klammer
16	> Größer als
17	< Weniger als
18	: Doppelpunkt
19	' Apostroph
20	= Gleichheitszeichen

Codierungsblatt

Das Quellprogramm von COBOL muss in einem für die Compiler akzeptablen Format geschrieben sein. COBOL-Programme werden auf COBOL-Codierungsblättern geschrieben. In jeder Zeile eines Codierungsblatts befinden sich 80 Zeichenpositionen.

Die Zeichenpositionen sind in die folgenden fünf Felder unterteilt:

Positionen	Feld	Beschreibung
1-6	Spaltennummern	Reserviert für Zeilennummern.
7	Indikator	Es kann ein Sternchen (*) für Kommentare, ein Bindestrich (-) für die Fortsetzung und ein Schrägstrich (/) für den Formularvorschub geben.
8-11	Bereich A.	Alle COBOL-Abteilungen, Abschnitte, Absätze und einige spezielle Einträge müssen in Bereich A beginnen.
12-72	Bereich B.	Alle COBOL-Anweisungen müssen in Bereich B beginnen.
73-80	Identifikationsbereich	Es kann vom Programmierer nach Bedarf verwendet werden.

Beispiel

Das folgende Beispiel zeigt ein COBOL-Codierungsblatt -

000100 IDENTIFICATION DIVISION.                                         000100
000200 PROGRAM-ID. HELLO.                                               000101
000250* THIS IS A COMMENT LINE                                          000102
000300 PROCEDURE DIVISION.                                              000103
000350 A000-FIRST-PARA.                                                 000104
000400     DISPLAY “Coding Sheet”.                                      000105
000500 STOP RUN.                                                        000106

JCL um das obige COBOL-Programm auszuführen -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1 EXEC PGM = HELLO

Wenn Sie das obige Programm kompilieren und ausführen, wird das folgende Ergebnis erzielt:

Coding Sheet

Zeichenketten

Zeichenketten werden durch Kombinieren einzelner Zeichen gebildet. Eine Zeichenkette kann a sein

Comment,
Wörtlich oder
COBOL Wort.

Alle Zeichenketten müssen mit beendet werden separators. Ein Trennzeichen wird verwendet, um Zeichenfolgen zu trennen.

Häufig verwendete Trennzeichen - Leerzeichen, Komma, Punkt, Apostroph, linke / rechte Klammer und Anführungszeichen.

Kommentar

Ein Kommentar ist eine Zeichenfolge, die die Ausführung eines Programms nicht beeinflusst. Es kann eine beliebige Kombination von Zeichen sein.

Es gibt zwei Arten von Kommentaren:

Kommentarzeile

Eine Kommentarzeile kann in eine beliebige Spalte geschrieben werden. Der Compiler überprüft eine Kommentarzeile nicht auf Syntax und behandelt sie zur Dokumentation.

Kommentareintrag

Kommentareinträge sind diejenigen, die in den optionalen Absätzen einer Identifikationsabteilung enthalten sind. Sie sind in Bereich B geschrieben und werden von Programmierern als Referenz verwendet.

Der in hervorgehobene Text Bold sind die kommentierten Einträge im folgenden Beispiel -

000100 IDENTIFICATION DIVISION.                                         000100
000150 PROGRAM-ID. HELLO.                                               000101 
000200 AUTHOR. TUTORIALSPOINT.                                          000102
000250* THIS IS A COMMENT LINE                                          000103
000300 PROCEDURE DIVISION.                                              000104
000350 A000-FIRST-PARA.                                                 000105  
000360/ First Para Begins - Documentation Purpose                       000106
000400     DISPLAY “Comment line”.                                      000107
000500 STOP RUN.                                                        000108

JCL über COBOL-Programm ausführen -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1 EXEC PGM = HELLO

Wenn Sie das obige Programm kompilieren und ausführen, wird das folgende Ergebnis erzielt:

Comment Line

Wörtlich

Literal ist eine Konstante, die in einem Programm direkt fest codiert ist. Im folgenden Beispiel ist "Hello World" ein Literal.

PROCEDURE DIVISION.
DISPLAY 'Hello World'.

Es gibt zwei Arten von Literalen, wie unten erläutert -

Alphanumerisches Literal

Alphanumerische Literale sind in Anführungszeichen oder Apostroph eingeschlossen. Die Länge kann bis zu 160 Zeichen betragen. Ein Apostroph oder ein Zitat kann nur dann Teil eines Literal sein, wenn es gepaart ist. Anfang und Ende des Literal sollten gleich sein, entweder Apostroph oder Zitat.

Example

Das folgende Beispiel zeigt gültige und ungültige alphanumerische Literale -

Valid:
   ‘This is valid’
   "This is valid"
   ‘This isn’’t invalid’

Invalid:
   ‘This is invalid”
   ‘This isn’t valid’

Numerisches Literal

Ein numerisches Literal ist eine Kombination von Ziffern von 0 bis 9, +, - oder Dezimalpunkt. Die Länge kann bis zu 18 Zeichen betragen. Das Zeichen kann nicht das Zeichen ganz rechts sein. Der Dezimalpunkt sollte nicht am Ende erscheinen.

Example

Das folgende Beispiel zeigt gültige und ungültige numerische Literale -

Valid:
   100
   +10.9
   -1.9

Invalid:
   1,00
   10.
   10.9-

COBOL Word

COBOL Word ist eine Zeichenfolge, die ein reserviertes Wort oder ein benutzerdefiniertes Wort sein kann. Die Länge kann bis zu 30 Zeichen betragen.

Benutzerdefinierte

Benutzerdefinierte Wörter werden zum Benennen von Dateien, Daten, Datensätzen, Absatznamen und Abschnitten verwendet. Alphabete, Ziffern und Bindestriche sind beim Bilden von benutzerdefinierten Wörtern zulässig. Sie können keine von COBOL reservierten Wörter verwenden.

Reservierte Wörter

Reservierte Wörter sind in COBOL vordefinierte Wörter. Verschiedene Arten von reservierten Wörtern, die wir häufig verwenden, sind wie folgt:

Keywords wie HINZUFÜGEN, AKZEPTIEREN, BEWEGEN usw.
Special characters Wörter wie +, -, *, <, <= usw.
Figurative constants sind konstante Werte wie ZERO, SPACES usw. Alle konstanten Werte der figurativen Konstanten sind in der folgenden Tabelle aufgeführt.

Figurative Konstanten

Sr.Nr.	Figurative Konstanten & Beschreibung
1	HIGH-VALUES Ein oder mehrere Zeichen, die sich in absteigender Reihenfolge an der höchsten Position befinden.
2	LOW-VALUES Ein oder mehrere Zeichen haben Nullen in der Binärdarstellung.
3	ZERO/ZEROES Eine oder mehrere Nullen, abhängig von der Größe der Variablen.
4	SPACES Ein oder mehrere Leerzeichen.
5	QUOTES Einfache oder doppelte Anführungszeichen.
6	ALL literal Füllt das Datenelement mit Literal.