Question

我使用Microfocus Net Express 5.1（Cobol）。

当我想打开索引顺序文件时，我写

open input xyzfile

我的问题是：是否有可能将名称放在＆＃34; xyzfile＆＃34;在变量中写而不是

move "xyzfile" to var-file
open input var-file

非常感谢

Answer 1

来自环境部门;

   environment division.
   input-output section.
   file-control.
       select ConfigFile
              assign to wFile-folder
              organization is line sequential
              file status is wStatus.

来自工作存储部分;

   working-storage section.
   01  wFile-folder                pic x(256).
   01  wStatus                     pic x(2).

并在您的程序部门下;

      move "c:\data\configuration.txt" to wFile-folder
      open input ConfigFile

      read ConfigFile record

使用变量中的文件名打开cobol索引顺序文件

1 个答案: