Rational Developer for System z
Enterprise COBOL for z/OS バージョン 4.1 コンパイラーおよびランタイム 移行ガイド


INITIALIZE 動詞

以下の例を考えてください。
01  ALPHA  PIC AABAABAA.

INITIALIZE ALPHA REPLACING ALPHABETIC DATA BY ALL "3".
CMPR2 のもとでは、上記のようにコーディングされたステートメントは有効であり、初期設定が行 われます。しかし、NOCMPR2 のもとでは、このステートメントに関して以下の警告メッセージが出され、初期設定は 行われません。
IGYPS2047-W
「INITIALIZE」ステートメントの受け取り側の「ALPHA」は、「REPLACING」オペランドのデータ・カテゴリーと互換性がありませんでした。「ALPHA」は初期設定されませんでした。
この非互換は、項目のグループが初期設定されるときも発生する可能性があります。NOCMPR2 のもとでは、上記の ALPHA は英数字編集として分類されます。初期設定されるグループに ALPHA が定義されている場合、初期設定される英字項目がなかっ たときにのみ、上記のようなメッセージが出されます。したがって、以下の例では、ALPHA は初期設定されませんが、その事実を警告するメッセ ージは出されません。
01  GROUP1.
    05 ALPHA  PIC AABAA.
    05 BETA   PIC AAA.

INITIALIZE GROUP1 REPLACING ALPHABETIC DATA BY ALL "5".

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

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