SAP-领料单代码

文章描述了一个在选择界面中,通过按钮触发数据抓取(包括自建表数据)和屏幕操作的功能,如调用特定屏幕或显示错误消息的过程。
摘要由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.

  • 15
    点赞
  • 16
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

小啊曼

你的鼓励将是我创作的最大动力!

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值