接触 PL/SQL 第一天

接触 PL/SQL 第一天


PL/SQL是什么呢?
书上说PL/SQL是建立在标准SQL语言之上的过程性拓展
那么PL/SQL有什么好处呢?
1.提高应用程序的运行性能
2.提供模块化的程序设计功能
3.允许定义标识符
4.具有过程语言控制结构
5.具有良好的兼容性
6.处理运行错误

PL/SQL的基本单元是块(Block),PL/SQL块又由三部分组成

declare  -- 定义部分-- 这里定义一些变量、常量、游标、复杂数据类型等begin     --执行部分-- 这里执行PL/SQL语句和SQL语句exception  -- 异常部分-- 在这里处理异常end;  -- 这是块结束标记

其中 begin、end两部分是必须有的，declare、exception两部分可以不写

下面写两个简单的PL/SQL
只包含 begin、end两部分的PL/SQL：

set serveroutput on -- 开启控制台输出功能begin    -- 执行模块   dbms_output.put_line('hello,everybody');  -- 输出 hello,everybodyend;  -- 结果标记

包含四个部分的PL/SQL:

declare  -- 定义部分   v_ename varchar2(10);begin   -- 执行部分   select ename into v_ename from emp where empno=&no; //输入员工号，查询该员工姓名   dbms_output.put_line('员工名字:'||v_ename);exception   -- 异常部分

   when NO_DATA_FOUND then   dbms_output.put_line('员工号不存在');end;  -- 结束标记

PL/SQL又可以分为四大类:
1.匿名块
如上面例子，没有名字的块
2.命名块
在匿名块之前加 <<name>> 就是命名块了，块与块之间是可以多层嵌套的，有了名字就好区分了
3.子程序
子程序又可以分为 过程、函数、包 三个对象
创建过程:

create or replace procedure insert_dept(no number,name varchar2)isbegin   insert into dept (deptno,dname) values(no,name);end;call insert_dept('5','财务部'); -- 调用过程

创建函数:

create or replace function select_sal_year(no number)return number is   sal_year(8,2);begin   select sal*12 into sal_year from emp where empno=no;   return sal_year;exception

   when NO_DATA_FOUND then   dbms_output.put_line('员工号不存在');end;var sal number; -- 声明变量salexecute :sal:=select_sal_year(3); -- 用变量接收返回值print sal; -- 查看员工年薪

包:

create package emp_pkgisprocedure insert_dept(no number,name varchar2);function select_sal_year(no number) return number;end emp_pkg;

实现包体:

create or replace package body emp_pkg is  procedure update_sal(na varchar2,newsal number)  is  begin    update emps set sal=newsal where ename=na;  end;  function sal_year(name varchar)  return number is    sal_year number(9,2);  begin    select sal*12+nvl(comm,0) into sal_year from emps    where ename=name;    return sal_year;  end;end emp_pkg;

4.触发器:
不知为何我的触发器并不能创建成功
代码贴出来

create or replace trigger update_emp  after update of deptno on depts  for each rowbegin  update emps set deptno=:new.deptno  where deptno=:old.deptno;end;

错误报告:

ORA-04089: cannot create triggers on objects owned by SYS04089. 00000 -  "cannot create triggers on objects owned by SYS"*Cause:    An attempt was made to create a trigger on an object owned by SYS.*Action:   Do not create triggers on objects owned by SYS.

总结: 总体上感觉PL/SQL跟Java中的方法有点像，包又与接口有点类似