Disabling select-option

[Former Member]

Hi Experts,

In the below code always the selectoption s_date must be disabled, once when i select the radiobutton op only it has to be enabled how to do that can any help me out,,

SELECTION-SCREEN BEGIN OF BLOCK A WITH FRAME TITLE TEXT-500.

PARAMETER :

CWEEK TYPE C RADIOBUTTON GROUP RB,

PWEEK TYPE C RADIOBUTTON GROUP RB,

UP TYPE C RADIOBUTTON GROUP RB,

PRCW TYPE C RADIOBUTTON GROUP RB,

OP TYPE C RADIOBUTTON GROUP RB.

SELECT-OPTIONS S_DATE for pa0102-begda no-extension.

SELECTION-SCREEN END OF BLOCK A.

Thanks and Regaards,

Thirukumaran. R

[Former Member]

hi, do like this

SELECTION-SCREEN BEGIN OF BLOCK A WITH FRAME TITLE TEXT-500.

PARAMETER :

CWEEK TYPE C RADIOBUTTON GROUP RB,

PWEEK TYPE C RADIOBUTTON GROUP RB,

UP TYPE C RADIOBUTTON GROUP RB,

PRCW TYPE C RADIOBUTTON GROUP RB,

OP TYPE C RADIOBUTTON GROUP RB.

SELECT-OPTIONS S_DATE for pa0102-begda no-extension modif id CHR. "ADD modif id

SELECTION-SCREEN END OF BLOCK A.

AT SELECTION-SCREEN OUTPUT.

IF OP EQ 'X'.

LOOP AT SCREEN.

IF screen-group1 EQ 'CHR'.

screen-input = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDIF.

thanks.

Edited by: rimpa abhishek on Dec 12, 2008 4:47 AM

[Former Member]

try this code

tables :pa0102.

SELECTION-SCREEN BEGIN OF BLOCK A WITH FRAME TITLE TEXT-500.

PARAMETER :

CWEEK TYPE C RADIOBUTTON GROUP RB user-command id,------->_(specify user-command here then only it will work properly in single click otherwise u should double click it)_

PWEEK TYPE C RADIOBUTTON GROUP RB,

UP TYPE C RADIOBUTTON GROUP RB,

PRCW TYPE C RADIOBUTTON GROUP RB,

OP TYPE C RADIOBUTTON GROUP RB.

SELECT-OPTIONS S_DATE for pa0102-begda no-extension modif id sd1.

SELECTION-SCREEN END OF BLOCK A.

AT SELECTION-SCREEN OUTPUT.

if op = 'X'.

LOOP AT SCREEN.

IF screen-group1 = 'SD1'.

screen-input = '0'.

MODIFY SCREEN.

CONTINUE.

ENDIF.

ENDLOOP.

endif.

[Former Member]

Hi Thiru,

Firstly for disabling : SELECT-OPTIONS S_DATE for pa0102-begda no-extension no-display.

In event AT SELECTION-SCREEN.

do like this.......

loop at screen

if op = 'X'.

screen-name = 's_date'.

screen-invisible = 1.

endif.

endloop.

Regards,

sg.

[former_member206439]

Hi

sample code see thsi

REPORT  ZNNR_REPORT NO STANDARD PAGE HEADING MESSAGE-ID ZNNR LINE-SIZE 100 LINE-COUNT 65(4).

TABLES EKKO.
*********END OF DATA DECLARATIONS**********

********SELECTION SCREEN DESIGN ***********

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

PARAMETER : P_WERKS LIKE MARC-WERKS MODIF ID S1.
SELECT-OPTIONS : S_EBELN FOR EKKO-EBELN NO INTERVALS MODIF ID S2.

SELECTION-SCREEN END OF BLOCK B1.

SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-004.

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : R1 RADIOBUTTON GROUP G1 DEFAULT 'X' user-command uc1.
SELECTION-SCREEN COMMENT 5(20) TEXT-002 FOR FIELD R1.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : R2 RADIOBUTTON GROUP G1.
SELECTION-SCREEN COMMENT 5(20) TEXT-003 FOR FIELD R2.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN END OF BLOCK B2.


*******END OF SELECTION SCREEN DESIGN*****************

************SCREEN MODIFICATIONS********************

AT SELECTION-SCREEN OUTPUT.

  LOOP AT SCREEN.

    IF R1 EQ 'X' AND SCREEN-GROUP1 EQ 'S2'.
      SCREEN-INPUT = 0.
      MODIFY SCREEN.
    ENDIF.

    IF R2 EQ 'X' AND SCREEN-GROUP1 EQ 'S1'.
      SCREEN-INPUT = 0.
      MODIFY SCREEN.
    ENDIF.

  ENDLOOP.

*********END OF SCREEN MODIFICATIONS******************