Assignment Between Structure and Single Field I
*-------------------------------------------------------------
* MOVE: structure <-> single field
*-------------------------------------------------------------
report ZCH_UNIEXP_5.
data: begin of STRUC,
YEAR(4) type n,
MONTH(2) type n,
DAY(2) type n,
F4 type p,
end of STRUC,
DATE type d.
* Before Unicode enabling
* date = struc. <---- Unicode error
* After Unicode enabling
date = struc(8).