XL Fortran for AIX V8.1.1

ランゲージ・リファレンス

ENDFILE

目的

ENDFILE ステートメントは、順次アクセス用に接続された外部ファイルの次のレコードとしてファイルの最後のレコードを書き込みます。このレコードはファイルの最後のレコードになります。

ストリーム・アクセス用に接続されたファイルでは、ENDFILE ステートメントは、終端点を現在のファイル位置にします。現在の位置より前のファイル記憶単位は書き込み済みであると見なされ、読み取ることができます。ストリーム出力ステートメントを続けて使用することによって、さらにデータをファイルに書き込むことができます。

構文



>>-ENDFILE--+-u-------------------+----------------------------><
            '-(--position_list--)-'
 
 

u
外部装置識別子です。 u の値はアスタリスク、またはホレリス定数であってはなりません。

position_list
装置指定子 ([UNIT=]u) を必ず 1 つ含んでいなければならないリストです。このリストには、他の有効な各指定子を 1 つずつ入れることができます。

[UNIT=] u
装置指定子です。u は外部装置識別子で、その値はアスタリスクであってはなりません。外部装置識別子はスカラー整数式 (1 〜 2147483647 の値を持つ) で表される外部ファイルを示します。オプションの文字である UNIT= を省略する場合は、uposition_list の最初の項目でなければなりません。

IOSTAT= ios
I/O 操作の状況を示す I/O 状況指定子です。 ios は、INTEGER(4) タイプのスカラー変数またはデフォルトの整数です。 ENDFILE ステートメントの実行が完了すると、ios の値は次のように定義されます。

ERR= stmt_label
エラーが発生した場合に制御が移される、同じ有効範囲単位内にある実行可能ステートメントのステートメント・ラベルを指定するエラー指定子です。 ERR= 指定子は、エラー・メッセージを抑制します。

規則

+----------------------------------IBM 拡張----------------------------------+

装置が接続されていない場合、fort.n という名前のデフォルトのファイルに対して順次アクセスを指定する暗黙の OPEN ステートメントが実行されます。ここで、n は先行ゼロを除去した u の値です。

順次アクセス用に接続されたファイルに対して ENDFILE ステートメントを実行した後は、データ転送入出力ステートメントまたは ENDFILE ステートメントを実行する前に、BACKSPACE または REWIND ステートメントを使用してファイルの位置を指定し直す必要があります。

2 つの ENDFILE ステートメントを同一のファイルに対して実行した場合、それらの間に REWIND または BACKSPACE ステートメントがなければ、2 番目の ENDFILE ステートメントは無視されます。

+--------------------------------IBM 拡張の終り-------------------------------+

ERR=IOSTAT= 指定子が設定されているときにエラーが検出されると、ERR= 指定子によって指定されたステートメントに対して転送が行われ、正の整数値が ios に割り当てられます。

+----------------------------------IBM 拡張----------------------------------+

IOSTAT=ERR= も指定していない場合は、以下のとおりです。

+--------------------------------IBM 拡張の終り-------------------------------+

      ENDFILE 12
      ENDFILE (IOSTAT=IOSS,UNIT=11)

関連情報


[ ページのトップ | 前ページ | 次ページ | 目次 | 索引 ]