2009년 8월 10일 월요일

숫자인지 체크하는 함수

  DATA : LV_VALUE(4)    TYPE C,
        LV_VALTYPE(
4)  TYPE C.



        CALL FUNCTION 'NUMERIC_CHECK'
         EXPORTING
          STRING_IN       = LV_VALUE
       
IMPORTING
*         STRING_OUT       =
          HTYPE            = LV_VALTYPE.



LV_VALUE에 값을 넣으면

LV_VALTYPE에 숫자면 NUMC이 나온다.



이때 LV_VALUE ',' '.' 들어가도 문자로 인식하므로,

REPLACE ALL OCCURRENCES OF ',' IN LS_MOD_CELLS-VALUE WITH ''. 요거 해주는센스~

 

댓글 없음:

댓글 쓰기