コンパイラー指示ステートメント

COPYステートメントは、事前に書かれたテキストをプログラムのソース内に挿入する機能を提供します。

事前に作成されたコードを任意のコピーブック・ファイルに保存しておき、COPYステートメントの指定によりソースを挿入して使用します。コピーブック・ファイルを使用するためには、環境変数$ OFCOBCPYにコピーブックのパスを登録します。

以下は、COPYステートメントの形式です。

以下は、ステートメントの各設定項目についての説明です。

以下は、COPYステートメントの使用規則です。

以下は、置換と比較についての規則です。

以下は、コピーブックPAYLIBの例として、データ項目が定義される部分です。

プログラマーは、プログラムのデータ部でCOPYステートメントを以下のように使用することができます。

プログラムでは、コピーブックPAYLIBに記述されたソースが挿入されます。

以下は、REPLACINGを使用して名前を変更する例でです。

このプログラムでは、ライブラリ・テキストがコピーされ、コピーされたテキストは、以下のように書かれます。

このとき、指定された変換は、そのプログラムでのみ行われます。コピーブックPAYLIBは変更されません。

以下のような規則を持つコピーブックは、名前の一部（接頭辞など）をREPLACINGを指定して変更することができます。

プログラマーは、プログラムのデータ部でCOPYステートメントを以下のように使用することができます。

以下は、最終的に挿入されたプログラムです。

以下は、PICTURE文字列でレベル番号を指定して置き換える例です。

REPLACEステートメントは、ソース・プログラム内のテキストを変換するために使用します。ソース・プログラム内で文字列が使用できるどころなら、どこにでも記述することができます。

REPLACEステートメントは、変更が必要な部分を直接探して変更するのではなく、COBOLコンパイル・グループの全体、またはその一部を変更するために使用することができます。COPYステートメントが指定されたコピーブックを挿入する過程​​でのみ変換する場合とは違って、プログラム・ソース全体を対象とするという点を除けば、COPYステートメントにREPLACINGを指定した場合と同じ比較および変換規則が適用されます。

以下は、ステートメントの各設定項目についての説明です。

pseudo-text-1とpseudo-text-2は、ソース・プログラムに記述することができる任意のテキスト・ワード（COPYを除く）を使用することができます。

コンパイラーは、COPYステートメントが指定されていると、先にこれを処理してから次のソース・プログラム内のREPLACEステートメントを処理します。COPYステートメントがある場合は、完全なソースを先に生成する必要があるためです。その後、REPLACEステートメントを使用して単純な文字列の置換が行われます。REPLACEステートメントは、内部にCOPYステートメントを含むことはできません。

READY TRACEあるいはRESET TRACEステートメントは、プロシージャの実行をトレースするために使用します。

READY TRACEとRESET TRACEステートメントは、一般的なステートメントが許可されるところに位置することができます。OFCOBOLでは、compile option --traceを介してREADY TRACEとRESET TRACEを使用することができます。

コンパイル時に、そのコンパイル・オプションを指定しないと、READY TRACEとRESET TRACEステートメントは無視されます。