set serveroutput on
declare
cursor cemp(dno number) is select ename from emp where empno=dno;
pename emp.ename%type;
begin
open cemp(10);
LOOP
fetch cemp into pename;
exit when cemp%notfound;
dbms_output.put_line(pename);
end loop;
close cemp;
end;
/
为啥我没有结果
declare
cursor cemp(dno number) is select ename from emp where empno=dno;
pename emp.ename%type;
begin
open cemp(10);
LOOP
fetch cemp into pename;
exit when cemp%notfound;
dbms_output.put_line(pename);
end loop;
close cemp;
end;
/
为啥我没有结果
2017-06-01
代码段三:
close emp_cursor;
dbms_output.put_line('涨工资人数 工资总额');
dbms_output.put_line(rpad(countsum,8,' ')||' '||rpad(totalsal,8,' '));
end;
close emp_cursor;
dbms_output.put_line('涨工资人数 工资总额');
dbms_output.put_line(rpad(countsum,8,' ')||' '||rpad(totalsal,8,' '));
end;
2017-05-28
代码段二:
loop
exit when totalsal>50000;
fetch emp_cursor into cempno,csal ;
exit when emp_cursor%notfound;
if totalsal+csal*0.1<=50000 then --这一句很关键,如果没有这个判断的话,总工资可能会超过5万。
update emp set sal=sal*1.1 where empno=cempno;
countsum:=countsum+1;
totalsal:=totalsal+csal*0.1;
end if;
end loop;
commit;
loop
exit when totalsal>50000;
fetch emp_cursor into cempno,csal ;
exit when emp_cursor%notfound;
if totalsal+csal*0.1<=50000 then --这一句很关键,如果没有这个判断的话,总工资可能会超过5万。
update emp set sal=sal*1.1 where empno=cempno;
countsum:=countsum+1;
totalsal:=totalsal+csal*0.1;
end if;
end loop;
commit;
2017-05-28
由于一次不能发表超过300个字,所以只能分散发布了:
代码段一:
set serveroutput on;
declare
cursor emp_cursor is
select empno,sal from emp order by sal asc;
countsum number :=0;
totalsal emp.sal%type;
cempno emp.empno%type;
csal emp.sal%type;
begin
select sum(sal) into totalsal from emp;
open emp_cursor;
代码段一:
set serveroutput on;
declare
cursor emp_cursor is
select empno,sal from emp order by sal asc;
countsum number :=0;
totalsal emp.sal%type;
cempno emp.empno%type;
csal emp.sal%type;
begin
select sum(sal) into totalsal from emp;
open emp_cursor;
2017-05-28
按照老师的思路,我编写了如下代码:修正了总工资超过五万的小bug,运行之后没有问题,各位可以借鉴一下,如果有更好的方法欢迎交流,谢谢:
2017-05-28
我用sqldeveloper建立sys、system等可以连接,但是scott账户不行,提示scott账户锁定。可是我在PL/SQL上可以连接,scott的确也解锁了、
2017-05-25
loop
exit when countsal > 50000;
fetch cemp into pempno,psal;
exit when cemp%notfound;
exit when (countsal+psal*0.1) > 50000;
exit when countsal > 50000;
fetch cemp into pempno,psal;
exit when cemp%notfound;
exit when (countsal+psal*0.1) > 50000;
2017-05-08