MODULE<mod>AT EXIT-COMMAND. 不管该语句在screen flow logic的PAI事件块里的什么地方,都会在字段的约束自动检测之前执行,因此,此时其他的屏幕字段的值不会被传递到ABAP程序中去,当该MODULE执行完后,如果未退出该屏幕,则会进行正常PAI(即PAI事件块里没有带EXIT-COMMAND选项的MODULE语句)事件块。 该语句在字段约束自...
PAI事件中,则包含了3个MODULE:over_and_out_0100,此MODULE是在屏幕100中点击“退出”时的响应,并加上AT EXIT-COMMAND关键字,以在自动字段检查之前调用模块(对应按钮需将类型设置为E);如果PAI中没有此MODULE,则会点击“退出”按钮时还会执行后面的语句,如检查输入的订单编号,而这是多余的。validate_input...
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. FIELD ZVJXZHU_01-VBELN ...
AT USER-COMMAND. CASE sy-ucomm. WHEN 'BACK' OR 'UP' OR 'EXIT'. LEAVE PROGRAM. * PERFORM F_READ_DATA. * IS_SELFIELD-REFRESH = "X". * SET USER-COMMAND "&OPT". " OPTIMIZE COLUMNS WIDTH ENDCASE. *DROP AT PF21."DROP方块一下到底SHIFT F6 CLEAR: err, count. DO. PERFORM fig_mo...
MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. MODULE LISTE_BEFORE_LOOP. LOOP AT EXTRACT. MODULE LISTE_INIT_WORKAREA. CHAIN. FIELD ZCECS1220TABLE-MATNR . FIELD ZCECS1220TABLE-VKORG . FIELD ZCECS1220TABLE-ERNAM . FIELD ZCECS1220TABLE-ERDAT . ...
Stop命令使用该命令的程序位置INITIALIZATION,ATSELECTION-SCREEN,START-OF-SELECTION和GET事件中处理说明1、当在INITIALIZATION事件执行该命令,系统将直接触发应用服务器和客户端屏幕元素的发送;2、在其他事件中将直接触发END-OF-SELECTION事件的执行,如果不想执行END-OF-SELECTION,请使用RETURN或者EXIT.注意事项EXIT命令使...
AT EXIT-COMMAND 命令を含めることはできません。タイプ E の機能は、主画面以外では処理できません。● 従属画面Dynpro の制御ロジックに、命令 SET TITLEBAR、SET PF-STATUS、SET SCREEN、LEAVE SCREEN、または LEAVE TO SCREEN を使用したダイアログモジュールを含めることはできません。これら...
选择屏幕的PAI(AT SELECTION-SCREEN)。 PAI中的代码内容包括: 普通代码 VALUE-REQUEST(以下简称POV) HELP-REQUEST(以下简称POH) EXIT COMMAND的代码(以下简称FUNCTION-E) 普通屏幕PAI-普通代码 界面影响 如果在CHAIN中的FIELD模块中输出,则只有当前FIELD可被编辑;如果在CHAIN中输出,则CHAIN中所有的FIELD可被编辑 ...
*toinstalltetris: *1)createprogramandplaceallthistextinit. *2)createstandartscreen100andinsertthispart *---* *processbeforeoutput. *modulestatus_0100. * *processafterinput. *moduleexxatexit-command. *moduleuser_command_0100. *---* *3)creategui-statusstatus_0andinsert *3.1)freefunctionalkeys ...
UCOMM.WHEN 'ADD'.RESULT = NUMBER1 + NUMBER2.WHEN 'SUBT'.RESULT = NUMBER1 - NUMBER2.WHEN 'MULT'.RESULT = NUMBER1 * NUMBER2.WHEN 'DIVI'.RESULT = NUMBER1 / NUMBER2.WHEN OTHERS.WRITE 'Unknown function code'.EXIT.ENDCASE.WRITE:/ 'Result:',RESULT.在这段代码中at user-command起到...