COBOL基本語法
字符集
'字符'層次是最低的，並且不能被進一步劃分。COBOL字符集有78個字符如下所示：
字符
描述
A-Z
Alphabets(Upper Case)
a-z
Alphabets (Lower Case)
0-9
Numeric
Space
+
Plus Sign
-
Minus Sign or Hyphen
*
Asterisk
/
Forward Slash
$
Currency Sign
,
Comma
;
Semicolon
.
Decimal Point or Period
"
Quotation Marks
(
Left Parenthesis
)
Right Parenthesis
>
Greater than
<
Less than
:
Colon
'
Apostrophe
=
Equal Sign
代碼表
COBOL源程序必須寫在編譯器可以接受的格式。 COBOL程序都寫在COBOL語言編碼表。有關於編碼片的每一行80個字符的位置。
字符的位置被分爲下列五個字段：
位置
字段
描述
1-6
列數
保留的行號
7
指示器
它可以有星號（*）表示註釋，連字符（ - ），表示繼續和斜線（/）表示換頁
8-11
A區
所有的COBOL分區，段落和一些特殊的項目必須首先在A區
12-72
B區
所有的COBOL語句必須開始在B區
73-80
識別區
它可以根據需要由程序員使用
例子
下面的例子顯示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單詞
所有字符串必須用分隔符結束。分隔符用於分隔字符串。
經常使用的分隔符：空格，逗號，句號，省略號，左/右括號和引號。
註釋
註釋不影響程序的執行字符串。它可以是字符的任意組合。
有兩種類型的註釋：
註釋行
註釋行可以寫在任何列中。編譯器不檢查註釋行的語法和對待它的文檔。
註釋入口
註釋入口是鑑定區劃的可選段落的條目。都寫在B區和程序員使用它，以供參考。
粗體字母在註釋下面的例子中項目：
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程序執行。
//SAMPLE JOB(TESTJCL,XXXXXX),CLASS=A,MSGCLASS=C
//STEP1 EXEC PGM=HELLO
當編譯並執行上面的程序它會產生以下結果：
Comment Line
文字
文字是一個常數，直接硬編碼在程序中。在下面的示例中「Hello World」的文字。
PROCEDURE DIVISION.
DISPLAY 'Hello World'.
有兩種類型的文字：
字母數字文字
字母數字文字都包含在引號或單引號。長度可以長達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詞
COBOL詞是可以保留字，或者用戶自定義的字符串。長度可以長達30個字符。
用戶自定義
用戶定義的詞被用於命名的文件，數據，記錄，段落名稱和段。字母，數字和連字符被允許在形成用戶定義的單詞。但不能使用COBOL保留字
保留字
保留字是在COBOL語言預定義的詞。不同類型於我們經常使用如下所示的保留字：
- 關鍵字如 ADD, ACCEPT, MOVE等
- 特殊字符的詞如 +, -, *, <, <=, 等
- 形象化的常數是恆定值，例如ZERO, SPACES等象徵常量的所有恆定值被輸入的下表中：
形象常量
象徵常量
描述
HIGH-VALUES
一個或多個字符，在最高的位置以降序
LOW-VALUES
一個或多個字符在二進制表示的零
ZERO/ZEROES
一個或多個零取決於變量的大小
SPACES
一個或多個空格
QUOTES
單引號或雙引號
ALL literal
用文字填充數據項