Write to job log

Question

Hi,
   I am running report in background have used job_open,job_close and submit statement.Actally in my scenario 2 report are running so 2 spool number is getting generate

Answer 1

Hi,
Use the following code :
Afterthe SUBMIT stmt, read the joblog of the called program within the calling program and get the spool numbers.
    CALL FUNCTION 'BP_JOBLOG_READ'
      EXPORTING
        client                = sy-mandt
        jobcount              = g_jcount
        jobname               = g_jbname
      TABLES
        joblogtbl             = g_t_joblogtbl
      EXCEPTIONS
        cant_read_joblog      = 1
        jobcount_missing      = 2
        joblog_does_not_exist = 3
        joblog_is_empty       = 4
        joblog_name_missing   = 5
        jobname_missing       = 6
        job_does_not_exist    = 7
        OTHERS                = 8.
    IF sy-subrc EQ 0.
* Looping at the internal table for the joblog the messages are reported
* to build the joblog in calling program
      LOOP AT g_t_joblogtbl INTO g_wa_joblogtbl.
        MESSAGE g_wa_joblogtbl-text TYPE 'I'.
        FIND 'Spool request'(011) IN g_wa_joblogtbl-text.
        IF sy-subrc EQ 0.
* Find for the spool numbers in the joblog table and append the numbers
* in the internal table g_t_spool
          FIND '0' IN g_wa_joblogtbl-text MATCH OFFSET g_moff.
          g_wa_spool-listident = g_wa_joblogtbl-text+g_moff(10).
          APPEND g_wa_spool TO g_t_spool.
        ENDIF.
      ENDLOOP.