oracleorc存储过程&函数&触发器

*addteacher*
create or replace procedure addTeacher(tname varchar2,tid varchar2,gendar char,birthdate date,sal number)
is
myexception exception;
begin
  if length(tid)<>18 then raise myexception;end if;
  insert into teacher (tno,tname,tid,gendar,birthdate,sal) values(sq_teacher.nextval,tname,tid,gendar,birthdate,sal);
  commit;
exception
  when myexception then
    dbms_output.put_line('身份证号码不正确!');
    rollback;
   when others then
     dbms_output.put_line('其他异常!');
     rollback;
end addTeacher;

*delteacher*
create or replace procedure delTeacher(tnos number,num out number) is
begin
  delete from teacher where tno=tnos;
  if sql%found then
    num:=sql%rowcount;
    end if;
end delTeacher;

*searchteacher*
create or replace procedure searchTeacher(stanum   number,
                                          endnum   number,
                                          mycursor out sys_refcursor) is
begin
  open mycursor for 'select * from(select rownum r,t.* from(select * from teacher order by sal desc) t)where r>=:x and r<=:y'
    using stanum, endnum;
end searchTeacher;