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


図の説明: DATA DIVISION マップ

この図には、MAP オプションのサンプル・コンパイラー・リストが示されています。 MAP オプションは、ファイル定義、データ定義、属性コード、長さ、データ型を示す DATA DIVISION のマップを生成します。

次に、属性コードとその意味を示します。

次の表には、サンプル・リストの 3 つの行が示されています。

表 124. 定様式 DATA DIVISION マップ
ソース行 ID 階層とデータ名 長さ (変位) データ型 データ定義属性
180 FD COMMUTER-FILE   ファイル INDX
182 1 COMMUTER-RECORD 80 グループ  
189 2 COMMUTER-KEY-MST 16(0000000) Display  

完全なサンプル・リストを次に示します。括弧内の数値は、メイン・テキスト内の図の後の説明に対応しています。見出しをスキップする場合は、180 または COMMUTER-FILE を検索してください。 ブラウザーの「戻る」ボタンを使用すると、いつでもメイン・テキストに戻ることができます。

 Data Division Map
 (1)
 Data Definition Attribute codes (rightmost column) have the following meanings:
     D = Object of OCCURS DEPENDING    G = GLOBAL                             LSEQ= ORGANIZATION LINE SEQUENTIAL
     E = EXTERNAL                      O = Has OCCURS clause                  SEQ= ORGANIZATION SEQUENTIAL
     VLO=Variably Located Origin       OG= Group has own length definition    INDX= ORGANIZATION INDEXED
     VL= Variably Located              R = REDEFINES                          REL= ORGANIZATION RELATIVE

 (2)      (3) (4)                                            (5)      (6)         (7)           (8)
 Source   Hierarchy and                                                                        Data Def
 LineID   Data Name                                        Length(Displacement) Data Type      Attributes
      4  PROGRAM-ID IGYTCARA----------------------------------------------------------------------------------*
    180   FD COMMUTER-FILE                                                     File            INDX
    182   1  COMMUTER-RECORD                                      80           Group
    183     2  COMMUTER-KEY                                       16(0000000)  Display
    184     2  FILLER                                             64(0000016)  Display
    186   FD COMMUTER-FILE-MST                                                 File            INDX
    188   1  COMMUTER-RECORD-MST                                  80           Group
    189     2  COMMUTER-KEY-MST                                   16(0000000)  Display
    190     2  FILLER                                             64(0000016)  Display
    192   FD LOCATION-FILE                                                     File            SEQ
    203   FD UPDATE-TRANSACTION-FILE                                           File            SEQ
    208   1  UPDATE-TRANSACTION-RECORD                                         80           Display
    216   FD PRINT-FILE                                                        File            SEQ
    221   1  PRINT-RECORD                                        121           Display
    228   1  WORKING-STORAGE-FOR-IGYCARA                           1           Display

図の説明の終わり。


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

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