在奖金变动程序中第一步从数据库中提取当前奖金值,并输出当前奖金值(dbms), 开始程序奖金增加10%,结果输出当前奖金;结果一样?原因在于未从数据库中提取当前奖金值;
declare
v_emp emp%rowtype;
begin
v_emp.empno:=&no;
select * into v_emp from emp where empno=v_emp.empno;
dbms_output.put_line('更新前的奖金:'||nvl(v_emp.comm,0));
if v_emp.comm is null then
update emp set comm =v_emp.sal*0.1 where empno=v_emp.empno;
else
if v_emp.comm<1000 then
update emp set comm=1000 where empno=emp.empno;
else
update emp set comm=comm+comm*0.1 where empno=emp.empno;
end if;
end if;
select * into v_emp from emp where empno=v_emp.empno;
dbms_output.put_line('更新后的奖金:'||nvl(v_emp.comm,0));
end;