以下は、コードに直接最後の文字列を取得する方法について説明します。
1
2
3
4
5
6
7
8
9
10
11
|
REPORT ztest_shift.
DATA:l_number(10) TYPE c VALUE '12345678F',
l_len TYPE i,
l_off TYPE i,
l_ret(10) TYPE c.
l
_len = strlen( l_number ).
l
_len = l_len - 1.
l
_ret = l_number+l_len(1).
WRITE:l_number, / l_ret.
|
実行した後: