索引付きファイルおよび相対ファイル

構文図を読む構文図をスキップする
WRITE - 形式 2 - 索引付きおよび相対ファイル

>>-WRITE--レコード名-1--+------------+------------------------------->
                   '-FROM--ID-1-'   

>--+--------------------------------+--------------------------->
   |        (1)                     |   
   '-FORMAT------+----+--+-ID-2---+-'   
                 '-IS-'  '-リテラル-1-'     

>--+--------------------------------+--------------------------->
   |              (1)               |   
   '-NULL-KEY-MAP------+----+--ID-8-'   
                       '-IS-'           

>--+----------------------------+------------------------------->
   |          (1)               |   
   '-NULL-MAP------+----+--ID-9-'   
                   '-IS-'           

>--+-------------------------------+---------------------------->
   '-INVALID--+-----+--命令ステートメント-1-'   
              '-KEY-'                  

>--+-----------------------------------+--+-----------+--------><
   '-NOT INVALID--+-----+--命令ステートメント-2-'  '-END-WRITE-'   
                  '-KEY-'                                 

注:
  1. IBM 拡張
関連情報
レコード名-1
データ部の FD 記入項目で定義されていなければなりません。 レコード名-1 は修飾できます。 レコード名-1 をソート・ファイルまたはマージ・ファイルと関連付けてはなりません。

OCCURS DEPENDING ON (ODO) 配列が入ったレコードの WRITE を実行するには、その前に ODO 配列のサイズを有効な数値に確実に設定する必要があります。

相対ファイルの場合のみ、レコード名-1 内の文字桁数は、 置き換えられるレコード内の文字桁数と等しくなければなりません。 レコード名-1 をソート・ファイルまたはマージ・ファイルと関連付けてはなりません。

FROM
FROM を指定すると、実行結果は次の場合と同じになります。
MOVE identifier-1 TO record-name-1
WRITE record-name-1

WRITE ステートメントの実行後、情報は ID-1 ではまだ使用可能ですが、レコード名-1 では使用不可になります。 (INTO/FROM ID 句を参照。)

ID-1
英数字または数字編集データ項目でなければなりません。 データはこのフィールドから受け入れフィールドへ転送されます。

レコード名-1 と ID-1 の両方で同じ記憶域を参照することはできません。

ID-1 は、英数字または DBCS 関数 ID の名前にすることができます。