.
Create dynamic work area and assign to FS
CREATE DATA gf_line LIKE LINE OF .
CREATE DATA gf_line1 LIKE LINE OF