ABAP中将Unicode字符串转换成中文的方法

以下为示例代码：

DATA: LV_UNICODE TYPE STRING,           "Unicode字符串

      LV_CHINESE TYPE STRING.           "转换后的中文字符串

DATA: LT_TABLE TYPE TABLE OF CHAR04.    "拆分Unicode字符串后的内表

 

LV_UNICODE = 'u6fb3u5927u5229u4e9au897fu90e8u6d77u57df'.

SPLIT LV_UNICODE AT 'u' INTO TABLE LT_TABLE.

 

CLEAR: LV_CHINESE.

LOOP AT LT_TABLE INTO DATA(LS_TABLE).

  IF STRLEN( LS_TABLE ) = 4.

    TRANSLATE LS_TABLE TO UPPER CASE.

    LV_CHINESE = LV_CHINESE && CL_ABAP_CONV_IN_CE=>UCCP( LS_TABLE ).

  ENDIF.

ENDLOOP.

 

WRITE: LV_CHINESE.

 

输出结果：澳大利亚西部海域