IN BACKROUND TASK 延迟触发tRFC

1. DATA:lv_vbeln     TYPE likp-vbeln,
   
2.      lv_startdate LIKE sy-datum,
   
3.      lv_starttime LIKE sy-uzeit.
   
4. DATA:lv_timestamp TYPE timestamp. "UTC Time Stamp in Short Form (YYYYMMDDhhmmss)
   
5. 
   
6. lv_vbeln = is_mkpf-xblnr.
   
7. CASE ls_mseg-bwart.
   
8.   WHEN '101'.
   
9.     CALL FUNCTION 'ZSDFM008' IN BACKGROUND TASK
   
10.       EXPORTING
    
11.         i_vbeln = lv_vbeln.
    
12. 
    
13.   WHEN '102'.
    
14.     CALL FUNCTION 'ZSDFM009' IN BACKGROUND TASK
    
15.       EXPORTING
    
16.         i_vbeln = lv_vbeln.
    
17. 
    
18.   WHEN OTHERS.
    
19. ENDCASE.
    
20. 
    
21. GET TIME STAMP FIELD lv_timestamp.  "获取系统当前时间戳
    
22. lv_timestamp = lv_timestamp + 30 .  "延迟30秒执行ZSDFM008/ZSDFM009
    
23. 
    
24. CONVERT TIME STAMP lv_timestamp TIME ZONE sy-zonlo INTO DATE lv_startdate TIME lv_starttime.
    
25. 
    
26. CALL FUNCTION 'START_OF_BACKGROUNDTASK'
    
27.   EXPORTING
    
28.     startdate = lv_startdate
    
29.     starttime = lv_starttime.
    
30. 
    
31. COMMIT WORK.

复制代码

1、主程序不延迟一直执行，tRFC延迟异步执行
2、因为有commit所以不要用在增强中，会破环标准事物的LUW，测试会间歇性出现一些未知错误，增强中异步请使用STARTING NEW TASK