*&---------------------------------------------------------------------*
*& Report Z99_48
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z99_48.

*" ABAP 7.40 릴리즈 이전
PARAMETERS P_CURR TYPE S_CURRCODE.
DATA LV_CURR_TXT TYPE CHAR10.

CASE P_CURR.
  WHEN 'USD'.
    LV_CURR_TXT = '달러'.
  WHEN 'KRW'.
    LV_CURR_TXT = '원화'.
  WHEN OTHERS.
    LV_CURR_TXT = '미등록통화'.
ENDCASE.

CL_DEMO_OUTPUT=>DISPLAY( LV_CURR_TXT ).

**" ABAP 7.40 릴리즈 이후
*PARAMETERS P_CURR TYPE S_CURRCODE.
*
*DATA(LV_CURR_TXT) = SWITCH #( P_CURR
*                        WHEN 'USD' THEN '달러'
*                        WHEN 'KRW' THEN '원화'
*                        ELSE '미등록통화' ).
*
*CL_DEMO_OUTPUT=>DISPLAY( LV_CURR_TXT ).