Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

how to disable parameter in selection screen

Former Member
0 Kudos

hi experts,

SELECTION-SCREEN BEGIN OF BLOCK server WITH FRAME TITLE text-009.

SELECTION-SCREEN BEGIN OF LINE.

PARAMETERS: data_app RADIOBUTTON GROUP csbi.

SELECTION-SCREEN COMMENT 4(35) text-006 FOR FIELD data_app."744242

parameters : p_fname1 like rlgrap-filename default 'D:\usr\sap\ESP\DVEBMGS32\work\.boma1.dat' modif id s1.

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN SKIP 1.

SELECTION-SCREEN BEGIN OF LINE.

PARAMETERS: data_frn RADIOBUTTON GROUP csbi DEFAULT 'X'.

SELECTION-SCREEN COMMENT 4(35) text-007 FOR FIELD data_frn."744242

PARAMETERS: p_fname2 LIKE rlgrap-filename DEFAULT 'D:\Documents and Settings\czfnct\Desktop\boma.xls' modif id s2.

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN END OF BLOCK server.

my requirement is when data_frm radio button is active p_fname1 should be disabled or disappeared.

and when data_app radio button is active p_fname2 should be disabled or disappeared.

kindly suggest how to acheive it.

regards,

pavan

1 ACCEPTED SOLUTION

Former Member
0 Kudos

Hi,

Please refer to the code below :

TABLES : bsis.

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

PARAMETER : sp_sel radiobutton group rad USER-COMMAND radio DEFAULT 'X',

sp_all RADIOBUTTON GROUP rad.

SELECTION-SCREEN END OF BLOCK b1.

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.

SELECT-OPTIONS : so_bukrs FOR bsis-bukrs MODIF ID sp1.

SELECT-OPTIONS : so_hkont FOR bsis-hkont MODIF ID sp2.

SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF sp_sel = 'X'.

IF screen-group1 = 'SP2'.

screen-input = '0'.

screen-invisible = '0'.

screen-required = '0'.

MODIFY SCREEN.

ENDIF.

elseif sp_all = 'X'.

IF screen-group1 = 'SP1'.

screen-input = '0'.

screen-invisible = '0'.

screen-required = '0'.

MODIFY SCREEN.

ENDIF.

endif.

ENDLOOP.

Thanks,

Sriram POnna.

6 REPLIES 6

Former Member
0 Kudos

At Selection-Screen.

Loop at Screen.

If data_frm radio = 'X'.

if screen-group = 'S1'.

screen-invisible = 1.

elseif screen-group = 'S2'.

screen-invisible = 0.

endif.

endif.

If data_app_radio = 'X'.

if screen-group = 'S2'.

screen-invisible = 1.

elseif screen-group = 'S1'.

screen-invisible = 0.

endif.

endif.

Modify Screen.

Endloop.

awrd points if useful

Bhupal

Former Member
0 Kudos

try this,

at selection-screen.

if radio button = 'X'.

loop at screen.

if screen-name = 'UR parameter name'.

screen-invisible = '1'.

screen-active = '0'.

modify screen.

endif.

endloop.

endif.

i think it should work

Edited by: Amit Sawant on Jan 10, 2008 12:52 PM

Former Member
0 Kudos

Hi,

Please refer to the code below :

TABLES : bsis.

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

PARAMETER : sp_sel radiobutton group rad USER-COMMAND radio DEFAULT 'X',

sp_all RADIOBUTTON GROUP rad.

SELECTION-SCREEN END OF BLOCK b1.

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.

SELECT-OPTIONS : so_bukrs FOR bsis-bukrs MODIF ID sp1.

SELECT-OPTIONS : so_hkont FOR bsis-hkont MODIF ID sp2.

SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF sp_sel = 'X'.

IF screen-group1 = 'SP2'.

screen-input = '0'.

screen-invisible = '0'.

screen-required = '0'.

MODIFY SCREEN.

ENDIF.

elseif sp_all = 'X'.

IF screen-group1 = 'SP1'.

screen-input = '0'.

screen-invisible = '0'.

screen-required = '0'.

MODIFY SCREEN.

ENDIF.

endif.

ENDLOOP.

Thanks,

Sriram POnna.

Former Member
0 Kudos

SELECTION-SCREEN BEGIN OF BLOCK server WITH FRAME TITLE text-009.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: data_app RADIOBUTTON GROUP csbi USER-COMMAND umd.
SELECTION-SCREEN COMMENT 4(35) text-006 FOR FIELD data_app.
PARAMETERS : p_fname1 LIKE rlgrap-filename DEFAULT 'D:\usr\sap\ESP\DVEBMGS32\work\.boma1.dat' MODIF ID s1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: data_frn RADIOBUTTON GROUP csbi DEFAULT 'X'.
SELECTION-SCREEN COMMENT 4(35) text-007 FOR FIELD data_frn. "744242
PARAMETERS: p_fname2 LIKE rlgrap-filename DEFAULT 'D:\Documents and Settings\czfnct\Desktop\boma.xls' MODIF ID s2.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK server.

*my requirement is when data_frm radio button is active p_fname1 should be disabled or disappeared.
*and when data_app radio button is active p_fname2 should be disabled or disappeared.
*
*kindly suggest how to acheive it.
*
*regards,
*pavan

AT SELECTION-SCREEN OUTPUT.

  LOOP AT SCREEN.
    IF screen-group1 = 'S1' AND data_app = 'X'.
      screen-input = 0.
      MODIFY SCREEN.
    ENDIF.
   IF screen-group1 = 'S2' AND data_frn = 'X'.
      screen-input = 0.
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.

0 Kudos

hi,

Thank you all for u r quick reply. with all u r help i completed my task.

cheers,

pavan

Former Member
0 Kudos

hi,

try like this

SELECTION-SCREEN BEGIN OF BLOCK server WITH FRAME TITLE text-010.

SELECTION-SCREEN BEGIN OF LINE.

PARAMETERS: data_app RADIOBUTTON GROUP csbi DEFAULT 'X' USER-COMMAND ucom.

SELECTION-SCREEN COMMENT 4(35) text-008 FOR FIELD data_app. "744242

PARAMETERS : p_fname1 LIKE rlgrap-filename DEFAULT 'D:\usr\sap\ESP\DVEBMGS32\work\.boma1.dat' modif id s1..

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN SKIP 1.

SELECTION-SCREEN BEGIN OF LINE.

PARAMETERS: data_frn RADIOBUTTON GROUP csbi.

SELECTION-SCREEN COMMENT 4(35) text-009 FOR FIELD data_frn. "744242

PARAMETERS: p_fname2 LIKE rlgrap-filename DEFAULT 'D:\Documents and Settings\czfnct\Desktop\boma.xls' modif id s2. .

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN END OF BLOCK server.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF data_app = 'X'.

IF screen-name = 'P_FNAME1' .

p_fname1 = 'D:\usr\sap\ESP\DVEBMGS32\work\.boma1.dat' .

screen-input = 1.

ENDIF.

IF screen-name = 'P_FNAME2' .

screen-input = 0.

CLEAR p_fname2.

ENDIF.

MODIFY SCREEN.

ELSEIF data_frn = 'X'.

IF screen-name = 'P_FNAME2' .

p_fname2 = 'D:\Documents and Settings\czfnct\Desktop\boma.xls' .

screen-input = 1.

ENDIF.

IF screen-name = 'P_FNAME1'.

screen-input = 0.

CLEAR p_fname1.

ENDIF.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

reward if useful...