Checking a radiobutton

[Former Member]

Hy !

I have this :

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN POSITION 5.

SELECTION-SCREEN COMMENT (13) text-p03 FOR FIELD sb_wks.

PARAMETERS: sb_wks RADIOBUTTON GROUP myg.

..............................................................................

And same for another radiobutton from the same group, in another line.

I want to perform something is the radiobutton is choosed .

I tried:

IF NOT sb_wks IS INITIAL.

PERFORM ods_wks.

ENDIF.

Not working ,

Suggestions? Solutions?

Thank you.

[RichHeilman]

Try something like this.

IF sb_wks = 'X'.
PERFORM ods_wks.
ENDIF.

Regards,

Rich Heilman

[Former Member]

Hi Anda,

when ever u select the radiobutton the corresponding parameter gets a value of X.

IF sb_wks = 'X'.

ELSE.

PERFORM ods_wks.

ENDIF

Thanks

venki

[Former Member]

hi,

check the sample pg: declare radio buttons like below in program and use

if P_list = 'X'.

perform validation.

endif.

REPORT ZSUDHA_SCREEN.

**--- Radiobuttons

PARAMETERS: p_up RADIOBUTTON GROUP a DEFAULT 'X' USER-COMMAND rb,

p_list RADIOBUTTON GROUP a.

PARAMETERS: p_pcfile LIKE rlgrap-filename OBLIGATORY DEFAULT 'C:\'

MODIF ID ccc,

p_pctype LIKE rlgrap-filetype OBLIGATORY DEFAULT 'ASC'

MODIF ID ccc,

p_unix LIKE rlgrap-filename OBLIGATORY DEFAULT '.\'

MODIF ID ccc.

PARAMETERS: p_dir LIKE rlgrap-filename OBLIGATORY DEFAULT '.'

MODIF ID ddd,

p_fp LIKE rlgrap-filename

MODIF ID ddd.

AT SELECTION-SCREEN OUTPUT.

IF p_up = 'X' .

LOOP AT SCREEN.

CASE screen-group1.

WHEN 'CCC'.

screen-input = 1. "Enable

screen-invisible = 0. "Disable

MODIFY SCREEN.

WHEN 'DDD'.

screen-input = 0.

screen-invisible = 1.

MODIFY SCREEN.

ENDCASE.

ENDLOOP.

ENDIF.

IF p_list = 'X'.

LOOP AT SCREEN.

CASE screen-group1.

WHEN 'CCC'.

screen-input = 0.

screen-invisible = 1.

MODIFY SCREEN.

WHEN 'DDD'.

screen-input = 1.

screen-invisible = 0.

MODIFY SCREEN.

ENDCASE.

ENDLOOP.

ENDIF.