COBOL-基本構文

キャラクターセット

「文字」は階層の最下位であり、さらに分割することはできません。 COBOL文字セットには、以下に示す78文字が含まれます-

Sr.No.	Character & Description
1	A-Z アルファベット（大文字）
2	a-z アルファベット（小文字）
3	0-9 数値
4	スペース
5	+ プラス記号
6	- マイナス記号またはハイフン
7	アスタリスク
8	/ フォワードスラッシュ
9	$ 通貨記号
10	, コンマ
11	; セミコロン
12	. 小数点または期間
13	" 引用符
14	( 左括弧
15	) 右括弧
16	> より大きい
17	< 未満
18	: 結腸
19	'' アポストロフィ
20	= 等号

コーディングシート

COBOLのソースプログラムは、コンパイラが受け入れられる形式で作成する必要があります。 COBOLプログラムは、COBOLコーディングシートに記述されています。コーディングシートの各行には80文字の位置があります。

文字の位置は、次の5つのフィールドにグループ化されます-

Positions	Field	Description
1-6	Column Numbers	Reserved for line numbers.
7	Indicator	It can have Asterisk (*) indicating comments, Hyphen (-) indicating continuation and Slash (/) indicating form feed.
8-11	Area A	All COBOL divisions, sections, paragraphs and some special entries must begin in Area A.
12-72	Area B	All COBOL statements must begin in area B.
73-80	Identification Area	It can be used as needed by the programmer.

例

次の例は、COBOLコーディングシートを示しています-

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* 上記のCOBOLプログラムを実行します-

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

上記のプログラムをコンパイルして実行すると、次の結果が生成されます-

Coding Sheet

文字列

文字列は、個々の文字を組み合わせて形成されます。文字列は

コメント、
リテラル、または
COBOLワード。

すべての文字列は separators で終わる必要があります。区切り文字は、文字列を区切るために使用されます。

頻繁に使用される区切り記号-スペース、コンマ、ピリオド、アポストロフィ、左/右括弧、および引用符。

000100 IDENTIFICATION DIVISION.                                         000100
000150 PROGRAM-ID. HELLO.                                               000101
000200 AUTHOR. finddevguides.                                          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

上記のCOBOLプログラムを実行する JCL -

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

上記のプログラムをコンパイルして実行すると、次の結果が生成されます-

Comment Line

リテラル

リテラルは、プログラムで直接ハードコーディングされた定数です。次の例では、「Hello World」はリテラルです。

PROCEDURE DIVISION.
DISPLAY 'Hello World'.

以下で説明するように、リテラルには2つのタイプがあります-

英数字リテラル

英数字リテラルは引用符またはアポストロフィで囲まれています。長さは最大160文字です。アポストロフィまたは引用符は、ペアになっている場合にのみリテラルの一部になります。リテラルの開始と終了は、アポストロフィまたは引用符のどちらかで同じでなければなりません。

例

次の例は、有効および無効な英数字リテラルを示しています-

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

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

数値リテラル

数値リテラルは、0〜9の数字の組み合わせ、+、–、または小数点です。長さは最大18文字です。記号を右端の文字にすることはできません。小数点は最後に表示されません。

例

次の例は、有効および無効な数値リテラルを示しています-

Valid:
   100
   +10.9
   -1.9

Invalid:
   1,00
   10.
   10.9-

COBOL Word

COBOL Wordは、予約語またはユーザー定義語にできる文字列です。長さは最大30文字です。

ユーザー定義の

ユーザー定義の単語は、ファイル、データ、レコード、段落名、およびセクションの命名に使用されます。ユーザー定義の単語を作成する際、アルファベット、数字、ハイフンを使用できます。 COBOLの予約語は使用できません。

予約語

予約語は、COBOLの事前定義語です。私たちが頻繁に使用する予約語の種類は次のとおりです-

ADD、ACCEPT、MOVEなどの*キーワード*
特殊文字 +、-、*、<、⇐などの単語
*比Fig定数*は、ゼロ、スペースなどの定数値です。表意定数のすべての定数値は、次の表に記載されています。

比Constant定数

Sr.No.	Figurative Constants & Description
1	HIGH-VALUES 降順で最上位にある1つ以上の文字。
2	LOW-VALUES 1つ以上の文字のバイナリ表現にはゼロが含まれます。
3	ZERO/ZEROES 変数のサイズに応じて1つ以上のゼロ。
4	SPACES 1つ以上のスペース。
5	QUOTES 一重引用符または二重引用符。
6	ALL literal データ項目をリテラルで埋めます。

Cobol-basic-syntax

目次