首页 > 代码库 > ABAP - AT END OF 的使用

ABAP - AT END OF 的使用

疑惑了很久的at end of 算是弄明白了……哈哈

TYPES: begin of ty_tab ,
num(3) type i,
str(3) type c,
end of ty_tab.
data: gw_tab TYPE ty_tab ,
gt_tab TYPE TABLE OF ty_tab WITH HEADER LINE.
data: gt_out TYPE TABLE OF ty_tab,
gw_out TYPE ty_tab.
gw_tab-num = 100.
gw_tab-str = ‘AAA‘.
append gw_tab to gt_tab.
gw_tab-num = 100.
gw_tab-str = ‘BBB‘.
append gw_tab to gt_tab.
gw_tab-num = 200.
gw_tab-str = ‘AAA‘.
append gw_tab to gt_tab.
gw_tab-num = 200.
gw_tab-str = ‘BBB‘.
append gw_tab to gt_tab.
gw_tab-num = 200.
gw_tab-str = ‘CCC‘.
append gw_tab to gt_tab.
CLEAR gw_tab.
sort gt_tab by num.
loop at gt_tab .
MOVE gt_tab to gw_tab.
at END OF num.
gw_out-num = gw_tab-num.
gw_out-str = gw_tab-str.
APPEND gw_out to gt_out.
endat.
CLEAR gw_tab.
endloop.
LOOP AT gt_out into gw_out.
write:/ gw_out-num,gw_out-str.
ENDLOOP.

使用AT END OF语句,主要是抓取重复字段如num为100的最后一条记录 100 BBB。

本实例定义的structure中 ,字段num在字段str前,这样在使用AT END OF语句后,内表中str会变为***。

在loop循环之前 内表gt_tab中的数据为:

100 AAA

100 BBB

200 AAA

200 BBB

200 CCC

第一次循环,内表gt_tab中的数据为 100 AAA 在执行AT END OF语句后,内表gt_tab中的数据为 100 AAA

第二次循环,内表gt_tab中的数据为 100 BBB 在执行AT END OF语句中,内表gt_tab中的数据为 100 ***,在执行AT END OF语句后,内表gt_tab中的数据为 100 BBB

第三次循环,内表gt_tab中的数据为 200 AAA 在执行AT END OF语句后,内表gt_tab中的数据为 200 AAA

第四次循环,内表gt_tab中的数据为 200 BBB 在执行AT END OF语句后,内表gt_tab中的数据为 200 BBB

第五次循环,内表gt_tab中的数据为 200 CCC 在执行AT END OF语句中,内表gt_tab中的数据为 200 ***,在执行AT END OF语句后,内表gt_tab中的数据为 200 CCC

为了得到我们想要的重复数据的最后一条,需要将内表的数据在执行AT END OF语句前,转移到另一个工作区gw_tab中保存,否则想要的数据中str均为***。

最后得到的数据为:

100 BBB

200 CCC

另外,同理 AT NEW 语句的使用 ,也是如此,本实例将AT END OF num,改为AT NEW num后,最后的结果为:

100 AAA

200 AAA

ABAP - AT END OF 的使用