SAP-领料单代码

最新推荐文章于 2024-07-15 22:17:25 发布

小啊曼

最新推荐文章于 2024-07-15 22:17:25 发布

阅读量808

点赞数 15

分类专栏： SAP-MM 文章标签：前端 linux javascript

本文链接：https://blog.csdn.net/qq_32198063/article/details/136053940

版权

SAP-MM 专栏收录该内容

22 篇文章 0 订阅

订阅专栏

文章描述了一个在选择界面中，通过按钮触发数据抓取（包括自建表数据）和屏幕操作的功能，如调用特定屏幕或显示错误消息的过程。

摘要由CSDN通过智能技术生成

REPORT ZMM_D003.
*变量定义
INCLUDE ZDEFINITION.
*按钮捕获
INCLUDE Z_PRO_UCOMM.
*数据提取
INCLUDE Z_GET_DATA_TMP.
*ALV
INCLUDE Z_GET_ALV.
*功能键触发
INCLUDE Z_GET_UCOMM_PRINT_BIPI.

INITIALIZATION.

  PERFORM GET_INCN_ID. "选择界面通知

AT SELECTION-SCREEN.

  PERFORM F_PRO_UCOMM. "捕获按钮

  CLEAR SY-UCOMM.

AT SELECTION-SCREEN OUTPUT.

  PERFORM GET_SCREEN.

START-OF-SELECTION.

  IF P11 = 'X' OR P22 = 'X' OR P55 = 'X'.

    PERFORM GET_DATA. "数据提取

    PERFORM GET_DATA_TABLS. "自建表数据提取

    IF IT_TAB[] IS INITIAL AND IT_ZMM017_TMP[] IS INITIAL.
      MESSAGE S011(ZMM_MSG) WITH '' DISPLAY LIKE 'E'.
    ELSE.
      CALL SCREEN 9001.
    ENDIF.
  ENDIF.

  IF P77 = 'X'.

    PERFORM GET_DATA_TABLS. "自建表数据提取
    IF IT_ZMM017_TMP[] IS INITIAL.
      MESSAGE S011(ZMM_MSG) WITH '' DISPLAY LIKE 'E'.
    ELSE.
      CALL SCREEN 9002.
    ENDIF.

  ENDIF.

END-OF-SELECTION.