COBCH1980 Location of DYNAMIC LENGTH item cannot be affected by prior OCCURS DEPENDING item

ODOSLIDE 指令が有効な状態で、OCCURS DEPENDING ON グループに DYNAMIC LENGTH 項目が指定されています。

ODOSLIDE 指令が有効な場合、サイズが変わる可能性があるテーブルの従属項目として動的項目を設定することはできません。これは、テーブルのサイズに応じて発生する可能性がある動的項目の割り当てメモリの移動が許容されないためです。次の例では、動的項目を移動または削除するか、ODOSLIDE 指令を削除する必要があります。

      $SET ODOSLIDE
       1 dpd1 PIC 9(9) COMP.
       1 grp1.
         03 a1 OCCURS 1 TO 10 DEPENDING ON dpd1 PIC X.
         03 d1 PIC X DYNAMIC.