REPORT ZSTRU01_2.
data: begin of wa1,
carrid type spfli-carrid value 'aa',
connid type spfli-connid value '0017',
fldate type d value '20090822',
end of wa1.
data wa2 like wa1.
move wa1 to wa2.
data: begin of wa1,
carrid type spfli-carrid value 'aa',
connid type spfli-connid value '0017',
fldate type d value '20090822',
end of wa1.
data wa2 like wa1.
move wa1 to wa2.
data: begin of wa2,
carrid type spfli-carrid ,
connid type spfli-connid ,
name(8) type c,
end of wa2.
move wa1 to wa2.//wa1还是能全赋值,但是我们要对字段名相同的赋值,不同不赋值 move-corresponding wa1 to wa2.
write wa2.
carrid type spfli-carrid ,
connid type spfli-connid ,
name(8) type c,
end of wa2.
move wa1 to wa2.//wa1还是能全赋值,但是我们要对字段名相同的赋值,不同不赋值 move-corresponding wa1 to wa2.
write wa2.
转载于:https://blog.51cto.com/lijun050802/195515