下面介绍一个取得字符串最后一位的方法，直接上代码：
|
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. |
运行后：
以上。
2017-08-31 3:31 上午
2017-08-31 8:14 上午