<ABAP> 문자 체크 (CHAR CHECK) 로직.

    DATA: lv_type                        TYPE dd01v-datatype,
        lv_char3(3)                    TYPE c.

 

      SELECT 번호 INTO CORRESPONDING FIELDS OF TABLE ITAB
      FROM DB
     WHERE ticket_no LIKE 번호형식.

    IF sy-subrc = 0.
      SORT ITAB BY 번호형식 DESCENDING.  큰 문자(혹은문자)가 맨 위로

      LOOP AT ITAB

       ASSIGNING <ITAB>.

        CLEAR:
          lv_char3,
          lv_type.

        lv_char3 = <ITAB>-번호+5(3).   " max. seq.

        CALL FUNCTION 'NUMERIC_CHECK'
          EXPORTING
            string_in = lv_char3
          IMPORTING
            htype     = lv_type.

        IF lv_type = lc_char. "'CHAR'.   문자라면 다음 LOOP 실행
          CONTINUE.
        ELSE.
          lv_번호 = lv_char3.      숫자라면 LOOP를 나감.
          EXIT.
        ENDIF.
      ENDLOOP.

 

 

숫자일 경우를 찾아서 해당 숫자에 + 1을 하기 위해서 만든 로직.

위 펑션으로 숫자인지 문자인지를 체크할 수가 있다. 리턴코드 값은

'CHAR'로 나온다. 연습해보긔