经过查阅资料原来是资源不足的问题：

原来是sap在并行运行时资源不足，执行了一半资源不足时直接中断了

 

 然后还是查询资料，看到国外的已经有解决方案了（不多说，我就是搬运了代码）

11:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

loop at lt_itab.   * try to initialize parallel process do.   * check if there is enough process in the system ( sm50) * refer to https://www.sapalles.com/2014/06/10/abap-parallel-processing-2-strategy/ call function Z_CHECK_RESOURCES * if there is enough DIA process if lv_free_wp GT 0.   call funtion 'Z_PARALLEL_PROCESS' starting new task exceptions resource_failure    = 1 others              = 2.   * no resource problem ,then exit do and iterate in itab if sy-subrc eq 0. <code></code> exit. endif. endif.   waint until lv_value eq 'X'. enddo.   endloop.

22:这是检查资源的功能。 Z_CHECK_RESOURCES

 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55

function z_check_resources. *"---------------------------------------------------------------------- *"*"Local Interface: *"  IMPORTING *"     REFERENCE(I_GROUP) TYPE  RZLLI_APCL *"     REFERENCE(I_SAFE_PERCENT) TYPE  I DEFAULT 75 *"  EXPORTING *"     REFERENCE(E_FREE_WP) TYPE  I *"----------------------------------------------------------------------   data lt_applserver type table of rzlli_asvr with header line .   data lv_applserver type msname2 .   data lv_safe type i .   data lv_dia_wps type i.   data lv_free_dia_wps type i .   data lv_total type i .   data lv_free type i .     select applserver from rzllitab     into table lt_applserver     where classname eq i_group.     loop at lt_applserver .       lv_applserver = lt_applserver.       clear lv_dia_wps.     clear lv_free_dia_wps .     call function 'TH_COUNT_WPS'       exporting         server       = lv_applserver       importing         dia_wps      = lv_dia_wps         free_dia_wps = lv_free_dia_wps       exceptions         failed       = 1         others       = 2.     if sy-subrc eq 0.         lv_total = lv_dia_wps + lv_total .       lv_free = lv_free_dia_wps + lv_free.     endif.     endloop.     lv_safe = ( lv_total * i_safe_percent ) / 100.     if lv_free gt lv_safe .     e_free_wp = lv_free.   else.     e_free_wp = 0 .   endif.       endfunction.

 

https://www.sapalles.com/2014/02/03/abap-parallel-processing-1/

https://www.sapalles.com/2014/06/10/abap-parallel-processing-2-strategy/

记录一下，国内网站没有找到的解决方案