ABAP 替换字符串中最后一次出现的字符

场景：需要将最后一个出现的字符替换成某个字符，如A23A3，将最后一次出现的A替换为01.

DATA: text TYPE char100,
      moff TYPE i,
      mlen TYPE i,
      mcnt TYPE i.
text = `A23A3`.

WRITE / '转换前:' && text.
FIND ALL OCCURRENCES OF 'A'
     IN text
       MATCH OFFSET moff
       MATCH LENGTH mlen
  "会发生2次匹配
       MATCH COUNT  mcnt.
WRITE: / | 出现位置和长度：  { moff } { mlen } |.

REPLACE  'A' IN
SECTION OFFSET  moff LENGTH mlen OF
text WITH '01'.

WRITE / '转换后:' && text.