ABAP创建自定义事件触发的后台任务的样例

1)建立自定义事件

运行SM62

输入自定义事件名称和描述，并按“保存”按钮保存

2)创建触发自定义事件的程序

触发事件是通过'BP_EVENT_RAISE'来完成的，一个简单代码如下

*&---------------------------------------------------------------------*
*& Report  Z_TRIGGER_EVENT                                             *
*&---------------------------------------------------------------------*
REPORT  Z_TRIGGER_EVENT                         .
CALL FUNCTION 'BP_EVENT_RAISE'
  EXPORTING
    eventid                      = 'Z_TRIGGER_JOB'
 EXCEPTIONS
   BAD_EVENTID                  = 1
   EVENTID_DOES_NOT_EXIST       = 2
   EVENTID_MISSING              = 3
   RAISE_FAILED                 = 4
   OTHERS                       = 5
          .
IF sy-subrc <> 0.
 Write: 'Event failed to trigger'.
else.
 Write: 'Event triggered'.
ENDIF.

3)创建自定义事件触发的后台任务

运行SM36，输入后台任务名称和任务类型

按“开始条件”按钮，并在弹出的屏幕点击“事件后”按钮，输入自定义的事件名称，并按“保存”按钮返回上一屏幕。

点击“步骤”按钮，在弹出窗口输入后台程序和变式，并按“保存”按钮保存，返回后台任务定义屏幕

4)测试

运行SE38，输入“Z_TRIGGER_EVENT ”，并按“运行”按钮运行。

运行SM37，输入并输入条件，并按“执行”则可以看到后台任务列表。