如下代码，
types: begin of ty_aa,
ebeln type eket-ebeln , "采购凭证
* ebelp type eket-ebelp , "项目
wemng type eket-wemng , "已交货数量
end of ty_aa.data: gt_aa type table of ty_aa with header line,
gs_aa type ty_aa.
data: gt_collect type table of ty_aa with header line,
gs_collect type ty_aa.
gs_aa-ebeln = '0045282828'.
gs_aa-wemng = '100'.
APPEND gs_aa to gt_aa.
gs_aa-ebeln = '0045282828'.
gs_aa-wemng = '100'.
APPEND gs_aa to gt_aa.
gs_aa-ebeln = '0045282828'.
gs_aa-wemng = '100'.
APPEND gs_aa to gt_aa.
SORt gt_aa by ebeln.
CLEAR gt_collect.
loop at gt_aa into gs_aa.
move-corresponding gs_aa to gs_collect.
collect gs_collect into gt_collect.
clear gs_collect.
clear gs_aa.
endloop.
效果如下：
此内容由惯性聚合(RSS阅读器)自动聚合整理，仅供阅读参考。 原文来自 — 版权归原作者所有。