1、定义基本变量：
2、引用型的变量： set serveroutput on declare pename emp.ename%type; psal emp.sal%type; begin select ename,sal into pename,psal from emp where empno='7521'; dbms_output.put_line(pename||'的薪水是'||psal); end; / 3、记录型变量： set serveroutput on declare emp_rec emp%rowtype; begin select * into emp_rec from emp where empno='7698'; dbms_output.put_line(emp_rec.ename||'的薪水是'||emp_rec.sal); end; / 4、if语句的使用 /* 判断用户从键盘的输入 */ set serveroutput on --接受一个键盘输入 --num:地址值，含义是在该地址上保存了输入的值 accept num prompt'请输入一个数字'; declare --定义变量从键盘的输入 pnum number:=# begin if pnum=0 then dbms_output.put_line('您输入的是0'); elsif pnum=1 then dbms_output.put_line('您输入的是1'); elsif pnum=2 then dbms_output.put_line('你输入的是2'); else dbms_output.put_line('其他'); end if; end; / 5、while循环： set serveroutput on declare pnum number := 1; begin while pnum <= 10 loop dbms_output.put_line(pnum); pnum := pnum + 1; end loop; end; / 6、loop循环 set serveroutput on declare pnum number:=1; begin loop exit when pnum>10; dbms_output.put_line(pnum); pnum:=pnum+1; end loop; end; / 7、for循环 set serveroutput on declare pnum number:=1; begin for pnum in 1..10 loop dbms_output.put_line(pnum); end loop; end; / （推荐使用loop循环） 8、光标的使用 --查询并打印员工的姓名和薪水 set serveroutput on /* 光标的属性 %found:光标找到记录 %notfound：光标找不到记录 */ declare --定义一个光标 cursor cemp is select ename,sal from emp; --为光标定义对应的变量 pename emp.ename%type; psal emp.sal%type; begin --打开光标 open cemp; loop --取一条记录 fetch cemp into pename,psal; exit when cemp %notfound; dbms_output.put_line(pename||'的薪水是'||psal); end loop; --关闭光标 close cemp; end; / 9、实例---给员工涨工资： set serveroutput on declare cursor cemp is select empno,perjob from emp; pempno emp.empno%type; pjob emp.perjob%type; begin open cemp; loop fetch cemp into pempno,pjob; exit when cemp %notfound; if pjob='PRESIDENT' then update emp set sal=sal+1500 where empno=pempno; elsif pjob='ANALYST' then update emp set sal = sal+1000 where empno=pempno; elsif pjob='SALESMAN' then update emp set sal = sal+500 where empno=pempno; else update emp set sal = sal+300 where empno=pempno; end if; end loop; close cemp; commit;（如果update了数据，需在后面加上commit） end; / 10、光标的其他属性及其使用实例 ①%isopen: if cemp%isopen then dbms_output.put_line('光标一打开'); ②%rowcount: （总共影响的行数） dbms_output.put_line('行数：'||cemp %rowcount); 11、光标数的限制： 默认情况下oracle数据库只允许在同一个会话中打开300个光标 查看光标属性：切换到sys管理员用户下，conn sys/root as sysdba 就可以切换到sys用户 修改默认的光标数： alter system set open_cursors=400 scope=both; (scope的取值有三个参数： memory：只更改当前实例，不更改系统参数文件 spfile :只更改参数文件，不更改当前实例，需重启数据库才能生效 both ：是以上两者 如果设置错了，可以使用rollback命令回滚 11、带参数的光标 set serveroutput on declare cursor cemp(dno number) is select ename from emp where deptno=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; / 12、系统例外： no_data_found （没有找到数据） too_many_rows （select ... into 语句匹配多个行） zero_divide (被零除） value_error （算术或转换错误） timeout_on_resource (在等待资源时发生超时） 13、自定义例外： set serveroutput on declare pename emp.ename%type; no_emp_found exception; cursor cemp is select ename from emp where empno=12; begin open cemp; fetch cemp into pename; if cemp%notfound then raise no_emp_found; end if; close cemp; exception when no_emp_found then dbms_output.put_line('找不到员工'); when others then dbms_output.put_line('其他'); end; / 14、统计每年入职的员工数 set serveroutput on declare cursor cemp is select to_char(hiredate,'yyyy') from emp; pdate varchar2(4); count80 number := 0; count81 number := 0; count82 number := 0; count87 number := 0; begin open cemp; loop fetch cemp into pdate; exit when cemp%notfound; if pdate='1980' then count80:=count80+1; elsif pdate='1981' then count81:=count81+1; elsif pdate='1982' then count82:=count82+1; else count87:=count87+1; end if; end loop; dbms_output.put_line('总共：'||(count80+count81+count82+count87)); dbms_output.put_line('1980:'||count80); dbms_output.put_line('1981:'||count81); dbms_output.put_line('1982:'||count82); dbms_output.put_line('1987:'||count87); close cemp; end; / 15、案例二：为员工涨工资 /* 做之前先分析 SQL语句 select empno,sal from emp order by sal asc; -->光标-->循环-->退出条件：1.工资总额>5w 2.%notfound 变量：1.初始值 2.如何得到 涨工资的人数： countEmp number :=0; 涨后的工资总额： salTotal number; select sum(sal) into salTal from emp; 张后的工资总额=涨前的工资总额 + sal * 0.1 */ set serveroutput on declare cursor cemp is select empno,sal from emp order by sal; pempno emp.empno%type; psal emp.sal%type; countEmp number:=0; salTotal number; stop_sal exception; begin select sum(sal) into salTotal from emp; open cemp; loop if salTotal < 50000 then （加入限制只有工资总额在5000以内才执行下面的代码） exit when salTotal>50000; fetch cemp into pempno,psal; exit when cemp%notfound; countEmp := countEmp+1; update emp set sal=sal*1.1 where empno=pempno; salTotal := salTotal + psal*0.1; else raise stop_sal; end if; end loop; close cemp; commit; dbms_output.put_line('涨工资人数：'||countEmp||'工资总额：'||salTotal); exception when stop_sal then dbms_output.put_line('涨工资结束'); when others then dbms_output.put_line('其他'); end; / 16、综合案例四 1、由于最后的结果也是一张表，所以先创建一张表 create table msg1( coursename varchar2(20), dname varchar2(20), count1 number, count2 number, count3 number, avggrade number ); SQL语句 1、得到有哪些系 select dno,dname from dep; -->光标 -->循环-->退出条件：notfound 2、得到系中选修了“大学物理“的学生的成绩 select grade fromm sc where cno=(select cno from course where cname=??) and sno in (select sno from student where dno =??); -->带参数的光标 -->循环 -->退出条件 -->notfound 变量：1、初始值 2、如何得到 每个分数段的人数 count1 number,count2 number,count3 number 每个系选修了大学物理的学生的平均成绩 avggrade number 1、算术运算 2、sql语句查询 set serveroutput on declare --系的光标 cursor cdept is select dno,dname from dep; pdno dep.dno%type; pdname dep.dname%type; --成绩光标 cursor cgrade(coursename varchar2,depno number) is select grade from sc where cno=(select cno from course where cname=coursename) and sno in (select sno from student where dno=depno); pgrade sc.grade%type; --每个分数段的人数 count1 number;count2 number;count3 number; --每个系选修了大学物理的学生的平均成绩 avggrade number; --课程名称 pcourseName varchar2(20) := '大学物理'; begin --打开系的光标 open cdept; loop --取一个系的信息 fetch cdept into pdno,pdname; exit when cdept %notfound; --初始化工作 count1:=0;count2:=0;count3:=0; --系的平均成绩 select avg(grade) into avggrade from sc where cno=(select cno from course where cname=pcourseName) and sno in (select sno from student where dno=pdno); --取系中选修了大学物理的学生成绩 open cgrade(pcourseName,pdno); loop --取一个学生的成绩 fetch cgrade into pgrade; exit when cgrade%notfound; --判断成绩的范围 if pgrade<60 then count1:=count1+1; elsif pgrade>=60 and pgrade<85 then count2:=count2+1; else count3:=count3+1; end if; end loop; close cgrade; --保存当前的结构 insert into msg1 values(pcourseName,pdname,count1,count2,count3,avggrade); end loop; close cdept; dbms_output.put_line('数据查询成功！'); end; /转载于:https://www.cnblogs.com/myworld2018/p/8384706.html
相关资源：JAVA上百实例源码以及开源项目