Creating job

Question

Hi Experts,
I am about to create a batch job. I used FM JOB_OPEN, JOB_SUBMIT and JOB_CLOSE. However, whenever I run the program it creates job for every 1 second. It will not stop creating jobs unless you completely exited in the program. The code is not inside the loop.

Answer 1

mariposa,
   Suppose you have 100000 records which is going for dump in background also.
Taht time decided to create a job for every 20000 records.
select * from database table
  into itab
packaze size 20000
where x  =  s_x.
   your functionality here if required and moved to final internal table.
Now  you have to pass this final internal table data to your submit program selection screen.
CALL FUNCTION 'JOB_OPEN'
      EXPORTING
    DELANFREP              = ' '
    JOBGROUP               = ' '
        jobname                = csm_std_reconciliation_job
    SDLSTRTDT              = NO_DATE
    SDLSTRTTM              = NO_TIME
     IMPORTING
        jobcount               = jobcount
EXCEPTIONS
   cant_create_job        = 1
   invalid_job_data       = 2
   jobname_missing        = 3
   OTHERS                 = 4
    IF sy-subrc <> 0.
MESSAGE ID 'CSM' TYPE 'W' NUMBER '045' WITH csm_std_reconciliation_job.
      EXIT.
    ENDIF.
    CALL FUNCTION 'JOB_SUBMIT'
      EXPORTING
    ARCPARAMS                         =
        authcknam                         = sy-uname
    COMMANDNAME                       = ' '
    OPERATINGSYSTEM                   = ' '
    EXTPGM_NAME                       = ' '
    EXTPGM_PARAM                      = ' '
    EXTPGM_SET_TRACE_ON               = ' '
    EXTPGM_STDERR_IN_JOBLOG           = 'X'
    EXTPGM_STDOUT_IN_JOBLOG           = 'X'
    EXTPGM_SYSTEM                     = ' '
    EXTPGM_RFCDEST                    = ' '
    EXTPGM_WAIT_FOR_TERMINATION       = 'X'
        jobcount                          = jobcount
       jobname                           = csm_std_reconciliation_job
    LANGUAGE                          = SY-LANGU
    PRIPARAMS                         = ' '
        report                            = csm_std_reconciler
        variant                           = csmvari
  IMPORTING
    STEP_NUMBER                       =
     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
    IF sy-subrc <> 0.
MESSAGE ID 'CSM' TYPE 'W' NUMBER '045' WITH csm_std_reconciliation_job.
      EXIT.
    ENDIF.
    strttime = sy-uzeit + timepad.
    CALL FUNCTION 'JOB_CLOSE'
      EXPORTING
        jobcount                          = jobcount
        jobname   = csm_std_reconciliation_job
       sdlstrtdt                         = sy-datum
       sdlstrttm                         = strttime
IMPORTING
  JOB_WAS_RELEASED                  =
     EXCEPTIONS
       cant_start_immediate              = 1
       invalid_startdate                 = 2
       jobname_missing                   = 3
       job_close_failed                  = 4
       job_nosteps                       = 5
       job_notex                         = 6
       lock_failed                       = 7
       OTHERS                            = 8
    IF sy-subrc <> 0.
      MESSAGE ID 'CSM' TYPE 'W' NUMBER '045'
         WITH csm_std_reconciliation_job.
      EXIT.
    ELSE.
      MESSAGE ID 'CSM' TYPE 'I' NUMBER '104' WITH
          csm_std_reconciliation_job.
    ENDIF.
endselect.
Now for every 20000 records it will create one batch job.
Pls. reward if useful.