Rational Developer for System z
COBOL for Windows バージョン 7.5 プログラミング・ガイド


例: SYSADATA

次の例に、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 レコード記述


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

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