ABAP 选择 - 使用尾随星号的模式匹配

Question

假设我有一个支持通配符的Z表，如下所示：

例如，D123应该设置标志，D124匹配D12*因此不应设置标志，而D234匹配D***所以应设置标志。星号只能出现在字符串尾部（或****），因此你不能在表中存储类似**2*的模式。

然后，我想从一个仓库列表中对该表进行查询。我可以先将所有内容都选入内部表，然后再进行模式匹配，但我想知道是否有更有效率的方法，比如单个查询就能完成这个任务？

Imanou Petit · Answer

我目前不知道有哪种方法可以直接反向进行这种模式匹配操作。

如果你不想读取整个数据库，你可以创建一个可能匹配的所有值的范围。由于你指定了星号只能出现在末尾，因此需要查找的条目数量不会太多。下面是一个生成匹配范围的示例代码：

data: lv_depot type char4. "要搜索的仓库
data: lr_depot type range of char4. "所有可能匹配仓库的模式范围

data: lv_len type i.
data: lv_stars type char4.
data: lv_low type char4.

lv_depot = 'D123'.

do strlen( lv_depot ) + 1 times.
  lv_len = strlen( lv_depot ) - sy-index + 1.
  if lv_len > 0.
    lv_low = lv_depot(lv_len) && lv_stars.
  else.
    lv_low = lv_stars.
  endif.

  append value #( sign = 'I' option = 'EQ' low = lv_low ) to lr_depot.
  lv_stars = lv_stars && '*'.
enddo.

"执行查询时，可以按照仓库字段降序排序结果，以便找到末尾星号最少的记录（假定你的仓库值只包含字母和数字，并且星号在它们之前）：
data: ls_test type ztestmk.
select * from ztest into ls_test
    up to 1 rows
    where depot in lr_depot
    order by depot descending.
  exit.
endselect.

Levon · Answer

您可以反转选择顺序，首先从自定义的“模式表”开始选择，然后使用该表来选取匹配的仓库列表。首先，将所有“仓库模式”按flag字段分组，然后执行两次选择操作。之后，根据结果表适当设置两个表的flag标志。

利用+字符替换自定义表中的*字符来构建用于选择操作的范围，这遵循了SAP ABAP文档中的说明（参考链接：https://help.sap.com/doc/abapdocu_752_index_htm/7.52/en-us/abenwhere_logexp_seltab.htm）。

以下是相关示例代码：

TYPES: BEGIN OF condition,
         depot TYPE depot,
         flag  TYPE abap_bool,
       END OF condition.

DATA conditions TYPE STANDARD TABLE OF condition WITH EMPTY KEY.
" 仅作为示例，您将通过查询得到此表的数据
conditions = VALUE #( ( vpsta = 'D***' ) ).

DATA range_flagged TYPE RANGE OF depot.
" 构建范围表，将 '*' 替换为 '+'
range_flagged = VALUE #(
  FOR condition IN conditions WHERE ( flag = abap_true )
    ( sign = 'I' option = 'CP' low = replace( val = condition-vpsta sub = '*' with = '+' ) ) ).

SELECT depot, flag
  FROM my_depot_table
  INTO TABLE @DATA(depots_flagged)
  WHERE depot IN @range_flagged.

depots_flagged = VALUE #( FOR depots IN depots_flagged ( flag = abap_true ) ).

DATA range_unflagged TYPE RANGE OF depot.
range_unflagged = VALUE #(
  FOR condition IN conditions WHERE ( flag = abap_false )
    ( sign = 'I' option = 'CP' low = replace( val = condition-vpsta sub = '*' with = '+' ) ) ).

SELECT depot, flag
  FROM my_depot_table
  INTO TABLE @DATA(depots_unflagged)
  WHERE depot IN @range_unflagged.

在这段操作之后，depots_flagged和depots_unflagged两个变量将分别包含那些依据您自定义的“模式表”所标记的仓库列表。如果在您的自定义“模式表”中直接将*字符替换为+字符，将会简化构建范围表的操作。