Teile von Zeichenketten zuweisen
Die folgende Variante der MOVE-Anweisung funktioniert nur bei Feldern des Typs C:
MOVE <c1> TO <c2> PERCENTAGE <p> [RIGHT].
Der Prozentsatz <p> des Feldes <c1> wird von der linken Seite links- oder rechtsbündig (falls mit der Option RIGHT angegeben) nach <c2> kopiert.
Der Wert von
<p> kann eine Zahl zwischen 0 und 100 sein. Die von <f1> zu kopierende Länge wird auf die nächste Ganzzahl auf- oder abgerundet.Wenn eines der Argumente der Anweisung nicht den Typ C hat, wird der Parameter PERCENTAGE ignoriert.
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.
Listenausgabe:
ABCD
ABCD
