create or replace procedure RaiseSalry(eno in number)
as
psal emp.sal%type;
begin
select sal into psal from emp where EMPNO=eno;
update emp set sal = sal +100 where EMPNO=eno;
DBMS_OUTPUT.PUT_LINE(‘涨工资前的薪水‘||psal||‘涨工资后的薪水‘||(psal+100));
end;
原文：http://www.cnblogs.com/XJJD/p/7056292.html