Depndng on chkbox, should display selection screen block on selectionscreen

Hi,
Depending upon the chkbox it should display selection screen block on selection screen.
If not checked it should display B3 and If checked it should display Block B2 .
SELECTION-SCREEN BEGIN OF BLOCK B1.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS P_DAT AS CHECKBOX USER-COMMAND FLAG.
SELECTION-SCREEN COMMENT 3(79) text-112.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-109.
PARAMETER:      p_year1   LIKE ce1rh03-gjahr,
                p_perid1 LIKE ce1rh03-perde.
SELECTION-SCREEN END OF BLOCK B2.
SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-109.
PARAMETER:      p_year    LIKE ce1rh03-gjahr MODIF ID MO1,
                         p_period LIKE ce1rh03-perde MODIF ID MO1.
SELECTION-SCREEN END OF BLOCK B3.
If P_Dat is checked     .... It should display the Block B2 and
If p_Dat is not checked .... it should display the Block B3
Any suggestions will be appreciated!
Regards,
Kittu

Hello Kittu,
You can try this code:
SELECTION-SCREEN BEGIN OF BLOCK b1.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS p_dat AS CHECKBOX USER-COMMAND flag.
SELECTION-SCREEN COMMENT 3(79) text-112.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-109.
PARAMETER:      p_year1   TYPE gjahr MODIF ID mo1,
                p_perid1 TYPE perio MODIF ID mo1.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-110.
PARAMETER:      p_year    TYPE gjahr MODIF ID mo2,
                p_period TYPE perio MODIF ID mo2.
SELECTION-SCREEN END OF BLOCK b3.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF p_dat = 'X' AND screen-group1 = 'MO2'.
      screen-active = '0'.
    ELSEIF p_dat <> 'X' AND screen-group1 = 'MO1'.
      screen-active = '0'.
    ENDIF.
    MODIFY SCREEN.
ENDLOOP.
Hope this helps.
BR,
Suhas

Similar Messages

How to make selection-screen block as unvisible?

hi,
in report program there are two selection screen blocks like this.
SELECTION-SCREEN BEGIN OF BLOCK b1.
     parameters: rb1 as radiobutton group r1 user-command ucomm,
              rb2 as radiobutton group r1,
              rb3 as radiobutton group r1,
              rb4 as radiobutton group r1,
     SELECTION-SCREEN BEGIN OF BLOCK b2.
          parameters: ip1 type string.
          select-options: date for pernr-begda.
     SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN END OD BLOCK b1.
Now when i clicked on rb4 the selecetion screen block b2 has to be visible.
And rest of things i.e for rb1, rb2, rb3 it should not visible. it should be disabled.
Regards,
Shankar.

hi,
i am doing like this.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text.
SELECTION-SCREEN SKIP 1.
SELECT-OPTIONS: pernr FOR person-pernr.
SELECTION-SCREEN SKIP 1.
PARAMETERS: tempname LIKE rlgrap-filename.
SELECTION-SCREEN SKIP 1.
PARAMETERS: rb_p1 TYPE c RADIOBUTTON GROUP r1 USER-COMMAND rbg,
              rb_p2 TYPE c RADIOBUTTON GROUP r1,
              rb_p3 TYPE c RADIOBUTTON GROUP r1,
              rb_p4 TYPE c RADIOBUTTON GROUP r1.
SELECTION-SCREEN SKIP 1.
    SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text1.
        PARAMETERS: country(25) TYPE c MODIF ID ccc.
        SELECT-OPTIONS:Fromdate FOR person-begda NO-EXTENSION MODIF ID ccc.
    SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN OUTPUT.
IF rb_p4 = ' ' .
LOOP AT SCREEN.
      IF SCREEN-NAME = 'COUNTRY'
      OR SCREEN-NAME = 'FROMDATE-LOW'
      OR SCREEN-NAME = 'FROMDATE-HIGH'
      OR SCREEN-GROUP1 = 'CCC'.
          screen-input = 0. "Disable
      ENDIF.
      MODIFY SCREEN.
ENDLOOP.
ENDIF.
IF rb_p4 = 'X' .
LOOP AT SCREEN.
      IF SCREEN-NAME = 'COUNTRY'
      OR SCREEN-NAME = 'FROMDATE-LOW'
      OR SCREEN-NAME = 'FROMDATE-HIGH'
      OR SCREEN-GROUP1 = 'CCC'.
          screen-input = 1. "Disable
      ENDIF.
      MODIFY SCREEN.
ENDLOOP.
ENDIF.
Now it's making as disabled the fields which are in block B2.
Acutually my requirement is when i ever user selects RB_P4 then only that screen has to appear. and for rest of 3 RB it should not visible. it should be invisible.
for this wat to do....
Regards,
Shankar.

FM to display Selection screen on report output??

Hi Experts,
Is there an FM to display Selection screen on report output.
Thanks In Advance.

Hi Ashwin,
Refer to below link
http://help.sap.com/saphelp_nw04/helpdata/en/2a/755b94ca5911d299af5c9604c10e27/content.htm
or
The easiest way is to define your selection screen in the TOP include of your module pool.
Then call the selection screen.
Selection Screen
selection-screen begin of screen 1010 as window title text-001.
selection-screen begin of block b1 with frame title text-002.
parameters: p_vornr type resb-vornr,
p_refno(20) type c,
p_plnid type zplcfg-plnid as listbox visible length 20,
p_sorts type c as listbox visible length 20.
selection-screen begin of line.
selection-screen comment (20) text-004.
selection-screen position 33.
parameters: p_order as checkbox default 'X'.
selection-screen end of line.
selection-screen end of block b1.
selection-screen end of screen 1010.
Now call the selection screen.
call selection-screen 1010.
if sy-subrc = 0.
perform get_production_orders.
perform process_orders.
endif.
Thanks!!

Displaying selection screen as pop-up from dialog box

Hi,
      I have a screen which is of dialog-box type. This dialog screen shows an ALV and has a button in the ALV toolbar. On pressing this button, a pop-up screen is to be displayed. This pop-up screen is designed as a selection-screen. Is it possible to display this selection screen as a pop-up from a dialog box screen?
Regards,
Suhas

Hi Suhas,
Its possible to display selection screen as pop-up from dialog box.....Check the code below...copy paste and execute...
SELECTION-SCREEN BEGIN OF SCREEN 123 AS WINDOW TITLE text-001.
PARAMETER p.
SELECTION-SCREEN END   OF SCREEN 123.
CALL SELECTION-SCREEN 123 STARTING AT 20 5
                            ENDING AT 80 15.
The below code might help u to add a button in alvgrid's toolbar......
*       CLASS lcl_event_handler DEFINITION
CLASS lcl_event_handler DEFINITION.
PUBLIC SECTION.
    DATA: wa_toolbar   TYPE stb_button,
          calc         TYPE REF   TO cl_gui_frontend_services.
    METHODS : toolbar_handle FOR EVENT toolbar      OF cl_gui_alv_grid
                                    IMPORTING e_object
                                              e_interactive,
              ucomm_handle   FOR EVENT user_command OF cl_gui_alv_grid
                                    IMPORTING e_ucomm.
ENDCLASS.                    "lcl_event_handler DEFINITION
*       CLASS lcl_event_handler IMPLEMENTATION
CLASS lcl_event_handler IMPLEMENTATION.
METHOD toolbar_handle.
    MOVE   3 TO wa_toolbar-butn_type.
    APPEND wa_toolbar   TO e_object->mt_toolbar.
    MOVE : 0            TO wa_toolbar-butn_type,
           'CALC'       TO wa_toolbar-function,
           '@0M@'       TO wa_toolbar-icon,
           'Calculator' TO wa_toolbar-quickinfo.
    APPEND wa_toolbar TO e_object->mt_toolbar.
ENDMETHOD. "toolbar_handle
METHOD ucomm_handle.
    IF e_ucomm = 'CALC'.   " When button added in toolbar is clicked
      IF calc IS INITIAL.
        CREATE OBJECT calc.
      ENDIF.
      CALL METHOD cl_gui_frontend_services=>execute
   EXPORTING
     application            = 'CALC'.
    ENDIF.
ENDMETHOD. "ucomm_handle
ENDCLASS.                    "lcl_event_handler IMPLEMENTATION
DATA : container    TYPE REF   TO cl_gui_custom_container,
       grid         TYPE REF   TO cl_gui_alv_grid,
       event        TYPE REF   TO lcl_event_handler,
       it_display   TYPE TABLE OF mara,
       wa_display   TYPE mara.
START-OF-SELECTION.
CALL SCREEN 100.
*&      Module STATUS_0100 OUTPUT
*       text
MODULE status_0100 OUTPUT.
SET PF-STATUS 'BASIC'.
PERFORM build_it_display.
PERFORM create_objects.
ENDMODULE.                 " STATUS_0100 OUTPUT
*&      Module USER_COMMAND_0100 INPUT
*       text
MODULE user_command_0100 INPUT.
CASE sy-ucomm.
    WHEN 'BACK'.
      SET SCREEN 0.
      LEAVE SCREEN.
    WHEN 'EXIT'.
      SET SCREEN 0.
      LEAVE SCREEN.
    WHEN 'CANC'.
      SET SCREEN 0.
      LEAVE SCREEN.
ENDCASE.
ENDMODULE.                 " USER_COMMAND_0100 INPUT
*&      Form build_it_display
*       text
* --> p1        text
* <-- p2        text
FORM build_it_display .
SELECT * FROM mara UP TO 15 ROWS INTO TABLE it_display.
ENDFORM.                    " build_it_display
*&      Form create_objects
*       text
* --> p1        text
* <-- p2        text
FORM create_objects .
IF container IS INITIAL.
    CREATE OBJECT container
    EXPORTING
      container_name     = 'CUSTOM'.
    CREATE OBJECT event.
    CREATE OBJECT grid
      EXPORTING
        i_parent         = container.
    SET HANDLER event->toolbar_handle FOR grid.
    SET HANDLER event->ucomm_handle   FOR grid.
    CALL METHOD grid->set_table_for_first_display
      EXPORTING
        i_structure_name = 'MARA'
      CHANGING
        it_outtab        = it_display.
ENDIF.
ENDFORM.                    " create_objects
Cheers,
Jose.

Is there any option to display selection screen text in bold or big font?

Hi all,
Is there any option to display selection screen text in bold letters or with increase font size?
Thanks n Regards

Hi,
Just give atry in this way..
open the same program ans selection-screen screen no will be 1000 in se51 screen painter,
go to properties of the texts u want to change then go to display tab and check the checkbox bright.
it may or may not work but this will work in module pool .
just give a try...
Regards,
Suresh.

How to write selection-screen block on 15th position?

Hello all,
I want to write selection-screen block on 15th position, How can I do this?
I know that we can write parameter/select-option on perticuler position using following code.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE t7.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN POSITION 15.
PARAMETERS: fdat LIKE SY-DATUM,
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
It writes parameter(FDAT) on 15th position. How can I write whole block on 15th position?

Hi,
For this u have to use comment lines. See the below simple program...
SELECTION-SCREEN COMMENT /2(50) TEXT-001 MODIF ID SC1.
SELECTION-SCREEN SKIP 2.
SELECTION-SCREEN COMMENT /10(30) COMM1.
SELECTION-SCREEN ULINE.
PARAMETERS: R1 RADIOBUTTON GROUP RAD1,
R2 RADIOBUTTON GROUP RAD1,
R3 RADIOBUTTON GROUP RAD1.
SELECTION-SCREEN ULINE /1(50).
SELECTION-SCREEN COMMENT /10(30) COMM2.
SELECTION-SCREEN ULINE.
PARAMETERS: S1 RADIOBUTTON GROUP RAD2,
S2 RADIOBUTTON GROUP RAD2,
S3 RADIOBUTTON GROUP RAD2.
SELECTION-SCREEN ULINE /1(50).
INITIALIZATION.
COMM1 ='Radio Button Group 1'.
COMM2 ='Radio Button Group 2'.
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'SC1'.
SCREEN-INTENSIFIED = '1'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.

How to place selection screen block adjacent to other block

hi all,
     I want a selection screen block side by side, is it possible
without using screen painter, if it is let me know.
Thanks & Regards
RK

Hai RK check the following syntax
CALL SELECTION-SCREEN dynnr
                      [STARTING AT col1 lin1
                      [ENDING   AT col2 lin2]]
                      [USING SELECTION-SET variant].
before this you need to create two screens

Making one selection screen block invisible

Hi,
I want to make one selection-screen block invisible based on one check box value.I have built the screen as follows:
PARAMETERS: pcheck1    TYPE char1 AS CHECKBOX.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-004.
PARAMETERS: pproj    TYPE xxxx ,
            psproj   TYPE xxxx ,
            pobjec   TYPE xxxx .
SELECTION-SCREEN END OF BLOCK b2.
based on the pcheck value I want to meke the above "SELECTION-SCREEN BEGIN OF BLOCK b2 " invisible/visible.Can you please tell me how to do it?

You need to set values in structure SCREEN:
screen-invisible = '1' .
screen-input = '0' .
screen-output = '0' .
for all items contained in block.
For example:
AT SELECTION-SCREEN OUTPUT.
IF <condition>.
    LOOP AT SCREEN.
      CASE screen-name.
        WHEN <block_name> OR
                   <parameter1> or <parameter1_text> or
                   <parameter_N> or <parameter_N_text> .
          screen-invisible = 1.
          screen-input      = 0.
          screen-output    = 0.
        WHEN OTHERS.
      ENDCASE.
      MODIFY SCREEN.
    ENDLOOP.
You can find names of variables which contain parameter texts using debuger.
ELSEIF sy-tcode = 'ZEUA_EDB_EXPORT'.
    p_path = 'ZUA_EDB_EXPORT'.
ENDIF.

Enable / Disable selection screen block

Hi, could u pls tell me how do I enable/disable selection screen block written below based on radio button selected??
Block to be enabled / disabled :
*----APO Version and RFC destination block
SELECTION-SCREEN BEGIN OF BLOCK b4 WITH FRAME TITLE text-013.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 01(20) text-e11.    "APO Planning Version
SELECTION-SCREEN POSITION 29.
SELECT-OPTIONS s_apover FOR w_version NO INTERVALS.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 01(20) text-e09.    "APO RFC Destination
SELECTION-SCREEN POSITION 32.
PARAMETERS : p_aporfc LIKE rfcdes-rfcdest.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b4.
Radiobuttons :
Material Type
SELECTION-SCREEN BEGIN OF BLOCK ss04 WITH FRAME TITLE text-072       .
PARAMETERS :
     Load only FERTs
       p_FERT RADIOBUTTON GROUP styp DEFAULT 'X' USER-COMMAND rusr ,
     Load ROH/HALBs
       p_HALB RADIOBUTTON GROUP styp                                .
SELECTION-SCREEN END   OF BLOCK ss04                                 .
Thanx in advance

Hi
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: pa_file TYPE rlgrap-filename MODIF ID abc,
pa_lifnr TYPE lfa1-lifnr MODIF ID abc,
pa_vkorg TYPE vbak-vkorg MODIF ID abc.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
PARAMETERS: pa_kunnr TYPE vbak-kunnr MODIF ID def.
SELECT-OPTIONS: s_lifnr FOR gs_lfa1-lifnr MODIF ID def,
s_date FOR gs_lfa1-erdat MODIF ID def,
s_augru FOR gs_vbak-augru MODIF ID def,
s_vbeln FOR gs_vbak-vbeln MODIF ID def.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_upd RADIOBUTTON GROUP g1 USER-COMMAND uc01 DEFAULT 'X'."#EC *
SELECTION-SCREEN COMMENT 3(60) text-004 FOR FIELD pa_upd.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pa_rep RADIOBUTTON GROUP g1 ."#EC *
SELECTION-SCREEN COMMENT 3(60) text-005 FOR FIELD pa_rep.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b3.
IF pa_rep EQ gc_x.
LOOP AT SCREEN.
IF screen-group1 = gc_abc.
screen-input = gc_zero_num.
ELSEIF screen-group1 = gc_def.
screen-active = gc_one_num.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ELSEIF pa_upd EQ gc_x.
*For Reprocessing
LOOP AT SCREEN.
IF screen-group1 = gc_def.
screen-input = gc_zero_num.
ELSEIF screen-group1 = gc_abc.
screen-active = gc_one_num.
ENDIF.
MODIFY SCREEN.
CLEAR pa_upd.
ENDLOOP.
ENDIF.
REPORT zrich_001.
PARAMETERS: p_rad1 RADIOBUTTON GROUP grp1 DEFAULT 'X'
                        user-command chk,
            p_rad2 RADIOBUTTON GROUP grp1.
SELECT-OPTIONS: s_datum1 FOR sy-datum MODIF ID d1,
                s_datum2 FOR sy-datum MODIF ID d2.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF p_rad1 = 'X'
      AND screen-group1 = 'D2'.
      screen-active = '0'.
    ENDIF.
    IF p_rad2 = 'X'
     AND screen-group1 = 'D1'.
      screen-active = '0'.
    ENDIF.
    MODIFY SCREEN.
ENDLOOP.
Regards
Anji

Nested Selection Screen Blocks

Hi friends,
My requirement is to display the two nested blocks in the selection screen and the radio button parameters defined should come in a single group.
as below........
!   Begin Block1
!        * Radio Button 1!
! Begin Block2
!          * Radio Button 2                                                      !
!          * Radio Button 3                                                      !
!         * Radio Button 4                                                       !
!   End Block2                                                                     !
!       End Block 1                                                                 !
         My Requirement is all Radio Buttons 1 2 3 & 4 should be under one group only. I just need nested frames as shown above
Thanks & Regards,
Kumar.

Hi,
In one group you can not declare only one radio button, you need atleast two radio button for a group.
if there is a single radio button only, then better you make it as check box.
Nesting of blocks is possible.
you can do that.
In one block there should be atleast two radio button for using Group.
regards,
Ruchika
Reward if useful................

Regarding hiding Selection screen block

hi all ,
i have 2 blocks in the selection screen. the First block has 4 radiobuttons and the second block has 4 parameters.
i need to hide the block 2 based on the radiobutton checked in the initail block.
if radiobutton 1 or 2 is selected then the block should not be visible and if the rdbtn 3 or 4 is selected the block should be visible
i have wriiten the code but it doesn't work at all. the block is hidden but when i select the radiobtn 3 or 4 it doesn't work
the code i hve wriiten is as follows
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: par1 RADIOBUTTON GROUP rg2 DEFAULT 'X' USER-COMMAND ucom1
PARAMETERS: par2 RADIOBUTTON GROUP rg2 .
PARAMETERS: par3 RADIOBUTTON GROUP rg2 .
PARAMETERS: par4 RADIOBUTTON GROUP rg2
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE text-001.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETER p_pwwrk TYPE plaf-pwwrk MODIF ID FSC.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS p_wch TYPE cr_hname MODIF ID FSC.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECT-OPTIONS s_mdv01 FOR g_mdv01 MODIF ID FSC.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK a1.
I have declared this after Initialization.
AT SELECTION-SCREEN OUTPUT.
if par3 eq 'X' or par4 eq 'X'.
LOOP AT SCREEN.
IF screen-group1 = 'FSC'.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
endif.
can anybody please suggest.
Thanx
Srinivas

Hiding Input Fields Locate the document in its SAP Library structure
To suppress the display of the input field on the selection screen, you use the following syntax:
PARAMETERS p ...... NO-DISPLAY ......
Although parameter p is declared, it is not displayed on the selection screen.
If the parameter belongs to the standard selection screen, you can assign a value to it either by using the DEFAULT addition when you declare it, or during the INITIALIZATION event. If you call the executable program using the SUBMIT statement, the calling program can also pass the value.
When you use user-defined selection screens, you can assign a value to the parameter at any time before calling the selection screen.
If you want to display a parameter only in certain cases, for example, depending on the values entered by the user in other input fields of the selection screen, you cannot use the NO-DISPLAY addition. If you use NO-DISPLAY, the parameter actually is an element of the interface for program calls, but not an element of the selection screen. As a result, you cannot make it visible using the MODIFY SCREEN statement.
To hide a parameter that is an element of the selection screen, you must declare it without the NO-DISPLAY addition and suppress its display using the MODIFY SCREEN statement.
We can Hide parameter / select option in selection screen dynamically by manipulating screen object.
SCREEN is like an internal table with a header line. However, you do not have to declare it in your program. Go to debugging mode and then view structure of screen.
You can modify SCREEN in your ABAP program during the PBO event of a screen. Its contents override the static attributes of the screen fields for a single screen call. The only statements that you can use with SCREEN are:
LOOP AT SCREEN.
MODIFY SCREEN.
ENDLOOP.
We can hide parameter by set screen-active to 0.
Here is example of how to hide parameter in selection screen. Write it, and change click on radiobutton to hide parameter.
    REPORT ZAALGAL0006.
    DATA: d_ucomm LIKE sy-ucomm.
    PARAMETERS: p_grpa1(10) MODIF ID A,
    p_grpa2(5) MODIF ID A,
    p_grpb1(2) MODIF ID B.
    PARAMETERS: p_actA RADIOBUTTON GROUP rad1 USER-COMMAND ACT DEFAULT 'X',
    p_actB RADIOBUTTON GROUP rad1.
    AT SELECTION-SCREEN.
    d_ucomm = sy-ucomm.
    AT SELECTION-SCREEN OUTPUT.
    LOOP AT screen.
    IF p_actA = 'X'.
    IF screen-group1 = 'B'.
    screen-active = 0.
    ENDIF.
    ELSEIF p_actB = 'X'.
    IF screen-group1 = 'A'.
    screen-active = 0.
    ENDIF.
    ENDIF.
    MODIFY screen.
    ENDLOOP.
    START-OF-SELECTION.
regards,
srinivas
<b>*reward for useful answers*</b>

Hiding the selection screen blocks

Hello SDNers,
This is my scenario.
I need to have 2 selection screens ie b1 and b2.
initially b2 should be hidden and when i make a selection on b1 the block b2 should be displayed.
Eg :
selection-screen begin of block B1.
parmeter : r_cust radiobutton group grp1,
               r_ven t radiobutton group grp1.
selection-screen end of block B1.
selection-screen begin of block B2.
parmeter : r_cret radiobutton group grp2,
               r_chg radiobutton group grp2,
               r_disp radiobutton group grp2,
selection-screen end of block B2.
Is this possible if yes please paste a sample snippet for understanding.
Help would be highly appreciated and rewarded.
Thanks in advance
Regards,
Ranjith N

Hi...
Please check the code...
It will solve your problem
selection-screen: begin of block c1 with frame title text-001.
selection-screen skip.
parameter: p_singl type char01 radiobutton group rsel
                   default 'X' user-command s_per,    " Single record
           p_mult type char01 radiobutton group rsel." Multiple recrd
selection-screen: end of block c1.
selection-screen: begin of block c2 with frame title text-001.
selection-screen skip.
parameter: p_matnr type matnr       modif id m1, " KMAT
           p_atwrt type zcatnum     modif id m1, " Catalog string
           p_sr_des type atwrt       modif id m1. " Series Designator
selection-screen: end of block c2.
selection-screen: begin of block c3 with frame title text-001.
selection-screen skip.
PARAMETER: p_pc     radiobutton group err user-command ucomm
                                     modif id m4, " Presentation server
           p_server radiobutton group err default 'X'
                                     modif id m4, " Application server
           p_f_pc   type localfile   modif id m3, " PC file name
           p_fname type localfile   modif id m2. " Apltn srvr file path
selection-screen: end of block c3.
at selection-screen output.
Design selection parameters dynamically
perform sub_set_file_param.
form sub_set_file_param .
loop at screen.
If single record is checked
    if p_singl is not initial.
      if screen-group1 = 'M2' or
         screen-group1 = 'M3' or
         screen-group1 = 'M4'.
        screen-active = 0.
      endif.
If multiple record and application server is checked
    elseif p_mult is not initial and
           p_server is not initial.
      if screen-group1 = 'M1' or
        screen-group1 = 'M3' .
        screen-active = 0.
      endif.
If multiple record and presentation server is checked
    elseif p_mult is not initial and
           p_pc   is not initial.
      if screen-group1 = 'M1' or
        screen-group1 = 'M2' .
        screen-active = 0.
      endif.
    endif.
Modify the screen
    modify screen.
endloop.
endform.                    " sub_set_file_param
Thanks
Subhankar

Displaying selection screen details in Alv Report output display as Header

Hi all,
May be somebody knows how I can show selected values with select-options in top_of_page using REUSE_ALV_GRID_DISPLAY.
This shoud work for all the reports and diff selection screens .
I need one dynamic process which will for display any report selection screen selected details.(Basically varient information of report).
Small example if possible, please.
Thanks in advance,
Rimas

Hi Thiru,
Thanks for the input.
This is my exact requirement.
Hi Experts,
I would like to Display / Print Select-options selected details in ALV Header.
Ex: Say suppose here i enter kunnr as 1000
                                        lifnr as    2000 to 4000
                                        p_langu as 'EN'.
                                       p_dir as 'C:\TEMP,
                                       p_upda as 'X'
for selection screen below.
SELECTION-SCREEN :BEGIN OF BLOCK blk1 WITH FRAME TITLE text-000.
SELECT-OPTIONS : s_kunnr FOR kna1-kunnr.
SELECT-OPTIONS : s_lifnr FOR lfa1-lifnr.
PARAMETER      : p_lanuge LIKE t002-spras DEFAULT sy-langu.
PARAMETER: p_dir LIKE rlgrap-filename
           DEFAULT text-003 LOWER CASE.
PARAMETERS: p_upd AS CHECKBOX DEFAULT 'X'.
I dont want to Hard code selection screen values like
DATA: header TYPE slis_t_listheader,
wa TYPE slis_listheader,
wa-typ = 'S'(093).
wa-key = s_lifnr .
wa-info = 'Vendor no".
APPEND wa TO header.
I want dynamic process for all of my selection screen values selected
hard code may be it will be fine small selection screen it will work.
Fur that i got one process to get dynamically through fm
Ex: DATA: irsparams TYPE rsparams OCCURS 0 WITH HEADER LINE.
CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS'
EXPORTING
curr_report = program
TABLES
selection_table = irsparams
EXCEPTIONS
not_found = 1
no_report = 2
OTHERS = 3.
loop at irsparams.
write : / irsparams-SELNAME.
write : / irsparams-SIGN.
write : / irsparams-OPTION.
write : / irsparams-LOW.
write : / irsparams-HIGH.
endloop.
I have done my requirement partially but i am failed to achive my full requirement.
Because
rsparams strcture is diff from slis_t_listheader.
Can any one help me for further assistence to display irsparams strcture data in alv header.
Thanks
Nag

Display selection screen details in the header of ALV

hi..
can someone please help me on how to display the data in the selection screen in the header in ALV?
i hope someone can help me..thanks very much..

Simple ALV report
http://www.sapgenie.com/abap/controls/alvgrid.htm
http://wiki.ittoolbox.com/index.php/Code:Ultimate_ALV_table_toolbox
ALV
1. Please give me general info on ALV.
http://www.sapfans.com/forums/viewtopic.php?t=58286
http://www.sapfans.com/forums/viewtopic.php?t=76490
http://www.sapfans.com/forums/viewtopic.php?t=20591
http://www.sapfans.com/forums/viewtopic.php?t=66305 - this one discusses which way should you use - ABAP Objects calls or simple function modules.
2. How do I program double click in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=11601
http://www.sapfans.com/forums/viewtopic.php?t=23010
3. How do I add subtotals (I have problem to add them)...
http://www.sapfans.com/forums/viewtopic.php?t=20386
http://www.sapfans.com/forums/viewtopic.php?t=85191
http://www.sapfans.com/forums/viewtopic.php?t=88401
http://www.sapfans.com/forums/viewtopic.php?t=17335
4. How to add list heading like top-of-page in ABAP lists?
http://www.sapfans.com/forums/viewtopic.php?t=58775
http://www.sapfans.com/forums/viewtopic.php?t=60550
http://www.sapfans.com/forums/viewtopic.php?t=16629
5. How to print page number / total number of pages X/XX in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=29597 (no direct solution)
6. ALV printing problems. The favourite is: The first page shows the number of records selected but I don't need this.
http://www.sapfans.com/forums/viewtopic.php?t=64320
http://www.sapfans.com/forums/viewtopic.php?t=44477
7. How can I set the cell color in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=52107
8. How do I print a logo/graphics in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=81149
http://www.sapfans.com/forums/viewtopic.php?t=35498
http://www.sapfans.com/forums/viewtopic.php?t=5013
9. How do I create and use input-enabled fields in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=84933
http://www.sapfans.com/forums/viewtopic.php?t=69878
10. How can I use ALV for reports that are going to be run in background?
http://www.sapfans.com/forums/viewtopic.php?t=83243
http://www.sapfans.com/forums/viewtopic.php?t=19224
11. How can I display an icon in ALV? (Common requirement is traffic light icon).
http://www.sapfans.com/forums/viewtopic.php?t=79424
http://www.sapfans.com/forums/viewtopic.php?t=24512
12. How can I display a checkbox in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=88376
http://www.sapfans.com/forums/viewtopic.php?t=40968
http://www.sapfans.com/forums/viewtopic.php?t=6919
Go thru these programs they may help u to try on some hands on
ALV Demo program
BCALV_DEMO_HTML
BCALV_FULLSCREEN_DEMO ALV Demo: Fullscreen Mode
BCALV_FULLSCREEN_DEMO_CLASSIC ALV demo: Fullscreen mode
BCALV_GRID_DEMO Simple ALV Control Call Demo Program
BCALV_TREE_DEMO Demo for ALV tree control
BCALV_TREE_SIMPLE_DEMO
BC_ALV_DEMO_HTML_D0100

Displaying selection screen data on alv header in multiple rows and columns

Hi
Presently in my requirement , whatever the data entered in selection screen should display on alv header and item details on alv grid display.
for eg...
on alv header
customer no : 1000 to 2000         sales order no: 111
name :    gff to ff                                 sales org:
city:                                         country:
item details below this
plz guide me how to solve this issue.
Thanks & Regards,
Pradeep

Hi,
Check this code this may help you.
<code>
TYPE-POOLS : SLIS.
TABLES VBRK.
TYPES : BEGIN OF TY_VBRK,
        VBELN TYPE VBRK-VBELN,
        VKORG TYPE VBRK-VKORG,
        VTWEG TYPE VBRK-VTWEG,
        SPART TYPE VBRK-SPART,
        FKDAT TYPE VBRK-FKDAT,
        END OF TY_VBRK,
        BEGIN OF TY_VBRP,
        VBELN TYPE VBRP-VBELN,
        POSNR TYPE VBRP-POSNR,
        MATNR TYPE VBRP-MATNR,
        ARKTX TYPE VBRP-ARKTX,
        FKIMG TYPE VBRP-FKIMG,
        NETWR TYPE VBRP-NETWR,
        END OF TY_VBRP,
        BEGIN OF TY_TARGET,
        VBELN TYPE VBRK-VBELN,
        VKORG TYPE VBRK-VKORG,
        VTWEG TYPE VBRK-VTWEG,
        SPART TYPE VBRK-SPART,
        FKDAT TYPE VBRK-FKDAT,
        POSNR TYPE VBRP-POSNR,
        MATNR TYPE VBRP-MATNR,
        ARKTX TYPE VBRP-ARKTX,
        FKIMG TYPE VBRP-FKIMG,
        NETWR TYPE VBRP-NETWR,
        END OF TY_TARGET.
DATA : T_VBRK TYPE TABLE OF TY_VBRK,
       W_VBRK TYPE TY_VBRK,
        T_VBRP TYPE TABLE OF TY_VBRP,
        W_VBRP TYPE TY_VBRP,
        T_TARGET TYPE TABLE OF TY_TARGET,
        W_TARGET TYPE TY_TARGET,
FIELD CATALOG ******************
        T_FCAT TYPE SLIS_T_FIELDCAT_ALV,
        W_FCAT TYPE SLIS_FIELDCAT_ALV,
*************************************SUB TOTALS AND SORTING***********
        T_SORT TYPE SLIS_T_SORTINFO_ALV,
        W_SORT TYPE SLIS_SORTINFO_ALV,
*************************************FOR LIST HEADER******************
        T_LIST_HEAD TYPE SLIS_T_LISTHEADER,
        W_LIST_HEAD TYPE SLIS_LISTHEADER,
        T_LIST_HEAD1 TYPE SLIS_T_LISTHEADER,
        W_LIST_HEAD1 TYPE SLIS_LISTHEADER,
*************************************FOR LIST HEADER******************
        W_LAYOUT TYPE SLIS_LAYOUT_ALV,
************************************FOR EVENTS************************
        T_EVENT TYPE SLIS_T_EVENT,
        W_EVENT TYPE SLIS_ALV_EVENT.
*********************************SELECT OPTIONS***********************
SELECT-OPTIONS : S_VBELN FOR VBRK-VBELN DEFAULT 90005316 TO 90005330.
**RETRIVING DATA************************
PERFORM DATA_RETRIVE.
**BUILDING THE FIELD CATALOG************
PERFORM BUILD_FCAT.
**BUILDING THE TABLE FOR LIST HEADER****
PERFORM BUILD_LIST_HEAD.
*******************************CALLING THE FUNCTION MODULE************
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
    I_CALLBACK_PROGRAM     = SY-REPID
    I_CALLBACK_TOP_OF_PAGE = 'LIST_TOP_OF_PAGE'
    IT_FIELDCAT            = T_FCAT
    IT_SORT                = T_SORT
TABLES
    T_OUTTAB               = T_TARGET.
*&      Form DATA_RETRIVE
FORM DATA_RETRIVE .
SELECT VBELN VKORG VTWEG SPART FKDAT FROM VBRK INTO CORRESPONDING FIELDS
OF TABLE T_VBRK WHERE VBELN IN S_VBELN.
IF SY-SUBRC EQ 0.
    SORT T_VBRK BY VBELN.
    SELECT VBELN POSNR MATNR ARKTX FKIMG NETWR FROM VBRP INTO TABLE
     T_VBRP FOR ALL ENTRIES IN T_VBRK WHERE VBELN = T_VBRK-VBELN.
ENDIF.
LOOP AT T_VBRP INTO W_VBRP.
    LOOP AT T_VBRK INTO W_VBRK WHERE VBELN = W_VBRP-VBELN.
      W_TARGET-VBELN = W_VBRK-VBELN.
      W_TARGET-VKORG = W_VBRK-VKORG.
      W_TARGET-VTWEG = W_VBRK-VTWEG.
      W_TARGET-SPART = W_VBRK-SPART.
      W_TARGET-FKDAT = W_VBRK-FKDAT.
      W_TARGET-POSNR = W_VBRP-POSNR.
      W_TARGET-MATNR = W_VBRP-MATNR.
      W_TARGET-ARKTX = W_VBRP-ARKTX.
      W_TARGET-FKIMG = W_VBRP-FKIMG.
      W_TARGET-NETWR = W_VBRP-NETWR.
      APPEND W_TARGET TO T_TARGET.
    ENDLOOP.
ENDLOOP.
SORT T_TARGET BY VBELN.
ENDFORM.                    " DATA_RETRIVE
*&      Form BUILD_FCAT
FORM BUILD_FCAT .
W_FCAT-COL_POS = 1.
W_FCAT-FIELDNAME = 'VBELN'.
W_FCAT-SELTEXT_M = 'BILLING NO'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 2.
W_FCAT-FIELDNAME = 'VKORG'.
W_FCAT-SELTEXT_M = 'SALES ORGANIZATION'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 3.
W_FCAT-FIELDNAME = 'VTWEG'.
W_FCAT-SELTEXT_M = 'DISTRIBUTION CHANNEL'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 4.
W_FCAT-FIELDNAME = 'SPART'.
W_FCAT-SELTEXT_M = 'DIVISION'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 5.
W_FCAT-FIELDNAME = 'FKDAT'.
W_FCAT-SELTEXT_M = 'CREATION DATE'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 6.
W_FCAT-FIELDNAME = 'POSNR'.
W_FCAT-SELTEXT_M = 'BILLING ITEM'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 7.
W_FCAT-FIELDNAME = 'MATNR'.
W_FCAT-SELTEXT_M = 'MATERIAL NUM'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 8.
W_FCAT-FIELDNAME = 'ARKTX'.
W_FCAT-SELTEXT_M = 'DESCRIPTION'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 9.
W_FCAT-FIELDNAME = 'FKIMG'.
W_FCAT-SELTEXT_M = 'QUANTITY'.
APPEND W_FCAT TO T_FCAT.
W_FCAT-COL_POS = 10.
W_FCAT-FIELDNAME = 'NETWR'.
W_FCAT-SELTEXT_M = 'NET VALUE'.
W_FCAT-DO_SUM = 'X'.
APPEND W_FCAT TO T_FCAT.
ENDFORM.                    " BUILD_FCAT
*&      Form BUILD_LIST_HEAD
FORM BUILD_LIST_HEAD .
DATA : L_DATE(10),
         L_TIME(8).
W_LIST_HEAD-TYP = 'S'.
W_LIST_HEAD-KEY = 'Sales org :'.
W_LIST_HEAD-INFO = S_VBELN-LOW .
APPEND W_LIST_HEAD TO T_LIST_HEAD.
CLEAR W_LIST_HEAD.
W_LIST_HEAD-TYP = 'S'.
W_LIST_HEAD-KEY = 'TO '.
W_LIST_HEAD-INFO = S_VBELN-HIGH.
APPEND W_LIST_HEAD TO T_LIST_HEAD.
CLEAR W_LIST_HEAD.
ENDFORM.                    " BUILD_LIST_HEAD
*&      Form LIST_TOP_OF_PAGE
FORM LIST_TOP_OF_PAGE .
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      IT_LIST_COMMENTARY = T_LIST_HEAD.
ENDFORM.                    " LIST_TOP_OF_PAGE
<code>
Regards

Depndng on chkbox, should display selection screen block on selectionscreen

Similar Messages

Maybe you are looking for