hi
my requirement is that if the user enters some particular combination of value in the select options and clicks a particular radio button there should be an error message displayed.
1) I am getting the error message in the form a dialog box , but it has only option of exit , and the user is thrown of the screen. my requirement is that after the error message the user must still be at the same screen so that he can enter new values.
2) the code that i have written also has one more anamoly that the displaying of error depends upon the sequence of actions .
if i enter the value in the select option first and then click the radio button then the error message is displayed which is correct.
but it doesnt work i click the radio button first and then enter the value, the program is executed and NO ERROR message is flashed.
here is what i have written
**********************************************************************************************
SELECTION-SCREEN BEGIN OF BLOCK blk WITH FRAME.
SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: p_year for s021-spmon obligatory ,
p_kunag FOR vbrk-kunag ,
p_matnr FOR vbrp-matnr ,
p_augru FOR vbrp-augru_auft modif id a1 ,
p_vbeln FOR vbrk-vbeln .
SELECTION-SCREEN END OF BLOCK blk1.
SELECTION-SCREEN BEGIN OF BLOCK blk2 WITH FRAME TITLE text-002.
PARAMETERS: nrw RADIOBUTTON GROUP g1 user-command check,
mwd RADIOBUTTON GROUP g1 ,
rws RADIOBUTTON GROUP g1 ,
edu RADIOBUTTON GROUP g1 ,
standard RADIOBUTTON GROUP g1 default 'X' .
SELECTION-SCREEN END OF BLOCK blk2.
SELECTION-SCREEN END OF BLOCK blk.
at selection-screen output.
loop at screen.
if nrw = 'X' and p_augru-low EQ 'MWD'.
MESSAGE e000(oo) WITH '<Please Enter the correct Order Reason>'.
endif.
endloop.
START-OF-SELECTION.
CASE 'X'.
WHEN nrw.
PERFORM set_dates_nrw.
PERFORM load_data_nrw.
PERFORM get_cust_info_nrw.
PERFORM set_alv_field_cat_nrw.
PERFORM display_alv_nrw.
endcase.
Bluesky
