C$FILEINFO

所定のファイルについてのオペレーティング・システム情報を取得します。

構文:

CALL "C$FILEINFO"
   USING file-name, file-info
   GIVING status

パラメータ:

file-name
PIC X(n)
file-info
次のグループを定義します。
01 file-info
  03 file-size  pic x(8) comp-x.
  03 file-date  pic 9(8) comp-x.
  03 file-time  pic 9(8) comp-x.
status
任意の数値タイプ

入口:

file-name
ファイルの名前

出口:

file-info
ファイル情報を取得するグループ項目
status
正常に削除されるとゼロ、正常に削除されないとゼロ以外を返します。

コメント:

この操作の拡張ファイル状態コードを取得するには、statuscomp xx comp-x として定義し、『Extended File Status Codes』の例に従います。