3、130_2 including sy-repid '0141'.PROCESS AFTER INPUT.* MODULE USER_COMMAND_0130. CALL SUBSCREEN : SC_0130_1, SC_0130_2.3、同样设置其它子屏幕0131:上区域展开,下区域收起,按钮功能码:PB_0131_1,PB_0131_2,子屏幕区域控件:SC_0131_1,SC_0131_2逻辑流:PROCESS BEFORE OUTPUT.* MODULE STATUS_0131.* CA
4、LL SUBSCREEN SC_0131_1 including sy-repid '0140'.PROCESS AFTER INPUT.* MODULE USER_COMMAND_0131. CALL SUBSCREEN SC_0131_1 .0132:上区域收起,下区域展开按钮功能码:PB_0132_1,PB_0132_2,子屏幕区域控件:SC_0132_1,SC_0132_2逻辑流:PROCESS BEFORE OUTPUT.* MODULE STATUS_0132.* CALL SUBSCREEN SC_0132_2 in
5、cluding sy-repid '0141'.PROCESS AFTER INPUT.* MODULE USER_COMMAND_0132. CALL SUBSCREEN SC_0132_2.0133:上区域收起,下区域收起按钮功能码:PB_0133_1,PB_0133_2,子屏幕区域控件:SC_0133_1,SC_0133_2逻辑流:PROCESS BEFORE OUTPUT.* MODULE STATUS_0133.*PROCESS AFTER INPUT.* MODULE USER_COMMAND_0133.4、显示表格的子
6、屏幕0140,0141图(S-5)设置过程参考:TableControl多表设计<四>5、设置功能码事件响应:REPORT ZMYP_TCM.tables:mara,t001l.data:begin of itab occurs 0. include structure mara. data:mark type char1.data:end of itab.data:begin of item occurs 0. include structure t001l. data:mark type
7、char1.data:end of item.DATA: OK_CODE LIKE SY-UCOMM, S_OK_CODE LIKE SY-UCOMM.data: sub_screen like sy-dynnr .sub_screen = '0130' .…………*&---------------------------------------------------------------------**& Module USER_COMMAND_0120 INPUT*&----------