宣言部分

USE BEFORE REPORTING文は、指定された報告書グループが生成される直前に、手続き部の宣言部分にあるセクション（以下、USE BEFORE REPORTINGセクション）が自動で実行されるようにします。

USE BEFORE REPORTINGセクションには、報告書作成プログラムで使用されるINITIATE、GENERATE、TERMINATEステートメントが含まれてはなりません。

USE BEFORE REPORTINGセクションを記述するために、該当するグループにレベル01のデータ名があるか確認して報告書グループ名として参照します。

USE BEFORE REPORTINGセクションは他のセクションをPERFORMできます。一般的に宣言部分にある他のセクションを実行できます。このような目的でUSEステートメントがない宣言部分内に追加セクションを記述できます。また、手続き部のメインラインにあるセクションをPERFORMできます。

以下の例では、2つの報告書グループのうち1つを作成しようとするときに実行する1つのセクションを記述する方法を示しています。

報告書グループの1つにUSE BEFORE REPORTINGセクションがある場合、報告書作成プログラムは報告書グループを処理する間にこのセクションを暗黙的に実行します。

報告書に可能なすべての機能があると仮定したら、以下のような場合にセクションが暗黙的に実行されます。

グループの出力を防止するために、USE BEFORE REPORTING文にSUPPRESS PRINTINGステートメントやMOVE 1 TO PRINT-SWITCHを含むことができます。

USE BEFORE REPORTINGセクションはANS-68およびANS-74 COBOL報告書作成プログラムでよく使用されました。該当する機能の多くは、現在PRESENT WHEN節とPRESENT AFTER節によって実行されますが、以下のような機能は継続して使用できます。

DEBUGGINGセクションは、ネストされたプログラムで使用されるプロシージャでは動作せず、最外部のプログラムのプロシージャでのみ動作します。

DEBUGGINGセクションを有効にするには、環境部の構成セクションのSOURCE-COMPUTER段落にWITH DEBUGGING MODEを指定する必要があります。

すべてのDEBUGGING文は、DECLARATIVESキーワードのすぐ後に作成します。

以下は、DEBUGGINGセクションの設定項目についての説明です。

宣言部分にDEBUGGINGセクションを宣言すると、DEBUG-ITEM特殊レジスターが生成されます。