存储过程

存储过程，弄了一个多小时，哎终于解决，原来变量写错，郁闷，不够细心啊

create or replace procedure sp_student(stuname in varchar2) is
v_sal student.sal%type;
begin
select sal into v_sal from student where name = stuname;
if v_sal>1000 then
update student set sal = sal-100 where name = stuname;
else 
update student set sal = sal+100 where name = stuname;
end if;
end;