把字符串类型（alphanumeric)A MOVE给另一个字符串类型B通过有3种情况。
MOVE A TO B
第一种情况，两者的长度一样，没什么好说的；
第二种情况，A要比B长，原则是左对齐，多出的部分被截断；
第三种情况，A要比B短，原则也是左对齐，少的部分补空格（X'40'）。
例：
---1----+----2----+----3----+----4----+----5--
05 WS-CHAR1 PIC X(7) VALUE 'ABCDEFG'.
05 WS-CHAR2 PIC X(5).
05 WS-CHAR3 PIC X(3) VALUE '123'.
*LONG TO SORT
MOVE WS-CHAR1 TO WS-CHAR2
DISPLAY WS-CHAR2
*SORT TO LONG
MOVE WS-CHAR3 TO WS-CHAR2
DISPLAY WS-CHAR2
结果：
ABCDE
123bb b表示空格（x'40'）