PBO parameter pass at SUBMIT

Question

hey
i want to pass the parameter from dynpro screen to report
in background thru submit statement
at PBO
jobname = 'xxxx'.
jobcount = '2323'.
SUBMIT ZBGTESTREP AND RETURN
               WITH P_PARAM1 = '1'
               WITH P_PARAM2 = '1'
               user sy-uname
               via job jobname
               number jobcount.
but its not working
could you pls tell how to pass the value from P_PARAM1 and P_PARAM2 at PBO
to report.
i used JOB OPEN,submit,job close to execute the report in background.
In report i just assinged P_PARAM1 and P_PARAM2  value to report dumy variable
when i tried to print those values its not coming.
any other way to access the parameter. or pass the parameter value to
report instead variant.(not variant)
ambichan.

Answer 1

Hello,
I am really not too sure to say why your code is not working...
This is my sample code which is working...
*- Create a BTC Job
  PERFORM create_job.
*- add Job step by ABAP Submit
  PERFORM add_job_step.
*- Close the Job
  PERFORM close_job.
FORM create_job.
  CLEAR: g_datum,
         g_uzeit,
         g_jobcount,
         g_jobname.
  g_jobname = p_jobnam.
  g_datum   = p_datum.
  g_uzeit   = p_uzeit.
  CALL FUNCTION 'JOB_OPEN'
       EXPORTING
        DELANFREP        = ' '
        JOBGROUP         = ' '
           jobname          = g_jobname
           sdlstrtdt        = g_datum
           sdlstrttm        = g_uzeit
      IMPORTING
           jobcount         = g_jobcount
      EXCEPTIONS
           cant_create_job  = 1
           invalid_job_data = 2
           jobname_missing  = 3
           OTHERS           = 4
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.
ENDFORM.                    " CREATE_JOB
FORM add_job_step.
  SUBMIT zz13m_jilava_process AND RETURN
     USER sy-uname          " User for runtime authorizations
     WITH p_prot   EQ p_prot
     WITH p_mode   EQ p_mode
     WITH p_logsys EQ p_logsys
     WITH p_baennr EQ p_baennr
     VIA JOB g_jobname NUMBER g_jobcount
                            " Job name and job number
                            " from JOB_OPEN
     TO SAP-SPOOL           " Print and archiving options from
                            " GET_PRINT_PARAMETERS
                            " Both sets of options come from
                            " GET_PRINT_PARAMETERS
        SPOOL PARAMETERS g_s_user_print_params
        ARCHIVE PARAMETERS g_s_user_arc_params
        WITHOUT SPOOL DYNPRO.
ENDFORM.                    " ADD_JOB_STEP
FORM close_job.
  CALL FUNCTION 'JOB_CLOSE'
       EXPORTING
        AT_OPMODE                   = ' '
        AT_OPMODE_PERIODIC          = ' '
        CALENDAR_ID                 = ' '
        EVENT_ID                    = ' '
        EVENT_PARAM                 = ' '
        EVENT_PERIODIC              = ' '
            jobcount                    = g_jobcount
            jobname                     = g_jobname
        LASTSTRTDT                  = NO_DATE
        LASTSTRTTM                  = NO_TIME
        PRDDAYS                     = 0
        PRDHOURS                    = 0
        PRDMINS                     = 0
        PRDMONTHS                   = 0
        PRDWEEKS                    = 0
        PREDJOB_CHECKSTAT           = ' '
        PRED_JOBCOUNT               = ' '
        PRED_JOBNAME                = ' '
           sdlstrtdt                   = g_datum
           sdlstrttm                   = g_uzeit
        STARTDATE_RESTRICTION       = BTC_PROCESS_ALWAYS
        STRTIMMED                   = ' '
        TARGETSYSTEM                = ' '
        START_ON_WORKDAY_NOT_BEFORE = SY-DATUM
        START_ON_WORKDAY_NR         = 0
        WORKDAY_COUNT_DIRECTION     = 0
        RECIPIENT_OBJ               =
        TARGETSERVER                = ' '
      IMPORTING
           job_was_released            = g_job_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 SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
ENDFORM.                    " CLOSE_JOB
I hope this helps you.
Regards, Murugesh AS