topic Re: Hide radio button upon click in Application Development and Automation Discussions

Hide radio button upon click

Former Member — Tue, 16 Dec 2008 04:49:30 GMT

Good day experts.

I would like to ask help how to do this stuff.

I have two main radio button. Let say radA and radB. On radB, I have another two radio buttons. Let say radB1 and radB2.

Initially, I must only see radA and radB. Upon I click radB, thats the only time, radB1 and radB2 will appear. And when I click radA, radB1 and radB2 disappear.

thanks for your help.

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 04:55:49 GMT

check out this thread

this might help you

regards

Aakash Banga

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 04:55:56 GMT

Hi,

You can achieve this in the PBO.

DATA : rada VALUE 'X',

radb,

rada1,

rada2,

radb1,

radb2.

&----

*& Module STATUS_0100 OUTPUT

&----

text

----

MODULE status_0100 OUTPUT.

SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.

IF rada = 'X'.

LOOP AT SCREEN.

IF screen-group1 = 'R1'.

screen-invisible = 0.

MODIFY SCREEN.

ENDIF.

IF screen-group1 = 'R2'.

screen-invisible = 1.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDIF.

*assign a group to radio buttons *

Try this out, Just i checked it and working fine

Regards

Ramc

Edited by: ramchander krishnamraju on Dec 16, 2008 6:08 AM

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 05:09:41 GMT

Hi,

Try like this:

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

PARAMETERS : rdA RADIOBUTTON GROUP rg1 DEFAULT 'X',

rdB RADIOBUTTON GROUP rg1,

rdB1 RADIOBUTTON GROUP rg2 modif id rdb,

rdB2 RADIOBUTTON GROUP rg2 modif id rdb.

SELECTION-SCREEN END OF BLOCK b1.

at selection-screen output.

if rdA = 'X'.

loop at screen.

if screen-group1 = 'RDB'.

screen-active = 0.

modify screen.

endif.

endloop.

elseif rdB = 'X'.

loop at screen.

if screen-group1 = 'RDB'.

screen-active = 1.

modify screen.

endif.

endloop.

endif.

Regards,

Bhaskar

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 05:14:37 GMT

HI,

try ths



  FIELD : rb,
          rb
          MODULE modify AT CURSOR-SELECTION.


******
IF rb EQ 'X'.
    LOOP AT SCREEN.
      IF ( screen-group1 EQ 'ABC' ).
        screen-invisible = 0.
        screen-active = 1.
      ELSEIF ( screen-group1 EQ 'DEF' ).
        screen-invisible = 1.
        screen-active = 0.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.

  ELSE.
    LOOP AT SCREEN.
      IF ( screen-group1 EQ 'DEF' ).
        screen-invisible = 0.
        screen-active = 1.
      ELSEIF ( screen-group1 EQ 'ABC' ).
        screen-invisible = 1.
        screen-active = 0.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
  ENDIF.

ENDMODULE.

put rbB1,rdB2 in one group and rdA1,rdA2 in othr group

hope ths help u

regards,

Ritesh JHa

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 05:15:03 GMT

Hello

Its working try given below code.

this is the statement of screen from where we call the buttons.

we will write both the button in field.as per the given below code.

PROCESS BEFORE OUTPUT.

MODULE status_8000. "PBO OF SCREEN NUMBER8000.

PROCESS AFTER INPUT. "PAI OF SCREEN NUMBER 8000.

MODULE USER_COMMAND_8000.

FIELD : rbA,

rbB

MODULE modify AT CURSOR-SELECTION.

"WE USE AT CURSOR SELECTION STATEMENT WITH MODULE NAME.

"THIS IS THE CODE OF PBO SCREEN.

MODULE status_8000 OUTPUT.

SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.

IF rbA EQ 'X'.

LOOP AT SCREEN.

IF ( screen-group1 EQ 'ABC' ).

screen-invisible = 0.

screen-active = 1.

ELSEIF ( screen-group1 EQ 'DEF' ).

screen-invisible = 1.

screen-active = 0.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ELSE.

LOOP AT SCREEN.

IF ( screen-group1 EQ 'DEF' ).

screen-invisible = 0.

screen-active = 1.

ELSEIF ( screen-group1 EQ 'ABC' ).

screen-invisible = 1.

screen-active = 0.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ENDIF.

ENDMODULE. " STATUS_8000 OUTPUT

&----

*& Module MODIFY INPUT

&----

text

----

"THIS CODE WE WILL WRITE IN PAI SCREEN.

MODULE modify INPUT.

IF rbA EQ 'X'.

LOOP AT SCREEN.

IF ( screen-group1 EQ 'ABC' ).

screen-invisible = 0.

screen-active = 1.

ELSEIF ( screen-group1 EQ 'DEF' ).

screen-invisible = 1.

screen-active = 0.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ELSE.

LOOP AT SCREEN.

IF ( screen-group1 EQ 'DEF' ).

screen-invisible = 0.

screen-active = 1.

ELSEIF ( screen-group1 EQ 'ABC' ).

screen-invisible = 1.

screen-active = 0.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ENDIF.

ENDMODULE. " MODIFY INPUT

THANKS-

ARUN KAYAL

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 05:21:12 GMT

hi,

use Modif id .

PARAMETERS : rdA RADIOBUTTON GROUP rg1 DEFAULT 'X',

rdB RADIOBUTTON GROUP rg1,

rdB1 RADIOBUTTON GROUP rg2 modif id rdb,

rdB2 RADIOBUTTON GROUP rg2 modif id rdb.

at selection-screen output.

loop at screen.

if screen-group1 = 'RDB'.

screen-active = 0.

modify screen.

endif.

if rdB = 'X'.

if screen-group1 = 'RDB'.

screen-active = 1.

modify screen.

endif.

endloop.

thanks

Re: Hide radio button upon click

I355602 — Tue, 16 Dec 2008 05:25:53 GMT

Hi Levis 501,

As per your requirements, you have four radiobuttons:-

radA, radB, radB1 and radB2.

Initially, you want only 'radA' and 'radB' (define a group for these two radiobuttons so that on one of them can be selected at a time).

Take the group1 of 'radB1' and 'radB2' as 'ABC' in the attributes of radiobutton,

and for 'rada' and 'radb' keep function group as 'CS' and function type as 'S'.

Using this on changing the selection of radiobuttons 'rada' and 'radb', the radiobuttons 'radB1' and 'radB2' will be enabled/disabled (no need to press any key for generating event).

Use this code:-

In the top module, include code:-


DATA : rada(1) value 'X', "initially checked when you execute
       radb(1),
       radb1(1),
       radb2(1).

On screen flow logic.


PROCESS BEFORE OUTPUT.
 MODULE modify_screen.

In PBO, for module 'modify_screen', use code:-


IF rada = 'X'.
  LOOP AT SCREEN.
    IF ( screen-group1 EQ 'ABC' ).
      screen-invisible = 1.
      screen-active = 0.
    ENDIF.
    MODIFY SCREEN. 
  ENDLOOP.
ELSEIF radb = 'X'.
  LOOP AT SCREEN.
    IF ( screen-group1 EQ 'ABC' ).
      screen-invisible = 0.
      screen-active = 1.
    ENDIF.
    MODIFY SCREEN. 
  ENDLOOP.
ENDIF.

This will enable/disable the radiobuttons as per your requirements.

Hope this solves your problem.

Thanks & Regards

Tarun Gambhir

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 05:28:07 GMT

thank you friend. I just modify your code, and I got the answer..

"heres the code:

PARAMETERS: rada RADIOBUTTON GROUP rd1 DEFAULT 'X' USER-COMMAND rd,

radb RADIOBUTTON GROUP rd1, "MODIF ID p2,

radb1 RADIOBUTTON GROUP rd2, "MODIF ID p2,

radb2 RADIOBUTTON GROUP rd2. " MODIF ID p2

AT SELECTION-SCREEN OUTPUT.

IF rada = 'X'.

LOOP AT SCREEN.

IF screen-name = 'RADB1'.

screen-invisible = 1.

ENDIF.

IF screen-name = 'RADB2'.

screen-invisible = 1.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ELSEIF radb = 'X'.

LOOP AT SCREEN.

IF screen-name = 'RADB1'.

screen-invisible = 0.

ENDIF.

IF screen-name = 'RADB2'.

screen-invisible = 0.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

ENDIF.

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 05:33:27 GMT

Hi,

use loop at screen method as all others have suggested.

Thanks.

Re: Hide radio button upon click

Former Member — Tue, 16 Dec 2008 05:36:12 GMT

HI ,

This will solve ur purpose ,

Pls go throgh the following code,

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

PARAMETERS : r3 RADIOBUTTON GROUP g2 MODIF ID SC1,

r4 RADIOBUTTON GROUP g2 MODIF ID SC1.

SELECTION-SCREEN END OF BLOCK b1.

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

PARAMETERS : r1 RADIOBUTTON GROUP g1 DEFAULT 'X' USER-COMMAND ucomm,

r2 RADIOBUTTON GROUP g1 .

SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF R1 = 'X' .

IF screen-group1 = 'SC2'.

screen-input = 0.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ELSE.

IF screen-group1 = 'SC1' .

screen-input = 0.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

regards ,

Ajit