Oracle学习笔记摘录6

  declare
  begin
   --SQL语句
   --直接写的SQL语句(DML/TCL)
   --间接写execute immediate <DDL/DCL命令字符串>
   --select 语句
        <1>必须带有into子句
         select empno into eno from emp
           where empno =7369;
        <2>只能查到一行**********
        <3>字段个数必须和变量的个数一致
  exception
    --异常
    when <异常名字> then --特定异常
        <处理语句>
    when others then  --所有异常都可捕获
        <处理语句>   
  end;
<例子>
   编写程序 向DEPT表中插入一条记录，
   从键盘输入数据，如果
      数据类型输入错误要有提示
      无法插入记录 也要有提示
      只能输入正数,如果有负数提示
   declare
    n number;
    no dept.deptno%type;
    nm dept.dname%type;
    lc dept.loc%type;
    exp exception;   --异常的变量
    exp1 exception;
    num number:=0;  --计数器
    pragma exception_init(exp,-1); --预定义语句
         --(-1错误和异常变量关联)
    pragma exception_init(exp1,-1476);
    e1 exception; --自定义异常变量
   begin
    --输入值
     no := '&编号';
     num := num + 1;
     if no < 0 then
        raise e1;    --自定义异常的引发
&