Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

SELECTION-SCREEN

Former Member
0 Likes
350

Dear friends,

i have a question on selection screen

.

SELECTION-SCREEN: BEGIN OF BLOCK a1 WITH FRAME TITLE text-001. " BEGIN OF BLOCK a1

SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN: POSITION 5.

PARAMETERS: rb_so_po radiobutton group aa default 'X'.

SELECTION-SCREEN: COMMENT 8(20) text-002.

SELECTION-SCREEN: POSITION 30.

PARAMETERS: rb_so radiobutton group aa.

SELECTION-SCREEN: COMMENT 33(20) text-003.

SELECTION-SCREEN: POSITION 60.

PARAMETERS: cb_so as checkbox modif id bth.

SELECTION-SCREEN: COMMENT 63(20) text-005.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN: POSITION 60.

PARAMETERS: cb_po as checkbox modif id bth.

SELECTION-SCREEN: COMMENT 63(20) text-006.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN: POSITION 60.

PARAMETERS: cb_crd as checkbox modif id soe.

SELECTION-SCREEN: COMMENT 63(20) text-007.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN: POSITION 60.

PARAMETERS: cb_shd as checkbox modif id soe.

SELECTION-SCREEN: COMMENT 63(20) text-008.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: END OF BLOCK a1. " END OF BLOCK a1

This is my selection screen

in this i need to select radio button.

If i select radio button 1, only first 2 check boxes has to be visible and remaining 2 should be hide.

If i select second radio button. last 2 check boxes has to be visible and first 2 should be hide.

Please remember 2 radio buttons and 4 check boxes are in the same block .

Can any one send me the code for this

Thanks,

Ajay

2 REPLIES 2
Read only

Former Member
0 Likes
321

Hi,

tables:

mard.

select-options: s_matnr for mard-matnr modif id xyz.

parameters : s_werks like mard-werks modif id xyz .

select-options: s_lgort for mard-lgort modif id abc.

parameters check as checkbox user-command check.

at selection-screen output.

if check eq 'X'.

loop at screen.

if screen-group1 = 'ABC'.

screen-input = 0.

screen-invisible = 1.

modify screen.

endif.

endloop.

endif.

this code is removing a select-option when the check box is selected so u can easily do ur code accordingle

below is ur requirement

SELECTION-SCREEN: BEGIN OF BLOCK a1 WITH FRAME TITLE text-001.

SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN: POSITION 5.

PARAMETERS: rb_so_po radiobutton group aa default 'X'.

SELECTION-SCREEN: COMMENT 8(20) text-002.

SELECTION-SCREEN: POSITION 30.

PARAMETERS: rb_so radiobutton group aa.

SELECTION-SCREEN: COMMENT 33(20) text-003.

SELECTION-SCREEN: POSITION 60.

PARAMETERS: cb_so as checkbox modif id bth.

SELECTION-SCREEN: COMMENT 63(20) text-005.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN: POSITION 60.

PARAMETERS: cb_po as checkbox modif id bth.

SELECTION-SCREEN: COMMENT 63(20) text-006.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN: POSITION 60.

PARAMETERS: cb_crd as checkbox modif id soe.

SELECTION-SCREEN: COMMENT 63(20) text-007.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN: POSITION 60.

PARAMETERS: cb_shd as checkbox modif id soe.

SELECTION-SCREEN: COMMENT 63(20) text-008.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: END OF BLOCK a1. " END OF BLOCK a1

at selection-screen output.

if rb_so_po = 'X'.

loop at screen.

if screen-group1 = 'BTH'.

screen-input = 0.

screen-invisible = 1.

modify screen.

endif.

endloop.

endif.

if rb_so = 'X'.

loop at screen.

if screen-group1 = 'SOE'.

screen-input = 0.

screen-invisible = 1.

modify screen.

endif.

endloop.

endif.

you just have to press execute or enter on selection screen

do reward if helpful

Edited by: Ashish Paliwal on Apr 7, 2008 3:48 PM

Read only

Former Member
0 Likes
321

Hi,

REPORT zdownload_cor1.

SELECTION-SCREEN: BEGIN OF BLOCK a1 WITH FRAME TITLE text-001. " BEGIN OF BLOCK a1

*SELECTION-SCREEN: BEGIN OF LINE.
*SELECTION-SCREEN: POSITION 5.
PARAMETERS: r1 RADIOBUTTON GROUP aa." DEFAULT 'X'.
*SELECTION-SCREEN: COMMENT 8(20) text-002.

*SELECTION-SCREEN: POSITION 30.
PARAMETERS: r2 RADIOBUTTON GROUP aa.
*SELECTION-SCREEN: COMMENT 33(20) text-003.

*SELECTION-SCREEN: POSITION 60.
PARAMETERS: c1 AS CHECKBOX MODIF ID bth.
*SELECTION-SCREEN: COMMENT 63(20) text-005.
*SELECTION-SCREEN: END OF LINE.

*SELECTION-SCREEN: BEGIN OF LINE.
*SELECTION-SCREEN: POSITION 60.
PARAMETERS: c2 AS CHECKBOX MODIF ID bth.
*SELECTION-SCREEN: COMMENT 63(20) text-006.
*SELECTION-SCREEN: END OF LINE.


*SELECTION-SCREEN: BEGIN OF LINE.
*SELECTION-SCREEN: POSITION 60.
PARAMETERS: c3 AS CHECKBOX MODIF ID soe.
*SELECTION-SCREEN: COMMENT 63(20) text-007.
*SELECTION-SCREEN: END OF LINE.


*SELECTION-SCREEN: BEGIN OF LINE.
*SELECTION-SCREEN: POSITION 60.
PARAMETERS: c4 AS CHECKBOX MODIF ID soe.
*SELECTION-SCREEN: COMMENT 63(20) text-008.
*SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: END OF BLOCK a1. " END OF BLOCK a1


AT SELECTION-SCREEN OUTPUT.

  IF r1 = 'X'.
    LOOP AT SCREEN.


      IF screen-name EQ 'C3' OR
      screen-name EQ 'C4' OR
      screen-name EQ 'R2' OR
      screen-name EQ 'RADIO2' OR
      screen-name EQ 'CHECKBOX3' OR
      screen-name EQ 'CHECKBOX4'.
      screen-invisible = 1.

        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
    elseif r2 = 'X'.

     LOOP AT SCREEN.


      IF screen-name EQ 'C1' OR
      screen-name EQ 'C2' OR
      screen-name EQ 'R1' OR
      screen-name EQ 'RADIO1' OR
      screen-name EQ 'CHECKBOX1' OR
      screen-name EQ 'CHECKBOX2'.
      screen-invisible = 1.

        MODIFY SCREEN.
      ENDIF.
      endloop.
  ENDIF.