北冰洋以北 发表于 2022-10-8 20:03:25

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

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

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

PROCESS BEFORE OUTPUT.
MODULE status_9002.
MODULE get_data.
*
PROCESS AFTER INPUT.
MODULE user_command_9002. "按钮事件
MODULE modify_data.按钮事件:对按钮进行外部连接代码处理
IF sy-ucomm = 'BTN1'.
    CALL FUNCTION 'CALL_BROWSER'
      EXPORTING
      url      = 'http://www.baidu.com'
      new_window = 'X'.

    CLEAR ok-code.
    CLEAR sy-ucomm.

    CALL FUNCTION 'MAIN_PARAMETER_SET_BILDPAI_SUB' "跳转后再次回到基础数据2
      EXPORTING
      rmmzu_okcode = 'SP14'
      bildflag   = ''.

ENDIF.配置子屏幕

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