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


図の説明: 組み込みマップの要約

この図では、データ宣言を含むソース行の右側にマップ情報のあるサンプル・ソース・リストが示されています。

次の例では、マップ情報の形式を示します。

121
64(0000016)

121 および 64 は、10 進数で表したデータ項目の長さです。 (0000016) は、ベース・ロケーター値の先頭からの 16 進変位です。

マップ情報には、UND、IMP、または EXT など、データ宣言に関するその他の情報を提供する特殊な定義記号を組み込むことができます。これらの記号については、図の後のメイン・テキストの注 (3) で説明されています。

次に、サンプル・ソース・リストからの抜粋を示します。

 000002                Identification Division.
 000004                Program-id.    EMBMAP.
 000176                Data division.
 000177                File section.
 000180                FD  COMMUTER-FILE
                      *Numbers in parentheses on the following line refer to explanations in the main text.
 000181                    record 80 characters.                                     (1)   (2)
 000182                  01 commuter-record.                                         80
 000183                    05 commuter-key                 PIC x(16).                16(0000000)
 000184                    05 filler                       PIC x(64).                64(0000016)
 000221         IA1620   01 print-record                   pic x(121).               121
 000227                Working-storage section.
 000228                  01 Working-storage-for-EMBMAP     pic x.                    1
 000230                  77 comp-code                      pic S9999 comp.           2
 000231                  77 ws-type                        pic x(3)   value spaces.  3
 000234                  01 i-f-status-area.                                         2
 000235                    05 i-f-file-status              pic x(2).                 2(0000000)
                      *The numbers in parentheses on the following line refers to an explanation in the main text.
 000236                      88 i-o-successful             value zeroes.    (3) IMP

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

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