메뉴 건너뛰기

SAP 한국 커뮤니티

문자열로 된 계산식의 결과값을 계산해주는 Function

양키(이경환) 2015.07.02 17:34 조회 수 : 4705 추천:1

DATA : LV_FORMULA  TYPE CHAR100,
       LV_VALUE    TYPE F,
       LV_RESULT   TYPE CHAR100,
       LV_RETCODE  LIKE SY-SUBRC,
       LV_MESSAGE  TYPE MSGTXT,
       LV_CALC_AMT TYPE P DECIMALS 2.

 

* Input Value
LV_FORMULA = '(10*5)/10+i'.

CONDENSE LV_FORMULA.
REPLACE ALL OCCURRENCES OF 'i' IN  LV_FORMULA WITH '1'.

 

* Check Fomula
CALL FUNCTION 'CHECK_FORMULA'
  EXPORTING
    FORMULA           = LV_FORMULA
  IMPORTING
    SUBRC             = LV_RETCODE
    MESSAGE           = LV_MESSAGE
  EXCEPTIONS
    ERROR_IN_FORMULA  = 1
    MISSING_PARAMETER = 2
    OTHERS            = 3.

CHECK LV_RETCODE IS INITIAL AND SY-SUBRC EQ 0.


* Eval Fomula
CALL FUNCTION 'EVAL_FORMULA'
  EXPORTING
    FORMULA                 = LV_FORMULA
  IMPORTING
    VALUE                   = LV_VALUE
  EXCEPTIONS
    DIVISION_BY_ZERO        = 1
    EXP_ERROR               = 2
    FORMULA_TABLE_NOT_VALID = 3
    INVALID_EXPRESSION      = 4
    INVALID_VALUE           = 5
    LOG_ERROR               = 6
    PARAMETER_ERROR         = 7
    SQRT_ERROR              = 8
    UNITS_NOT_VALID         = 9
    MISSING_PARAMETER       = 10
    OTHERS                  = 11.

 

* Write
LV_CALC_AMT = LV_VALUE.
WRITE: LV_CALC_AMT TO LV_RESULT STYLE CL_ABAP_FORMAT=>O_SIMPLE.
CONDENSE LV_RESULT.

WRITE : LV_RESULT.

이 게시물을
수정 삭제 목록
번호 제목 글쓴이 날짜 조회 수
387 Second index 생성시 MANDT 필드 필요 없다. [2] 모포 2012.05.08 6742
386 자주 사용하는 시스템변수 [8] 열공아밥 2009.12.20 6705
385 특수 문자 표현 [8] ecbase 2006.12.02 6677
384 BAPI_PR_CREATE 구매요청 생성시에 사용하세요. 이렇게도 쓸 수 있군요. [1] 노름마치 2007.12.10 6673
383 유용한 Abap Sample Package [2] 양키(이경환) 2014.03.31 6669
382 TABLE INDEX 추가 및 후속작업 [16] file 루베루베루베룹 2009.04.22 6653
381 LIKE (% _)의 사용법 [8] ecbase 2006.12.02 6631
380 Buffer Bypass 방법 [4] sapjoy 2010.05.20 6613
379 [Tip] Explorer 8.0 & SAP GUI 7.2 fancky 2011.05.19 6603
378 <img src=d.gif>[Function]Edit 팝업창을 뛰워보자[추천:e-abap] [19] file 양키 2010.09.28 6598
377 [Function]금액(숫자)를 영문철자로 바꿔보자 [3] file 양키 2010.09.28 6549
376 테이블 구조 다운로드 DD03L 테이블 조회 [1] sapjoy 2006.12.12 6538
375 SAP Icon 출력 [3] 홍성현 2007.08.09 6537
374 Nested loops Tunning [3] sapjoy 2012.03.13 6498
373 (-) 부호 값 앞에 붙이기 [6] 권장원 2009.11.06 6473
372 SAP의 On-line Program에서 Double Click Event 잡는 법 [8] Delight 2008.04.30 6450
371 Internal Table Read performance [4] file sapjoy 2012.03.12 6430
370 add 구문 [3] sapjoy 2006.12.02 6430
369 특정프로그램 내에서 프린터로 직접 프린트하는 함수 [8] 미쓰조 2010.03.17 6429
368 업로드할 엑셀 파일을 TXT 파일(탭으로 분리된)로 내리지 않고 엑셀파일로 꿀단지 2011.10.11 6373
쓰기 태그