topic Re: AT SELECTION-SCREEN OUTPUT. in Application Development and Automation Discussions

AT SELECTION-SCREEN OUTPUT.

Mohamed_Mukhtar — Tue, 22 Jul 2008 05:06:14 GMT

Hi ,

A very good day to u all ABAPer's....

I have a

two radiobuttons in one group ,

and another two radiobutton in another group.

At selection screen when i select a radiobutton of one group , the other group which has two radiobutton should be disabled,,......

How can i achieve this.....following is my code ............

Please check my code....

LOOP AT SCREEN.

IF SCREEN-NAME = 'R1' OR

SCREEN-NAME = 'R2' OR

SCREEN-NAME = 'R3'.

SCREEN-ACTIVE = 1.

MODIFY SCREEN.

ENDIF.

ENDLOOP..

LOOP AT SCREEN.

IF SCREEN-NAME = 'R1' OR

SCREEN-NAME = 'R2' OR

SCREEN-NAME = 'R3'.

SCREEN-ACTIVE = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

Waiting for ur valuable responses....

With warm regards...

Thank Q..

Always Learner

Edited by: always learner on Jul 22, 2008 7:09 AM

Re: AT SELECTION-SCREEN OUTPUT.

sachin_mathapati — Tue, 22 Jul 2008 05:12:19 GMT

Hi ,

Use USER-COMMAND cmd1 while declaring u r radio button..

eg :

PARAMETERS: rb_rt RADIOBUTTON GROUP gr3 USER-COMMAND cmd1 .

Then u r code will work..

Regards,

Sachin M M

Re: AT SELECTION-SCREEN OUTPUT.

former_member787646 — Tue, 22 Jul 2008 05:13:20 GMT

Try the following code. (Here R1 and R2 are the Radio Button groups )

AT SELECTION-SCREEN OUTPUT.

IF R1-rb1 = 'X' OR R1-rb2 = 'X'.

LOOP AT SCREEN.

IF SCREEN-GROUP1 = 'R2'.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP..

ENDIF.

Hope this would help you.

Murthy

Edited by: Kalyanam Seetha Rama Murthy on Jul 22, 2008 7:14 AM

Re: AT SELECTION-SCREEN OUTPUT.

Former Member — Tue, 22 Jul 2008 05:16:44 GMT

Hii!

Check out this sample code


REPORT z_sdn.
 
 
 
PARAMETERS:
  p_num RADIOBUTTON GROUP rad1 DEFAULT 'X' USER-COMMAND abc,
  p_char RADIOBUTTON GROUP rad1.
 
PARAMETERS:
  p_rad1 RADIOBUTTON GROUP rad2 DEFAULT 'X'
         USER-COMMAND xyz MODIF ID num,
  p_rad2 RADIOBUTTON GROUP rad2 MODIF ID num,
  p_rd1  RADIOBUTTON GROUP rad3 DEFAULT 'X'
         USER-COMMAND pqr MODIF ID chr,
  p_rd2  RADIOBUTTON GROUP rad3 MODIF ID chr.
 
 
AT SELECTION-SCREEN OUTPUT.
  IF p_num EQ 'X'.
    LOOP AT SCREEN.
      IF screen-group1 EQ 'CHR'.
        screen-active = 0.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
  ELSE.
    LOOP AT SCREEN.
      IF screen-group1 EQ 'NUM'.
        screen-active = 0.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
  ENDIF.

Regards

Abhijeet

Re: AT SELECTION-SCREEN OUTPUT.

Former Member — Tue, 22 Jul 2008 05:16:50 GMT

Try this code:

LOOP AT SCREEN.

IF sy-ucomm = 'XXX'. << Fcode attached to the radio button grp RB1 & RB2

IF screen-name = 'RB1' or screen-name = 'RB2' .

screen-invisible = 0.

elseif screen-name = 'RB3' or screen-name = 'RB4'.

screen-invisible = 1.

ENDIF.

MODIFY SCREEN.

else.

IF screen-name = 'RB1' or screen-name = 'RB2' .

screen-invisible = 1.

elseif screen-name = 'RB3'or screen-name = 'RB4'.

screen-invisible = 0.

ENDIF.

MODIFY SCREEN.

endif.

ENDLOOP.

Re: AT SELECTION-SCREEN OUTPUT.

former_member125931 — Tue, 22 Jul 2008 05:20:39 GMT

Give one check box,if you click check box one radio button group will be disappear.

check below sample code :

PARAMETERS show_all AS CHECKBOX USER-COMMAND flag.

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.

PARAMETERS: p1 TYPE c LENGTH 10,

p2 TYPE c LENGTH 10,

p3 TYPE c LENGTH 10.

SELECTION-SCREEN END OF BLOCK b1.

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME.

PARAMETERS: p4 TYPE c LENGTH 10 MODIF ID bl2,

p5 TYPE c LENGTH 10 MODIF ID bl2,

p6 TYPE c LENGTH 10 MODIF ID bl2.

SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF show_all <> 'X' AND

screen-group1 = 'BL2'.

screen-active = '0'.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

Re: AT SELECTION-SCREEN OUTPUT.

former_member386202 — Tue, 22 Jul 2008 05:22:13 GMT

Hi,

Refer Below code

FORM sub_select_report .

IF ( p_post EQ c_chk ).

LOOP AT SCREEN.

IF ( screen-group1 EQ 'MD1' ) OR

( screen-group1 EQ 'MD2' ) OR

( screen-group1 EQ 'MD3' ) OR

( screen-group1 EQ 'MD4' ).

screen-input = c_ok.

screen-active = c_ok.

ENDIF.

IF ( screen-group1 EQ 'MD5' ) OR

( screen-group1 EQ 'MD6' ).

screen-input = c_1.

screen-active = c_1.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ELSEIF p_rpt EQ c_chk.

LOOP AT SCREEN.

IF ( screen-group1 EQ 'MD5' ) OR

( screen-group1 EQ 'MD6' ).

screen-input = c_ok.

screen-active = c_ok.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ENDIF.

Regards,

Prashant

Re: AT SELECTION-SCREEN OUTPUT.

Mohamed_Mukhtar — Tue, 22 Jul 2008 05:44:40 GMT

THANKS FOR UR RESPONSES.....