본문 바로가기
ABAP

알고 있으면 유용한 Syntax

by clode 2023. 2. 21.
728x90
반응형

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 CHECK

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  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'.

MESSAGE E000(ZMM01) WITH LV_LGORT.

나누기

SPLIT L_DATE_SPLIT AT '/' INTO L_DATE L_MONTH L_YEAR.
728x90
반응형

'ABAP' 카테고리의 다른 글

OLE  (0) 2023.02.21
금액 텍스트 변환 Function  (0) 2023.02.21
ALV Drop down list  (0) 2023.02.21
Working day function  (0) 2023.02.21
ALV Top-of-Page  (0) 2023.02.21

댓글