RDBMS PLSQL Program 30 Program to handle multiple exceptions

  set serveroutput on

DECLARE 

   veno emp.eno%type; 

   vename emp.ename%type; 

   vesalary emp.esalary%type; 

BEGIN 

   veno := '&veno';

   SELECT  ename, esalary INTO  vename, vesalary 

   FROM emp

   WHERE eno = veno;  

   DBMS_OUTPUT.PUT_LINE ('Name: '||  vename); 

   DBMS_OUTPUT.PUT_LINE ('Salary: ' || vesalary); 

EXCEPTION 

   WHEN NO_DATA_FOUND THEN 

      dbms_output.put_line('No such employee!'); 

WHEN NOT_LOGGED_ON THEN 

      dbms_output.put_line('user not logged in '); 

  WHEN TOO_MANY_ROWS THEN 

      dbms_output.put_line('multiple records found'); 

WHEN VALUE_ERROR THEN 

      dbms_output.put_line('value type of size not appropriate'); 

   WHEN others THEN 

      dbms_output.put_line('Error!'); 

END; 

/