ABAP字符串翻转

就这个函数STRING_REVERSE

略显蛋疼,好搞那么复杂。。。。

简单的转换嘛:

FUNCTION ZSTRING_REVERSE.
*"----------------------------------------------------------------------
*"*"本地接口:
*"  IMPORTING
*"     REFERENCE(STRING)
*"  EXPORTING
*"     REFERENCE(RSTRING)
*"----------------------------------------------------------------------
  DATA:LV_I TYPE I.
  DATA:LV_J TYPE I.

  LV_I = STRLEN( STRING ).

  DO LV_I TIMES.
    CONCATENATE STRING+LV_J(1) RSTRING INTO RSTRING.
    LV_J = LV_J + 1.
  ENDDO.

ENDFUNCTION.

自己随便写了个,感觉比那个简单,方便,迅速。。。

原文地址:https://www.cnblogs.com/sapSB/p/6038032.html