IBM Extension
IBM Extension
TRANSACTION (サブファイル)
WRITE ステートメント - 形式 5 - TRANSACTION (サブファイル) >>-WRITE SUBFILE--レコード名-1--+------------+---------------------------> '-FROM--ID-1-' >--FORMAT--+----+--+-ID-2-------+----------------------------------------> '-IS-' '-リテラル-1-' >--+----------------------------------+----------------------------------> '-TERMINAL--+----+--+-ID-3-------+-' '-IS-' '-リテラル-2-' >--+-------------------------------+-------------------------------------> '-+-INDICATOR--+--+-----+--ID-4-' +-INDICATORS-+ +-IS--+ '-INDIC------' '-ARE-' >--+----------------------------------------+----------------------------> '-INVALID--+-----+--命令ステートメント-1-' '-KEY-' >--+--------------------------------------------+--+-----------+-------->< '-NOT INVALID--+-----+--命令ステートメント-2-' '-END-WRITE-' '-KEY-'
形式 5 はディスプレイ装置についてのみ使用できます 。その他のタイプの装置についてサブファイル形式の WRITE ステートメントを使用すると、WRITE 操作が失敗し、 ファイル状況 90 が設定されます。
形式がサブファイル・レコードであり、SUBFILE が指定される場合には、 書き込まれるファイルの SELECT 文節に RELATIVE KEY 文節が指定されていなければなりません。 このサブファイルに書き込まれるレコードは、 形式名によって識別されたサブファイル内のレコードで、RELATIVE KEY データ項目の値と等しい相対レコード番号を持つものです。
End of IBM Extension
