자주 까먹는 구문 구문들!!

STRING 의 LENGTH 구하기

L_LEN = STRLEN( L_STRING ).

COMMA (,) , 다른 표시들 교체 할때 쓰는

  REPLACE '$' WITH '' INTO L_MONEY.

공백 제거

  CONDENSE L_MONEY NO-GAPS.

앞자리 0 채우기

  CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
    EXPORTING
      INPUT  = P_DATA1
    IMPORTING
      OUTPUT = P_DATA2.

0빼기

  CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
    EXPORTING
      INPUT  = P_DATA1
    IMPORTING
      OUTPUT = P_DATA2.

NUMERIC CHEK 

*&---------------------------------------------------------------------*
*&      Form  NUMC_CHK
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_GT_EXCEL_EXCEL_01  text
*      <--P_L_TYPE  text
*----------------------------------------------------------------------*
FORM NUMC_CHK  USING    P_DATA
               CHANGING P_TYPE.

  CLEAR P_TYPE.

  CALL FUNCTION 'NUMERIC_CHECK'
    EXPORTING
      STRING_IN = P_DATA
    IMPORTING
      HTYPE     = P_TYPE.
ENDFORM.                    " NUMC_CHK

RETURN = CHAR, NUMC

*&& 파일 명과 경로 알아내기 

*&---------------------------------------------------------------------*
*&      Form  GET_FILENAME
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_P_DIR  text
*      <--P_L_NAME  text
*      <--P_''  text
*----------------------------------------------------------------------*
FORM GET_FILENAME  USING    P_DIR
                   CHANGING P_NAME
                            P_PATH.

  DATA: L_FULLNAME LIKE RLGRAP-FILENAME,
        L_FILENAME LIKE RLGRAP-FILENAME,
        L_FILEPATH LIKE RLGRAP-FILENAME.

  L_FULLNAME = P_DIR.

  CALL FUNCTION 'SO_SPLIT_FILE_AND_PATH'
    EXPORTING
      FULL_NAME     = L_FULLNAME
    IMPORTING
      STRIPPED_NAME = L_FILENAME
      FILE_PATH     = L_FILEPATH.

  P_NAME = L_FILENAME.
  P_PATH = L_FILEPATH.

ENDFORM.                    " GET_FILENAME

메세지

MESSAGE E000 WITH 'There is no selected data.'.

MESSAGE S000(ID) WITH 'TEXT'.

나누기

SPLIT L_DATE_SPLIT AT '/' INTO L_DATE L_MONTH L_YEAR.