*&---------------------------------------------------------------------*
*& Report z_barry_reverse *
*& *
*&---------------------------------------------------------------------*
REPORT z_barry_reverse NO STANDARD PAGE HEADING .
DATA: c1(20) TYPE c ,
c2(20) TYPE c.
c1 = 'ABCDEFGHIJK'.
CALL FUNCTION 'STRING_REVERSE'
EXPORTING
string = c1
lang = '1'
IMPORTING
rstring = c2
EXCEPTIONS
too_small = 1
OTHERS = 2.
WRITE c2.
阅读(694) | 评论(0) | 转发(0) |