Screen Output - radiobutton

[Former Member]

Hi,

I am trying to do something like this.

<radiobutton> A

<radiobutton> B

IF the selection by user is 'A'. then set the input fields in block b1 to be displayed output only.

IF the selection is B, all input fields are visible and able to be input.

Below is my code. However, it doesnt work what I have expected. Please help. Thanks.

PARAMETERS : p_disp RADIOBUTTON GROUP r1 default 'X' user-command check,

p_ext RADIOBUTTON GROUP r1.

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

PARAMETERS: P_PFNAME(20) TYPE C OBLIGATORY MODIF ID A DEFAULT 'SCHEDULECHG.DAT',

P_FTPID LIKE ZTFTP_ID_PWD-FTPID MODIF ID A DEFAULT 'MOL001'.

SELECTION-SCREEN END OF BLOCK b1.

AT SELECTION-SCREEN.

IF p_disp = 'X'.

loop at screen.

if screen-group1 = 'A'.

screen-input = 0.

screen-invisible = '0'.

modify screen.

endif.

endloop.

ELSEIF p_ext = 'X'.

loop at screen.

if screen-group1 = 'A'.

screen-input = 1.

screen-invisible = '1'.

modify screen.

endif.

endloop.

ENDIF.

[Former Member]

Put the Modify Screen code in AT SELECTION-SCREEN OUTPUT.

Change event AT SELECTION-SCREEN to AT SELECTION-SCREEN OUTPUT.

[JozsefSzikszai]

hi,

instead of AT SELECTION-SCREEN you have to use AT SELECTION-SCREEN OUTPUT

hope this helps

ec

[Former Member]

Hi,

do like this.

PARAMETERS : p_disp RADIOBUTTON GROUP r1 default 'X' user-command check,
p_ext RADIOBUTTON GROUP r1.

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

PARAMETERS: P_PFNAME(20) TYPE C OBLIGATORY MODIF ID A DEFAULT
'SCHEDULECHG.DAT',
P_FTPID LIKE ZTFTP_ID_PWD-FTPID MODIF ID A DEFAULT 'MOL001'.
SELECTION-SCREEN END OF BLOCK b1.

AT SELECTION-SCREEN OUTPUT.

IF p_disp = 'X'.
  loop at screen.
    if screen-group1 = 'A'.
     screen-input = 0.
     modify screen.
    endif.
  endloop.

ELSEIF p_ext = 'X'.
  loop at screen.
    if screen-group1 = 'A'.
      screen-input = 1.
      modify screen.
    endif.
  endloop.
ENDIF.

rgds,

bharat.

[Former Member]

Thanks

DIdnt realise that. Thanks. marks will be rewarded. TQ

[Former Member]

hi,

U have to work with at selection-screen output

Regards,

Sindhu