Create Background Jobs With ABAP
Create Background Jobs
Actually You can set In "Menu : Prgrams -> Execute in Background (F9)"
But If You Want to Code....
Create Background Jobs With Abap
Actually You can set In "Menu : Prgrams -> Execute in Background (F9)"
![]() |
![]() |
Set Date & Time Or Period. |
But If You Want to Code....
Create Background Jobs With Abap
DATA: l_jobname TYPE tbtcjob-jobname VALUE 'Jobs Name',
l_jobcount TYPE tbtcjob-jobcount,
l_retcode TYPE i,
l_pri_param TYPE pri_params.
PARAMETERS p_date TYPE sy-datum DEFAULT sy-datum.
PARAMETERS p_time TYPE sy-uzeit.
"Open Job Scheduling Without Dialog (Including COMMIT WORK)
CALL FUNCTION 'JOB_OPEN'
EXPORTING
jobname = l_jobname
IMPORTING
jobcount = l_jobcount
CHANGING
ret = l_retcode
EXCEPTIONS
cant_create_job = 1
invalid_job_data = 2
jobname_missing = 3
OTHERS = 4.
CHECK sy-subrc EQ 0.
CALL FUNCTION 'JOB_SUBMIT'
EXPORTING
authcknam = sy-uname
jobcount = l_jobcount
jobname = l_jobname
report = 'Programs Name' "Not T-Code
variant = 'Var'
EXCEPTIONS
bad_priparams = 1
bad_xpgflags = 2
invalid_jobdata = 3
jobname_missing = 4
job_notex = 5
job_submit_failed = 6
lock_failed = 7
program_missing = 8
prog_abap_and_extpg_set = 9
OTHERS = 10.
CHECK sy-subrc EQ 0.
"Close Background Request With COMMIT WORK
CALL FUNCTION 'JOB_CLOSE'
EXPORTING
jobcount = l_jobcount
jobname = l_jobname
strtimmed = 'X'
sdlstrtdt = p_date
sdlstrttm = p_time
EXCEPTIONS
cant_start_immediate = 1
invalid_startdate = 2
jobname_missing = 3
job_close_failed = 4
job_nosteps = 5
job_notex = 6
lock_failed = 7
invalid_target = 8
OTHERS = 9.
IF sy-subrc = 0.
MESSAGE 'Job''s Scheduled' type 'S'.
ELSE.
MESSAGE 'Error Schedule' TYPE 'E'.
ENDIF.
Check It in T-Code : SM37
Check It in T-Code : SM37
Comments
Post a Comment