以下の例は、COBOL プログラムのリストの一部を示しています。 この COBOL プログラムを ADATA オプションを使用して コンパイルした場合には、関連データ・ファイルに生成されるレコードは、次の表に示す順序で記述されます。
000001 IDENTIFICATION DIVISION. AD000020 000002 PROGRAM-ID. AD04202. AD000030 000003 ENVIRONMENT DIVISION. AD000040 000004 DATA DIVISION. AD000050 000005 WORKING-STORAGE SECTION. AD000060 000006 77 COMP3-FLD2 pic S9(3)v9. AD000070 000007 PROCEDURE DIVISION. AD000080 000008 STOP RUN.
| タイプ | 説明 |
|---|---|
| X'0120' | EVENTS タイム・スタンプ・レコード |
| X'0120' | EVENTS プロセッサー・レコード |
| X'0120' | EVENTS ファイル ID レコード |
| X'0120' | EVENTS プログラム・レコード |
| X'0001' | ADATA 識別レコード |
| X'0000' | ジョブ識別レコード |
| X'0010' | オプション・レコード |
| X'0038' | ステートメント 1 のソース・レコード |
| X'0038' | ステートメント 2 のソース・レコード |
| X'0038' | ステートメント 3 のソース・レコード |
| X'0038' | ステートメント 4 のソース・レコード |
| X'0038' | ステートメント 5 のソース・レコード |
| X'0038' | ステートメント 6 のソース・レコード |
| X'0038' | ステートメント 7 のソース・レコード |
| X'0038' | ステートメント 8 のソース・レコード |
| X'0020' | AD04202 の外部シンボル・レコード |
| X'0044' | STOP の記号相互参照レコード |
| X'0044' | COMP3-FLD2 の記号相互参照レコード |
| X'0044' | AD04202 の記号相互参照レコード |
| X'0042' | AD04202 の記号レコード |
| X'0042' | COMP3-FLD2 の記号レコード |
| X'0090' | 統計レコード |
| X'0120' | EVENTS ファイル終わりレコード |
関連参照
SYSADATA レコード記述