메뉴 건너뛰기

SAP 한국 커뮤니티



환율관련 함수

아밥뽀 2014.08.23 13:05 조회 수 : 14156

'CURRENCY_AMOUNT_DISPLAY_TO_SAP'  해당 통화의 금액을 DB에 저장할 때의 금액형태로 변경 
100 KRW -> 1.00 KRW 
100 USD -> 100.00 USD 


DATA : g_amt  TYPE p, 
          gr_amt TYPE p. 
CLEAR : g_amt, gr_amt. 


g_amt = 1000. 


WRITE :  / g_amt. 


CALL FUNCTION 'CURRENCY_AMOUNT_DISPLAY_TO_SAP' 
    EXPORTING 
          currency            = 'KRW' 
          amount_display  = g_amt 
    IMPORTING 
          amount_internal  = gr_amt 
    EXCEPTIONS 
          internal_error    = 1. 

  

WRITE :  / gr_amt, 'KRW' . 

  

CALL FUNCTION 'CURRENCY_AMOUNT_DISPLAY_TO_SAP' 
    EXPORTING 
          currency          = 'USD' 
          amount_display  = g_amt 
    IMPORTING 
          amount_internal = gr_amt 
    EXCEPTIONS 
          internal_error    = 1. 

  

WRITE :  / gr_amt, 'USD'. 


  

******************************************************* 
'CONVERT_TO_FOREIGN_CURRENCY' : Currency별 환율 컨버젼 함수 
해당일의 환율정보를 참조해서 Currency 별 금액을 바꿔주는 함수. 

  

DATA: l_dmbtr LIKE bseg-dmbtr, 
      l_rate  LIKE bkpf-kursf. 

  

CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY' 
    EXPORTING 
          date                  = sy-datum 
          foreign_currency = 'USD'    "FORIGN_CURRENCY 에는 결과치로 나올 Currency type 
          local_amount      = '1000' 
          local_currency    = 'KRW'    "LOCAL_CURRENCY 에는 입력되는 Currency type 
          type_of_rate        = 'M'        " 'M', 'BS', 'PL' 
          read_tcurr          =  'X' 
    IMPORTING 
          exchange_rate    = l_rate 
          foreign_amount  = l_dmbtr 
    EXCEPTIONS 
          no_rate_found    = 1 
          overflow        = 2 
          no_factors_found = 3 
          no_spread_found  = 4 
          derived_2_times  = 5 
          OTHERS          = 6. 

  

WRITE :  / '1USD =>' , l_rate, 'KRW' . 
WRITE :  / '1000KRW =>', l_dmbtr, 'USD'. 

  

*l_rate : 1USD가 몇 KRW 
*l_dmbtr : 1000 KRW -> 몇 USD
이 게시물을
수정 삭제 목록
번호 제목 글쓴이 날짜 조회 수
42 문자열에서 특정문자값을 기준으로 첫문자를 대문자로 변경 [8] file SAYA 2009.03.09 6277
41 [FUNCTION] - THUSRINFO , 현재 접속되어 있는 SAP 사용자 정보를 가져오는 펑션 [3] 미소 2011.10.13 6328
40 Online프로그램에서 조회조건 다중선택 관련 [6] file COMAN 2008.11.20 6363
39 앞에 위치하는 0(ZERO)없애는 평션 [12] ks 2011.03.16 6534
38 [PS-CJR2] BAPI_COSTACTPLN_POSTPRIMCOST [1] file poce 2007.12.26 6634
37 클래스 특성 리스트 가져 오기 최선 2011.11.08 6641
36 백그라운드 작업 관련 함수(batch job) [3] sapjoy 2007.03.02 6683
35 STRING 관련 함수 [3] sapjoy 2006.12.28 6752
34 Object 의 version 및 CTS history 가져오기 [3] 머리를쓰자 2015.03.19 6771
33 STRING_REPLACE 함수 문의 드립니다. [3] marco 2016.04.09 6888
32 DATE_CONVERT_TO_FACTORYDATE : 기준일의 최근 영업일 찾기 [4] file Wise 멘토 2013.11.14 6957
31 CSV 형식으로 파일변환 [2] 정두영 2007.09.12 6999
30 POPUP FUNCTION과 사용 예 [8] file cupycopy2000 2014.08.06 7020
29 암호화Function [9] Delight 2008.07.07 7056
28 Conversion routine 꿀단지 2011.10.11 7058
27 timestamp 시간변환 file sapjoy 2012.11.07 7251
26 call transaction 함수로 새로운 세션생성하기 [9] 아밥 잭 2009.10.28 7284
25 암호화 function [14] magicsy69 2008.06.03 7361
24 시간계산, time calc, timezone time stamp, [5] sapjoy 2012.02.09 7375
23 function 모음입니다. [5] 양파링 2007.11.02 7469
쓰기 태그