Screen返回选择界面的问题
来源:互联网 发布:欧陆风云4秘籍源码 编辑:程序博客网 时间:2024/05/17 03:10
自己写的Report,用到了自己定义的Screen,如何在任何一个Screen直接返回选择界面(1000)?
可以用: SET SCREEN 0.
LEAVE SCREEN.
LEAVE SCREEN.
或者 : LEAVE TO SCREEN 0 .
但是,有时候不是返回选择界面,而是返回了调用这个Screen的地方。
这是因为:
LEAVE TO SCREEN scr. :Leaves the current screen and processes the screen scr.
If scr = 0, processing in CALL mode continues after the CALL SCREEN statement. Otherwise, you branch to the transaction selection screen.
If scr = 0, processing in CALL mode continues after the CALL SCREEN statement. Otherwise, you branch to the transaction selection screen.
所以,如果100调用200,不要用CALL,用Leave to screen 200 .就可以在200直接返回1000了。
下面是一个例子:
REPORT z_scm_ftp_manager NO STANDARD PAGE HEADING .
DATA: ok_code LIKE sy-ucomm .
SELECT-OPTIONS:
s_date FOR sy-datum DEFAULT sy-datum .
s_date FOR sy-datum DEFAULT sy-datum .
START-OF-SELECTION.
CALL SCREEN 100.
CALL SCREEN 100.
*&---------------------------------------------------------------------*
*& Module USER_COMMAND_0100 INPUT
*&---------------------------------------------------------------------*
MODULE user_command_0100 INPUT.
CASE ok_code.
WHEN 'BACK'.
* SET SCREEN 0.
* LEAVE SCREEN.
LEAVE TO SCREEN 0 .
WHEN 'CALLSCR'.
CALL SCREEN 200.
WHEN 'LEAVESCR'.
LEAVE TO SCREEN 200.
ENDCASE.
CLEAR ok_code .
ENDMODULE. " USER_COMMAND_0100 INPUT
*& Module USER_COMMAND_0100 INPUT
*&---------------------------------------------------------------------*
MODULE user_command_0100 INPUT.
CASE ok_code.
WHEN 'BACK'.
* SET SCREEN 0.
* LEAVE SCREEN.
LEAVE TO SCREEN 0 .
WHEN 'CALLSCR'.
CALL SCREEN 200.
WHEN 'LEAVESCR'.
LEAVE TO SCREEN 200.
ENDCASE.
CLEAR ok_code .
ENDMODULE. " USER_COMMAND_0100 INPUT
*&---------------------------------------------------------------------*
*& Module STATUS_0100 OUTPUT
*&---------------------------------------------------------------------*
MODULE status_0100 OUTPUT.
SET PF-STATUS 'MAIN100'.
ENDMODULE. " STATUS_0100 OUTPUT
*&---------------------------------------------------------------------*
*& Module USER_COMMAND_0200 INPUT
*&---------------------------------------------------------------------*
MODULE user_command_0200 INPUT.
CASE ok_code.
WHEN 'BACKBTN'.
SET SCREEN 0.
LEAVE SCREEN.
ENDCASE.
CLEAR ok_code .
ENDMODULE. " USER_COMMAND_0200 INPUT
*&---------------------------------------------------------------------*
*& Module STATUS_0200 OUTPUT
*&---------------------------------------------------------------------*
MODULE status_0200 OUTPUT.
SET PF-STATUS space.
ENDMODULE. " STATUS_0200 OUTPUT
*& Module STATUS_0100 OUTPUT
*&---------------------------------------------------------------------*
MODULE status_0100 OUTPUT.
SET PF-STATUS 'MAIN100'.
ENDMODULE. " STATUS_0100 OUTPUT
*&---------------------------------------------------------------------*
*& Module USER_COMMAND_0200 INPUT
*&---------------------------------------------------------------------*
MODULE user_command_0200 INPUT.
CASE ok_code.
WHEN 'BACKBTN'.
SET SCREEN 0.
LEAVE SCREEN.
ENDCASE.
CLEAR ok_code .
ENDMODULE. " USER_COMMAND_0200 INPUT
*&---------------------------------------------------------------------*
*& Module STATUS_0200 OUTPUT
*&---------------------------------------------------------------------*
MODULE status_0200 OUTPUT.
SET PF-STATUS space.
ENDMODULE. " STATUS_0200 OUTPUT
- Screen返回选择界面的问题
- Screen返回选择界面的问题
- SELECTION-SCREEN选择界面字段值的实时获取-函数DYNP_VALUES_READ
- Heritrix的Modules界面不能改变选择项的问题
- Heritrix的Modules界面不能改变选择项的问题
- lhgdialog 弹出框 编辑 保存 关闭 返回界面的问题
- WebView加载H5界面后的返回键问题
- GUI界面的选择
- java中表格选择行列返回-1的问题
- iOS的欢迎界面Launch Screen动态加载广告
- code inspector screen check的问题
- XFCE下Screen Tearing问题的解决
- 解决 linux screen 无法 chdir的问题
- android开发:跳转至联系人界面选择后返回电话号码
- 解决微信界面返回问题
- 退出返回登录界面(存在问题)
- 林林总总的颜色选择界面
- MYSQL界面的选择-PHP
- 用SAP Authority Object 对权限控制
- 语义的需要
- ABAP数据库操作之操作语句Insert
- 电子琴的源程序(eda课程设计)
- 基于jcom,java写数据到excel方式一(ExcelWorkbook)
- Screen返回选择界面的问题
- 家有千金之离开小岛
- 基于jcom,java写数据到excel方式二(IDispatch)
- [Videos]海明老师Linux版视频收集贴
- abap 常用表
- 基于jCOM搭建Java-微软信息桥梁 jcom原理介绍
- 设计模式之组合模式(Composite Pattern)
- ALV常用参数详细描述
- Jacob基础语法说明