2007 Dec 17 8:34 AM
hello,
i have two radio buttons in my selection screen wherein each button has a corresponding screen. if i will click the first Rb i want that my 2nd Rb will be disabled, wherein u the user can not input/type anything at the selection screen of the Rb2.
thanks,
bryan
2007 Dec 17 8:42 AM
Hi,
U cannot disable the radiobutton,rather u can disable the fields when the radio button is selected ..
for example when i click on radiobutton1 the fields under radiobutton2 will be disabled...this functionality we can achieve..
check the below sample code for it..
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS : p_aserv RADIOBUTTON GROUP grp
USER-COMMAND app, "Application server
p_afile1 TYPE filename-fileextern , "Application File
"Name for contracts
p_afile2 TYPE filename-fileextern , "Application
"FileName for
"Long text
p_aerfl1 TYPE filename-fileextern , "Error File
"forcontracts
p_aerfl2 TYPE filename-fileextern , "Error File
"for Longtext
p_pserv RADIOBUTTON GROUP grp, "Presentation Server
p_pfile1 TYPE rlgrap-filename , "Presentation File
"Name forcontracts
p_pfile2 TYPE rlgrap-filename , "Presentation File
"Name for long
"texts
p_errfl1 TYPE rlgrap-filename ,
"Error File for
"contracts
p_errfl2 TYPE rlgrap-filename . "Err File Long text
SELECTION-SCREEN : END OF BLOCK b1.
AT SELECTION-SCREEN OUTPUT.
IF p_pserv IS INITIAL.
LOOP AT SCREEN.
CASE screen-name.
WHEN 'P_PFILE1'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_PFILE2'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_ERRFL1'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_ERRFL2'.
screen-input = 0.
MODIFY SCREEN.
ENDCASE.
ENDLOOP.
ELSE.
LOOP AT SCREEN.
CASE screen-name.
WHEN 'P_AFILE1'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_AFILE2'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_AERFL1'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_AERFL2'.
screen-input = 0.
MODIFY SCREEN.
ENDCASE.
ENDLOOP.
ENDIF.
Regards,
Nagaraj
hello,
i have two radio buttons in my selection screen wherein each button has a corresponding screen. if i will click the first Rb i want that my 2nd Rb will be disabled, wherein u the user can not input/type anything at the selection screen of the Rb2.
thanks,
bryan
2007 Dec 17 8:42 AM
Hi,
U cannot disable the radiobutton,rather u can disable the fields when the radio button is selected ..
for example when i click on radiobutton1 the fields under radiobutton2 will be disabled...this functionality we can achieve..
check the below sample code for it..
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS : p_aserv RADIOBUTTON GROUP grp
USER-COMMAND app, "Application server
p_afile1 TYPE filename-fileextern , "Application File
"Name for contracts
p_afile2 TYPE filename-fileextern , "Application
"FileName for
"Long text
p_aerfl1 TYPE filename-fileextern , "Error File
"forcontracts
p_aerfl2 TYPE filename-fileextern , "Error File
"for Longtext
p_pserv RADIOBUTTON GROUP grp, "Presentation Server
p_pfile1 TYPE rlgrap-filename , "Presentation File
"Name forcontracts
p_pfile2 TYPE rlgrap-filename , "Presentation File
"Name for long
"texts
p_errfl1 TYPE rlgrap-filename ,
"Error File for
"contracts
p_errfl2 TYPE rlgrap-filename . "Err File Long text
SELECTION-SCREEN : END OF BLOCK b1.
AT SELECTION-SCREEN OUTPUT.
IF p_pserv IS INITIAL.
LOOP AT SCREEN.
CASE screen-name.
WHEN 'P_PFILE1'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_PFILE2'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_ERRFL1'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_ERRFL2'.
screen-input = 0.
MODIFY SCREEN.
ENDCASE.
ENDLOOP.
ELSE.
LOOP AT SCREEN.
CASE screen-name.
WHEN 'P_AFILE1'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_AFILE2'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_AERFL1'.
screen-input = 0.
MODIFY SCREEN.
WHEN 'P_AERFL2'.
screen-input = 0.
MODIFY SCREEN.
ENDCASE.
ENDLOOP.
ENDIF.
Regards,
Nagaraj