Rational Developer for System z
COBOL for Windows バージョン 7.5 言語解説書


INSERT ステートメント

INSERT ステートメントは、BASIS ステートメントによって組み込まれたソース・プログラムに COBOL ステートメントを付け加えるライブラリー・ステートメントです。

フォーマット
構文図を読む構文図をスキップする>>-+----------------+--INSERT--シーケンス番号フィールド--------><
   '-シーケンス番号-'                                    
 
シーケンス番号
これはオプションであり、 使用する場合には第 1 から 6 桁に記入し、後にスペースを 1 つ付けます。このフィールドの内容は、無視されます。
INSERT
これは、第 1 から 72 桁のどこにでも記述できます。1 つのスペースとシーケンス番号フィールド を後に記述する必要があります。このステートメントの中に他のテキストを入れないでください。
シーケンス番号フィールド
番号は、BASIS ソース・プログラムの中にあるシーケンス番号 と一致している必要があります。このシーケンス番号 は、プログラマーが COBOL ソース行の 1 から 6 桁に記入した 6 桁の番号です。

INSERT ステートメントまたは DELETE ステートメントのシーケンス番号フィールド の中で参照する番号は、数字の昇順で指定しなければなりません。

シーケンス番号フィールド は、例えば、000130 というような 1 つの番号でなければなりません。シーケンス番号フィールド で指定するステートメント番号の後に挿入するために、 少なくとも 1 つの新しいソース・プログラム・ステートメントが INSERT ステートメントの後になければなりません。

INSERT ステートメントに続く新しいソース・プログラム・ステートメントには、任意の COBOL 構文を含めることができます。

使用上の注意: INSERT ステートメントや DELETE ステートメントが、 BASIS ステートメントによって提供される COBOL ソース・プログラムを修正するために使用される場合、 COBOL ソース・プログラムのシーケンス・フィールドには、シーケンス番号が昇順で入っていなければなりません。 ただし、ソース・ファイルは変更されないままです。これらのシーケンス番号を参照する INSERT ステートメントや DELETE ステートメントは、 シーケンス番号の数字が昇順で順番になっていなければなりません。


ご利用条件 | フィードバック

Copyright IBM Corporation 1996, 2008.
このインフォメーション・センターでは Eclipse テクノロジーが採用されています。(http://www.eclipse.org)