确定 LOOP AT ... GROUP BY 中的最后一组？

问题描述

我正在 LOOP AT ... GROUP BY 语句中寻找与 A LAST 语句等效的语句。

我使用 group by 进行循环，出于性能原因，当一定数量的记录累积到内部表中时，我每隔几组执行一次调用方法。但是如果我在最后一组，我想添加一个额外的条件来在循环结束时运行这个调用。

下面我写了一段模拟我的问题的可执行代码，我想在退出循环之前处理我的最后一个材料。

constants: processing_size_threshold type i value 10.
types: begin of ty_material,material_num type c length 3,end of ty_material.
data:  materials type standard table of ty_material,materials_bom type standard table of ty_material.

materials = value #( for i = 1 then i + 1 while i <= 3
                     ( material_num = conv #( i ) ) ).


loop at materials reference into data(material_grp) group by material_grp->material_num.

    loop at group material_grp reference into data(material).
      materials_bom = value #( base materials_bom (
                               lines of value #( for j = 1 then j + 1 while j <= 5
                                               ( material_num = |{ material->material_num }{ j }| ) ) ) ).
    endloop.

   "The 2nd condition of this IF is what I'm not able to figure out,I need material 3 BOM to be processed here
    if lines( materials_bom ) >= processing_size_threshold. "or group_num = last_group.
      "me->process_boms(materials_bom).
      clear materials_bom.
    endif.
endloop.

解决方法

首先：最好是放置 real-world examples，而不是像您那样放置充满随机数字嗡嗡声的无意义表格。那样你可能会得到错误的答案。

如果您只想处理最后一组，您可以使用 GROUP INDEX：

SELECT matnr AS matno
  FROM vbap UP TO 100 ROWS
  INTO TABLE @DATA(materials)
  ORDER BY matnr.

TYPES: ty_mats LIKE materials.
DATA: bom LIKE materials.

DATA(uniques) = lines( VALUE ty_mats( FOR GROUPS value OF <line> IN materials GROUP BY ( matno = <line>-matno ) WITHOUT MEMBERS ( value ) ) ).
LOOP AT materials REFERENCE INTO DATA(refmat) GROUP BY ( id = refmat->matno size = GROUP SIZE gi = GROUP INDEX ) ASCENDING REFERENCE INTO DATA(group_ref).
  CHECK group_ref->*-gi = uniques.
  bom = VALUE ty_mats( BASE bom FOR <mat> IN GROUP group_ref ( matno = <mat>-matno ) ).
  me->process_boms( bom ). "<--here comes the drums
ENDLOOP.

注意：表格必须按 INDEX 排序才能显示正确的值。

在这个片段中使用了非常简单的方法：首先我们计算唯一组的总数，然后检查每个组索引是否是最后一个。

请注意，数据集中最后的内容仅取决于排序顺序，因此您很容易得到不准确的值以满足您的要求。

,

你是这个意思吗？
sy-tabix 当前循环索引可能会有所帮助。 否则，您可能需要先计算组数。

constants: processing_size_threshold type i value 10.
types: begin of ty_material,material_num type c length 3,end of ty_material.
data:  materials type standard table of ty_material,materials_bom type standard table of ty_material.

materials = value #( for i = 1 then i + 1 while i <= 3
                     ( material_num = conv #( i ) ) ).


loop at materials reference into data(material_grp) group by material_grp->material_num.

    loop at group material_grp reference into data(material).
      materials_bom = value #( base materials_bom (
                               lines of value #( for j = 1 then j + 1 while j <= 5
                                               ( material_num = |{ material->material_num }{ j }| ) ) ) ).
    endloop.

   "The 2nd condition of this IF is what I'm not able to figure out,I need material 3 BOM to be processed here
    if lines( materials_bom ) >= processing_size_threshold
    or lines( materials ) = sy-tabix.
      "me->process_boms(materials_bom).
      clear materials_bom.
    endif.
endloop.