data f1(4) value 1ABCD'
f1
A
B
C
D
move f1 to fs1.
c1 c2 c3
data begin of fs1, c1(1),
C2(2),
C3(1), end of fs1.