MOVE 不同类型之间
MOVE截断
X类型是左对齐,9类型是右对齐
不同类型的数据之间进行MOVE的时候,先进行数据类型转换。 例如,MOVE 9(5) TO X(6), 先把9(5)转换成X(5),再赋值给X(6)。
例:
结果:'12345'
01 A pic X(5) VALUE "12345"; 01 B pic 9(6); MOVE A TO B; DISPLAY B;
结果:012345
01 A pic 9(5) VALUE 12345; 01 B pic X(6); MOVE A TO B; DISPLAY B;
结果:'12345 '