19.
あるフィールドと同じ長さ・属性のフィールドを定義する
*LIKE DEFN
を使用すれば、元のフィールドと同じ長さ、属性のフィールドを新たに定義することができる。
元のフィールドの長さが将来変わる可能性があっても、
*LIKE DEFN
で定義しておけば、再コンパイルだけで対応できる。
0120.00 C MOVE JUCNO HED001 0121.00 C *LIKE DEFN JUCNO HED001