新しいコンパイラーは、AREA の INITIAL 属性を無視します。このため、AREA の INITIAL 文節は代入ステートメントに変換する必要があります。
例えば、次のコード・フラグメントの中で、 配列のエレメントは a1、a2、a3、および a4 に初期化されません。
dcl (a1,a2,a3,a4) area;
dcl a(4) area init( a1, a2, a3, a4 );
ただし、コードを次のように書き換えれば、配列は希望どおりに 初期化されます。
dcl (a1,a2,a3,a4) area;
dcl a(4) area;
a(1) = a1;
a(2) = a2;
a(3) = a3;
a(4) = a4;
コンパイラーは、メッセージ IBM1196 を出力して、INITIAL 属性を持つ AREA の宣言にフラグを立てます。