'字符'層次是最低的,并且不能被進一步劃分。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語言編碼表。有關(guān)于編碼片的每一行80個字符的位置。
字符的位置被分為下列五個字段:
位置 | 字段 | 描述 |
---|---|---|
1-6 | 列數(shù) | 保留的行號 |
7 | 指示器 | 它可以有星號(*)表示注釋,連字符( - ),表示繼續(xù)和斜線(/)表示換頁 |
8-11 | A區(qū) | 所有的COBOL分區(qū),段落和一些特殊的項目必須首先在A區(qū) |
12-72 | B區(qū) | 所有的COBOL語句必須開始在B區(qū) |
73-80 | 識別區(qū) | 它可以根據(jù)需要由程序員使用 |
下面的例子顯示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
當編譯并執(zhí)行上面的程序它會產(chǎn)生以下結(jié)果:
Coding Sheet
字符字符串是通過將單個字符組成。一個字符串可以是
注釋
文字
COBOL單詞
所有字符串必須用分隔符結(jié)束。分隔符用于分隔字符串。
經(jīng)常使用的分隔符:空格,逗號,句號,省略號,左/右括號和引號。
注釋不影響程序的執(zhí)行字符串。它可以是字符的任意組合。
有兩種類型的注釋:
注釋行可以寫在任何列中。編譯器不檢查注釋行的語法和對待它的文檔。
注釋入口是鑒定區(qū)劃的可選段落的條目。都寫在B區(qū)和程序員使用它,以供參考。
粗體字母在注釋下面的例子中項目:
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
當編譯并執(zhí)行上面的程序它會產(chǎn)生以下結(jié)果:
Comment Line
文字是一個常數(shù),直接硬編碼在程序中。在下面的示例中“Hello World”的文字。
PROCEDURE DIVISION. DISPLAY 'Hello World'.
有兩種類型的文字:
字母數(shù)字文字都包含在引號或單引號。長度可以長達160個字符。單引號或引號可以是文字,只有當它配對的一部分。文字的開始和結(jié)尾都是一樣的無論是單引號或引用。
示例
下面的例子展示了有效和無效的字母數(shù)字字面值:
Valid: ‘This is valid’ "This is valid" ‘This isn’’t invalid’ Invalid: ‘This is invalid” ‘This isn’t valid’
數(shù)字文字是數(shù)字從0到9,+, - 或小數(shù)點的組合。長度可以長達18個字符。符號不能是最右邊的字符。小數(shù)點不應(yīng)該出現(xiàn)在結(jié)尾。
示例
下面的例子展示了有效和無效的數(shù)字文本:
Valid: 100 +10.9 -1.9 Invalid: 1,00 10. 10.9-
COBOL詞是可以保留字,或者用戶自定義的字符串。長度可以長達30個字符。
用戶定義的詞被用于命名的文件,數(shù)據(jù),記錄,段落名稱和段。字母,數(shù)字和連字符被允許在形成用戶定義的單詞。但不能使用COBOL保留字
保留字是在COBOL語言預(yù)定義的詞。不同類型于我們經(jīng)常使用如下所示的保留字:
象征常量 | 描述 |
---|---|
HIGH-VALUES | 一個或多個字符,在最高的位置以降序 |
LOW-VALUES | 一個或多個字符在二進制表示的零 |
ZERO/ZEROES | 一個或多個零取決于變量的大小 |
SPACES | 一個或多個空格 |
QUOTES | 單引號或雙引號 |
ALL literal | 用文字填充數(shù)據(jù)項 |