ABAP--启用后台作业

案例：

DATA:jobname LIKE tbtcjob-jobname. "后台进程名称DATA:jobcount LIKE tbtcjob-jobcount. jobname = uuid. "job open 获取jobname jobcount CALL FUNCTION'JOB_OPEN'EXPORTING jobname = jobname IMPORTING jobcount = jobcount EXCEPTIONS cant_create_job = 01 invalid_job_data = 02 jobname_missing = 03. IF sy-subrc NE 0. * MESSAGE'后台任务开启失败'TYPE'E'. ELSEIF sy-subrc = 0. * insert process into job 创建后台进程 SUBMIT zmmr01h VIA JOB jobname "JOB_OPEN获取的值 NUMBER jobcount AND RETURN. "JOB_OPEN获取的值 ******** close job CALL FUNCTION'JOB_CLOSE'EXPORTING jobcount = jobcount jobname = jobname strtimmed ='X'EXCEPTIONS cant_start_immediate = 01 invalid_startdate = 02 jobname_missing = 03 job_close_failed = 04 job_nosteps = 05 job_notex = 06 lock_failed = 07 OTHERS = 99.CLEAR:jobcount,jobname. ENDIF.

注意点：
自己调自己的时候，要注意程序不会等待后台任务执行完在执行，所以可以直接离开程序；后台任务的逻辑和前台要区分开（通过sy-batch），程序只有start-of-selection才能识别sy-batch。