ABAP 弹出对话框
一组有用的用户交互窗口函数
显示多条消息
SAP系统用的是这个函数:C14Z_MESSAGES_SHOW_AS_POPUP
POPUP_TO_CONFIRM_LOSS_OF_DATA 显示有YES/NO的弹出窗口,提示用户未保存的数据将丢失
POPUP_TO_CONFIRM_STEP 提示是否确认操作的弹出窗口
*调用对话框函数
call function ‘POPUP_TO_CONFIRM_STEP’
EXPORTING
titel = text-m02
textline1 = l_msgtxt
cancel_display = space “不显示CANCEL按钮
IMPORTING
answer = l_answer.
POPUP_TO_CONFIRM_WITH_MESSAGE 可以显示定制的提示信息的确认窗口
POPUP_TO_CONFIRM_WITH_VALUE 显示确认用户对某个特定对象的操作的弹出窗口
POPUP_TO_DECIDE 将待确认选项以单选按钮的方式显示的弹出窗口
POPUP_TO_DECIDE_WITH_MESSAGE 带消息的确认窗口
POPUP_TO_DISPLAY_TEXT 显示多行信息的窗口
POPUP_TO_SELECT_MONTH 月份选择窗口
POPUP_WITH_TABLE_DISPLAY 有表格对象的确认窗口
在SAP的开发过程中,经常会用到对话框,SAP的系统有很多不同款式的对话框函数供你选择,把对话框用好,在开发的过程中会带来很大的便利,同时也让你的程序运行效果更漂亮哦,下面我介绍一下如何使用弹出对话框单选框列表列表供用户选择,效果如下所示:
程序如下:
*&---------------------------------------------------------------------*
*& Report ZTEST_POPUP
*&
*&---------------------------------------------------------------------*
*& Create By : flying
*& Create Date : 2009-11-25
*& Descriptions : 弹出类似单选框列表供用户选择
*&---------------------------------------------------------------------*
REPORT ztest_popup.
TABLES: spopli.
*----------------------------------------------------------------------*
* define internal tables
* 定义内表
*
*----------------------------------------------------------------------*
DATA: t_spop LIKE spopli OCCURS 0 WITH HEADER LINE. "定义供用户选择列表
*----------------------------------------------------------------------*
* define data
* 定义变量
*
*----------------------------------------------------------------------*
data: answer type string. "用于存储用户选择
*----------------------------------------------------------------------*
* start-of-selection
* 执行屏幕
*
*----------------------------------------------------------------------*
START-OF-SELECTION.
PERFORM frm_popup_to_select.
*----------------------------------------------------------------------*
* form frm_popup_to_select
* 弹出对话框
*
*----------------------------------------------------------------------*
FORM frm_popup_to_select.
REFRESH t_spop.
CLEAR t_spop.
t_spop-selflag = 'X'. "设置选中
t_spop-varoption = 'MBEW'. "设置显示的文本
t_spop-inactive = ''. "设置不可编辑
APPEND t_spop.
CLEAR t_spop.
t_spop-selflag = ''.
t_spop-varoption = 'EKPO'.
t_spop-inactive = ''.
APPEND t_spop.
CLEAR t_spop.
t_spop-selflag = ''.
t_spop-varoption = 'MSEG'.
t_spop-inactive = ''.
APPEND t_spop.
CALL FUNCTION 'POPUP_TO_DECIDE_LIST'
EXPORTING
cursorline = 1
mark_flag = ' '
mark_max = 1
start_col = 20 "设置开始的列
start_row = 7 "设置开始的行
textline1 = '请选择' "设置文本行内容1
* TEXTLINE2 = ' '
* TEXTLINE3 = ' '
titel = '测试用户选择' "设置标题
* DISPLAY_ONLY = ' '
IMPORTING
answer = answer "获得用户选择,这里返回的值对应是当前列表NO,比如第一个就返回1,第二个返回2。。。。。
tables
t_spopli = t_spop "设置选择列表
EXCEPTIONS
NOT_ENOUGH_ANSWERS = 1
TOO_MUCH_ANSWERS = 2
TOO_MUCH_MARKS = 3
OTHERS = 4
.
IF sy-subrc <> 0.
ENDIF.
ENDFORM. "frm_popup_to_select
转载于:https://www.cnblogs.com/rainysblog/p/6257502.html
ABAP 弹出对话框相关推荐
- abap 弹出对话框函数POPUP_GET_VALUES的使用方法
项目中,经常用到,点击按钮时弹出一个对话框,选择一些值,然后返回选择的值,进一步操作,下面是使用弹窗对话框函数POPUP_GET_VALUES返回日期的例子,当然后也可以时其他类型的,定义数据元素时, ...
- java fx alert_javaFx:使用弹出对话框 Alert
javaFx8 自带的对话框非常好用,类似的使用方式如下: /** * 弹出一个通用的确定对话框 * @param p_header 对话框的信息标题 * @param p_message 对话框的信 ...
- ASP.NET弹出对话框几种基本方法【】
来源:http://www.cnblogs.com/langge/archive/2009/10/24/1589043.html 我们在.NET程序的开发过程中,常常需要和用户进行信息交互,比如执行某 ...
- C++中各种弹出对话框
#include<windows.h> #include<cstdio> int main(){int x;x=MessageBox(GetForegroundWindow() ...
- windows7关闭计算机对话框,电脑弹出对话框很烦人怎么办?win7禁止对话框弹出的方法...
在使用win7系统的过程中,如果系统中出现了错误或者是有某种提示的时候,,系统就会自动弹出一个提示框来提醒用户,但是有时候一些无关紧要的提示也会弹出来,这就非常的烦人了,所以有的用户想设置禁止对话框弹 ...
- .NET弹出对话框小结
我们在.NET程序的开发过程中,常常需要和用户进行信息交互,比如执行某项操作是否成功,"确定"还是"取消",以及选择"确定"或"取 ...
- jquery easyui 弹出对话框被activex控件遮挡问题
为什么80%的码农都做不了架构师?>>> 参考:http://bbs.csdn.net/topics/390375764 本人遇到jquery easyui 弹出对话框被act ...
- 异步任务下载apk文件并弹出对话框提示当前进度,文件下载结束后弹出安装界面
主要任务 1.下载apk保存到sd卡指定目录 2.下载时显示下载的进度 3.下载完成后弹出对话框提示安装 分析过程: 联网操作不能在UI线程(主线程)进行 需要开启线程下载,为了效率我们这里采用异步线 ...
- JavaScript - JavaScript自定义弹出对话框
本脚本使用自定义的浮动窗口替代浏览器自己的对话框,效果非常不错.包含Error | Warning | Success | Prompt 四个对话框窗口 兼容性:IE6+ FireFox2+ Oper ...
最新文章
- Revising Aggregations - The Sum Function(集合函数-sum)
- JS对数据分页的封装方法
- mysql join 算法_【MySQL】之join算法详解
- Error querying database. Cause: java.sql.SQLSyntaxErrorException: ORA-00911: 无效字符
- 1 睡眠唤醒_一劳永逸解决WIN10所有睡眠问题
- 用java程序for循环打印菱形_编写Java程序,应用for循环打印菱形、三角形
- 中山市区电信5g覆盖地图_热点 | 百度与中国电信达成战略合作 覆盖5G、互联网等领域...
- 什么是PV UV PR值
- 深度学习的应用及主流框架
- C语言求一组分数数列之和
- 感知层在物联网中的重要性
- 基于umijs+lerna+qiankun的微前端实现
- android 蓝牙打印乱码,蓝牙打印机打印中文乱码
- 吊炸天的 JD-hotkey !京东开源!单机 QPS 高达 370000
- 华为服务器 买回来带系统吗,购买服务器是否带操作系统
- frp:开源内网穿透工具
- 关于HTML语言img标签图像显示问题解决方法
- tkinter文本框小功能(6):锚点
- 互联网项目开发流程大全
- SAP业务顾问必备的技术能力
热门文章
- MySQL 关键字和保留字汇总(MySQL 8.0)
- switch动森amiibo数据_Switch动物之森amiibo怎么用 switch集合啦动物之森amiibo卡有什么用...
- 一个资深程序猿对Python的总结
- 计算机更换主板后是否需要安装驱动程序,电脑更换主板不重装系统怎么设置
- Base64加密工具类 - Base64Utils
- UbnutuSkills
- 2019 ICPC亚洲区域赛银川赛区题解
- 贵阳白云区商学院计算机系,贵州商学院有几个校区及校区地址
- android kotlin 接口回调
- 无人值守称重系统 | 地磅称重系统