자재뒤에서 몇번째 1자리 캐릭터 가져오기

ZPP_GETCHAR_SHIFT_LEFT Description:

function zpp_getchar_shift_left. *"---------------------------------------------------------------------- *"*"Local Interface: *" IMPORTING *" REFERENCE(I_MATNR) TYPE MATNR *" REFERENCE(I_LEFT) TYPE I *" EXPORTING *" REFERENCE(E_CHAR) TYPE CHAR1 *"---------------------------------------------------------------------- * Global data declarations   data: lv_char(16),         lv_cnt type i.   clear: lv_char.   lv_char = i_matnr.   condense lv_char.   lv_cnt = strlen( lv_char ).   lv_cnt = lv_cnt - i_left.   shift lv_char left by lv_cnt places.   clear: e_char.   e_char = lv_char+0(1). endfunction.