以下の MOVE 命令のバリアントは、c 型項目についてのみ機能します。
MOVE c1 TO c2 PERCENTAGE p [RIGHT].
左寄せした (RIGHT オプションを指定した場合は右寄せ) 項目 c1 の p パーセントが c2 にコピーされます。
p の値として 0 から 100 までの数値を指定することができます。f1 からコピーされる長さは、次の整数まで切り上げまたは切り下げされます。
命令に含まれる引数のいずれかが c 型ではない場合、パラメータ PERCENTAGE は無視されます。
DATA c1(10) TYPE c VALUE 'ABCDEFGHIJ',
c2(10) TYPE c.
MOVE c1 TO c2 PERCENTAGE 40.
WRITE c2.
MOVE c1 TO c2 PERCENTAGE 40 RIGHT.
WRITE / c2.
出力
ABCD
ABCD