![](https://csdnimg.cn/release/download_crawler_static/1399517/bg5.jpg)
以前先检查该文件是否已在规定的外部设备上准备就绪。
????? OPEN 语句的一般格式为:
??INPUT?文件名 1 [,文件名 2]。。。
? OPEN? ?OUTPUT?文件名 3 [,文件名 4]。。。 。。。
6 。 CLOSE
语句:当对一个文件的读或写的操作已完成,就应关闭该文件。
????? CLOSE 语句的一般格式为:
?CLOSE?文件名 1?? [,文件名 2]。。。
COBOL 通过 2 位长度的文件状态字(FILE-STATUS)来表示文件的操作结果是否成功,常见
的文件状态值及意义:
二。算数运算语句
1 。 ADD
语句:
?格式 1:ADD??? ?标识符 1?,标识符 2。。。 TO 标识符 m [,标识符 n]。。。
???常量 1?,常量 2
?格式 2:ADD??? ?标识符 1???? ,标识符 2????? ,标识符 3
???常量 1???????? ,常量 2????????? ,常量 3
??? 。。。 GIVING 标识符 m [,标识符 n]。。。
2 。 SUBTRACT
语句:
???? 格式 1:SUBTRACT?????? 标识符 1?,标识符 2 。。。 FROM 标识符 m [,标识符
n]。。。
???????????????????????????? 常量 1?,常量 2
???? 格式 2:SUBTRACT?????? 标识符 1????? ,标识符 2?? 。。。 FROM????? 标识符
?????????????? ??????? ??????????? 常量 1????????? ,常量 2?????????????????????????????????????? 常量
?????GIVING 标识符 n [,标识符 p]。。。
3 。 MULTIPLY
语句:
???? 格式 1:MULTIPLY??????? 标识符 1???????? BY?标识符 2 [,标识符 3]。。。
????????????????????????????? 常量 1,
???? 格 式 2 : MULTIPLY??????? 标 识 符 1???????? BY?标 识 符 2? GIVING 标 识 符 3 [ , 标 识 符
4]。。。