Hi
You can check this prg. See if its useful for you...
Regards
Raj
here is a code for a sample program which has selection screen fields (parameters and select-options) and ALV GRID on the selection screen.
Just copy paste the code in se38 and try it.
REPORT Y_SPLIT_SELSCREEN .
DATA:
docking TYPE REF TO cl_gui_docking_container .
*
*********
include <icon>.
data: ok_code like sy-ucomm,
gt_spfli type table of spfli,
gt_sflight type table of sflight,
g_repid like sy-repid,
g_max type i value 100,
gs_layout type lvc_s_layo,
gs_toolbar type stb_button,
grid1 type ref to cl_gui_alv_grid,
grid2 type ref to cl_gui_alv_grid,
custom_container1 type ref to cl_gui_custom_container,
custom_container2 type ref to cl_gui_custom_container.
PARAMETERS: user like sy-uname .
AT SELECTION-SCREEN OUTPUT.
PERFORM build_gridviewer .
START-OF-SELECTION.
&----
*& Form build_gridviewer
&----
----
----
FORM build_gridviewer .
DATA: repid LIKE sy-repid.
IF NOT grid1 IS INITIAL .
CALL METHOD grid1->free .
ENDIF .
repid = sy-repid.
if docking is initial .
CREATE OBJECT docking
EXPORTING
repid = repid
dynnr = sy-dynnr
side = cl_gui_docking_container=>dock_at_right
extension = '300'
EXCEPTIONS
cntl_error = 1
cntl_system_error = 2
create_error = 3
lifetime_error = 4
lifetime_dynpro_dynpro_link = 5.
endif .
IF NOT docking IS INITIAL AND
grid1 IS INITIAL .
create object grid1
exporting i_parent = docking.
refresh gt_spfli .
select * from spfli into table gt_spfli.
*
call method grid1->set_table_for_first_display
exporting i_structure_name = 'SPFLI'
is_layout = gs_layout
changing it_outtab = gt_spfli.
ENDIF .
ENDFORM. " build_htmlviewer
Bluesky
