파일의 경로를 입력하면, 그 파일명과 디렉토리를
딱 나누어줍니다. 괜찮죠?
REPORT YTEST .
DATA: FULLNAME LIKE RLGRAP-FILENAME,
FILENAME LIKE RLGRAP-FILENAME,
FILEPATH LIKE RLGRAP-FILENAME.
FULLNAME = 'C:temptest.txt'.
CALL FUNCTION 'SO_SPLIT_FILE_AND_PATH'
EXPORTING
FULL_NAME = FULLNAME
IMPORTING
STRIPPED_NAME = FILENAME
FILE_PATH = FILEPATH.
WRITE: / FILENAME,
FILEPATH.
댓글 3
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
102 | BAPI function List [3] | sapjoy | 2014.08.19 | 26693 |
101 | 유용한 날짜 펑션들....(펌) [17] | 하늘사랑 | 2007.07.04 | 16666 |
100 | 숫자 왼쪽의 0 없애기 [8] | ecbase | 2006.12.02 | 14885 |
99 | 환율관련 함수 [2] | 아밥뽀 | 2014.08.23 | 14159 |
98 | 반올림, 올림, 버림 Function [16] | SSong | 2007.11.20 | 11958 |
97 | 공휴일 체크 및 다음 휴일 구하기 [5] | ecbase | 2006.12.01 | 11103 |
96 | 문자인지 숫자인지 구분 [8] | ecbase | 2006.12.01 | 10671 |
95 | 현재 떠있는 화면에서 특정 필드의 값을 읽어오는 함수 및 방법 [8] | Delight | 2008.04.28 | 9938 |
94 | 유용한 Function 올려봅니다. [30] | 김지성 | 2007.04.17 | 9881 |
93 | 소수점 이하 체크 [5] | ecbase | 2006.12.02 | 9717 |
92 | Amount의 필드 값의 0을 삭제후 Char로 내보내기 [3] | 민버미꺼! | 2007.12.25 | 9617 |
91 | 프로그램실행시간 구하기 [16] | 쥬앙 | 2009.04.06 | 9317 |
90 | 이메일로 파일 보내는 함수 [3] | 열공아밥 | 2009.12.20 | 9279 |
89 | POPUP 함수(팝업) [11] | sapjoy | 2007.05.17 | 8776 |
88 | LDM 파일을 다운로드 하는 Function [1] | 양키 | 2012.08.08 | 8458 |
87 | [Function]오늘은 몇요일일까요? [4] | 양키 | 2010.09.29 | 8448 |
86 | tcode 권한체크 t-code authority check | sapjoy | 2013.05.21 | 8217 |
85 | ALV BUFFER CLEAR [3] | ecbase | 2006.12.02 | 8013 |
84 | [Function] 메세지 박스를 뛰워보자 [10] | 양키 | 2010.09.29 | 7929 |
83 | [부가세] Multi key 변환 펑션 [6] | 미소 | 2010.07.26 | 7857 |
찾아보니 이런 함수도 있군요...
FORM split_filename USING pv_filepath CHANGING pv_extension pv_filename.
DATA : lv_filepath TYPE dsvasdocid,
lv_directory TYPE dsvasdocid,
lv_extension TYPE dsvasdocid,
lv_filename TYPE dsvasdocid.
CLEAR : pv_extension, pv_filename,
lv_filepath, lv_directory, lv_extension, lv_filename.
CHECK pv_filepath NE space. "CHECK 조건이 True면 프로세스 진행 (False면 진행되지 않음)
lv_filepath = pv_filepath.
CALL FUNCTION 'DSVAS_DOC_FILENAME_SPLIT'
EXPORTING
pf_docid = lv_filepath
IMPORTING
pf_directory = lv_directory
pf_extension = lv_extension
pf_filename = lv_filename.
IF sy-subrc EQ 0.
"TRANSLATE 문자열 TO UPPER CASE : 대문자로 변환
"TRANSLATE 문자열 TO LOWER CASE : 소문자로 변환
TRANSLATE lv_extension TO UPPER CASE. "대문자로 변환
pv_extension = lv_extension.
pv_filename = lv_filename.
ENDIF.
ENDFORM. " SPLIT_FILENAME