Submit a Background Job Dynamically

• 
• 

Details

Category: ABAP

Published on Thursday, 30 April 2009 16:17

Written by anon.

Hits: 23695

REPORT  Z_JOB.

Data: v_date type sy-datum,
      v_time type sy-uzeit,
      v_valid type c,
      w_params   like pri_params,
      v_jobcount like tbtcjob-jobcount,
      v_jobname  like tbtcjob-jobname.

RANGES: ITAB for pa0000-pernr.

*Print Parameters
call function 'GET_PRINT_PARAMETERS'
     exporting
       no_dialog = 'X'
     importing
       valid     =      v_valid
       out_parameters = w_params.
IF sy-subrc <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

*Open Job
v_jobname = 'Z_JOBNAME'.
call function 'JOB_OPEN'
     exporting
      jobname = v_jobname
     importing
      jobcount = v_jobcount.


itab-low = '021232'.
APPEND ITAB.
itab-low = '021233'.
APPEND ITAB.
itab-low = '021234'.
APPEND ITAB.
itab-low = '021235'.
APPEND ITAB.

*Submit report to job
submit Z_DYN_BACKGROUND
with S_PERNR IN ITAB
via job v_jobname
number v_jobcount
to sap-spool without spool dynpro
spool parameters w_params
and return.


*10 seconds from now JOB is triggered.
v_date = sy-datum.
v_time = sy-uzeit + 10 .

*      Schedule and close job.
call function 'JOB_CLOSE'
     exporting
      jobcount  = v_jobcount
      jobname   = v_jobname
      sdlstrtdt = v_date

• < Prev
• Next >