Error message and it shd give a popup

[Zumba]

Hello experts,

I have to check for venum if the venum is present then it shd come out of the program:

FORM validate_venum .

DATA : lv_venum TYPE vekp-venum.

SELECT handling_unit
UP TO 1 ROWS
INTO lv_venum
FROM zws_data
WHERE handling_unit EQ nast-objky.
ENDSELECT.
IF sy-subrc NE 0.
* MESSAGE e006 WITH lv_venum.
* WRITE:/ sy-msgty, sy-msgno NO-GAP, ':', l_msg.
Write :/ lv_venum, ' already present '.
ENDIF.

ENDFORM.

Please help me.

Thanks,
Zumba

[Portal]

Hi Zumba,

FORM validate_venum .
 
DATA : lv_venum TYPE vekp-venum.
 
SELECT handling_unit
UP TO 1 ROWS
INTO lv_venum
FROM zws_data
WHERE handling_unit EQ nast-objky.
ENDSELECT.
IF sy-subrc NE 0.
MESSAGE e006 WITH lv_venum display like 'I'. "<<< Check this
ENDIF.
 
ENDFORM.

Regards,
Portal

[Zumba]

Thanks Portal, but I am still getting an error.

A message ID has not been entered. You can specify this entry for the
whole program using the "MESSAGE-ID msgid" addition with the statment
that . or in number. - or in parentheses after the error number. -

How can I solve this?

Thanks again,
Zumba