Cobol - 写终止符？

Question

在Cobol中,是否需要在写入语句后写入end-write.例如,请考虑以下事项:

write something from something after advancing 1 lines.
end-write.

我们需要像上面这样做吗？或者就是这样:

write something from something after advancing 1 lines.

当我编译没有end-write不同的时候我没有得到任何编译器警告当我不使用end-read或end时 - 如果我得到编译器警告.

有人能帮我理解吗？

Answer 1

在END-WRITE当只需要INVALID KEY或NOT INVALID KEY使用.

在其他任何情况下你都不需要它.虽然你可以随时使用它.

我不使用INVALID KEY/NOT INVALID KEY,从来没有使用END-WRITE(或END-READ,END-OPEN,END-CLOSE,END-START).相反,我FILE STATUS在SELECT语句中使用该子句,并在每次IO操作后测试FILE STATUS字段.

如果您习惯于编写现代COBOL(符合1985年标准),那么您应尽可能避免使用尽可能多的句号/句号PROCEDURE DIVISION.在PROCEDURE DIVISION标题之后.在段落/ SECTION标签之后.在段落/ SECTION标签之前.在程序结束时,如果还没有用于其他原因.

对于段落/ SECTION标签之前的那个,我在第12列中将它包含在它自己的一行上的句号.