LOOP AT <internal table> [CURSOR <scroll-var>] [WITH CONTROL ] [FROM <line1>] [TO <line2>]. ...<actions>... ENDLOOP. 表示同时在内表和屏幕表格中循环。 该形式的 LOOP语句在内表中循环,对每行都执行 <actions>。对于每个内表行,系统将相应程序 字段传送到对应的屏幕表格行,或将相应的屏幕...
请记住,SY-STEPL只在LOOP...ENDLOOP处理的范围之内才有意义。 在内表中循环 LOOP AT <internal table> [CURSOR <scroll-var>] [WITH CONTROL ] [FROM <line1>] [TO <line2>]. ...<actions>... ENDLOOP. 表示同时在内表和屏幕表格中循环。 该形式的 LOOP语句在内表中循环,对每行都执行 <actions>...
MODULE LISTE_INITIALISIEREN. LOOP AT EXTRACT WITH CONTROL TCTRL_ZVJXZHU_01 CURSOR NEXTLINE. MODULE LISTE_SHOW_LISTE. ENDLOOP. MODULE mod_set_sort. * PROCESS AFTER INPUT. MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. MODULE LISTE_BEFORE_LOOP. LOOP AT EXTRACT. MODULE LISTE_INIT_WORKAREA. CHAIN....
MODULE LISTE_INITIALISIEREN. LOOP AT EXTRACT WITH CONTROL TCTRL_ZVJXZHU_01 CURSOR NEXTLINE. MODULE LISTE_SHOW_LISTE. ENDLOOP. MODULE mod_set_sort. * PROCESS AFTER INPUT. MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. MODULE LISTE_BEFORE_LOOP. LOOP AT EXTRACT. MODULE LISTE_INIT_WORKAREA. CHAIN....
LOOP WITH CONTROL [cursor tab1-CURRENT_LINE]. 5.当数据有改变时更新itab LOOP AT <ITAB> CHAIN. FIELD SP1-CARRID. … MODULE TAB1_MODIFY ON CHAIN-REQUEST. ENDCHAIN. ENDLOOP. 使用步循环. 步循环分为两类:静态的和动态的。静态步循环有固定的大小,运行时无法更改。动态步循环大小可变。如果用户...
但要隐藏列的话,只能用ZTC-COLS-VISLENGTH = 0 或是 ZTC-COLS-INVISIBLE = *X*.此时用LOOP SCREEN无效. 顺便多记记 1 如果有工作区,则可以使用PROCESS BEFORE OUTPUT.LOOP AT g_itab_mara WITH CONTROL ZTC CURSOR ZTC-current_line.ENDLOOP.2 没有工作区,则使用LOOP WITH CONTROL ZTC .READ TABLE SP2...
LOOP AT EXTRACT WITH CONTROL TCTRL_ZCECS1220TABLE CURSOR NEXTLINE. MODULE LISTE_SHOW_LISTE. ENDLOOP. * PROCESS AFTER INPUT. MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. MODULE LISTE_BEFORE_LOOP. LOOP AT EXTRACT. MODULE LISTE_INIT_WORKAREA. ...
WITHCONTROLZTEST_TC 说明了这个LOOP的过程是要和TC绑定LOOP的 CURSORZTEST_TC-CURRENT_LINE 。通过我上面罗列的结构为基础,我们进去MODULEZTEST_TC_GET_LINES中,添加一段代码: LOOP AT SCREEN. IF SCREEN-NAME CS 'WA_ZTEST' AND WA_ZTEST-STATUS EQ '@01@'. ...
对于普通的屏幕元素,我们都很清楚,用LOOP AT SCREEN可以实现。对于TC,当然也是一样的。 TC向导会生成如下的Screen Flow Logic: LOOP AT itab INTO wa WITH CONTROL tc_0100 CURSOR tc_0100-current_line. MODULE tc_0100_change_field_attr. ENDLOOP. ...
*循环取内表逐行写入表控制当前行 LOOP AT SP1 WITH CONTROL TBL2 CURSOR TBL2-CURRENT_LINE. *MOCULE TBL2_CHANGE_FIELD_ATTR ENDLOOP. MODULE STATUS_0100. *PAI 用户输入后的处理 PROCESS AFTER INPUT. *PAI FLOW LOGIC FOR TABLECONTROL “TBL2”. *当有数据改变时更新内表 PROCESS AFTER INPUT. LOOP...