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