Question

我在Windows 10上使用OpenCobolIDE 4.7.4（它基于GnuCOBOL）并尝试编译此程序打开一个文件进行阅读：

   IDENTIFICATION DIVISION.
   PROGRAM-ID. HELLO.

   ENVIRONMENT DIVISION.
      INPUT-OUTPUT SECTION.
         FILE-CONTROL.
         SELECT STUDENT ASSIGN TO 'input.txt'
         ORGANIZATION IS LINE SEQUENTIAL.            

   DATA DIVISION.
      FILE SECTION.
      FD STUDENT.
      01 STUDENT-FILE.
         05 STUDENT-ID PIC 9(5).
         05 NAME PIC A(25).

      WORKING-STORAGE SECTION.
      01 WS-STUDENT.
         05 WS-STUDENT-ID PIC 9(5).
         05 WS-NAME PIC A(25).
      01 WS-EOF PIC A(1). 

   PROCEDURE DIVISION.
      OPEN INPUT STUDENT.
         PERFORM UNTIL WS-EOF='Y'
         READ STUDENT INTO WS-STUDENT
            AT END MOVE 'Y' TO WS-EOF
            NOT AT END DISPLAY WS-STUDENT
         END-READ
         END-PERFORM.
      CLOSE STUDENT.
   STOP RUN.

input.txt 与源代码位于同一目录中，但我仍然收到以下错误：

Main.cob:24: libcob: File does not exist (STATUS = 35) File : 'input.txt'

我做错了什么？

Answer 1

OCIDE有输出目录的设置，默认为“bin”（相对于源文件）。实际上它只是将此设置传递给编译器cobc source.cob -o bin\source.exe

您可以在设置Menu Preferences -> Compiler中更改此行为：

输出目录

此选项允许您选择放置二进制文件的位置，默认情况下，二进制文件将放置在源文件旁边的bin文件夹中。如果需要，可以定义另一个相对或绝对目录。

在任何情况下，您都可以在环境中设置实际名称，请检查GC FAQ - How to map a file name to an external name。

作为替代方案，您可以使用环境var COB_FILE_PATH设置数据目录。

可以在设置Menu Preferences -> Run中设置两个环境选项。

Answer 2

其他语言的大多数IDE恰好从另一个目录运行可执行文件（例如，在其中构建）。

一个简单的测试是编写一个测试程序，打开一个文件进行编写。你会很快看到会发生什么。

Answer 3

也许更好的方法是在select子句中编写完整路径。

select STUDENT ASSIGN TO '/xpto/folder1/input.txt'

打开文件以便在COBOL中读取

3 个答案: