ABAP 物料主数据 屏幕增强按钮

首先看效果，目标是在物料主数据中 基础数据页面新增一个按钮来满足跳转需求，这里以跳转百度为例
页面效果如下：
[img=75%,75%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008140035372-1488631512.png[/img]创建定制程序

事务代码 SPRO，路径：后勤-常规 -> 物料主数据 -> 配置物料主记录 -> 创建定制子屏幕的程序
[img=50%,50%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008140623628-2020788359.png[/img]创建函数组，如果函数组已经存在，可以se80查看函数组[img=50%,50%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008141308128-232984053.png[/img]在se80中新建屏幕[img=25%,25%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008141420318-432737972.png[/img]屏幕配置如下[img=50%,50%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008141647753-426209820.png[/img]点击布局，构建屏幕[img=50%,50%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008143235945-265610197.png[/img]屏幕程序流

1. PROCESS BEFORE OUTPUT.
2.   MODULE status_9002.
3.   MODULE get_data.
4. *
5. PROCESS AFTER INPUT.
6.   MODULE user_command_9002. "按钮事件
7.   MODULE modify_data.

复制代码

按钮事件：对按钮进行外部连接代码处理

1.   IF sy-ucomm = 'BTN1'.
2.     CALL FUNCTION 'CALL_BROWSER'
3.       EXPORTING
4.         url        = 'http://www.baidu.com'
5.         new_window = 'X'.
7.     CLEAR ok-code.
8.     CLEAR sy-ucomm.
10.     CALL FUNCTION 'MAIN_PARAMETER_SET_BILDPAI_SUB' "跳转后再次回到基础数据2
11.       EXPORTING
12.         rmmzu_okcode = 'SP14'
13.         bildflag     = ''.
15.   ENDIF.

复制代码

配置子屏幕

事务代码 SPRO，路径：后勤-常规 -> 物料主数据 -> 配置物料主记录 -> 定义每个屏幕序列的数据屏幕的结构
[img=50%,50%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008143802719-309332002.png[/img]选择21页签[img=50%,50%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008143858723-1877727902.png[/img]看到熟悉的页面，在进入基础数据2[img=50%,50%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008161720985-973043280.png[/img]在相应位置修改程序以及屏幕，最好确认当前屏幕是空的，是不用的[img=50%,50%]https://img2022.cnblogs.com/blog/2311916/202210/2311916-20221008162100474-584171262.png[/img]
免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！