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


ある特定テーブル・エレメントのすべての出現の初期化

テーブル・エレメントのデータ記述の VALUE 文節を使用して、 そのエレメントのすべてのインスタンスを指定の値に初期化することができます。

01  T2.
    05 T-OBJ                   PIC 9   VALUE 3.
    05 T OCCURS 5 TIMES
           DEPENDING ON T-OBJ.
       10 X                    PIC XX  VALUE “AA”.
       10 Y                    PIC 99  VALUE 19.
       10 Z                    PIC XX  VALUE “BB”.

例えば、この場合はすべての X エレメント (1 から 5) が AA に初期化され、すべての Y エレメント (1 から 5) が 19 に初期化され、すべての Z エレメント (1 から 5) が BB に初期化されます。その後、T-OBJ が 3 に設定されます。

関連タスク
可変長テーブルへの値の割り当て

関連参照
OCCURS 文節 (「COBOL for Windows 言語解説書」)


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

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