勤恒德谦，挚爱默行
abap 在屏幕如何调用选择屏幕以及如何获得选择屏幕的操作
在自定义屏幕如何调用选择屏幕呢，通过选择屏幕输入查询条件，然后进行相关的操作。在这里有两个技术难点：
1、如何定义可以调用的选择屏幕、调用选择屏幕；
2、如何捕捉到选择屏幕的操作、选择屏幕的屏幕号；
定义可调用的选择屏幕：
SELECTION-SCREEN
SELECT -OPTIONS: S_CPTNR FOR
ZTMM0141-CPTNR,
S_MAKTX FOR
ZTMM0141-MAKTX.
SELECTION-SCREEN
调用选择屏幕：
SELECTION-SCREEN 700
捕捉选择屏幕的操作：
*----------------------------------------------------------------------*
AT SELECTION-SCREEN OUTPUT.
在屏幕输出之前处理
*----------------------------------------------------------------------*
SELECTION-SCREEN .
“对应的是屏幕编号
SY-UCOMM = 'CRET' .
“对应的是执行的功能码
FRM_DISPLAY_HISTORY USING
“调用子例程执行相关操作
SY-UCOMM = 'CRET' .
FRM_DISPLAY_HISTORY USING
SY-UCOMM = 'CRET' .
FRM_DISPLAY_HISTORY USING
ABAP 选择屏幕下拉框-listbox
SAP ABAP编程 ABAP选择屏幕：根据用户选择动态显示屏幕
ABAP 选择屏幕选择条件带出信息
Smartform&动态打印选择屏幕…
abap的多屏幕事务切换
SAP中ABAP简易实现选择屏幕或者普通屏幕的数据显示
ABAP标准屏幕调用选择屏幕
一个程序有多个选择屏幕以及一个程序调用多个程序
增强中获取屏幕值的一句很实用代码，直接获取屏幕字段值
ABAP 使用DYNP_VALUES_READ来获取屏幕字段值
没有更多推荐了，ABAP&屏幕F4帮助&调用函数实现
值内表的数据最好参考一下系统字段 不然如果只是TYPE C 可能没有数据展示出来
DATA:BEGIN&OF&t_tab&OCCURS&0,
&&&&&&&&matnr&TYPE&mara-matnr,
&&&&&&&&maktx&TYPE&makt-maktx,
&&&&&END&OF&t_tab.
"要使用F4的屏幕元素
PARAMETERS:p_matnr(20)&TYPE&c&.
&"监听F4&事件
AT&SELECTION-SCREEN&ON&VALUE-REQUEST&FOR&p_matnr.
&&PERFORM&frm_help.
*&---------------------------------------------------------------------*
*&&&&&&&Form&&FRM_HELP
*&---------------------------------------------------------------------*
*&&&&&&&text
*----------------------------------------------------------------------*
*&&--&&&p1&&&&&&&&text
*&&&--&&p2&&&&&&&&text
*----------------------------------------------------------------------*
FORM&frm_help&.
&&SELECT&*
&&&&FROM&makt
&&&&INTO&CORRESPONDING&FIELDS&OF&TABLE&t_tab
&&&&UP&TO&10&ROWS.
&&"调用展示函数
&&CALL&FUNCTION&'F4IF_INT_TABLE_VALUE_REQUEST'
&&&&EXPORTING
&&&&&&retfield&&&&&&&&=&'MATNR'&&&&&&&&&&"表格要显示的字段
&&&&&&dynpprog&&&&&&&&=&sy-repid&&&&&&&&"返回才程序
&&&&&&dynpnr&&&&&&&&&&=&sy-dynnr&&&&&&&&"屏幕
&&&&&&dynprofield&&&&&=&'P_MATNR'&&&&&&&&"往页面回填值的地方
&&&&&&value_org&&&&&&&=&'S'&&&&&&&&&&&&&"显示类型
&&&&TABLES
&&&&&&value_tab&&&&&&&=&t_tab.&&&&&"传进去的表格&帮助的内表
&&IF&sy-subrc&&&&0.
&&&&MESSAGE&ID&sy-msgid&TYPE&sy-msgty&NUMBER&sy-msgno
&&&&&&&&&&&&WITH&sy-msgv1&sy-msgv2&sy-msgv3&sy-msgv4.
ENDFORM.&&&&&&&&&&&&&&&&&&&&"&FRM_HELP
已投稿到：
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。ABAP实战屏幕SCREEN设计(一)
屏幕(SCREEN)是ABAP设计最重要的工作之一，SAP的单据、主数据维护等业务功能都使用屏幕，一个程序可以包含多个屏幕。
本文主要介绍:
(1)第一个"HELLO WORLD" Screen程序
(2)工具条和菜单设计
(3)屏幕对象
(4)数据字典关联字段
(6)下拉框设计
(7)修改屏幕
(8)子窗口(Subscreen)
(9)表条目控制
(10)定制控制，上载图片和在屏幕上显示图片实例
(11)文本编辑器
(12)列表和屏幕相互调用 1、第一个“HELLO WORLD” Screen程序
本节将建立一个屏幕，屏幕包含一个“HELLO WORLD!“的文本字段和一个”退出“按钮，单击”退出“按钮时退出整个程序。步骤如下：
(1)建立一个新程序
(2)设计Screen，处理控件、逻辑流
(3)调整程序，调用新建立的Screen
1.2、建立一个新程序
输入TCODE:SE38，输入程序名，单击”创建“按钮
输入标题、程序类型等信息后，单击”保存“按钮
程序不需要传输至其他环境，因而保存时选”本地对象“
系统进入程序设计界面，直接保存后退回
1.2、设计Screen
输入TCODE:SE51，进入Screen设计界面，输入刚建立的程序名YTEST，输入屏幕编号100后单击”创建“按钮
在属性页输入描述后，直接保存
单击工具条上的”格式“按钮，进入设计界面，添加一个文本字段控件，输入名称和文本，如果控件显示红色的表示未正确设计属性
”退出“按钮属性如下
注意属性中功能码为EXIT，函数类型”En“，表示退出函数。
设计窗口上的按钮说明
控制用屏幕输入输出事件，如在启动屏幕时使用的菜单、工具条，在输入后对输入框的检查，对按钮事件的控制等。窗口的属性窗口上所有对象的列表、属性等
单击按钮，出现如下图
PROCESS BEFORE OUTPUT(PBO):屏幕显示前的调用模块。
PROCESS ALTER INPUT(PAI):响应用户输入后的调用模块，如单击按钮、输入字段后回车等事件。
写入代码”MODULE CANCEL AT EXIT-COMMAND.“。表示在退出事件时执行CANCEL模块，这和退出按钮的函数类型属性对应。
1.3、从程序中调用Screen
编辑程序YTEST，调整后程序：
*直接调用窗口
CALL SCREEN 100.
MODULE CANCEL INPUT.
LEAVE PROGRAM.
ENDMODULE.执行程序，输出结果如下
单击“退出”按钮，退出程序。
2、工具条和菜单设计
在“HELLO WORLD!“程序基础上，在屏幕上建立菜单，工具条按钮、系统按钮、添加编辑框：在程序启动时，将程序中的变量传递到窗口的编辑框中；在单击菜单、工具条按钮、系统按钮时，将选中对象的功能码传递到文本框；离开屏幕时，将两个编辑框内容输出，表示窗口变量正确传递回主程序。
学习本节后，会对屏幕布局及相关控制有一个完整的了解，并且有融会贯通的感觉，所以本节非常重要，主要介绍：菜单编辑器，应用工具条设计，菜单设计，系统按钮设计，逻辑流程设计，加班编辑框，加入OK_CODE，代码设计，输出结果。
2.1、菜单编辑器
工具条和菜单设计，需要用菜单编辑器功能(TCODE:SE41)，也可以在屏幕设计界面通过单击工具条按钮进入。单击工具条的”其他对象“按钮，如下图
在输入状态名称后，单击创建按钮，如下图
输入短文本
2.2、应用工具条设计
展开”应用工具条“，在项目1输入”BIN1“，并双击它
选”静态文本“，继续
输入函数文本，可以选择图标，但在选择图标后，该按钮仅显示图标，文本做提示
继续，为按钮分配一个功能键
输入图标文字
以同样的方式添加第2个按钮
完后后单击工具条上的按钮，下一界面点击“Execute”按钮
输入Window坐标，默认不变
输出结果如下
2.3、菜单设计
单击”菜单栏“，展开它，输入主菜单后双击它，输入相应的子菜单项
单击测试按钮，输出界面如下
2.4、系统按钮设计
与菜单和工具条按钮设计一样，单击”功能键“，设计如下图
设计完成保存后，单击工具条上的激活按钮，激活状态条，运行程序2.5、逻辑流设计
输入TCODE:SE51，设计逻辑流，将默认的PAI和PBO两个MODULE设为有效(去掉*注释)，如下图
在MODULE STATUS_0100调用设计的状态条，在MODULE USER_COMMAND_0100中处理各类按钮事件
2.6、输入字段
进入屏幕设计界面，添加两个文本字段和两个输入字段。选择输入字段时，设定属性为输入输出字段，如下图
2.7、OKCODE
单击按钮，定义OK_CODE变量来处理屏幕交互
保存并激活该屏幕2.8、程序设计
DATA:FORINPUT(20) TYPE C VALUE '初始值',
FORCODE(20) TYPE C.
*功能码返回值
DATA:OK_CODE TYPE SY-UCOMM,
SAVE_OK TYPE SY-UCOMM.
*直接调用窗口
CALL SCREEN 100.
*输出返回变量
WRITE:FORINPUT, / FORCODE.
MODULE STATUS_0100 OUTPUT.
*定义状态条、包括菜单、工具条按钮、系统按钮等
SET PF-STATUS 'TESTSTA1'.
*将变量值输出至屏幕字段
FORCODE = SAVE_OK.
ENDMODULE.
MODULE CANCEL INPUT.
LEAVE PROGRAM.
ENDMODULE.
MODULE USER_COMMAND_0100 INPUT.
SAVE_OK = OK_CODE.
CLEAR OK_CODE.
*分析功能码，如果是工具条上的第2个按钮，则退出当前屏幕
CASE SAVE_OK.
WHEN 'BIN2'.
LEAVE TO SCREEN 0.
ENDMODULE.
2.9、屏幕输出
两个输入框中，输入你想要输入的值，单击“测试2”按钮
3、屏幕对象功能
3.1、单选按钮组的定义
单选按钮组是多个单选按钮的组合。选中多个单选按钮，单击右键选菜单“单选按钮组”--&“定义”
取消多个单选按钮组合单击“分解”菜单
输入输出字段的属性
这五个属性设置分别如下图
3.2、数据字典关联字段
在Screen设计过程中，数据字典关联字段可以根据数据字典中定义的透明表、结构等信息，方便地在屏幕上建立与字典关联的文本、输入输出字段。
例如使用YTJAYSCHOOL学校表，在屏幕上定义相关该表字段，并根据输入的主关键字检索其他字段的信息，并显示到输入输出字段。
学校表结构如下：
本节通过YSH_ID关键字检索数据
新建一个程序并建立一个屏幕后，单击中所示的“字典字段窗口”按钮
输入表“YTJAYSCHOOL”后，回车，系统显示该表所有字段，选择需要输出的字段
定位输出位置后，所有字段自动输出
定义非关键字为只读，即非输入字段
定义逻辑流
保存并激活，屏幕设计完成
程序代码如下：
*功能码返回值
DATA:OK_CODE TYPE SY-UCOMM,
SAVE_OK TYPE SY-UCOMM.
*使用学校表
TABLES YTJAYSCHOOL.
*直接调用窗口
CALL SCREEN 120.
MODULE CANCEL INPUT.
LEAVE PROGRAM.
ENDMODULE.
MODULE STATUS_0120 OUTPUT.
SET PF-STATUS 'STATUS1'.
ENDMODULE.
MODULE USER_COMMAND_0120 INPUT.
SAVE_OK = OK_CODE.
CLEAR OK_CODE.
CASE SAVE_OK.
WHEN 'EXIT'.
LEAVE PROGRAM.
*将SELECT数据赋给SCHOOL记录，SCHOOL记录关联屏幕字段
SELECT SINGLE *
INTO CORRESPONDING FIELDS OF YTJAYSCHOOL
FROM YTJAYSCHOOL
WHERE YSH_ID = YTJAYSCHOOL-YSH_ID.
IF SY-SUBRC NE 0.
CLEAR YTJAYSCHOOL.
ENDMODULE.
在YTJAYSCHOOL-YSH_ID处输入10001，请先查YTJAYSCHOOL表，不要输入错误数据，回车后屏幕显示如下图
4.1、顺序执行逻辑流
系统是按照逻辑流的顺序执行的，例如下面的逻辑流(PAI):
PROCESS AFTER INPUT.
MODULE USER_COMMAND_TEST.
MODULE CANCEL AT EXIT-COMMAND.
MODULE USER_COMMAND_0100.
如果单击退出键，那么“MODULE USER_COMMAND_0100”是不会执行的。4.2、字段检查与逻辑流的控制
相关语法：
1、单个字段检查
FIELD&FLD1&MODULE&MDL1&.
2、单个字段多个MODULE检查，如FLD1有两个MODULE检查
FIELD&FLD1&MODULE&MDL1&.
MODULE&MDL2&.
3、检查多字段，使用CHAIN
FIELD&FLD1&.
FIELD&FLD2&,&FLD3&,&FLD4&.
MODULE&MDL1&.
MODULE&MDL2&.
表示FLD1,FLD2,FLD3,FLD4有MDL1与MDL2检查。
4、不是初始值检查
FIELD&FLD1&MODLE&MDL1&ON INPUT.
ON INPUT表示是初始值改变时执行.
有一个特殊情况：FIELD&FLD1&MODULE&MDL1&ON *-INPUT
表示用户输入字段首先输入'*'，并且输入字段属性，MODULE无效。
5、有改变检查
FIELD&FLD1&MODULE&MDL1&ON REQUEST.
6、CHAIN中有字段不是初始值检查
CHAIN.FIELD&FLD1&.FIELD&FLD2&,&FLD3&,&FLD4&.MODULE&MDL1&ON CHAIN_INPUT.MODULE&MDL2&.
注意：CHAIN_INPUT表示FLD1,FLD2,FLD3,FLD4不是初始值是执行MDL1检查。
4.3、发布消息
消息的类型见表
所有字段重新输入，重新启动PAI处理，所有字段重新输入
所有字段允许输入，在未输入新值回车，也会继续PAI处理
I：信息(弹出窗口)
中断当前操作
A：异常终止
建立的消息类(TCODE:SE91) YMESS下的消息005、006、007，如下图
建立一个程序“YTEST”，建立Screen，加入退出按钮，并在主程序中设计退出程序。在主屏幕中加入4个文本字段和4个输入字段，如下图所示
其中FLD2为，进入逻辑流设计
PROCESS BEFORE OUTPUT.
MODULE STATUS_0100.
*检查FLD1、FLD2
PROCESS AFTER INPUT.
FIELD: FLD1,FLD2.
MODULE CHECK1.
*检查FLD3、FLD4
FIELD: FLD3,FLD4.
MODULE CHECK2.
*当FLD2的首字符是*时执行CHECK3检查
FIELD FLD2 MODULE CHECK3 ON *-INPUT.
MODULE CANCEL AT EXIT-COMMAND.
MODULE USER_COMMAND_0100.调整主程序，代码如下
*功能码返回值
DATA: OK_CODE TYPE SY-UCOMM,
SAVE_OK TYPE SY-UCOMM.
*定义输入字段变量
DATA: FLD1(20) TYPE C,
FLD2(20) TYPE C,
FLD3(20) TYPE C,
FLD4(20) TYPE C,
ACTION(50) TYPE C.
*直接调用窗口
CALL SCREEN 100.
MODULE CANCEL INPUT.
LEAVE PROGRAM.
ENDMODULE.
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'STATUS1'.
ENDMODULE.
MODULE USER_COMMAND_0100 INPUT.
SAVE_OK = OK_CODE.
CLEAR OK_CODE.
CASE SAVE_OK.
WHEN 'EXIT'.
LEAVE PROGRAM.
ACTION = ''.
CONCATENATE FLD1 FLD2 FLD3 FLD4 INTO ACTION.
ENDMODULE.
MODULE CHECK1 INPUT.
*当输入FLD1 = 'FLD1'时提示错误，而且不执行PAI
IF FLD1 = 'FLD1'.
MESSAGE E005(YMESS) WITH 'FLD1 ERROR'.
*当输入FLD1 = 'FLD11'时弹出窗口提示，执行PAI
IF FLD1 = 'FLD11'.
MESSAGE I005(YMESS) WITH
'FLD1 WARNING'.
*当输入FLD1 = 'FLD111'时输出成功信息，执行PAI
IF FLD1 = 'FLD111'.
MESSAGE S005(YMESS) WITH 'FLD1 OK'.
ENDMODULE.
MODULE CHECK2 INPUT.
IF FLD3 = 'FLD3'.
MESSAGE E005(YMESS) WITH 'FLD3 ERROR'.
IF FLD3 = 'FLD33'.
MESSAGE I005(YMESS) WITH 'FLD3 WARNING'.
IF FLD3 = 'FLD333'.
MESSAGE S005(YMESS) WITH 'FLD3 OK'.
ENDMODULE.
MODULE CHECK3 INPUT.
MESSAGE I005(YMESS) WITH 'FLD2 * WARNING'.
ENDMODULE.输出结果如下图
当输入FLD1 = ‘FLD1’时，提示错误，并且变量ACTION不会更改，
当输入FLD1 = ‘FLD11’时，弹出提示框，确认后变量ACTION更改，如下图
当FLD2首字符为“*”时，出现提示框，如下图
变量ACTION会更新5、Listbox下拉框设计
在屏幕上建立一个输入输出FIELD，设定属性下拉：Listbox如图
程序代码如下：
*功能码返回值
DATA: OK_CODE TYPE SY-UCOMM,
SAVE_OK TYPE SY-UCOMM.
*VRM类型定义接口
TYPE-POOLS VRM.
DATA: FLD1(20) TYPE C.
*内表、记录，字段变量定义
DATA: FNAME TYPE VRM_ID,
TYPE VRM_VALUES,
LIKE LINE OF VVA.
*直接调用窗口
CALL SCREEN 100.
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'STATUS1'.
*加两条记录
FNAME = 'FLD1'.
LVVA-KEY = '广州'.
APPEND LVVA TO VVA.
CLEAR LVVA.
LVVA-KEY = '上海'.
APPEND LVVA TO VVA.
CALL FUNCTION 'VRM_SET_VALUES'
ID = FNAME
VALUES = VVA
EXCEPTIONS
ID_ILLEGAL_NAME = 1
OTHERS = 2
IF SY-SUBRC && 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDMODULE.
MODULE CANCEL INPUT.
LEAVE PROGRAM.
ENDMODULE.
MODULE USER_COMMAND_0100 INPUT.
SAVE_OK = OK_CODE.
CLEAR OK_CODE.
CASE SAVE_OK.
WHEN 'CANCEL'.
LEAVE PROGRAM.
ENDMODULE.输出结果如图
本节先介绍这么多，剩下未介绍的请等待下一篇博文。
ABAP实战屏幕SCREEN设计(二)
动态生成屏幕控件Dynamic documents
ABAP选择屏幕设计
子屏幕和主屏幕之间PBO和PAI事件的关系
动态生成屏幕控件Dynamic documents
屏幕 Dynpro
ABAP屏幕开发-屏幕插入图片
SAP屏幕设计器专题：初识设计器（二）
简单的屏幕开发实例-ABAP
没有更多推荐了，abap 怎么退回选择屏幕_百度知道
abap 怎么退回选择屏幕
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
如果你的可执行程序没有调用过其他自定义屏幕(包括alv屏幕).在 START-OF-SELECTION之后,可以试试这个代码.IF GT_OUT IS
INITIAL.MESSAGE '没有数据被选中' TYPE 'S'. &类型一定要是'S'STOP.
&return也行ENDIF.
采纳率：100%
可以用leave program或者leave screen.
leave to screen 0.
为您推荐：
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。(美言翻译)
(布欧先生)
(晴天娃娃)
(Atlantis)
第三方登录：