第七章转到列表过程

第七 转到列表过使用LEAVETOLIST- 在列表模式中使用GUI状 返回模 XXXSUBMITSUBMIT提交报表(页Error!Notavalidlink.)中详细说明。XXXLEAVETOLIST-PROCESSINGLEAVETOLIST-PROCESSING语句是从模块 中生成列表时所使用的语句该语句允许您在程序中从对话模式切换到列表模式。可在模块 中对所需的列表处理逻辑进行编码。当运行LEAVETOLIST-PROCESSING语句时，模块 仍旧保持执行的控制权。事务的数据区域对报表处理编码来说完全可用，因此没必要来回传送参数。ABAP/4PROCESSONVALUE-REQUESTPROCESSONHELP-LEAVETOLIST-PROCESSING(GUI(返回模式(页关于如何进入列表模式的具体示例，参见事务TZ70（在同系统一起的开发类SDWA中）和本章中的讨论。LEAVETOLIST-LEAVETOLIST-PROCESSINGXXX的和特征都可用：ATLINE-SELECTION、功能键、基本的详细列表层、窗口XXX者都显示，或者当前屏幕显示而替换为列表输出。TZ70****ABAP/4MODULEPREPARE_LISTLEAVETOLIST-PROCESSINGANDRETURNTOSCREEN0.PERFORMEDIT_LIST.LEAVESCREEN.FORMSETPF-STATUSSETTITLEBAR'LST'WITHSFLIGHT-CONNIDSFLIGHT-NEWLINE-SIZESELECT*FROMSFLIGHTWHERECARRID=SFLIGHT-ANDCONNID=SFLIGHT-CONNID.WRITE:/SY-VLINENO-GAP, COLOR4INTENSIFIEDOFFNO-GAP,SY-VLINENO-GAP, COLOR2INTENSIFIEDOFFNO-列表模式在模式中如何工运行时，模块保持执行控制。可以用PBO或PAI为当前屏幕编制列表模式逻辑代码。选择哪（LEAVESCREEN语句或者到PAI）XXXLEAVETOLIST-PROCESSINGPAIPAIPBO的头部开始，重复当前屏幕过程。XXX在PBO中编制LEAVETOLIST-PROCESSING逻辑代码，后面加上LEAVESCREENPAI过程将不执行。(ErrorNotavalidGUIGUI执行许多GUI功能。例如：XXX(BACK,XXXXXX(PP++,PP--GUI（ABAP/4辑的功能。包括F21－F24键，尽管P-、P-、P+和P++功能已自动定义。事务示例TZ70定义了自己的状态（命名为LIST）。因为该状态有“框中的列表”类型，所以只能定义按钮（不需要菜单条）（BACKundRW）->->常规/建议”素层次结构。(ErrorNotavalidlink.)返 模有两种方法可以从列表模式返回到 模式。在这两种情况下，程序返回的地方都默认为进行列表处理的屏幕（包含LEAVETOLIST-PROCESSING语句的屏幕()XXXLEAVELIST-PROCESSINGLEAVELIST-PROCESSING语句将控制返回到屏幕。返回时，系统在PBO的开始处重新启动过程。XXX如果用户使用“返回”或“取消”图标退出列表，您不必安排显式的LEAVELIST-PROCESSING当用户按下了其中的一个，系统就返回到含有LEAVETOLIST-PROCESSING的屏幕中。这里系统重新启动PBO处理屏幕。（LEAVELIST-PROCESSING语句来实现。）TZ70当事务从屏幕200进入列表模式时，并没有编制退出功能代码。而对于没有列表过程的屏幕100来说，程序必须执行自己的退出功能（MODULEEXIT_0100INPUT.CASEOK_CODE.WHENCLEARSETSCREEN0.LEAVESCREEN.WHEN'EXIT'.CLEARSETSCREEN0.LEAVESCREEN.WHEN'BACK'.CLEARSETSCREEN0.LEAVESCREEN.当返回模式时，程序还能重新指定用户路径以便到达与启动列表屏幕不同的屏幕。为此，请在首次转到列表模式时使用关键字ANDRETURNTOSCREEN：LEAVETOLIST-PROCESSINGANDRETURNTOSCREEN使用该语句，无论程序何时返回到模式（因为用户从列表中退出，或执行了命令LEAVELIST-PROCESSING），系统都恢复屏幕请求的PBO过程（这里是屏幕100）TZ70PREPARE_LISTANDRETURNTOSCREEN**PROCESSINGFORSCREEN200**MODULEPREPARE_LISTOUTPUT.LEAVETOLIST-PROCESSINGANDRETURNTOSCREEN0.PERFORMEDIT_LIST.LEAVESCREEN.0将关闭CALLCALLSCREEN200控制返回到先前最后调用模式的屏幕（那就是，屏幕100的PBO）事务TZ70介绍了在事务内部进行列表处理的法100PAI：CALLSCREEN200PBO-屏幕200无显示（由LEAVESCREEN命令屏幕200PAI：没有需要的编码过程（由LEAVESCREEN100PBO（100PBO *Screen100:FlowLogic(PAI PROCESSAFTERMODULEEXIT_0100AT *Screen200:Flow PROCESSBEFOREOUTPUT.MODULEPREPARE_LIST.*PROCESSAFTERABAP/4屏幕100的主PAI模块调用屏幕200，该屏幕将作为单独的框出现（弹出 MAND_0100 MAND_0100INPUT.CASEOK_CODE.WHEN<...Selectflightinfofortherequestedflight..>CLEAROK_CODE.CALLSCREEN200STARTINGAT105ENDINGAT80200的PBO ModulePREPARE_LIST MODULEPREPARE_LISTLEAVETOLIST-PROCESSINGANDRETURNTOSCREEN0.PERFORMEDIT_LIST.LEAVESCREEN.（ Form FORMSETPF-STATUSSETTITLEBAR'LST'WITHSFLIGHT-CONNIDSFLIGHT-NEWLINE-SIZESELECT*