Wednesday, 22 October 2014

Ex. Submit call screen

 

DATA rspar TYPE TABLE OF rsparams WITH HEADER LINE.

"Get all value on screen
CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS'
EXPORTING
      curr_report           = sy-repid
*  IMPORTING
*    SP                    =
TABLES
      selection_table       = rspar .

IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.


“additional value

rspar-selname = 'JOBCOUNT'.
  rspar-kind    = 'P'.  “P = parameter , S = Select option
  rspar-sign    = 'I'.
  rspar-option  = 'EQ'.
  rspar-low     = ‘1’.
APPEND rspar.

 

"Submit Program
SUBMIT (program_name) 
AND RETURN
WITH SELECTION-TABLE rspar

 

No comments:

Post a Comment