数据库技术培训课程讲义.ppt

PL/SQL开发--程序流程控制 while循环结构 实例 set serveroutput on; declare i number(5):=1; total number(5):=0; begin while i=100 loop total:=total+i; i:=i+1; end loop; dbms_output.put_line(1-100之间的和：||total); end; PL/SQL开发--程序流程控制 练习 1、打印乘法口诀表 2、打印水仙花数 3、编写程序，向表中输入10000条记录 PL/SQL开发--存储过程 创建存储过程 create [or replace] procedure 存储过程名(形式参数) is|as 本地变量声明 begin 执行语句 exception 异常处理代码 end; PL/SQL开发--存储过程 创建存储过程--实例 create or replace procedure change_salary(v_empno in number,v_new_sal in number) is v_name emp.ename%type; begin select ename into v_name from emp where empno=v_empno; update emp set sal=v_new_sal where empno=v_empno; dbms_output.put_line(v_name||工资修改完毕); commit; end; PL/SQL开发--存储过程 执行存储过程 execute 存储过程名 set serveroutput on; exec change_salary(7369,8888); 删除存储过程 drop procedure change_salary; PL/SQL开发--存储过程 存储过程练习 编写一个给特殊雇员加薪10%的存储过程，同时检查如果已经雇佣该雇员超过60个月，则给他额外加薪3000。 PL/SQL开发--存储过程 crete or replace procedure raise_sal(no in number) as vhiredate date; vsal emp.sal%type; begin select hiredte,sal into vhiredate,vsal from emp where empno=no; if months_between(sysdate,vhiredate)60 then vsal:=nvl(sal,0)*1.1+3000; else vsal:=nvl(sal,0)*1.1; end if; update emp set sal=vsal where empno=no; end; PL/SQL开发--触发器 触发器是与存储过程类似的另外一种保存在数据库服务器端的PL/SQL程序单元，但运行机制存在明显差别，触发器不能由用户或应用程序显示调用，而是与特定的数据表、视图操作或数据库事件联系到一起，当进行特定操作或发生特定事件时系统将自动触发并执行相关的触发器程序代码。 PL/SQL开发--触发器 实例1 create or replace trigger secure_dept before insert on dept begin if(to_char(sysdate,DAY) in(星期六,星期日)) or (to_char(system,hh24:mi) not between 08:00 and 18:00) then raise_application_error(-20001,你只能在工作时间对dept表执行插入操作); end if; end; PL/SQL开发--触发器 实例2 create or replace trigger secure_dept before insert or update or delete on dept declare user_name varchar2(20); begin if (to_char(sysdate,DY) in (星期六,星期日)) or (to_char(sysdate,HH24)) not between 08 and 18) then if deleting then raise_application_error(-20002,只允许在工作时间内执行数据删除