SAME AS clause
The SAME AS clause causes a data item to inherit the same definition of another data item.
General format
SAME AS data-name-1.
Syntax rules
1. data-name-1 is a Data Item defined elsewhere in the same program.