To Load ALV Layout in report selection screen

Hi...
I want the selection screen option for user so that he can select any of the saved layouts.
I have done some coding after refering to some threads in here.But I can't proceed further...plz help
selection screen
SELECTION-SCREEN BEGIN OF BLOCK 006 WITH FRAME TITLE text-006.
PARAMETERS: p_layout LIKE disvariant-variant. " layout
SELECTION-SCREEN END OF BLOCK 006.
data declarations
DATA: wa_variant TYPE disvariant.
DATA: w_variant_save TYPE c VALUE 'A'.
DATA: gs_variant TYPE disvariant.
DATA: gs_layout TYPE lvc_s_layo.
DATA: g_repid LIKE sy-repid.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_layout.
PERFORM variant_input_help.
FORM variant_input_help .
DATA: tl_dynpfields TYPE TABLE OF dynpread.
DATA: wl_exit TYPE c.
DATA: wal_variant LIKE wa_variant.
DATA: wal_dynpfields TYPE dynpread.
Get values from the selection screen to determine layout set
wal_dynpfields-fieldname = p_layout.
APPEND wal_dynpfields TO tl_dynpfields.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
 DYNAME = sy-cprog
 DYNUMB = '1000'
TRANSLATE_TO_UPPER = ' '
REQUEST = ' '
PERFORM_CONVERSION_EXITS = ' '
PERFORM_INPUT_CONVERSION = ' '
DETERMINE_LOOP_INDEX = ' '
TABLES
 DYNPFIELDS = tl_dynpfields
EXCEPTIONS
INVALID_ABAPWORKAREA = 1
INVALID_DYNPROFIELD = 2
INVALID_DYNPRONAME = 3
INVALID_DYNPRONUMMER = 4
INVALID_REQUEST = 5
NO_FIELDDESCRIPTION = 6
INVALID_PARAMETER = 7
UNDEFIND_ERROR = 8
DOUBLE_CONVERSION = 9
STEPL_NOT_FOUND = 10
OTHERS = 11
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOP AT tl_dynpfields INTO wal_dynpfields.
 CASE wal_dynpfields-fieldname.
 WHEN 'p_layout'.
 wa_variant-variant = wal_dynpfields-fieldvalue.
 ENDCASE.
ENDLOOP.
wa_variant-report = sy-repid.
wa_variant-variant = p_layout.
wa_variant-username = sy-uname.
**Invoke function to provide drop down entries
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
 EXPORTING
 IS_VARIANT = wa_variant
 I_TABNAME_HEADER =
 I_TABNAME_ITEM =
 IT_DEFAULT_FIELDCAT =
 I_SAVE = w_variant_save
 I_DISPLAY_VIA_GRID = ' '
 IMPORTING
 E_EXIT = wl_exit
 ES_VARIANT = wal_variant
 EXCEPTIONS
 NOT_FOUND = 1
 PROGRAM_ERROR = 2
 OTHERS = 3
IF SY-SUBRC IS INITIAL.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4
 IF wl_exit IS INITIAL.
 p_layout = wal_variant-variant.
 ENDIF.
ELSE.
 message I033 WITH TEXT-034.
ENDIF.
*gs_variant-variant = p_layout.
*gs_variant-report = sy-repid.
FREE: tl_dynpfields.
g_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_INTERFACE_CHECK = ' '
 I_BYPASSING_BUFFER = ' '
 I_BUFFER_ACTIVE = ' '
 I_CALLBACK_PROGRAM = g_repid
 I_CALLBACK_PF_STATUS_SET = ' '
 I_CALLBACK_USER_COMMAND = ' '
 I_CALLBACK_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_END_OF_LIST = ' '
 I_STRUCTURE_NAME =
 I_BACKGROUND_ID = ' '
 I_GRID_TITLE =
 I_GRID_SETTINGS =
 IS_LAYOUT = ??
 IT_FIELDCAT = ??
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS =
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE =
 I_DEFAULT = 'X'
 I_SAVE = ' '
 IS_VARIANT = wal_variant
 IT_EVENTS =
 IT_EVENT_EXIT =
 IS_PRINT =
 IS_REPREP_ID =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 I_HTML_HEIGHT_TOP = 0
 I_HTML_HEIGHT_END = 0
 IT_ALV_GRAPHICS =
 IT_HYPERLINK =
 IT_ADD_FIELDCAT =
 IT_EXCEPT_QINFO =
 IR_SALV_FULLSCREEN_ADAPTER =
IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = ??
EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2
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. " variant_input_help
wat steps shud i take

Hi ,
I have used the below FM for layout help,
data: gs_variant like disvariant,
gs_variant-report = sy-repid.
    call function 'REUSE_ALV_VARIANT_F4'
      exporting
       is_variant                = gs_variant
       i_save                    = 'A'
       i_display_via_grid        = 'X'
     importing
       es_variant                = gs_variant
     exceptions
       not_found                 = 1
       program_error             = 2
       others                    = 3
    if sy-subrc = 0.
        pa_var = gs_variant-variant.
    endif.
Note pa_var is your select options field in the SELECTION SCREEN,
call function 'REUSE_ALV_GRID_DISPLAY' "
           exporting
             i_bypassing_buffer                = 'X'
             i_buffer_active                   = 'X'
             i_callback_program                = sy-repid
             i_callback_top_of_page            = 'TOP_OF_PAGE'
             is_layout                         = gs_layout
             it_fieldcat                       = gt_fieldcat
             i_save                            = 'A'
             is_variant                        = gs_variant
             it_events                         = gt_events
            tables
             t_outtab                          = gt_output
           exceptions
             program_error                     = 1
             others                            = 2
hope this helps you.
Regards,
Raghavendra

Similar Messages

ALV + layout varient on selection screen

hiii
with ALV list i want to know with how to allow to put the layout on the selection screen and when user press F4 he will be able to use the list of layout he has save on the ALV output
Note for the layout button to appear i had to activate shown below:
i_save                   = c_x
please give me sample code where user can choose layout on selection screen and this layout will be used to display on ALV

Hi,
Please refer the code below for layout variants :
DATA:   gt_rsparams TYPE TABLE OF rsparams.
* Data for ALV variant
DATA gv_repname          LIKE sy-repid.
DATA gv_x_variant        LIKE disvariant.
DATA gv_exit(1)          TYPE c.
DATA gv_save(1)          TYPE c.
DATA gv_variant          LIKE disvariant.
PARAMETERS: sp_vari LIKE disvariant-variant.        "Dispaly Variant
INITIALIZATION.
gv_repname = sy-repid.
REFRESH : gt_glacct,
            gr_rcomp,
            gt_output,
            gt_fieldcat,
            gt_sort.
* Initialize ALV Layout variant
PERFORM f_initialize_variant.
FORM f_initialize_variant .
CLEAR gv_variant.
gv_save           = 'X'.
gv_variant-report = gv_repname.
gv_x_variant      = gv_variant.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
    EXPORTING
      i_save     = gv_save
    CHANGING
      cs_variant = gv_x_variant
    EXCEPTIONS
      not_found = 2.
IF sy-subrc = 0.
    sp_vari = gv_x_variant-variant.
ENDIF.
ENDFORM.                    " f_initialize_variant
AT SELECTION-SCREEN ON VALUE-REQUEST FOR sp_vari.
PERFORM f_f4_for_variant.
FORM f_f4_for_variant .
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
    EXPORTING
      is_variant = gv_variant
      i_save     = gv_save
    IMPORTING
      e_exit     = gv_exit
      es_variant = gv_x_variant
    EXCEPTIONS
      not_found = 2.
IF sy-subrc = 2.
    MESSAGE ID sy-msgid TYPE 'S' NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
    IF gv_exit = space.
      sp_vari = gv_x_variant-variant.
    ENDIF.
ENDIF.
ENDFORM.                    " f_f4_for_variant
AT SELECTION-SCREEN.
* Validating selection screen fields
PERFORM f_at_selection_screen.
FORM f_at_selection_screen .
* ALV Layout variant
IF NOT sp_vari IS INITIAL.
    MOVE gv_variant TO gv_x_variant.
    MOVE sp_vari    TO gv_x_variant-variant.
    CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'
      EXPORTING
        i_save     = gv_save
      CHANGING
        cs_variant = gv_x_variant.
    gv_variant = gv_x_variant.
ELSE.
    PERFORM f_initialize_variant.
ENDIF.
FORM f_initialize_variant .
CLEAR gv_variant.
gv_save           = 'X'.
gv_variant-report = gv_repname.
gv_x_variant      = gv_variant.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
    EXPORTING
      i_save     = gv_save
    CHANGING
      cs_variant = gv_x_variant
    EXCEPTIONS
      not_found = 2.
IF sy-subrc = 0.
    sp_vari = gv_x_variant-variant.
ENDIF.
ENDFORM.                    " f_initialize_variant
Thanks,
Sriram POnna.

Allowing a User to choose the ALV layout format on selection-screen

Hi all,
I would like to know how i can add a parameter to my selection-screen which would allow the User to choose a saved ALV layout format before pressing F8 rather than after. As used in CO15 or MB51.
Thanks femi.

yes , You can check the program BCALV_TEST_FULLSCREEN_LAYOUT to check how F4 help is to be used .
to check existene of variant is pretty simple.
Pass the variant name in the ALV display FM .

ALV - selecting the data based on layout set in selection screen

Hi,
I have an ALV report (Custom). I want to give layout selection at selection screen, so the user can create/select/manage layout at the time of selection screen and only these columns will be displayed in the final output. Instead user execute the report for all column and at the end user select the layout. I want this layout at the selection screen level like the standard reports.
Thanks,

You can do the following
When the user clicks on download
1.Use FM REUSE_ALV_LIST_LAYOUT_INFO_GET / REUSE_ALV_GRID_LAYOUT_INFO_GET to get the Fieldcat (since due to selection of layout on sel screen some columns are disabled. For the columns which have been disabled the resultant Fieldcat from the above FMs would have NO_OUT = 'X'. Delete columns from Fieldcat itab where no_out = 'X'
2.create a dynamic itab using cl_alv_table_create=>create_dynamic_table( ) passing the above Fieldcat itab, get a handle of new itab
3.loop over the original itab and fill the new dynamic itab
hope this helps...

Object text not coming in report selection screen

Hi,
i have an object task type for which text has been loaded.this is included in one reports selection screen.But in F4 only kee is displayed and not text.If check button is pressed text is displayed besides key.Also text doesnt come after report is executed.
please help.
Thanks,
Prasanna N.

Hi Prasanna,
In the Query Designer goto the properties of the required object that you want to display key and text for it, Select the Key and Text Display option. Then you can see in report key and text for that object.
Hope this helps.
Veerendra.

Layout Option on Selection Screen For Zreport

Hi All,
Plz explain how to do coding for using Layout option on selection screen of
report. Also i should be able to save and create new layout on selection screen.
Thnaks in advance.
Aniket Dayama

hi,
creation of sub-screens.
selection-screen begin of tabbed block <name of the tab> for < height of the tab in no's> lines.
eg;
selection-screen tab(20) l1 <data element> user-comand <name of the funcion code>
selection-screen end of block <name of the tab strip>.
eg;
selection-screen begin of tabbed block mytab for 10 lines.
selection-screen tab(20) l1 user-command tab1.
selection-screen tab (20) l2 user-command tab2..
selection-screen end of block mytab.
Under initialization.
data element = text-01.
data element = text=02.
How to initialize the tab with default screen.
<name of the tab> - prog = sy-repid.
<name of the tab>- dynnr = '<subscreen no>'.
<nane of the tab>-activetab = '<user-command for the strip>
if this has solved ur problem then dont forget to reward with points.
with regards,
madhuri.

Hiding Screen fields in a Report selection screen

Hi Experts,
I have a requirement to hide/disable screen fields in a report selection screen when the user clicks on some radio buttons .
Here is the scenario,
1) There are 4 radio buttons four radiobuttons in one group on the selection screen:--
Block no:1
PARAMETER: r_not TYPE c RADIOBUTTON GROUP a1 DEFAULT 'X'.
PARAMETER: r_prgs TYPE c RADIOBUTTON GROUP a1.
PARAMETER: r_remv TYPE c RADIOBUTTON GROUP a1.
PARAMETER: r_noresp TYPE c RADIOBUTTON GROUP a1.
2) Based on the user clicking/selecting the radio buttons no.2,3 nad 4 i need to hide some fields in the other selection block
in the selection screen.The parameters are as follows:
Block no:2( These fields need to be hidden/disabled)
PARAMETER: r_occ(3) TYPE c OBLIGATORY DEFAULT '1'.
PARAMETER: r_and TYPE c RADIOBUTTON GROUP g1.
PARAMETER: r_or TYPE c RADIOBUTTON GROUP g1.
PARAMETER: r_days(3) TYPE c OBLIGATORY DEFAULT '1'.
Thanks

Contd.....
AT SELECTION-SCREEN.
CASE SSCRFIELDS-UCOMM.
      "When Customer button is clicked set flag 1
    WHEN 'FC01'.
      L_FLAG = '1'.
      "When Sales Order button is clicked set flag 2
    WHEN 'FC02'. "Sales order
      L_FLAG = '2'.
      "When Execute button is clicked set flag 4
    WHEN OTHERS.
      L_FLAG = '4'.
ENDCASE.
AT SELECTION-SCREEN OUTPUT.
CASE L_FLAG.
    WHEN '1'. "When Customer button is clicked
      LOOP AT SCREEN.
        "Set the Production and Customer Block as inactive
        IF SCREEN-GROUP1 = 'BL1' OR SCREEN-GROUP1 = 'BL3'.
          SCREEN-ACTIVE = '0'.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
    WHEN '2'. "When Sales Order button is clicked
      LOOP AT SCREEN.
        "Set the Production and Customer Block as inactive
        IF SCREEN-GROUP1 = 'BL1' OR SCREEN-GROUP1 = 'BL2'.
          SCREEN-ACTIVE = '0'.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
    WHEN '3'.   "When Refresh button is clicked
      LOOP AT SCREEN.
        "Set the all Blocks as active
       IF SCREEN-GROUP1 = 'BL2' OR SCREEN-GROUP1 = 'BL3' OR SCREEN-GROUP1 = 'BL1'.
          SCREEN-ACTIVE = '1'.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
    WHEN OTHERS."When Execute button is clicked
      "Set the Sales order and Customer Block as inactive
      LOOP AT SCREEN.
        IF SCREEN-GROUP1 = 'BL2' OR SCREEN-GROUP1 = 'BL3'.
          SCREEN-ACTIVE = '0'.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
ENDCASE.
ENDFORM.

How can we read the screen field values from the report selection screen wi

Hi expart,
How can we read the screen field values from the report selection screen with out having an ENTER button pressed .
Regards
Razz

use this code...
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_posnr.
**Read the Values of the SCREEN FIELDs
CALL FUNCTION 'DYNP_VALUES_READ'

Add a button in report selection screen

Hi Experts,
I want to add a userdefined button in report selection screen....so far i have written code like this,...
TABLES : sscrfields.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-010.
PARAMETERS: P_ID LIKE ZBAPITABLE-ID,
P_NM LIKE ZBAPITABLE-NAME.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-020.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT (11) TEXT-001 FOR FIELD R1.
PARAMETERS: R1 RADIOBUTTON GROUP G1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT (10) TEXT-002 FOR FIELD R1.
PARAMETERS: R2 RADIOBUTTON GROUP G1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT (10) TEXT-003 FOR FIELD R1.
PARAMETERS: R3 RADIOBUTTON GROUP G1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT (10) TEXT-004 FOR FIELD R1.
PARAMETERS: R4 RADIOBUTTON GROUP G1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK B2.
SELECTION-SCREEN: FUNCTION KEY 1.
MOVE 'SAVE' TO sscrfields-functxt_01.
If i use code like this button was added in application tool bar
but in my selection screen i have two blocks ....in first block i have input fields, and in second there is set of radio buttons...Just below that i want to put one button ....how it is possible...
can anyone plz help me?
Regards,
veena.

Here's th docu link:
[Pushbuttons on the Selection Screen|http://help.sap.com/saphelp_nw70/helpdata/en/9f/dba81635c111d1829f0000e829fbfe/frameset.htm]
Regards,
Clemens

Problen in report selection screen

Hi ,
I had a problem in the report.In the report selection screen user asking to keep page no option.So when they select the page no in the selection screen,so from that page number report out put should display.
how to do this.
Thanks,

If you generating the LIST using the classical approch you cah use the SCROLL LIST keyword for this purpose.
Like:
DATA: L_PAGENO TYPE I.
L_PAGENO = 3.
START-OF-SELECTION.
DO 100 TIMES.
WRITE: / SY-ABCDE.
ENDDO.
SCROLL LIST INDEX 0 TO: PAGE L_PAGENO.
TOP-OF-PAGE.
WRITE: 'Top-of-page'.
Regards,
Naimesh Patel

ECCS : custom characteristics into standard report selection screen

Hello guys,
I have added a custom characteristic which is also a subasignment to the EC-CS module.
This field now appears into the standard report selection screen as expected.
I want to define this field as a mandatory selection field, do you know if this is possible? (exemple of standard report CX34A)
Thank you in advance for your help
best regards
Pascal.

Hi Thereza,
This field is already flaged
I have found the following solution : create a variant and assign it to the standard transcation with transaction SE93..
Best regards

Call report selection screen in module pool program with tab strip control

Hi,
Could anyone explain in detail to call report selection screen in module pool program with tab strip control.
Thanks
Mano

Hi,
Refer std program:
demo_sel_screen_in_tabstrip.
demo_sel_screen_with_tabstrip.
Call your program with SUBMIT stmt form module program.
Reward points if this Helps.
Manish

BEx web report selection screen entries retain when closing and opening the report again

Hello all,
please help me in the below query.
Till last month the entries we made in BEx web report selection screen are retained in the selection screen even when we close the web report and open it again from portal without logging off. But recently this functionality is missing and the entries in selection screen are not remembered when we close and open the same report again. It is a good feature for the users. Have you come across this issue?

No...I think i can reframe the question very clearly......For ex: we are opening a Bex Web report...so initally we would be prompted by the variable selection screen...in which we have to give the entries(Values) for those variables like Cal month, Sales org, Company code, etc.....Later on the report will get open based on the values we have given......
Now if we close the particular report without logging off then if i try to open the same report that selected values are missing.....earlier it used to remember the values we have given until we log off....But now that functionality is missing....It was very useful feature.....Can you please tel me what can be done to resolve this??
I hope the explanation would be clear now.

Table Control on a report selection screen -not a dialog transaction screen

Hi
Does anyone know of a way to have table control functionality on a report selection-screen? The program needs to be able to run as a background job (ie cannot be a dialog transaction) and we need to be able to save variants with the selection-screen values.
Any help would be appreciated.
The key point is we want to allow the user to enter a dynamic number of rows of table data on the selection-screen, save a variant containing that data and execute the program with the variant as a background job.
Thanks
Nicole Knight

Hi Nicole,
The main problem is how to persist the data. If you are not able to create a couple of tables then you could always utilise TVARV instead. On a similar line to my original post you could have the button call a dialog transaction. In here you could do your normal GUI table control. When saving the data simply transpose each column into a separate select-option held on TVARV keyed by the 'variant name' + fieldname. Then retrieve and transpose this back when executing the report.
Other methods could be storing the data in cluster xy (see EXPORT TO DATABASE command).
This seems a bit overkill for what would be a couple of maintenance dialogs.
Cheers,
Pete
PS. The view cluster is just a way of hierarchically performing table maintenance across multiple related tables. It offers a good UI for this purpose (header and item config tables) and is utilised extensively in the IMG.

Number of Entries icon should come on report selection screen

Hi,
In my requirement, I want Number of Entries icon on my report selection screen.
Means when i insert the required selection parameter's, then i want to see the total number of entries, which is come after the execution of my report.
Please let me know that how can i do it...
Regards..

HI.
Check the link display number of line items in my report at the title bar
I have extract the part from the above link.
if u want to display the no of line items, as shown in SE16, u create a SET STATUS with a push button with name No of Entries on the report screen.For that status, u write the code as to display no of lines in ur table by using either
DESCRIBE TABLE itab LINES lin.
lin gives the no of line items.
or
select count(*) from vbap.
write sy-dbcnt.
U got require output, when ur pressing No of entries button, then this will display on the output screen.
Thanks and Regards
Sachin Sharma

To Load ALV Layout in report selection screen

Similar Messages

Maybe you are looking for