Requirement : To show radio Button and Select-option with date in same line.
to fulfill the requirement we can use this piece of code .
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_r3 RADIOBUTTON GROUP rb1 .
SELECTION-SCREEN COMMENT 10(15) NAM3 FOR FIELD p_R3. "Comment
SELECT-OPTIONS : S_DATE3 FOR SY-DATUM. "Select-option to be display side wise
SELECTION-SCREEN END OF LINE.
Designing a selection Screen :
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-001 .
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME .
PARAMETERS : p_bukrs TYPE bukrs OBLIGATORY.
SELECT-OPTIONS : s_werks FOR t001w-werks OBLIGATORY.
SELECT-OPTIONS : s_lgort FOR t001l-lgort OBLIGATORY.
SELECTION-SCREEN :END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME .
*-----1st Radio Button and Date ----------------------*
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_r1 RADIOBUTTON GROUP rb1 .
SELECTION-SCREEN COMMENT 10(15) NAM1 FOR FIELD p_R1.
SELECT-OPTIONS : S_DATE1 FOR SY-DATUM.
SELECTION-SCREEN END OF LINE.
*-----2nd Radio Button and date-----*
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_r2 RADIOBUTTON GROUP rb1 .
SELECTION-SCREEN COMMENT 10(15) NAM2 FOR FIELD p_R2.
SELECT-OPTIONS : S_DATE2 FOR SY-DATUM.
SELECTION-SCREEN END OF LINE.
*---3rd Radio button and date ------*
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_r3 RADIOBUTTON GROUP rb1 .
SELECTION-SCREEN COMMENT 10(15) NAM3 FOR FIELD p_R3.
SELECT-OPTIONS : S_DATE3 FOR SY-DATUM.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_r4 RADIOBUTTON GROUP rb1 .
SELECTION-SCREEN COMMENT 10(15) NAM4 FOR FIELD p_R4.
SELECT-OPTIONS : S_DATE4 FOR SY-DATUM.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN :END OF BLOCK b2.
SELECTION-SCREEN :END OF BLOCK b3.
AT SELECTION-SCREEN OUTPUT.
nam1 = '1 Day Sale'.
nam2 = '7 Day Sale'.
nam3 = '30 Day Sale'.
nam4 = '90 Day Sale'.
** IF YOU WANT TO MAKE DATE UN EDITABLE
LOOP AT SCREEN.
IF SCREEN-NAME = 'S_DATE1-LOW'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
IF SCREEN-NAME = 'S_DATE2-LOW'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
IF SCREEN-NAME = 'S_DATE3-LOW'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
IF SCREEN-NAME = 'S_DATE4-LOW'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
IF SCREEN-NAME = 'S_DATE1-HIGH'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
IF SCREEN-NAME = 'S_DATE2-HIGH'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
IF SCREEN-NAME = 'S_DATE3-HIGH'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
IF SCREEN-NAME = 'S_DATE4-HIGH'.
SCREEN-INPUT = 0.
MODIFY SCREEN.
ENDIF.
