字符集

'字符'層次是最低的，并且不能被進(jìn)一步劃分。COBOL字符集有78個(gè)字符如下所示：

代碼表

COBOL源程序必須寫在編譯器可以接受的格式。 COBOL程序都寫在COBOL語(yǔ)言編碼表。有關(guān)于編碼片的每一行80個(gè)字符的位置。

字符的位置被分為下列五個(gè)字段：

例子

下面的例子顯示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程序執(zhí)行。

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

當(dāng)編譯并執(zhí)行上面的程序它會(huì)產(chǎn)生以下結(jié)果：

Coding Sheet

字符串

字符字符串是通過(guò)將單個(gè)字符組成。一個(gè)字符串可以是

• 注釋

• 文字

• COBOL單詞

所有字符串必須用分隔符結(jié)束。分隔符用于分隔字符串。

經(jīng)常使用的分隔符：空格，逗號(hào)，句號(hào)，省略號(hào)，左/右括號(hào)和引號(hào)。

注釋

注釋不影響程序的執(zhí)行字符串。它可以是字符的任意組合。

有兩種類型的注釋：

注釋行

注釋行可以寫在任何列中。編譯器不檢查注釋行的語(yǔ)法和對(duì)待它的文檔。

注釋入口

注釋入口是鑒定區(qū)劃的可選段落的條目。都寫在B區(qū)和程序員使用它，以供參考。

粗體字母在注釋下面的例子中項(xiàng)目：

000100 IDENTIFICATION DIVISION.                                         000100
000150 PROGRAM-ID. HELLO.                                               000101 
000200 AUTHOR. YIIBAI.                                                  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以上COBOL程序執(zhí)行。

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

當(dāng)編譯并執(zhí)行上面的程序它會(huì)產(chǎn)生以下結(jié)果：

Comment Line

文字

文字是一個(gè)常數(shù)，直接硬編碼在程序中。在下面的示例中“Hello World”的文字。

PROCEDURE DIVISION.
DISPLAY 'Hello World'.

有兩種類型的文字：

字母數(shù)字文字

字母數(shù)字文字都包含在引號(hào)或單引號(hào)。長(zhǎng)度可以長(zhǎng)達(dá)160個(gè)字符。單引號(hào)或引號(hào)可以是文字，只有當(dāng)它配對(duì)的一部分。文字的開始和結(jié)尾都是一樣的無(wú)論是單引號(hào)或引用。

示例

下面的例子展示了有效和無(wú)效的字母數(shù)字字面值：

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

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

數(shù)字文本

數(shù)字文字是數(shù)字從0到9，+， - 或小數(shù)點(diǎn)的組合。長(zhǎng)度可以長(zhǎng)達(dá)18個(gè)字符。符號(hào)不能是最右邊的字符。小數(shù)點(diǎn)不應(yīng)該出現(xiàn)在結(jié)尾。

示例

下面的例子展示了有效和無(wú)效的數(shù)字文本：

Valid:
100
+10.9
-1.9

Invalid:
1,00
10.
10.9-

COBOL詞

COBOL詞是可以保留字，或者用戶自定義的字符串。長(zhǎng)度可以長(zhǎng)達(dá)30個(gè)字符。

用戶自定義

用戶定義的詞被用于命名的文件，數(shù)據(jù)，記錄，段落名稱和段。字母，數(shù)字和連字符被允許在形成用戶定義的單詞。但不能使用COBOL保留字

保留字

保留字是在COBOL語(yǔ)言預(yù)定義的詞。不同類型于我們經(jīng)常使用如下所示的保留字：

• 關(guān)鍵字如 ADD, ACCEPT, MOVE等
• 特殊字符的詞如 +, -, *, <, <=, 等
• 形象化的常數(shù)是恒定值，例如ZERO, SPACES等象征常量的所有恒定值被輸入的下表中：

形象常量