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

时间:2016-05-06 09:18:04

标签: cobol

我使用Microfocus Net Express 5.1(Cobol)。

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

open input xyzfile 

我的问题是:是否有可能将名称放在" xyzfile"在变量中写而不是

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

非常感谢

1 个答案:

答案 0 :(得分:2)

来自环境部门;

   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