需求:
有主数据ZPLANT,取自工厂描述的一部分,用'-'隔开,比如"工厂A-北京",ZPLANT只需要"工厂A"。
怎么解决呢:
写在Start Routine里,
DATA:
Z_RES_WA TYPE MATCH_RESULT,
Z_RES_TAB TYPE MATCH_RESULT_TAB,
Z_DATA TYPE _ty_s_SC_1,
Z_OFFSET TYPE I.
LOOP AT SOURCE_PACKAGE INTO Z_DATA.
IF Z_DATA-WERKS(1) <> 'A'.
FIND ALL OCCURRENCES OF REGEX '-' IN Z_DATA-TXTMD RESULTS
Z_RES_TAB.
LOOP AT Z_RES_TAB INTO Z_RES_WA.
Z_DATA-TXTMD = Z_DATA-TXTMD(Z_RES_WA-OFFSET).
ENDLOOP.
MODIFY SOURCE_PACKAGE FROM Z_DATA.
ELSE.
DELETE SOURCE_PACKAGE WHERE WERKS = Z_DATA-WERKS.
ENDIF.
ENDLOOP.
这里了利用了:
FIND ALL OCCURRENCES OF REGEX '-' IN Z_DATA-TXTMD RESULTS
Z_RES_TAB.
这里的RESULTS放在类型为MATCH_RESULT_TAB的表里。
表的行项目为MATCH_RESULT。
有如下参数:
这里说说OFFSET,就是偏移量,想截取,只需要STRING(OFFSET)就哦了~
然后截取完了赋值,赋值完了修改内表,over。