cobol Open-IO：如果文件不存在则创建文件

Question

有没有人知道如何捕获 cobol 抛出的异常，如果您尝试打开不存在的 IO 文件，然后创建一个新文件？

Answer 1

SELECT 原因上的 OPTIONAL 短语将执行以下操作：

SELECT OPTIONAL FILE-A 
   ASSIGN TO "INFILE" 
   ORGANIZATION INDEXED. 

如果 OPEN IO 文件将在必要时创建。对于 OPEN INPUT，文件不会被创建，而是被视为处于 EOF 并且所有随机读取都将是“INVALID KEY”。

我很确定这是一个 ANSI 标准条款，但不记得它何时出现。