NOINIT

NOINIT is a storage attribute used to ignore any INITIAL attributes.

The NOINIT attribute can be used with the LIKE attribute to inherit all the substructuring from an existing variable declared using LIKE, but without any of its INITIAL values.

The NOINIT attribute is valid only on level-1 structures.

This example declares a new variable that inherits all the substructuring from an existing variable using NOINIT to ignore any INITIAL attributes.

dcl 1 s1,
    2 i fixed bin (31) init(88),
    2 j fixed bin (31) init(99);

dcl s2 like s1 noinit;