문자열 삭제 숫자만 남기기

data: lv_slen type i.
data: lv_cnt type i.
if wd_comp_controller->mv_empno cn'1234567890'.
lv_slen = strlen( wd_comp_controller->mv_empno ).
do lv_slen times.
lv_cnt = sy-index- 1.
if wd_comp_controller->mv_empno+lv_cnt(1) cn '1234567890'.
wd_comp_controller->mv_empno+lv_cnt(1) = ''.
endif.
enddo
condense wd_comp_controller->mv_empno no-gaps.
endif.