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，输入并输入条件，并按“执行”则可以看到后台任务列表。