안녕하세요.
STRING_REPLACE 함수는 보통 특정 문자열을 찾아 제거 하는데 사용합니다.
다른문자열이나 특수 문자열은 다 제거되는데... 점('.') 은 제거가 되지 않아 궁금하여 문의드립니다
저만그런건지.. ^^;
다른 함수나 방법은 없는지 문의드립니다.
DATA: T_TEXT(30) VALUE '031-370-9164',
CALL FUNCTION 'STRING_REPLACE'
EXPORTING
PATTERN = '-' " 변경할 문자열 (그런데 '.' 으로 하면 안되네요..)
SUBSTITUTE = '' " 변경될 문자열
* MAX_REPLACES = 0
* importing
* number_of_replaces = numberofreplaces
CHANGING
TEXT = T_TEXT " 문자열이 들어있는 문장
EXCEPTIONS
WRONG_STRING_LENGTH = 1
OTHERS = 2.
T_TEXT : ‘0313709164’
댓글 3
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
102 | (-)부호를 앞으로 바꿔주는 함수입니다 [13] | ecbase | 2006.12.01 | 4842 |
101 | 공휴일 체크 및 다음 휴일 구하기 [5] | ecbase | 2006.12.01 | 11089 |
100 | 문자인지 숫자인지 구분 [8] | ecbase | 2006.12.01 | 10667 |
99 | 소수점 이하 체크 [5] | ecbase | 2006.12.02 | 9714 |
98 | 숫자 왼쪽의 0 없애기 [8] | ecbase | 2006.12.02 | 14816 |
97 | ALV BUFFER CLEAR [3] | ecbase | 2006.12.02 | 8011 |
96 | SELECT 구문을 사용하지 않고 데이터 가져오는 방법 [13] | sapjoy | 2006.12.04 | 7611 |
95 | R/3 접속자에게 메세지 보내기 [12] | sapjoy | 2006.12.05 | 6196 |
94 | STRING 관련 함수 [3] | sapjoy | 2006.12.28 | 6743 |
93 | background 관련 함수 [1] | sapjoy | 2006.12.28 | 4621 |
92 | 도메인 고정 값 read [2] | sapjoy | 2007.02.11 | 5375 |
91 | 백그라운드 작업 관련 함수(batch job) [3] | sapjoy | 2007.03.02 | 6681 |
90 | IP를 가져오는 함수 [3] | sapjoy | 2007.03.09 | 4247 |
89 | 현재 떠있는 화면에서 특정 필드의 값을 읽어오는 함수. [7] | 나침반친구 | 2007.03.13 | 4508 |
88 | FUNCTION MODULES [27] | sapjoy | 2007.03.29 | 4485 |
87 | FUNCTION 모음 [3] | 명신용 | 2007.04.03 | 6194 |
86 | IP를 가져오는 클래스 메소드 및 함수 [6] | sapjoy | 2007.04.04 | 4931 |
85 | SEARCH HELP FUNCTION 이용한 예제 [2] | 이종원 | 2007.04.06 | 5334 |
84 | 유용한 Function 올려봅니다. [30] | 김지성 | 2007.04.17 | 9878 |
83 | function 날짜 정합성 점검 [5] | senk | 2007.04.20 | 5833 |
DATA : t_text(30) TYPE c VALUE '031.370.9164'.
PERFORM char_replace USING '.' '' CHANGING t_text.
CONDENSE t_text NO-GAPS.
FORM char_replace USING pv_pattern "변경 전 문자
pv_substitute "변경 후 문자
CHANGING pv_text.
DATA : lv_length TYPE i.
CLEAR : lv_length.
CHECK : pv_pattern IS NOT INITIAL,
pv_text IS NOT INITIAL,
pv_pattern NE pv_substitute.
lv_length = STRLEN( pv_text ).
IF lv_length GT 0.
DO lv_length TIMES.
REPLACE pv_pattern WITH pv_substitute INTO pv_text.
ENDDO.
ENDIF.
ENDFORM. " CHAR_REPLACE