1.PL/SQL简介
PL/SQL语言(Procedural Language/SQL,过程化SQL语言)是Oracle推出的过程化的SQL编程语言,使用PL/SQL可以为SQL语言引入结构化的程序处理能力,例如可以在PL/SQL中定义常量、变量、游标、存储过程等,可以使用条件、循环等流程控制语句。
PL/SQL的这种特性使得开发人员可以在数据库中添加业务逻辑,并且由于业务逻辑与数据均位于数据库服务器端,比客户端编写的业务逻辑能提供更好的性能。
PL/SQL是一种块结构的语言,它将一组语句放在一个块中,一次性发送给服务器,PL/SQL引擎分析收到的PL/SQL语句块中的内容,把其中的过程控制语句由PL/SQL引擎自身去执行,把PL/SQL块中的SQL语句交给服务器的SQL语句执行器执行。
PL/SQL块发送给服务器后,先被编译然后执行,对于有名称的PL/SQL块(如存储过程、函数、触发器、程序包)可以单独编译,永久的存储在数据库中,随时准备执行。
两个注意点:
1.在 END; 结束符的下一行开头加“/”作为结束标志。
2.运行 SET SERVEROUTPUT ON; 语句。激活dbms_output包。
2.PL/SQL程序结构:(仅展示代码部分)
- --变量的定义和初始化。
- SET SERVEROUTPUT ON;
- DECLARE --声明部分标识
- v_job VARCHAR2(9);
- v_count BINARY_INTEGER DEFAULT 0;
- v_total_sal NUMBER(9,2):=0;
- v_date DATE:=SYSDATE;
- c_tax_rate CONSTANT NUMBER(3,2):=8.25;
- v_valid BOOLEAN NOT NULL:=TRUE;
- BEGIN
- v_job:='MANAGER'; --在程序中赋值
- DBMS_OUTPUT.PUT_LINE(v_job); --输出变量v_job的值
- DBMS_OUTPUT.PUT_LINE(v_count); --输出变量v_count的值
- DBMS_OUTPUT.PUT_LINE(v_date); --输出变量v_date的值
- DBMS_OUTPUT.PUT_LINE(c_tax_rate); --输出变量c_tax_rate的值
- END;
-
-
- --使用SELECT INTO语句赋值变量
- SET SERVEROUTPUT ON;
- DECLARE --声明部分标识
- v_job VARCHAR2(9);
- v_count BINARY_INTEGER DEFAULT 0;
- v_total_sal NUMBER(9,2):=0;
- v_date DATE:=SYSDATE;
- c_tax_rate CONSTANT NUMBER(3,2):=8.25;
- v_valid BOOLEAN NOT NULL:=TRUE;
-
- BEGIN
- SELECT 'MANAGER' INTO v_job FROM dual;
- DBMS_OUTPUT.PUT_LINE(v_job); --输出变量v_job的值
- END;
-
-
- --根据职员表emp计算7788号职员的奖金。奖金的计算方法是:职员的工资(sal) *15%。
- DECLARE
- bonus_rate CONSTANT NUMBER(2,2) :=0.15;
- bonus NUMBER(7,2);
- emp_id NUMBER(4) := 7788;
- BEGIN
- SELECT sal * bonus_rate INTO bonus FROM emp
- WHERE empno= emp_id;
- DBMS_OUTPUT.PUT_LINE ( 'Employee: ' || TO_CHAR(emp_id)|| ' Bonus: ' || TO_CHAR(bonus) || ' Bonus Rate: ' || TO_CHAR(bonus_rate));
- END;
- --程序输出结果为:
- --Employee: 7788 Bonus: 450 Bonus Rate: .15
- --根据表中字段定义变量。
- DECLARE
- v_ename emp.ename%TYPE;--根据字段定义变量
- BEGIN
- SELECT ename INTO v_ename FROM emp
- WHERE empno=7788;
- DBMS_OUTPUT.PUT_LINE(v_ename); --输出变量的值
- END;
3. PL/SQL控制结构
- --判断emp表中记录是否超过20条,10-20之间,或者10条以下。
- DECLARE
- --声明变量接受emp表中的记录数
- V_COUNT NUMBER;
- BEGIN
- --查询emp表中的记录数赋值给变量
- SELECT COUNT(*) INTO V_COUNT FROM EMP;
- --判断打印
- IF V_COUNT > 20 THEN
- DBMS_OUTPUT.PUT_LINE('EMP表中的记录数超过了20条为:' || V_COUNT || '条。');
- ELSIF V_COUNT >= 10 THEN
- DBMS_OUTPUT.PUT_LINE('EMP表中的记录数在10~20条之间为:' || V_COUNT || '条。');
- ELSE
- DBMS_OUTPUT.PUT_LINE('EMP表中的记录数在10条以下为:' || V_COUNT || '条。');
- END IF;
- END;
4.游标
游标:是系统开设的一个数据缓冲区,存放SQL语句的执行结果。
作用:用户可通过游标获取记录,并赋给变量。
当对数据库的查询操作返回一组结果集时,存入游标,以后通过对游标的操作来获取结果集中的数据信息。
游标分:显式游标和隐式游标。当查询语句返回多条记录时,必须显式地定义游标以处理每一行。其他的SQL语句(更新操作或查询操作只返回一条记录)都使用隐式游标。
游标是用于临时存储一个查询返回的多行数据,通过遍历游标,可以逐行访问处理该结果集的数据。
游标的使用方式:声明--->打开--->读取--->关闭
- 游标的定义:
- --CURSOR <游标名> IS <SQL语句>;
- --例:
- CURSOR c_emp IS SELECT * FROM emp WHERE dno=3;
-
- --当需要操作结果集时,须完成:打开游标、使用FETCH语句将游标里的数据取出以及关闭游标操作。
- --游标声明:
- CURSOR 游标名 IS 查询语句;
- --游标的打开:
- OPEN 游标名;
- --游标的取值:
- FETCH 游标名 INTO 变量列表;
- --游标的关闭:
- CLOSE 游标名;
- --使用游标查询emp表中所有员工的姓名和工资,并将其依次打印出来。:
- DECLARE
- CURSOR c_emp IS --声明游标
- SELECT ename, sal FROM emp; --声明变量用来接受游标中的元素
- v_ename emp.ename%TYPE;
- v_sal emp.sal%TYPE;
- BEGIN
- OPEN c_emp; --打开游标
- LOOP --遍历游标中的值
- FETCH c_emp into v_ename, v_sal ; --通过FETCH语句获取游标中的值并赋值 EXIT WHEN c_emp%NOTFOUND; --判断是否有值,有值打印,没有则退出循环
- DBMS_OUTPUT.PUT_LINE('姓名:' || v_ename || ',薪水:' || v_sal)
- END LOOP;
- CLOSE c_emp; --关闭游标
- END;
-
- --使用游标查询并打印某部门的员工的姓名和薪资,部门编号为运行时手动输入。
- DECLARE
- CURSOR c_emp(v_empno emp.empno%TYPE) IS
- SELECT ename, sal FROM emp WHERE empno = v_empno;
- v_ename emp.ename%TYPE;
- v_sal emp.sal%TYPE;
- BEGIN
- OPEN c_emp(10); --打开游标
- LOOP --遍历游标中的值
- FETCH c_emp INTO v_ename, v_sal ; --通过FETCH语句获取游标中的值并赋值
- EXIT WHEN c_emp%NOTFOUND; --判断是否有值,有值打印,没有则退出循环
- DBMS_OUTPUT.PUT_LINE('姓名:' || v_ename || ',薪水:' || v_sal)
- END LOOP;
- CLOSE c_emp; --关闭游标
- END;
带锁游标: PL/SQL提供了一种加锁后删除或更新游标中刚取出那条记录的方法。
要想操纵数据库中的数据,在定义游标的查询语句时,必须加上FOR UPDATE子句,表示要先对表加锁;然后在UPDATE或DELETE语句中加上WHERE CURRENT OF子句,指定从游标工作区中取出的当前行需要被更新或删除。当会话打开一个带FOR UPDATE子句的游标时,在游标区中的所有行拥有一个行级排他锁,其他对话只能查询,不能更新或删除。
实例:为emp表的员工增加10%的工资,总额限制在90万元以内。
5.存储过程与存储函数:
PLSQL编程——存储过程_月应是绝色306的博客-CSDN博客https://blog.csdn.net/qq_62687015/article/details/128124551?spm=1001.2014.3001.5501Oracle 函数_月应是绝色306的博客-CSDN博客https://blog.csdn.net/qq_62687015/article/details/128154882?spm=1001.2014.3001.5501
- 查询并打印某个员工的姓名和薪水(有参)
- --创建存储过程
- CREATE OR REPLACE PROCEDURE P_QUERYNAMEANDSAL(i_empno IN emp.empno%TYPE) IS --声明变量接受查询结果
- v_ename emp.ename%TYPE;
- v_sal emp.sal%TYPE;
- BEGIN
- SELECT ename, sal INTO v_ename, v_sal from emp WHERE empno = i_empno; --根据用户传递的员工号查询姓名和薪水
- DBMS_OUTPUT.PUT_LINE('姓名:' || v_ename || ',薪水:' || v_sal); --打印结果
- END;
-
- --调用存储过程
- call P_QUERYNAMEANDSAL(7839)
-
-
- --输入员工号查询某个员工信息,将薪水作为返回值输出,给调用的程序使用(带有输出参数)
- --创建存储过程
- CREATE OR REPLACE PROCEDURE P_QUERYSAL_OUT(i_empno IN emp.empno%TYPE,o_sal OUT emp.sal%TYPE) IS
- BEGIN
- SELECT sal INTO o_sal FROM emp WHERE empno = i_empno;
- END;
-
- --调用存储过程
- DECLARE
- v_sal emp.sal%TYPE; --声明一个变量接受存储过程的输出参数
- BEGIN
- P_QUERYSAL_OUT(7839, v_sal); --注意参数的顺序
- DBMS_OUTPUT.PUT_LINE(v_sal);
- END;
6.触发器
- --在 emp表上创建一个触发器,该触发器是一个行级触发器。
- --当对 emp表的某职员sal工资列修改后,会引发该触发器并在审计表e_audit中写一条记录。
- --(1) 首先创建存放审计记录的表e_audit。
- CREATE TABLE e_audit
- (audit_id NUMBER(4),up_date DATE,new_sal NUMBER(7,2),
- old_sal NUMBER(7,2) );
- --(2) 再创建触发器audit_sal。
- CREATE OR REPLACE TRIGGER audit_sal
- AFTER UPDATE OF sal ON emp
- FOR EACH ROW
- BEGIN
- INSERT INTO e_audit VALUES( :OLD.empno, SYSDATE,:NEW.sal,:OLD.sal);
- -- 在行触发器中,被修改记录的每列都有两个相关名称,对应旧值和新值。:OLD.<属性名>和:NEW<属性名>
- END;
- --操作相关表,使得某部门职工的薪水增加15%。
- --给指定部门的员工加薪,首先要把该部门的员工选出来,再对这些员工的薪水进行改动。
- --这里用存储过程表示,将要加薪的部门作为参数:
- CREATE OR REPLACE PROCEDURE add_sal (deptname varchar2)
- AS
- BEGIN
- UPDATE emp
- SET emp.salary=emp.salary*1.15
- WHERE emp.eno IN
- (SELECT eno
- FROM dept
- WHERE dname= deptname);
- END ;
-
- --利用触发器建立追踪
- --通过对emp表的salary属性创建一个触发器,来监视其更新并进行记录,以追踪薪水变动情况:
- CREATE OR REPLACE TRIGGER salary_change
- BEFORE DELETE OR INSERT OR UPDATE ON emp --触发事件
- FOR EACH ROW -- 每更新一行都需要调用此触发器
- DECLARE --只有触发器的声明需要DECLARE,过程和函数都不要
- salary1 NUMBER;
- BEGIN --:new与:old分别代表该行在修改前、改后的记录
- salary1=:new.salary - old.salary;
- DBMS_OUTPUT.PUT_LINE('old salary is:'|| :old.salary);
- DBMS_OUTPUT.PUT_LINE('new salary is:'|| :new.salary);
- DBMS_OUTPUT.PUT_LINE('add is:'||to_char(salary1));
- END ;
标签:sal,--,游标,emp,SQL,oracle,PL From: https://www.cnblogs.com/lrzy/p/17986756