ファイル名の動的割り当て

ファイル名の動的割り当てでは、ファイル名を SELECT 句で COBOL データ項目として指定します。

 select filename
     assign to dynamic data-item

作成している物理ファイルのファイル名に空白文字を含める場合は、ファイル名を引用符で囲む必要があります。下記の例 2 を参照してください (Windows 環境にのみ該当)。

例 1

次の例では、input.dat というファイルが現在のディレクトリに作成されます。

   ...
 select fd-in-name
     assign to dynamic ws-in-file.
       ...
 working-storage section. 
 01 ws-in-file     pic x(30).
       ...
     move "input.dat" to ws-in-file.
       ...
     open output fd-in-name.

例 2

この Windows の例では、引用符を使用して、ファイル名に空白文字が含まれるファイル spacey filename.dat を作成しています。

 select f1
      assign to dynamic f1-name.
... 
working-storage section.
01 f1     pic x(30).
...
move """spacey  filename.dat""" to f1-name
....
open output f1.