wap for NO_DATA_FOUND Exception

DECLARE
 vno NUMBER(5) := :vno;
 vname emp.ename%TYPE;
BEGIN
 SELECT ename INTO vname FROM emp 
WHERE empno = vno;
 DBMS_OUTPUT.PUT_LINE(vno || ' ' || vname);
EXCEPTION
 WHEN NO_DATA_FOUND THEN
 DBMS_OUTPUT.PUT_LINE('NO data in table');
 WHEN OTHERS THEN
 DBMS_OUTPUT.PUT_LINE('There is an error in the program');
END;