SAP ERP101 interface PAI definition

本文介绍了一个ABAP模块 USER_COMMAND_0100 的具体实现细节,包括不同用户命令触发的不同操作流程,如保存数据、导出Excel、返回上一界面及退出程序等。通过案例展示了ABAP中如何响应用户的交互请求。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

 *----------------------------------------------------------------------*
***INCLUDE Z_MMCUST101_CN_PAI .
*----------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*&      Module  USER_COMMAND_0100  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE USER_COMMAND_0100 INPUT.
  gv_okcode = okcode.
  CLEAR okcode.
  gt_grid1[] = gt_data[].
  CASE gv_okcode.
    WHEN 'BACK'.
      SET SCREEN 0.
    WHEN 'SAVE'.
      PERFORM create_message_log USING '0'.
      PERFORM f_user_command USING c_save.
      PERFORM save_message_log_to_dtba.

    WHEN 'EXCEL'.
      Perform download_data.
    WHEN 'EXIT'.
      SUBMIT (sy-repid) VIA SELECTION-SCREEN.
  ENDCASE.

ENDMODULE.                 " USER_COMMAND_0100  INPUT
*&---------------------------------------------------------------------*
*&      Module  EXIT  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
module EXIT input.

  IF sy-ucomm EQ 'LEAVE'.
    LEAVE PROGRAM.
  ENDIF.

endmodule.                 " EXIT  INPUT  
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

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

余额充值