拆分拼接的Excel位置，如A11拆分成A和11，即A列11行

来源：互联网发布：sem和seo利与弊端编辑：程序博客网时间：2024/06/08 06:03

*"----------------------------------------------------------------------*"*"本地接口：*"  IMPORTING*"     REFERENCE(IV_STRING) TYPE  STRING*"  EXPORTING*"     REFERENCE(EV_STRING_CHAR) TYPE  STRING*"     REFERENCE(EV_STRING_NUM) TYPE  STRING*"----------------------------------------------------------------------  DATA : nums TYPE string VALUE '0123456789'.  DATA : len TYPE i.  DATA : pos TYPE i.  len = strlen( iv_string ).  pos = 0.  WHILE pos LT len.    IF iv_string+pos(1) CA nums.      CONCATENATE ev_string_num iv_string+pos(1) INTO ev_string_num.      CONDENSE ev_string_num NO-GAPS.    ELSE.      CONCATENATE ev_string_char iv_string+pos(1) INTO ev_string_char.      CONDENSE ev_string_char NO-GAPS.    ENDIF.    pos = pos + 1.  ENDWHILE.

阅读全文

0 0