求助ABAP----两个语法无效

king2127

学习

dreamgift

原帖由 xiebinren 于 2008-7-4 10:06 发表
REPORT z000_test  LINE-SIZE 300.
types: begin of test_ty,
       val01 type i,
       val02 type i,
       val03 type i,
       end of test_ty.
data: test_itab type standard table of test_ty WITH NON-UNIQUE KEY val01 val02 val03.
data: test_wa type test_ty.

do 5 times .
test_wa-val01 = test_wa-val01 + 1.
test_wa-val02 = test_wa-val02 + 2.
test_wa-val03 = test_wa-val03 + 3.
append test_wa to test_itab.
enddo.

append test_wa to test_itab.
clear test_wa.

sort test_itab by val01 val02 val03.
delete adjacent duplicates from test_itab.        " 删除相同的列

loop at test_itab into test_wa.
*set left scroll-boundary.        "这个你也可试一下,体会一下与其他的有什么区别
*set left scroll-boundary column 15.      "这个你也可试一下,体会一下与其他的有什么区别
*set left scroll-boundary column test_wa-val03.       "这个你也可试一下,体会一下与其他的有什么区别
set left scroll-boundary column test_wa-val01.      "固定
write:/ test_wa-val01 COLOR COL_KEY, test_wa-val02,(20) test_wa-val03.
endloop.

1．你放的位置不对，你自己慢慢体会吧

2．data: test_itab type standard table of test_ty 修改为：
data: test_itab type standard table of test_ty with non-unique key val01 val02 val03.

学习了.

sorrowlich

duanfenglan

学习

aneasn001

I know "set left scroll-boundary column col." .
it's to set screen not scrolling size When this list page is displayed on the screen.

heitian1130

append test_wa to test_itab.

clear test_wa.

请问在do 5 time 里面已经有  append test_wa to test_itab.    你clear test_wa  上面的那个append test_wa to test_itab. 是不是多余的

aneasn001

it's to product a similar list for checking  "delete adjacent duplicates from test_itab"

ryq0000

tianshaguxing20

强力插入！

markatally

第一个问题楼上已经解决。
第二个问题的原因是：按照do循环录入到内表中的数据，并没有重复行，所以delete adjacent语句不起作用。不知道楼主指的语法无效是什么