索引付きファイルおよび相対ファイル
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-'
注:
- IBM® Extension
- レコード名-1
- データ部の FD 記入項目で定義されていなければなりません。
レコード名-1 は修飾できます。
レコード名-1 をソート・ファイルまたはマージ・ファイルと関連付けてはなりません。
OCCURS DEPENDING ON (ODO) 配列が入ったレコードの WRITE を実行するには、その前に ODO 配列のサイズを有効な数値に確実に設定する必要があります。
相対ファイルの場合のみ、レコード名-1 内の文字桁数は、 置き換えられるレコード内の文字桁数と等しくなければなりません。 レコード名-1 をソート・ファイルまたはマージ・ファイルと関連付けてはなりません。
- FROM
- FROM を指定すると、実行結果は次の場合と同じになります。
MOVE identifier-1 TO record-name-1 WRITE record-name-1WRITE ステートメントの実行後、情報は ID-1 ではまだ使用可能ですが、レコード名-1 では使用不可になります。 (INTO/FROM ID 句を参照。)
- ID-1
- 英数字または数字編集データ項目でなければなりません。
データはこのフィールドから受け入れフィールドへ転送されます。
レコード名-1 と ID-1 の両方で同じ記憶域を参照することはできません。
ID-1 は、英数字または DBCS 関数 ID の名前にすることができます。
