We can help. Together we learn....

Value entered in the selection screen, displayed automatically by the function module is nice tabular fashion. Very helpful when the selection screen is huge having a lot of parameters and select options.

 

*----------------------------------------------------------------------*
* T A B L E S *
*----------------------------------------------------------------------*
TABLES: mara.
*----------------------------------------------------------------------*
* S E L E C T I O N S C R E E N *
*----------------------------------------------------------------------*
SELECTION-
SCREENBEGIN OF BLOCK b2 WITH FRAME.
SELECT-OPTIONS: mat FOR mara-matnr NO INTERVALS.
SELECT-OPTIONS: mtype FOR mara-mtart NO INTERVALS.
SELECTION-
SCREENEND OF BLOCK b2.

END-OF-SELECTION.
WRITE:/ 'Thank you'.

TOP-
OF-PAGE.
DATA: i_sel TYPE STANDARD TABLE OF rsparams INITIAL SIZE 0.
  
IF sy-pagno EQ 1.
* Call function for getting selection screen details
    
CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS'
      
EXPORTING
        curr_report     = sy-cprog
      
TABLES
        selection_table = i_sel
      
EXCEPTIONS
        not_found       = 
1
        no_report       = 
2
        
OTHERS          = 3.
    
IF sy-subrc <> 0.
      
WRITE:/ 'Fails to get the selection screen details'(201).
    
ENDIF.

* Displaying selection screen details
    
CALL FUNCTION 'RS_LIST_SELECTION_TABLE'
      
EXPORTING
        
report        = sy-cprog
        seltext       = 
'X'
        screennr      = 
' '
      
TABLES
        sel_tab       = i_sel
      
EXCEPTIONS
        sel_tab_empty = 
1
        
OTHERS        = 2.
    
IF sy-subrc <> 0.
      
WRITE:/ 'Fails to display the selection screen details'(202).
    
ENDIF.
  
ENDIF.




1 comments:

  1. Unknown on September 24, 2016 at 3:14 PM This comment has been removed by the author.  

Categories