三、ORACLE之PLSQL編程

ORACLE 數(shù)據(jù)庫中包含一種過程化語言,稱為 PL/SQL(Procedural Language/SQL)。PL/SQL 可以用來編寫包含 SQL 語句的程序。在 PL/SQL 中可以使用 IF 語句或者 LOOP 循環(huán)語句實現(xiàn)控制程序的執(zhí)行流程,還可以定義變量,實現(xiàn)語句之間傳遞數(shù)據(jù)信息,從而 PL/SQL 語言可以封裝程序?qū)崿F(xiàn)操控程序處理的細節(jié)。PL/SQL 是 ORACLE 的專用語言,它是對 SQL 語言的擴展,它允許在其內(nèi)部嵌套普通的 SQL 語句。

1.PL/SQL 塊結(jié)構(gòu)

PL/SQL 程序都是以塊為基本單位,整個 PL/SQL 塊分為三部分:聲明部分、執(zhí)行部分和異常處理部分。

1.1 語句結(jié)構(gòu)如下:

[DECLARE]
--聲明部分,可選
BEGIN
--執(zhí)行部分,必選
[EXCEPTION]
--異常處理部分,可選
END

例子:

DECLARE
 v_num1 int:=400;
 v_num2 int:=2;
 v_result int;
BEGIN
  v_result := v_num1 / v_num2;
  DBMS_OUTPUT.put_line(v_result);
EXCEPTION
  WHEN OTHERS THEN
    DBMS_OUTPUT.put_line('出現(xiàn)異常了!');
END;

2.變量和類型

2.1 定義變量語法:

  • 變量的名稱 變量的類型; eg: v_num number;
  • 變量的名稱 變量的類型 := 值; eg:v_num number := 100;
  • 定義一個常量 eg: PI constant number := 3.1415926;常量的定義一定要初始化,不然就要報錯。
  • 使用 表名.列名%type; eg: v_sal emp.sal%type; 該方式引用emp表中的sal列作為變量的類型
  • 使用 表名%rowtype; eg:v_emprow emp%rowtype;該方式引用了emp表中的一行數(shù)據(jù)類型作為變量的類型。

[:=]是賦值運算符

2.2 PLSQL中的類型

1.數(shù)值型:number、int 、Integer 、 float等
2.字符型:varchar 、varchar2 、char等
3.日期型:Date
注意,只有字符型要指定長度,其他可以不指定

例子:

DECLARE
  -- 定義都是變量 語法結(jié)構(gòu): 變量的名稱 變量的類型; 稱為聲明一個變量; 變量的名稱 變量的類型 :=[賦值運算符] 值; 稱為聲明變量并初始化;
  v_num1 number :=200; 
  v_num2 number := 0;
  PI constant number := 3.1415926;
  v_result number;
BEGIN
  v_result := v_num1 / v_num2;
  -- 以下你就認為是java中的 system.out.println();
  DBMS_OUTPUT.put_line('結(jié)果為:' || v_result);
EXCEPTION
  WHEN OTHERS THEN
      DBMS_OUTPUT.put_line('程序有異常!');
END;

-- PLSQL 跟  ORACLE中表聯(lián)系起來 查詢SMITH員工的工資,部門編號,入職日期信息,員工姓名打印到控制臺
DECLARE
   v_sal number;
   v_deptno number;
   v_hiredate date;
   v_ename varchar2(50);
BEGIN
   -- INTO 用于 SELECT 查詢語句中,表示把查詢的列數(shù)據(jù)賦值給相應(yīng)的變量
   SELECT SAL,DEPTNO,HIREDATE,ENAME  INTO  v_sal, v_deptno, v_hiredate, v_ename FROM EMP WHERE ENAME = 'SMITH';
   
   DBMS_OUTPUT.put_line( v_sal || ',' || v_deptno||',' ||v_hiredate||','|| v_ename);

END;
-- 表.列%type;指定表中某個列的類型長度定義變量
DECLARE
   v_sal emp.sal%type;
   v_deptno emp.deptno%type;
   v_hiredate emp.hiredate%type;
   v_ename emp.ename%type;
BEGIN
   -- INTO 用于 SELECT 查詢語句中,表示把查詢的列數(shù)據(jù)賦值給相應(yīng)的變量
   SELECT SAL,DEPTNO,HIREDATE,ENAME  INTO  v_sal, v_deptno, v_hiredate, v_ename FROM EMP WHERE ENAME = 'SMITH';
   
   DBMS_OUTPUT.put_line( v_sal || ',' || v_deptno||',' ||v_hiredate||','|| v_ename);

END;


DECLARE
   -- 表中的一行作為變量的類型
   v_emprow emp%rowtype;
BEGIN
   
   SELECT *  INTO v_emprow  FROM EMP WHERE ENAME = 'SMITH';
   
   DBMS_OUTPUT.put_line( v_emprow.sal || ',' || v_emprow.deptno||',' ||v_emprow.hiredate||','||v_emprow.ename);

END;

3.條件語句

條件語句用于控制程序的流程。在 PLSQL 中定義了有 :

  • IF 條件 THEN 執(zhí)行的語句
  • ELSE 條件 THEN 執(zhí)行語句
  • ELSE 執(zhí)行語句
  • END IF標志條件語句結(jié)束

例子:-- 輸入年齡 ,可以判斷該人是步入什么階段 兒童 、 青年 、 中年 、老人 、 去死吧

-- 判斷語句  輸入年齡 ,可以判斷該人是步入什么階段  兒童 、 青年 、 中年 、老人 、 去死吧

DECLARE
   -- &age 模擬輸入的年齡
   v_age number:=&age;
BEGIN
   
   IF v_age < 12 THEN
     DBMS_OUTPUT.put_line('你是兒童');
     
     ELSIF v_age < 30 THEN
           DBMS_OUTPUT.put_line('你是青年');
      ELSIF v_age < 50 THEN
           DBMS_OUTPUT.put_line('你是中年');
       
      ELSIF v_age < 100 THEN
           DBMS_OUTPUT.put_line('你是老人');
   ELSE
           DBMS_OUTPUT.put_line('你去死吧??!');
   END IF;  
END;

4.循環(huán)語句

循環(huán)語句有而是來控制程序執(zhí)行的。PLSQL 中循環(huán)分三種。

  • LOOP 循環(huán)體 END LOOP
  • WHILE 條件 LOOP 循環(huán)體 END LOOP
  • FOR 變量名稱 IN [ REVERSE ] 范圍1..100 LOOP
    循環(huán)體
    END LOOP;

例子:

-- 數(shù)數(shù),從1數(shù)到100,輸出到控制臺  FOR 變量名稱 IN 范圍 LOOP 循環(huán)體 END LOOP 
DECLARE
   v_num number :=&num;
BEGIN
   
   FOR i IN  REVERSE 1..v_num LOOP
     
   DBMS_OUTPUT.put_line(i);
   
   END LOOP;
END;

-- LOOP  循環(huán)體  END LOOP : EXIT WHEN條件
DECLARE
   v_num number :=&num;
   v_index number := 1;
BEGIN
   LOOP
    -- 循環(huán)退出的語句
    EXIT WHEN v_index > v_num;
    DBMS_OUTPUT.put_line(v_index);
    v_index := v_index + 1;
   END LOOP;
END;

-- WHILE 條件   LOOP  循環(huán)體  END LOOP;

DECLARE
   v_num number :=&num;
   v_index number := 1;
BEGIN
   WHILE v_index <=  v_num LOOP
    DBMS_OUTPUT.put_line(v_index);
    v_index := v_index + 1;
   END LOOP;
END;

5.游標

數(shù)據(jù)類型,用于接收一組數(shù)據(jù),通過游標對象中的屬性進行 數(shù)據(jù)抓取
游標分兩類:1.顯示游標 2.隱式游標
游標對象中的屬性:%found(判斷當前是否還有數(shù)據(jù)行,如果有返回true)、%notfount(判斷當前是否還有數(shù)據(jù)行,如果沒有返回true)、 %isopen(游標是否是打開狀態(tài)) 、 %ROWCOUNT (返回受影響的行數(shù))、%ROWNUM(返回游標讀取行的位置)

  • 顯示游標的使用過程
    1.定義游標類型
    2.定義游標變量
    3.指定游標關(guān)聯(lián)的查詢SQL
    4.先打開游標 open
    5.抓取游標行數(shù)據(jù) fetch
    6.關(guān)閉游標 close

例子:查詢emp表中所有數(shù)據(jù),打印到控制臺

-- 游標(動態(tài)游標) 使用方式1 該方式游標變量可以重復(fù)利用
DECLARE
   -- 1.定義游標類型
   type cur_emp is ref cursor;
   -- 2.定義游標變量
   my_cur cur_emp;
   -- 定義一個游標抓取行的臨時變量
   v_emprow emp%rowtype;
BEGIN
  -- 3.游標變量關(guān)聯(lián)上查詢SQL
     open my_cur  for  SELECT * FROM EMP;
  -- 4.打開游標
    -- open my_cur;
  -- 5.抓取游標行數(shù)據(jù)
     LOOP
      fetch my_cur into  v_emprow;
      EXIT WHEN my_cur%NOTFOUND;
      DBMS_OUTPUT.put_line( v_emprow.sal || ',' || v_emprow.deptno||',' ||v_emprow.hiredate||','||v_emprow.ename);
     END LOOP;
  -- 6.關(guān)閉游標
  close my_cur;
  
END;


-- 游標(靜態(tài)游標) 使用方式2
DECLARE
   -- 1.定義游標變量,并關(guān)聯(lián)上查詢SQL
   CURSOR my_cur is select * from  emp;
   -- 定義一個游標抓取行的臨時變量
   v_emprow emp%rowtype;
BEGIN
 
  -- 3.打開游標
  open my_cur;
  -- 4.抓取游標行數(shù)據(jù)
     LOOP
      fetch my_cur into  v_emprow;
      EXIT WHEN my_cur%NOTFOUND;
      DBMS_OUTPUT.put_line( v_emprow.sal || ',' || v_emprow.deptno||',' ||v_emprow.hiredate||','||v_emprow.ename);
     END LOOP;
  -- 5.關(guān)閉游標
  close my_cur;
END;

  • 靜態(tài)游標可以使用 for in loop 遍歷游標方式
-- 靜態(tài)游標遍歷數(shù)據(jù),簡化,使用 for in LOOP 語句
DECLARE
   -- 1.定義游標變量,并關(guān)聯(lián)上查詢SQL
   CURSOR my_cur is select * from  emp;

BEGIN
      FOR v_emprow IN my_cur LOOP
      DBMS_OUTPUT.put_line( v_emprow.sal || ',' || v_emprow.deptno||',' ||v_emprow.hiredate||','||v_emprow.ename); 
      END LOOP;
END;

  • 帶參數(shù)的靜態(tài)游標
-- 帶參數(shù)的靜態(tài)游標  查詢10號部門的員工信息,并打印到控制臺。

DECLARE
   v_input number := &depno;
   CURSOR emp_cursor(v_deptno emp.deptno%type) is SELECT * FROM EMP WHERE DEPTNO = v_deptno;
BEGIN
  FOR v_emprow IN emp_cursor(v_input) LOOP
     DBMS_OUTPUT.put_line( v_emprow.sal || ',' || v_emprow.deptno||',' ||v_emprow.hiredate||','||v_emprow.ename); 
  END LOOP;
END;
  • 隱式游標

沒有顯示的名字的游標,但是有一個默認名字SQL,,當然也具有游標的屬性
%notfound、 %found、 %isopen 、%rownum、 %ROWCOUNT

-- 隱式游標
DECLARE
   v_input number := &depno;
BEGIN
   FOR v_emprow IN (SELECT * FROM EMP WHERE DEPTNO = v_input) LOOP
      DBMS_OUTPUT.put_line( v_emprow.sal || ',' || v_emprow.deptno||',' ||v_emprow.hiredate||','||v_emprow.ename); 
   END LOOP;
END;

-- 傳一個員工編號,就把該條記錄刪除掉
DECLARE
   v_input number := &empno;
BEGIN
  DELETE FROM EMP WHERE EMPNO = v_input;
  DBMS_OUTPUT.put_line(SQL%rowcount);
END;

6.函數(shù)

函數(shù)用于返回特定的數(shù)據(jù),當建立函數(shù)時,在函數(shù)頭部必須包含return子句。而在函數(shù)體內(nèi)必須包含return語句返回的數(shù)據(jù)。

  • 創(chuàng)建一個函數(shù)的結(jié)構(gòu):
    CREATE [OR REPLACE] FUNCTION 函數(shù)的自定義名稱 (形參列表) RETUREN 返回數(shù)據(jù)的類型
    IS
    --聲明部分
    BEGIN
    -- 函數(shù)主題部分
    END;

例子:

-- 函數(shù)
CREATE OR REPLACE FUNCTION FUN_EMP(v_input  number) RETURN NUMBER
IS
 -- 定義變量的部分
BEGIN
  DELETE FROM EMP WHERE EMPNO = v_input;
  RETURN SQL%rowcount;
END;
使用函數(shù)方式1:
DECLARE
  v number;
begin
  v := FUN_EMP(7369);
end;
=========
方式2,只支持函數(shù)的操作不能是DML操作:
 
SQL> SELECT FUN_EMP2(7369) FROM DUAL;
 
FUN_EMP2(7369)
--------------
           800

7.過程

過程用于執(zhí)行特定的操作,當建立過程時,既可以指定輸入?yún)?shù)(in),也可以指定輸出參數(shù)(out), 通過在過程中使用輸入?yún)?shù),可以將數(shù)據(jù)傳遞到執(zhí)行部分;通過使用輸出參數(shù),可以將執(zhí)行部分的數(shù)據(jù)傳遞到應(yīng)用環(huán)境

  • 過程創(chuàng)建的結(jié)構(gòu):
    CREATE [OR REPLACE] PROCEDURE 過程自定義名稱 (參數(shù)列表)
    IS
    -- 申明部分
    BEGIN
    -- 過程體
    END;

例子:

-- 指定員工編號,輸出該員工的姓名和薪水以及入職日期
CREATE OR REPLACE PROCEDURE PRO_EMP(v_empno IN emp.empno%type,v_ename OUT EMP.ENAME%TYPE,v_sal OUT emp.sal%type,v_hiredate out emp.hiredate%type)

is
      -- 申明部分
begin
      -- 過程體
      SELECT SAL,ENAME,HIREDATE INTO v_sal,v_ename,v_hiredate FROM EMP WHERE EMPNO = v_empno;

end;
  • 使用過程:
方式1,在sql window窗口中調(diào)用
declare
      v_ename  EMP.ENAME%TYPE;
      v_sal  emp.sal%type;
      v_hiredate  emp.hiredate%type;
begin
  pro_emp(7369,v_ename,v_sal,v_hiredate);
  DBMS_OUTPUT.put_line(v_ename);
   DBMS_OUTPUT.put_line(v_hiredate);
    DBMS_OUTPUT.put_line(v_sal);
end;
  方式2,在sql命令窗口中調(diào)用
SQL> var c1 varchar2(10);
SQL> var c2 number;
SQL> var c3 date;
SQL> CALL PRO_EMP(7369,:c1,:c2,:c3);
 
Method called
c1
---------
SMITH
c2
---------
800
c3
---------
1980/12/17
==========================

SQL> exec PRO_EMP(7499,:c1,:c2,:c3);
 
PL/SQL procedure successfully completed
c1
---------
ALLEN
c2
---------
1600
c3
---------
1981/2/20

8.JDBC調(diào)用過程、函數(shù)

8.1JDBC 調(diào)用函數(shù)

  package com.xingxue.oracle.function;

import java.sql.CallableStatement;
import java.sql.Connection;
import java.sql.DriverManager;
import java.sql.Types;

public class JdbcFunction {

    public static void main(String[] args) {

        Connection conn = null;
        // 該對象是用于發(fā)出 執(zhí)行函數(shù)(過程)的對象
        CallableStatement prepareCall = null;
        try {
            Class.forName("oracle.jdbc.OracleDriver");
            conn = DriverManager.getConnection("jdbc:oracle:thin:@192.168.0.189:1521:orcl", "scott", "tiger");
            prepareCall = conn.prepareCall("{?=call fun_emp2(?)}");
            // 設(shè)置暫位符
            prepareCall.setObject(2, 7902);
            // 注冊一個返回的值參數(shù)
            prepareCall.registerOutParameter(1, Types.DOUBLE);
            // 發(fā)出執(zhí)行
            prepareCall.execute();
            double sal = prepareCall.getDouble(1);
            System.out.println(sal);

        } catch (Exception e) {
            e.printStackTrace();
        }

    }

}

8.2 JDBC 調(diào)用過程

package com.xingxue.oracle.function;

import java.sql.CallableStatement;
import java.sql.Connection;
import java.sql.DriverManager;
import java.sql.Types;

public class JDBCPro {

    public static void main(String[] args) {
        Connection conn = null;
        CallableStatement prepareCall = null;
        try {
            Class.forName("oracle.jdbc.OracleDriver");
            conn = DriverManager.getConnection("jdbc:oracle:thin:@192.168.0.189:1521:orcl", "scott", "tiger");
            prepareCall = conn.prepareCall("{call pro_emp(?,?,?,?)}");
            // 設(shè)置 in 參數(shù)
            prepareCall.setObject(1, 7369);
            // 注冊 out 參數(shù)
            prepareCall.registerOutParameter(2, Types.VARCHAR);
            prepareCall.registerOutParameter(3, Types.DOUBLE);
            prepareCall.registerOutParameter(4, Types.DATE);
            // 執(zhí)行
            prepareCall.execute();

            Object o1 = prepareCall.getObject(2);
            Object o2 = prepareCall.getObject(3);
            Object o3 = prepareCall.getObject(4);
            System.out.println(o1);
            System.out.println(o2);
            System.out.println(o3);

        } catch (Exception e) {
            e.printStackTrace();
        }
    }
}
package com.xingxue.oracle.pro;

import java.sql.CallableStatement;
import java.sql.Connection;
import java.sql.DriverManager;
import java.sql.ResultSet;

import oracle.jdbc.OracleTypes;

public class JDBPro2 {
    public static void main(String[] args) {
        Connection conn = null;
        CallableStatement prepareCall = null;
        try {
            Class.forName("oracle.jdbc.OracleDriver");
            conn = DriverManager.getConnection("jdbc:oracle:thin:@192.168.0.189:1521:orcl", "scott", "tiger");
            prepareCall = conn.prepareCall("{call pro_emp_deptno(?,?)}");
            // 設(shè)置 in 參數(shù)
            prepareCall.setObject(1, 20);
            // 注冊 out 游標參數(shù)
            prepareCall.registerOutParameter(2, OracleTypes.CURSOR);
            // 執(zhí)行
            prepareCall.execute();

            ResultSet rs = (ResultSet) prepareCall.getObject(2);

            while (rs.next()) {
                Object object = rs.getObject("sal");
                Object object1 = rs.getObject("hiredate");
                System.out.println(object + ":" + object1);
            }

        } catch (Exception e) {
            e.printStackTrace();
        }
    }
}
最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
【社區(qū)內(nèi)容提示】社區(qū)部分內(nèi)容疑似由AI輔助生成,瀏覽時請結(jié)合常識與多方信息審慎甄別。
平臺聲明:文章內(nèi)容(如有圖片或視頻亦包括在內(nèi))由作者上傳并發(fā)布,文章內(nèi)容僅代表作者本人觀點,簡書系信息發(fā)布平臺,僅提供信息存儲服務(wù)。

相關(guān)閱讀更多精彩內(nèi)容

友情鏈接更多精彩內(nèi)容