09-01-2006 9:12 AM
09-01-2006 9:13 AM
09-01-2006 9:14 AM
09-01-2006 9:15 AM
u can use the event AT SELECTION-SCREEN OUTPUT event
AT SELECTION-SCREEN OUTPUT.
IF p_bukrs is initial.
*display error message her
endif.
09-01-2006 9:58 AM
hi,
You can do validations in the event AT SELECTION-SCREEN.
At selection-screen on p_werks.
if p_werks is initial.
message e000 with 'Enter a value for werks'.
endif.
At selection-screen.
if p_matnr is initial.
message e000 with 'Enter a value for matnr'.
endif.
Regards,
Sailaja.
09-01-2006 10:07 AM
at <b>AT SELECTION-SCREEN.</b> event
AT SELECTION-SCREEN.
IF p_strt = 'X'.
IF ( p_box1 IS INITIAL OR p_box2 IS INITIAL OR p_box3 IS INITIAL OR
p_box4 IS INITIAL OR p_box5 IS INITIAL ) AND sy-ucomm = 'ONLI'.
MESSAGE e069 WITH 'Please make an entry in all the fields'.
ENDIF.
IF p_box1 > p_box2 AND p_box1 > p_box3 AND p_box1 > p_box4
AND p_box1 > p_box5.
MESSAGE e069 WITH 'Please enter the values in ascending order'.
ELSEIF p_box2 > p_box3 AND p_box2 > p_box4
AND p_box2 > p_box5.
MESSAGE e069 WITH 'Please enter the values in ascending order'.
ELSEIF p_box3 > p_box4 AND p_box3 > p_box5.
MESSAGE e069 WITH 'Please enter the values in ascending order'.
ELSEIF p_box4 > p_box5.
MESSAGE e069 WITH 'Please enter the values in ascending order'.
ENDIF.
ENDIF.
IF p_deta = 'X' OR p_summ = 'X'.
SELECT SINGLE *
FROM oiuh_cm_ba
* INTO CORRESPONDING FIELDS OF TABLE it_owner_temp
WHERE ba_ba_no IN s_own.
IF sy-subrc <> 0.
MESSAGE e069 WITH 'Please enter the correct associate number'.
ENDIF.
CLEAR it_owner_temp.
REFRESH it_owner_temp.
ENDIF.