abap 大小写转换

REPORT ZEXAMPLE.

DATA: V_HEAD(10), V_TAIL(10).

PARAMETERS: P_STR(20),

            P_DEM.

CALL FUNCTION 'STRING_UPPER_LOWER_CASE'

     EXPORTING

          DELIMITER = P_DEM

          STRING1   = P_STR

     IMPORTING

          STRING    = P_STR

     EXCEPTIONS

          NOT_VALID = 1

          TOO_LONG  = 2

          TOO_SMALL = 3

          OTHERS    = 4.

IF SY-SUBRC EQ 0.

  WRITE:/ P_STR.

ELSE.

  WRITE:/ 'ERROR CONVERTING STRING'.

ENDIF.