Standard emp to dept select

emp->dept.sql

DECLARE
  l_row   dept%ROWTYPE;
BEGIN
  BEGIN
    SELECT d.*
    INTO   l_row
    FROM   dept d
    WHERE  dname = 'Accounts';
  EXCEPTION
    WHEN no_data_found THEN
      pk_error.raise_error('department not found');
   END;

   /* Do something with the value you have retrieved in l_row */
END;