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.

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

原创文章,作者:Maggie-Hunter,如若转载,请注明出处:https://blog.ytso.com/18622.html

(0)
上一篇 2021年7月19日
下一篇 2021年7月19日

相关推荐

发表回复

登录后才能评论