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

dynamic selection screen issue

Former Member
0 Likes
706

Hi All,

When i select R2 radio button, then Block - B2 should get disabled. But not working properly...

could you please do let me know, what could be the issue. below is sample code.

SELECTION-SCREEN: BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

SELECTION-SCREEN SKIP.

SELECTION-SCREEN: BEGIN OF LINE .

PARAMETER R1 RADIOBUTTON GROUP GR1 USER-COMMAND uc01 MODIF ID 001.

SELECTION-SCREEN COMMENT 10(30) TEXT-051 FOR FIELD R1.

PARAMETER R2 RADIOBUTTON GROUP GR1 MODIF ID 001.

SELECTION-SCREEN COMMENT 50(40) TEXT-052 FOR FIELD R2.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: END OF BLOCK B1.

SELECTION-SCREEN: BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002 .

SELECTION-SCREEN SKIP .

SELECT-OPTIONS: S_DATE FOR SY-DATUM MODIF ID 002.

SELECTION-SCREEN SKIP.

SELECTION-SCREEN: END OF BLOCK B2.

at selection-screen output.

IF R2 = 'X'.

   LOOP AT SCREEN.

          IF screen-group1 = '002'.

         screen-output = 0.

         screen-invisible = 1.

       ENDIF.

       MODIFY SCREEN.

   ENDLOOP.

     ENDIF.

1 ACCEPTED SOLUTION
Read only

0 Likes
676

Hi Jyotsna,

I think you should try using the screen-active property.

loop at screen.

screen-active = 0.

screen-invisible = 1.

endloop.

Ninad.

5 REPLIES 5
Read only

0 Likes
677

Hi Jyotsna,

I think you should try using the screen-active property.

loop at screen.

screen-active = 0.

screen-invisible = 1.

endloop.

Ninad.

Read only

0 Likes
676

Thank you very much.

Read only

Former Member
0 Likes
676

Dear Jyotsna,

Use as Below.

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

SELECTION-SCREEN SKIP.

SELECTION-SCREEN: BEGIN OF LINE .

PARAMETER r1 RADIOBUTTON GROUP gr1 USER-COMMAND uc01 MODIF ID 001.

SELECTION-SCREEN COMMENT 10(30) text-051 FOR FIELD r1.

PARAMETER r2 RADIOBUTTON GROUP gr1 MODIF ID 001.

SELECTION-SCREEN COMMENT 50(40) text-052 FOR FIELD r2.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: END OF BLOCK b1.

SELECTION-SCREEN: BEGIN OF BLOCK b2 WITH FRAME TITLE text-002 .

SELECTION-SCREEN SKIP .

SELECT-OPTIONS: s_date FOR sy-datum MODIF ID 002.

SELECTION-SCREEN SKIP.

SELECTION-SCREEN: END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

   IF r2 = 'X'.

     LOOP AT SCREEN.

       IF screen-group1 = '002'.

         screen-active = 0.

         screen-invisible = 1.

       ENDIF.

       MODIFY SCREEN.

     ENDLOOP.

   ENDIF.

Read only

0 Likes
676

Thank you very much Dinu

Read only

Former Member
0 Likes
676


SELECTION-SCREEN: BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

SELECTION-SCREEN SKIP.

SELECTION-SCREEN: BEGIN OF LINE .

PARAMETER R1 RADIOBUTTON GROUP GR1 USER-COMMAND uc01 MODIF ID 001.

SELECTION-SCREEN COMMENT 10(30) TEXT-051 FOR FIELD R1.

PARAMETER R2 RADIOBUTTON GROUP GR1 MODIF ID 001.

SELECTION-SCREEN COMMENT 50(40) TEXT-052 FOR FIELD R2.

SELECTION-SCREEN: END OF LINE.

SELECTION-SCREEN: END OF BLOCK B1.

SELECTION-SCREEN: BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002 .

SELECTION-SCREEN SKIP .

SELECT-OPTIONS: S_DATE FOR SY-DATUM MODIF ID 002.

SELECTION-SCREEN SKIP.

SELECTION-SCREEN: END OF BLOCK B2.

at selection-screen output.

IF R2 = 'X'.


LOOP AT SCREEN.

          IF screen-group1 = '002'.

*****         screen-output = 0.

         screen-input = 0. if you want to disable the input.

         screen-invisible = 1.

       ENDIF.

       MODIFY SCREEN.

   ENDLOOP.

Hope this helps.