字符集
'字符'在层次结构中最低,无法进一步划分. COBOL字符集包括78个字符,显示在下面和下面;
Sr.No. | Character&说明 |
---|---|
1 |
AZ 字母(大写字母) |
2 |
az 字母(小写) |
3 |
0- 9 数字 |
4 |
空格 |
5 |
+ 加号 |
6 |
- 减号或连字符 |
7 |
* Asterisk |
8 |
/ 转发斜杠 |
9 |
$ 货币符号 |
1 0 |
, 逗号 |
11 |
; 分号 |
12 |
. 小数点或句号 |
13 |
" 引号 |
14 |
( 左括号 |
15 |
) 右括号 |
16 |
> 大于 |
17 |
< 小于 |
18 |
: 冒号 |
19 |
' Apostrophe |
20 |
= 等号 |
编码表
来源COBOL程序必须以编译器可接受的格式编写. COBOL程序是在COBOL编码表上编写的.编码表的每一行有80个字符位置.
字符位置分为以下五个字段 :
位置 | Field | 描述 |
---|---|---|
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区,程序员使用它作为参考.
Bold 中突出显示的文本是以下示例中的注释条目 :
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 执行COBOL以上程序 :
//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C //STEP1 EXEC PGM = HELLO
当您编译并执行上述程序时,它会产生以下结果 :
Comment Line
Literal
Literal是一个在程序中直接硬编码的常量.在下面的示例中,"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 Word
COBOL Word是一个字符串,可以是保留字或用户定义的字.长度最多30个字符.
用户定义
用户定义的单词用于命名文件,数据,记录,段落名称,和部分.在形成用户定义的单词时允许使用字母,数字和连字符.您不能使用COBOL保留字.
保留字
保留字是COBOL中的预定义字.我们经常使用的不同类型的保留字如下:
- 关键字如ADD ,接受,移动等
- 特殊字符字样如+, - ,*,<,< =等
- 图形常量是常量值,如ZERO,SPACES等.图形常量的所有常量值都在下表中提到.
比喻常数
Sr.No. | Figurative Constants & Description |
---|---|
1 |
HIGH-VALUES 一个或多个字符将按降序排列在最高位置. |
2 |
LOW-VALUES 一个或多个字符的二进制表示为零. |
3 |
ZERO/ZEROES 一个或多个零取决于变量的大小. |
4 |
SPACES 一个或多个空格. |
5 |
QUOTES 单引号或双引号. |
6 |
所有文字 用Literal填充数据项. |