oracle 编写存储过程

create or replace procedure myproc(en  in emp.ename%type,dno out number)
as
i number;
begin
  select count(*) into i from emp where ename=en;
  if i=1 then
     dno:=i;
     dbms_output.put_line('存在');
  else
     dno:=0;
     dbms_output.put_line('不存在');
  end if;
end;
/
DECLARE
deptno varchar2(20) ;
dno number;
 BEGIN
deptno :='tuping';
myproc(deptno,dno) ;
DBMS_OUTPUT.put_line(deptno) ;
END ;