• ORCLA基础总结(三) PL/SQL


    基本语法

    1.语法格式

    [语法格式]
    --declare
      -- 声明的变量、类型、游标
    begin
      -- 程序的执行部分(类似于java里的main()方法)
      dbms_output.put_line('helloworld');
    -- exception
      -- 针对begin块中出现的异常,提供处理的机制
      -- when .... then ...
      -- when  .... then ...
    end;

    01. 准备工作:
    set serveroutput on 

    
    

    02.hellowrold 程序

    begin
    dbms_output.put_line('hello world');
    end;

    2. 变量

    ①. 单个变量:

    declare
      --声明一个变量
      v_name varchar2(25);
    begin
      --通过 select ... into ... 语句为变量赋值
     select last_name into v_name
     from employees
     where employee_id = 186;
     
     -- 打印变量的值
     dbms_output.put_line(v_name);
    end;

    ②. 多个变量:

    使用多个变量
    
    declare
      --声明变量
      v_name varchar2(25);
      v_email varchar2(25);
      v_salary number(8, 2);
      v_job_id varchar2(10);
    begin
      --通过 select ... into ... 语句为变量赋值
      --被赋值的变量与SELECT中的列名要一一对应
     select last_name, email, salary, job_id into v_name, v_email, v_salary, v_job_id
     from employees
     where employee_id = 186;
     
     -- 打印变量的值
     dbms_output.put_line(v_name || ', ' || v_email || ', ' ||  v_salary || ', ' ||  v_job_id);
    end;

     

     

    记录类型

    1.自定义记录类型

    -- 固定值

    declare
    --定义一个记录类型 type customer_type is record( v_cust_name varchar2(20), v_cust_id number(10)); --声明自定义记录类型的变量 v_customer_type customer_type; begin v_customer_type.v_cust_name := '刘德华'; v_customer_type.v_cust_id := 1001; dbms_output.put_line(v_customer_type.v_cust_name||','||v_customer_type.v_cust_id); end;


    -- 通过 select ... into ... 语句为变量赋值
    declare
      --定义一个记录类型
      type emp_record is record(
        v_name varchar2(25),
        v_email varchar2(25),
        v_salary number(8, 2),
        v_job_id varchar2(10));
        
      --声明自定义记录类型的变量
      v_emp_record emp_record;
    begin
      --通过 select ... into ... 语句为变量赋值
     select last_name, email, salary, job_id into v_emp_record
     from employees
     where employee_id = 186;
     
     -- 打印变量的值
     dbms_output.put_line(v_emp_record.v_name || ', ' || v_emp_record.v_email || ', ' ||  v_emp_record.v_salary || ', ' ||  v_emp_record.v_job_id);
    end;

      2.使用 %type 定义变量,动态的获取数据的声明类型

    declare
      --定义一个记录类型
      type emp_record is record(
        v_name employees.last_name%type,
        v_email employees.email%type,
        v_salary employees.salary%type,
        v_job_id employees.job_id%type);
        
      --声明自定义记录类型的变量
      v_emp_record emp_record;
    begin
      --通过 select ... into ... 语句为变量赋值
     select last_name, email, salary, job_id into v_emp_record
     from employees
     where employee_id = 186;
     
     -- 打印变量的值
     dbms_output.put_line(v_emp_record.v_name || ', ' || v_emp_record.v_email || ', ' ||  
                                            v_emp_record.v_salary || ', ' ||  v_emp_record.v_job_id);
    end;

    3. 使用 %rowtype

    declare
    --声明一个记录类型的变量
      v_emp_record employees%rowtype;
    begin
      --通过 select ... into ... 语句为变量赋值
     select * into v_emp_record
     from employees
     where employee_id = 186;
     
     -- 打印变量的值
     dbms_output.put_line(            v_emp_record.last_name || ', ' || v_emp_record.email || ', ' ||  
                                            v_emp_record.salary || ', ' ||  
                           v_emp_record.job_id || ', ' || v_emp_record.hire_date); end;

    4.赋值语句:通过变量实现查询语句

    declare
      v_emp_record employees%rowtype;
      v_employee_id employees.employee_id%type;
    begin
      --使用赋值符号位变量进行赋值
      v_employee_id := 186;
    
      --通过 select ... into ... 语句为变量赋值
     select * into v_emp_record
     from employees
     where employee_id = v_employee_id;
     
     -- 打印变量的值
     dbms_output.put_line(v_emp_record.last_name || ', ' || v_emp_record.email || ', ' ||  
                                            v_emp_record.salary || ', ' ||  v_emp_record.job_id  || ', ' ||  
                                            v_emp_record.hire_date);
    end;

    5. 通过变量实现DELETE、INSERT、UPDATE等操作

    declare
      v_emp_id employees.employee_id%type;
    
    begin
      v_emp_id := 109;
      delete from employees
      where employee_id = v_emp_id;
      --commit;
    end;

    流程控制

    1. 条件判断(两种)

      ①.使用 IF ... THEN ... ELSIF ... THEN ...ELSE ... END IF 

    要求: 查询出 150号 员工的工资, 若其工资大于或等于 10000 则打印 'salary >= 10000'; 
    若在
    500010000 之间, 则打印 '5000<= salary < 10000'; 否则打印 'salary < 5000' (方法一) declare v_salary employees.salary%type; begin --通过 select ... into ... 语句为变量赋值 select salary into v_salary from employees where employee_id = 150; dbms_output.put_line('salary: ' || v_salary); -- 打印变量的值 if v_salary >= 10000 then dbms_output.put_line('salary >= 10000'); elsif v_salary >= 5000 then dbms_output.put_line('5000 <= salary < 10000'); else dbms_output.put_line('salary < 5000'); end if;
    (方法二)
    declare v_emp_name employees.last_name%type; v_emp_sal employees.salary%type; v_emp_sal_level varchar2(20); begin select last_name,salary into v_emp_name,v_emp_sal from employees where employee_id = 150; if(v_emp_sal >= 10000) then v_emp_sal_level := 'salary >= 10000'; elsif(v_emp_sal >= 5000) then v_emp_sal_level := '5000<= salary < 10000'; else v_emp_sal_level := 'salary < 5000'; end if; dbms_output.put_line(v_emp_name||','||v_emp_sal||','||v_emp_sal); end;

          ②.使用 CASE ... WHEN ... THEN ...ELSE ... END 

    declare
           v_sal employees.salary%type;
           v_msg varchar2(50);
    begin     
           select salary into v_sal
           from employees
           where employee_id = 150;
           
           --case 不能向下面这样用
           /*
           case v_sal when salary >= 10000 then v_msg := '>=10000' 
                      when salary >= 5000 then v_msg := '5000<= salary < 10000'
                      else v_msg := 'salary < 5000'
           end;
           */
     
           v_msg := 
                 case trunc(v_sal / 5000)
                      when 0 then 'salary < 5000'
                      when 1 then '5000<= salary < 10000'
                      else 'salary >= 10000'
                 end;
           
           dbms_output.put_line(v_sal ||','||v_msg);
    end;
    要求: 查询出 122 号员工的 JOB_ID, 若其值为 'IT_PROG', 则打印 'GRADE: A'; 
                            'AC_MGT', 打印 'GRADE B', 
                            'AC_ACCOUNT', 打印 'GRADE C'; 
                            否则打印 'GRADE D'
    
    declare
           --声明变量
           v_grade char(1);
           v_job_id employees.job_id%type;
    begin
           select job_id into v_job_id
           from employees
           where employee_id = 122;
           
           dbms_output.put_line('job_id: ' || v_job_id);
           
           --根据 v_job_id 的取值, 利用 case 字句为 v_grade 赋值
           v_grade :=  
                   case v_job_id when 'IT_PROG' then 'A'
                                 when 'AC_MGT' then 'B'
                                 when 'AC_ACCOUNT' then 'C'
                                 else 'D'
                    end;
                    
           dbms_output.put_line('GRADE: ' || v_grade);
    end;   

    2.循环结构(三种)

    使用循环语句打印 1 - 100.(三种方式)

     ①. LOOP ... EXIT WHEN ... END LOOP

     

    declare
           --初始化条件
           v_i number(3) := 1;
    begin
           loop
           --循环体
            dbms_output.put_line(v_i);
        --循环条件
            exit when v_i = 100;
        --迭代条件
            v_i := v_i + 1;
           end loop;
    end;

     

    ②. WHILE ... LOOP ... END LOOP

    declare
           --初始化条件
           v_i number(3) := 1;
    begin
           --循环条件
           while v_i <= 100 loop
             --循环体
                 dbms_output.put_line(v_i);
             --迭代条件
                 v_i := v_i + 1;
           end loop;
    end; 

     ③. FOR ... in  LOOP ... END LOOP

    begin
           for i in 1 .. 100 loop
                 dbms_output.put_line(i);
           end loop;
    end;

    练习:

    综合使用 if, while 语句, 打印 1 - 100 之间的所有素数
    (素数: 有且仅用两个正约数的整数, 2, 3, 5, 7, 11, 13, ...).
    declare
      v_flag number(1):=1;
      v_i number(3):=2;
      v_j number(2):=2;
    begin
    
      while (v_i<=100) loop
            while v_j <= sqrt(v_i) loop
                  if (mod(v_i,v_j)=0) then v_flag:= 0;
              end if;
                 
              v_j :=v_j +1;
            end loop;
            
        if(v_flag=1) then dbms_output.put_line(v_i);
        end if;
    
            v_flag :=1;
            v_j := 2;
            v_i :=v_i +1;
       end loop;
    
    end;
    
    
    (法二)使用for循环实现1-100之间的素数的输出
    declare
      --标记值, 若为 1 则是素数, 否则不是
      v_flag number(1) := 0;
    begin
       for i in 2 .. 100 loop
    
           v_flag := 1;     
             
           for j in 2 .. sqrt(i) loop
               if i mod j = 0 then
                  v_flag := 0;    
               end if;        
           end loop;
           
           if v_flag = 1 then
               dbms_output.put_line(i);
           end if;
           
       end loop;
    end;

    3.使用 goto

    declare
      --标记值, 若为 1 则是素数, 否则不是
      v_flag number(1) := 0;
    begin
       for i in 2 .. 100 loop
           v_flag := 1;     
             
           for j in 2 .. sqrt(i) loop
               if i mod j = 0 then
                  v_flag := 0;
                  goto label; 
               end if;        
           end loop;
           
           <<label>>
           if v_flag = 1 then
               dbms_output.put_line(i);
           end if;
           
       end loop;
    end; 
    
    11+.打印1——100的自然数,当打印到50时,跳出循环,输出“打印结束”
    (方法一)
    begin
      for i in 1..100 loop
          dbms_output.put_line(i);
          if(i = 50) then 
          goto label;
          end if;
      end loop;
          
          <<label>>
          dbms_output.put_line('打印结束');
    
    end;
    (方法二)
    begin
      for i in 1..100 loop
          dbms_output.put_line(i);
          if(i mod 50 = 0) then dbms_output.put_line('打印结束');
          exit;
          end if;
      end loop;
    end;

    游标的使用(类似java的 Iterator )

    1.显示游标

    要求: 打印出 80 部门的所有的员工的工资: Xxx 's salary is: xxx
     
    declare
      cursor sal_cursor is select salary ,last_name from employees where department_id = 80;
      v_sal number(10);
      v_name varchar2(20);
    begin
      open sal_cursor;
      
      fetch sal_cursor into v_sal,v_name;
      
      while sal_cursor%found loop
            dbms_output.put_line(v_name||'`s salary is '||v_sal);
            fetch sal_cursor into v_sal,v_name;
      end loop;
      
      close sal_cursor;
      
    end;
    打印出 manager_id 为 100 的员工的 last_name, email, salary 信息(使用游标, 记录类型)
    
    declare  
               --声明游标    
               cursor emp_cursor is select last_name, email, salary from employees where manager_id = 100;
               
               --声明记录类型
               type emp_record is record(
                    name employees.last_name%type,
                    email employees.email%type,
                    salary employees.salary%type
               );
               
               -- 声明记录类型的变量
               v_emp_record emp_record;
    begin
               --打开游标
               open emp_cursor;
               
               --提取游标
               fetch emp_cursor into v_emp_record;
               
               --对游标进行循环操作
               while emp_cursor%found loop
                      dbms_output.put_line(v_emp_record.name || ', ' || v_emp_record.email || ', ' || v_emp_record.salary );                
                      fetch emp_cursor into v_emp_record;
               end loop;
               
               --关闭游标
               close emp_cursor;
    end;
    (法二:使用for循环)
    declare
       
          cursor emp_cursor is 
          select last_name,email,salary
          from employees
          where manager_id = 100;
    
    begin
    
    
          for v_emp_record in emp_cursor loop
              dbms_output.put_line(v_emp_record.last_name||','||v_emp_record.email||','||v_emp_record.salary);
          end loop;
    end;
    利用游标, 调整公司中员工的工资: 
        
        工资范围       调整基数
        0 - 5000       5%
        5000 - 10000   3%
        10000 - 15000  2%
        15000 -        1%
    
    declare
        --定义游标
        cursor emp_sal_cursor is select salary, employee_id from employees;
        
        --定义基数变量
        temp number(4, 2);
        
        --定义存放游标值的变量
        v_sal employees.salary%type;
        v_id employees.employee_id%type;
    begin
        --打开游标
        open emp_sal_cursor;
        
        --提取游标
        fetch emp_sal_cursor into v_sal, v_id;
        
        --处理游标的循环操作
        while emp_sal_cursor%found loop
              --判断员工的工资, 执行 update 操作
              --dbms_output.put_line(v_id || ': ' || v_sal);
                
              if v_sal <= 5000 then
                 temp := 0.05;
              elsif v_sal<= 10000 then
                 temp := 0.03;   
              elsif v_sal <= 15000 then
                 temp := 0.02;
              else
                 temp := 0.01;
              end if;
              
              --dbms_output.put_line(v_id || ': ' || v_sal || ', ' || temp);
              update employees set salary = salary * (1 + temp) where employee_id = v_id; 
                      
              fetch emp_sal_cursor into v_sal, v_id;
        end loop;
        --关闭游标
        close emp_sal_cursor;
    end;

     (利用游标 for 循环完成)
    利用游标, 调整公司中员工的工资:
    工资范围 调整基数
    0 - 5000 5%
    5000 - 10000 3%
    10000 - 15000 2%
    15000 - 1%

    declare
        --定义游标
        cursor emp_sal_cursor is select salary, employee_id id from employees;
        
        --定义基数变量
        temp number(4, 2);
    begin
        --处理游标的循环操作
        for c in emp_sal_cursor loop
              --判断员工的工资, 执行 update 操作
              --dbms_output.put_line(v_id || ': ' || v_sal);
                
              if c.salary <= 5000 then
                 temp := 0.05;
              elsif c.salary <= 10000 then
                 temp := 0.03;   
              elsif c.salary <= 15000 then
                 temp := 0.02;
              else
                 temp := 0.01;
              end if;
              
              --dbms_output.put_line(v_id || ': ' || v_sal || ', ' || temp);
              update employees set salary = salary * (1 + temp) where employee_id = c.id;
        end loop;
    end;
    带参数的游标
    
    declare
        --定义游标
        cursor emp_sal_cursor(dept_id number, sal number) is 
               select salary + 1000 sal, employee_id id 
               from employees 
               where department_id = dept_id and salary > sal;
        
        --定义基数变量
        temp number(4, 2);
    begin
        --处理游标的循环操作
        for c in emp_sal_cursor(sal => 4000, dept_id => 80) loop
              --判断员工的工资, 执行 update 操作
              --dbms_output.put_line(c.id || ': ' || c.sal);
              
              if c.sal <= 5000 then
                 temp := 0.05;
              elsif c.sal <= 10000 then
                 temp := 0.03;   
              elsif c.sal <= 15000 then
                 temp := 0.02;
              else
                 temp := 0.01;
              end if;
              
              dbms_output.put_line(c.sal || ': ' || c.id || ', ' || temp);
              --update employees set salary = salary * (1 + temp) where employee_id = c.id;
        end loop;
    end;

    2.隐式游标

    隐式游标: 更新指定员工 salary(涨工资 10),如果该员工没有找到,则打印”查无此人” 信息
    
    begin
             update employees set salary = salary + 10 where employee_id = 1005;
             
             if sql%notfound then
                dbms_output.put_line('查无此人!');
             end if;
    end;

    异常的处理(三种方式)

    1.预定义异常

    declare
    
      v_sal employees.salary%type;
    begin
      select salary into v_sal
      from employees
      where employee_id >100;
      
      dbms_output.put_line(v_sal);
    
    exception
      when Too_many_rows then dbms_output.put_line('输出的行数太多了');
    end;

    2.非预定义异常

    declare
    
      v_sal employees.salary%type;
      --声明一个异常
      delete_mgr_excep exception;
      --把自定义的异常和oracle的错误关联起来
      PRAGMA EXCEPTION_INIT(delete_mgr_excep,-2292);
    begin
      delete from employees
      where employee_id = 100;
      
      select salary into v_sal
      from employees
      where employee_id >100;
      
      dbms_output.put_line(v_sal);
    
    exception
      when Too_many_rows then dbms_output.put_line('输出的行数太多了');
      when delete_mgr_excep then dbms_output.put_line('Manager不能直接被删除');
    end;

    3.用户自定义异常

    declare
    
      v_sal employees.salary%type;
      --声明一个异常
      delete_mgr_excep exception;
      --把自定义的异常和oracle的错误关联起来
      PRAGMA EXCEPTION_INIT(delete_mgr_excep,-2292);
      
      --声明一个异常
      too_high_sal exception;
    begin
    
      select salary into v_sal
      from employees
      where employee_id =100;
      
      if v_sal > 1000 then
         raise too_high_sal;
      end if;
         
      delete from employees
      where employee_id = 100;
    
      dbms_output.put_line(v_sal);
    
    exception
      when Too_many_rows then dbms_output.put_line('输出的行数太多了');
      when delete_mgr_excep then dbms_output.put_line('Manager不能直接被删除');
      --处理异常
      when too_high_sal then dbms_output.put_line('工资过高了');
    end;
    练习
    异常的基本程序: 
    通过 select ... into ... 查询某人的工资, 若没有查询到, 则输出 "未找到数据"
    
    declare
      --定义一个变量
      v_sal employees.salary%type;
    begin
      --使用 select ... into ... 为 v_sal 赋值
      select salary into v_sal from employees where employee_id = 1000;
      dbms_output.put_line('salary: ' || v_sal);
    exception
      when No_data_found then 
           dbms_output.put_line('未找到数据');
    end;
    
    或
    
    declare
      --定义一个变量
      v_sal employees.salary%type;
    begin
      --使用 select ... into ... 为 v_sal 赋值
      select salary into v_sal from employees;
      dbms_output.put_line('salary: ' || v_sal);
    exception
      when No_data_found then 
           dbms_output.put_line('未找到数据!');
      when Too_many_rows then 
           dbms_output.put_line('数据过多!');     
    end;
     更新指定员工工资,如工资小于300,则加100;对 NO_DATA_FOUND 异常, TOO_MANY_ROWS 进行处理.
    declare
       v_sal employees.salary%type;
    begin
       select salary into v_sal from employees where employee_id = 100;
       
       if(v_sal < 300) then update employees set salary = salary + 100 where employee_id = 100;
       else dbms_output.put_line('工资大于300');
       end if;
    exception
       when no_data_found then dbms_output.put_line('未找到数据');
        when too_many_rows then dbms_output.put_line('输出的数据行太多');
    end;
    处理非预定义的异常处理: "违反完整约束条件"
    
    declare
      --1. 定义异常    
      temp_exception exception;
    
      --2. 将其定义好的异常情况,与标准的 ORACLE 错误联系起来,使用 EXCEPTION_INIT 语句
      PRAGMA EXCEPTION_INIT(temp_exception, -2292);
    begin
      delete from employees where employee_id = 100;
    
    exception
      --3. 处理异常
      when temp_exception then
           dbms_output.put_line('违反完整性约束!');
    end;
     自定义异常: 更新指定员工工资,增加100;若该员工不存在则抛出用户自定义异常: no_result
    
    declare
      --自定义异常                                   
      no_result exception;   
    begin
      update employees set salary = salary + 100 where employee_id = 1001;
    
      --使用隐式游标, 抛出自定义异常
      if sql%notfound then
         raise no_result;
      end if;  
    
    exception
    
      --处理程序抛出的异常
      when no_result then
         dbms_output.put_line('更新失败');
    end;

    存储函数/存储过程

    1.[存储函数:有返回值,创建完成后,通过select function() from dual;执行]

    函数的 helloworld: 返回一个 "helloworld" 的字符串
    
    create or replace function hello_func
    return varchar2
    is
    begin
           return 'helloworld';
    end;
    
    执行函数
    
    begin
        dbms_output.put_line(hello_func());
    end;
    
    或者: select hello_func() from dual;
    返回一个"helloworld: atguigu"的字符串,其中atguigu 由执行函数时输入。
    
    --函数的声明(有参数的写在小括号里)
    create or replace function hello_func(v_logo varchar2)
    --返回值类型
    return varchar2
    is 
    --PL/SQL块变量的声明
    begin
    --函数体
           return 'helloworld'|| v_logo;
    end;
    创建一个存储函数,返回当前的系统时间
    create or replace function func1
    return date
    is
    --定义变量
    v_date date;
    begin
        --函数体
        --v_date := sysdate;
           select sysdate into v_date from dual;
           dbms_output.put_line('我是函数哦');
           
           return v_date;
    end;
    
    执行法1:
    select func1 from dual;
    执行法2:
    declare
      v_date date;
    begin
      v_date := func1;
      dbms_output.put_line(v_date);
    end;
    定义带参数的函数: 两个数相加
    
    create or replace function add_func(a number, b number)
    return number
    is
    begin
           return (a + b);
    end;
    
    执行函数
    
    begin
        dbms_output.put_line(add_func(12, 13));
    end;
    或者
        select add_func(12,13) from dual;
    定义一个函数: 获取给定部门的工资总和, 要求:部门号定义为参数, 工资总额定义为返回值.
    
    create or replace function sum_sal(dept_id number)
           return number
           is
           
           cursor sal_cursor is select salary from employees where department_id = dept_id;
           v_sum_sal number(8) := 0;   
    begin
           for c in sal_cursor loop
               v_sum_sal := v_sum_sal + c.salary;
           end loop;       
    
           --dbms_output.put_line('sum salary: ' || v_sum_sal);
           return v_sum_sal;
    end;
    
    执行函数
    
    begin
        dbms_output.put_line(sum_sal(80));
    end;
    关于 OUT 型的参数: 因为函数只能有一个返回值, PL/SQL 程序可以通过 OUT 型的参数实现有多个返回值
    
    要求: 定义一个函数: 获取给定部门的工资总和 和 该部门的员工总数(定义为 OUT 类型的参数).
    要求: 部门号定义为参数, 工资总额定义为返回值.
    
    create or replace function sum_sal(dept_id number, total_count out number)
           return number
           is
           
           cursor sal_cursor is select salary from employees where department_id = dept_id;
           v_sum_sal number(8) := 0;   
    begin
           total_count := 0;
    
           for c in sal_cursor loop
               v_sum_sal := v_sum_sal + c.salary;
               total_count := total_count + 1;
           end loop;       
    
           --dbms_output.put_line('sum salary: ' || v_sum_sal);
           return v_sum_sal;
    end;   
    
    执行函数:
    
    delare 
      v_total number(3) := 0;
    
    begin
        dbms_output.put_line(sum_sal(80, v_total));
        dbms_output.put_line(v_total);
    end;

    2.[存储过程:由于没有返回值,创建完成后,不能使用select语句,只能使用pl/sql块执行]

    定义一个存储过程: 获取给定部门的工资总和(通过 out 参数), 要求:部门号和工资总额定义为参数
    
    create or replace procedure sum_sal_procedure(dept_id number, v_sum_sal out number)
           is
           
           cursor sal_cursor is select salary from employees where department_id = dept_id;
    begin
           v_sum_sal := 0;
           
           for c in sal_cursor loop
               --dbms_output.put_line(c.salary);
               v_sum_sal := v_sum_sal + c.salary;
           end loop;       
    
           dbms_output.put_line('sum salary: ' || v_sum_sal);
    end;
    [执行]
    declare 
         v_sum_sal number(10) := 0;
    begin
         sum_sal_procedure(80,v_sum_sal);
    end;
    自定义一个存储过程完成以下操作: 
    对给定部门(作为输入参数)的员工进行加薪操作, 若其到公司的时间在 (? , 95) 期间,    为其加薪 %5
                                                                   [95 , 98)             %3       
                                                                   [98, ?)               %1
    得到以下返回结果: 为此次加薪公司每月需要额外付出多少成本(定义一个 OUT 型的输出参数).
    
    create or replace procedure add_sal_procedure(dept_id number, temp out number)
    
    is
    
           cursor sal_cursor is select employee_id id, hire_date hd, salary sal from employees where department_id = dept_id;
           a number(4, 2) := 0;
    begin
           temp := 0;       
    
           for c in sal_cursor loop
               a := 0;    
           
               if c.hd < to_date('1995-1-1', 'yyyy-mm-dd') then
                  a := 0.05;
               elsif c.hd < to_date('1998-1-1', 'yyyy-mm-dd') then
                  a := 0.03;
               else
                  a := 0.01;
               end if;
               
               temp := temp + c.sal * a;
               update employees set salary = salary * (1 + a) where employee_id = c.id;
           end loop;       
    end;

    触发器

    1. 一个helloworld级别的触发器

    create or replace trigger hello_trigger
    after 
    update on employees
    --for each row
    begin 
        dbms_output.put_line('hello...');
        --dbms_output.put_line('old.salary:'|| :OLD.salary||',new.salary'||:NEW.salary);
    end;
    然后执行:update employees set salary = salary + 1000;
     触发器的 helloworld: 编写一个触发器, 在向 emp 表中插入记录时, 打印 'helloworld'
    
    create or replace trigger emp_trigger
    after 
    insert on emp
    for each row
    begin
           dbms_output.put_line('helloworld');
    end;

    2.行级触发器

     行级触发器: 每更新 employees 表中的一条记录, 都会导致触发器执行
    
    create or replace trigger employees_trigger
    after 
    update on employees
    for each row
    begin
           dbms_output.put_line('修改了一条记录!');
    end;

    3.语句级触发器

    语句级触发器: 一个 update/delete/insert 语句只使触发器执行一次
    
    create or replace trigger employees_trigger
    after 
    update on employees
    begin
           dbms_output.put_line('修改了一条记录!');
    end;

    4.使用 :new, :old 修饰符

    使用 :new, :old 修饰符
    
    create or replace trigger employees_trigger
    after 
    update on employees
    for each row
    begin
           dbms_output.put_line('old salary: ' || :old.salary || ', new salary: ' || :new.salary);
    end;
     编写一个触发器, 在对 my_emp 记录进行删除的时候, 在 my_emp_bak 表中备份对应的记录
    
    1). 准备工作:
        create table my_emp as select employee_id id, last_name name, salary sal from employees
        create table my_emp_bak as select employee_id id, last_name name, salary sal from employees where 1 = 2
    
    2). 
    create or replace trigger bak_emp_trigger
           before delete on my_emp
           for each row
           
    begin
           insert into my_emp_bak values(:old.id, :old.name, :old.sal);
    end; 
  • 相关阅读:
    MSMQ, WCF and IIS: Getting them to play nice (Part 2)[转]
    c#通用函数[转]
    MSMQ, WCF and IIS: Getting them to play nice (Part 1)[转]
    Building a Pub/Sub Message Bus with Wcf,Msmq,IIS
    关于virtual,new,override用法详解
    wcf服务代理层添加wcf服务异步代理
    HttpModule教程
    创造和把握职位升迁的10条规则
    wcf服务代理层添加wcf服务异步代理
    windows server 2008下IIS设置问题
  • 原文地址:https://www.cnblogs.com/denghy-301/p/14148277.html
Copyright © 2020-2023  润新知