一区二区三区日韩精品-日韩经典一区二区三区-五月激情综合丁香婷婷-欧美精品中文字幕专区

分享

PL/SQL編程急速上手

 怡紅公子0526 2022-03-19

  結構化查詢語言(SQL)是第四代編程語言的典型,這種命令式的語言更像一種指令,使用它,你只需要告訴計算機“做什么”,而不用告訴計算機“怎么做”。第四代編程語言普遍具有簡單、易學、能更快的投入生產等優(yōu)點,但也失去了部分第三代編程語言(C,C++,Java等)的靈活性。PL/SQL 在 SQL 的基礎上,保留了部分第三代編程語言特性,它主要運行在 Oracle 數(shù)據(jù)庫上,它同時兼?zhèn)淞说谒拇Z言簡單、易用的特點,又保留了高級程序設計語言的靈活性與完整性,這使得開發(fā)人員可以只使用 PL/SQL 就能進行復雜業(yè)務邏輯的編寫。

 

一  PL/SQL 簡介

 

  1,簡介

  標準 SQL 提供了定義和操縱數(shù)據(jù)庫對象的能力,但與傳統(tǒng)高級編程語言相比,由于其具有更高的抽象性,所以注定缺乏諸多高級編程語言的特性,比如封裝函數(shù)、流程控制、進行錯誤檢測和處理等。

  PL/SQL 是 Oracle 在標準 SQL 的基礎上進行功能擴充后的一門編程語言,這使它保留了部分第三代編程語言的部分特性,比如變量聲明、流程控制、錯誤處理等。

  PL/SQL 的全稱是 Procedural Language/SQL,即過程化結構查詢語言,正如其名所示,PL/SQL 增加了過程性語言中的結構,以對標準 SQL 進行擴充。在PL/SQL 中,最基本的程序單元是語句塊(block),所有的程序都應該由各種塊構成,塊與塊之間可以相互嵌套。在塊中,可以定義變量,執(zhí)行條件判斷,循環(huán)等。

 

  2,開發(fā)工具

  Oracle 官方提供了兩款開發(fā)工具:SQL*Plus 和 Oracle SQL Developer。前者是一款命令行開發(fā)工具,后者則擁有方便的圖形化操作界面(類似SQL Server 的 SSMS)。

  除了官方提供的兩款工具外,PL/SQL Develpoer 是一款由第三方公司開發(fā)的,非常流行的 Oracle 數(shù)據(jù)庫集成開發(fā)環(huán)境。除此之外,市面上還有很多其他工具也具備 Oracle 數(shù)據(jù)庫開發(fā)的能力,大家可以根據(jù)需要選擇合適的開發(fā)工具。

  3,基本概念

  如果你對 SQL Server 有一定了解,你應該知道,它里面可以創(chuàng)建很多的數(shù)據(jù)庫,用于存儲不同業(yè)務或系統(tǒng)的數(shù)據(jù),每個數(shù)據(jù)庫都有單獨的數(shù)據(jù)文件(物理磁盤存儲的)。Oracle 中有點不同,嚴格來說 Oracle 通常只有一個數(shù)據(jù)庫,然后通過表空間和方案來實現(xiàn)多業(yè)務的數(shù)據(jù)分離。

  Oracle 通過表空間來存儲不同的內容,表空間是數(shù)據(jù)庫的邏輯劃分,每個數(shù)據(jù)庫至少有一個表空間(SYSTEM 表空間)。為了便于管理和提高運行效率,可以使用一些附加表空間來劃分用戶和應用程序。例如:USER 表空間供一般用戶使用,RBS 表空間供回滾段使用,一個表空間只能屬于一個數(shù)據(jù)庫。

  方案是另一個 Oracle 中特有的概念,方案是比表空間更細粒度的另一種單元,方案用于存放用戶相關的信息。通常每個用戶都對應一個方案,并且名稱一樣。多個用戶可以共用一個表空間,但不能通用一個方案,正是由于這種方案-用戶一一對應的關系,所以我們通常也把方案理解成用戶權限所能及的對象的集合。

 

二  PL/SQL基礎

 

  1,SQL 與 PL/SQL

  前面提到,PL/SQL 是對標準 SQL 的擴展,所以,在 PL/SQL 中不僅可以執(zhí)行 SQL 語句,還支持很多增強的特性,比如在 SQL 語句中使用變量、使用 PL/SQL 定義的函數(shù)等。在 PL/SQL 語句塊中,可以使用 SQL 語句操作數(shù)據(jù)庫,它支持所有的 SQL 數(shù)據(jù)操作、游標和事務處理命令,支持所有的 SQL 函數(shù)、操作符,完全支持 SQL 數(shù)據(jù)類型。

  需要注意的是:在 PL/SQL 語句塊中,不能直接使用 DDL 語句,這是因為 PL/SQL 引擎在編譯時會檢測語句塊中所涉及的對象,如果其不存在,通常都會引發(fā)錯誤,導致 DDL 語句執(zhí)行失敗。

  為了解決這類綁定性錯誤,可以使用動態(tài)SQL,即把需要執(zhí)行的 DDL 操作存儲在字符串中,并通過 execute immediate 來執(zhí)行這個字符串,從而達到間接執(zhí)行 DDL 操作的目的。

  

  2,數(shù)據(jù)定義

  數(shù)據(jù)管理主要使用 DDL 數(shù)據(jù)定義語言:create、alter、drop。

  創(chuàng)建表和約束:

 1 --在列后添加約束
 2 create table table_name
 3 (
 4     col1 type constraint,
 5     ...
 6 )
 7 --單獨添加約束
 8 create table table_name
 9 (
10     col1 type,
11     ....,
12     constration cons_name cons_type
13 )
14 --在Oracle中創(chuàng)建表和約束與標準SQL相同

  創(chuàng)建索引和視圖:

 1 --創(chuàng)建索引(非唯一)
 2 --默認系統(tǒng)會在具有unique和primary key的列上創(chuàng)建唯一約束
 3 create index index_name on (col1...);
 4 --當提供多個列時,即創(chuàng)建復合索引
 5 --創(chuàng)建視圖
 6 create or replace view view_name
 7 as
 8 select ...;
 9 --創(chuàng)建,如果已存在則修改視圖
10 create view ...
11 as
12 ...
13 with read only;
14 --創(chuàng)建只讀的視圖(推薦)

  修改表或視圖:

1 --為表增加新的列
2 alter table table_name
3 add col_name type constration;
4 --移除表中已有的列
5 alter table table_name
6 drop column col_name;

  刪除數(shù)據(jù)庫對象:

1 --刪除表
2 drop table table_name;
3 --刪除視圖
4 drop view view_name;
5 ...

  

  3,數(shù)據(jù)查詢

  A:標準查詢

    Oracle 中的數(shù)據(jù)查詢遵循 SQL 標準,常規(guī)查詢請移步我的《SQL入門,就這么簡單》。

  B:dual 表

    dual 是 Oracle 系統(tǒng)中對所有用戶可用的一個實際存在的表,它不能用來存儲信息,在實際開發(fā)中只能用來執(zhí)行 SELECT 語句,我們可以用它來獲取系統(tǒng)信息,比如獲取當前系統(tǒng)日期,或輸出一些測試信息。

1 --獲取系統(tǒng)日期
2 select sysdate from dual;
3 --轉換日期格式
4 select to_char(sysdate,'yyyy-mm-dd');
5 ...

  C: 偽列

    常用的偽列有兩個:rownum、rowid。

    在 Oracle 中沒有類似 SQL Server 中 TOP 這樣可以提取結果集前幾條記錄的關鍵字,但 Oracle 提供了一個更方便的方法,rownum 偽列。rownum 是一個動態(tài)的序號,從 1 開始,為所有查詢到的數(shù)據(jù)編號。

1 --查詢員工表中前10位員工相關信息
2 select rownum,ename,sal from emp
3 where rownum<=10;
4 -- 測試數(shù)據(jù)庫 Oracle 11g 

    使用 rownum 偽列時需要注意:rownum 是在基礎查詢之后動態(tài)添加上去的序號,所以,如果你想通過一條查詢語句實現(xiàn)提取結果集中間的部分記錄是不能成功的,必須使用子查詢,把 rownum 當做普通列才能實現(xiàn)。

1 select row_num,empno,ename,sal from (
2     select rownum as row_num,empno,ename,sal from emp
3 )a
4 where row_num >5 and row_num <=10;
5 -- 別名是為了防止服務器把外層的rownum再次當做偽列

    同理,提取使用 order by 排序后的記錄,也需要使用子查詢。

    和 rownum 不同,rowid 偽列是和表中的數(shù)據(jù)一樣實際存在的列,它是一種數(shù)據(jù)類型,是基于 64 位編碼的 18 個字符,用來唯一的表示一條記錄物理位置的一個id。我們可以通過 rowidtochar 函數(shù)把它轉換成字符串進行顯示,還可以通過它來刪除表中重復的記錄。

1 --查看rowid
2 select rowidtochar(rowid) ename,sal from emp;
3 --基于rowid刪除表中形同的記錄
4 delete from emp
5 where rowid not in (
6     select min(rowid) from emp group by empno
7 );

  

  4,數(shù)據(jù)操縱

  數(shù)據(jù)操縱主要包含以下操作:insert、update、delete、merge。

  A:insert 插入

 1 --方式一
 2 insert into table_name(column list)--如果不提供字段列表,下面的值列表需要提供每個字段的值,即使可以為空或有默認值
 3 values 
 4 (value list),
 5 (value list),
 6 ....
 7 --方式二
 8 insert into table_name
 9 select ...
10 --從其他查詢獲取數(shù)據(jù),并插入表,數(shù)據(jù)必須符合表的約束

  B:update 更新

1 --方式一
2 update table_name
3 set col=newValue
4 where ...--如果不提供過濾條件,則更新表中所有的列
5 --方式二
6 update table_name
7 set (column list)=
8 (select ...)
9 --通過子查詢更新表,如果只更新一列,則可以省略column list 的括號,需要注意子查詢的字段順序需要和更新的字段順序一致

  C:delete

1 --方式一
2 delete from table_name
3 where ...--如果不提供過濾條件,則會刪除所有記錄

  

  5,序列

  Oracle 中沒有 SQL Server 中 identity() 標識函數(shù),也沒有 MySQL 中 auto_increnent 這樣的選項來實現(xiàn)自增的列。但 Oracle 提供了更有用的“序列”。類似一個封裝好的函數(shù),每次執(zhí)行會返回一個按指定步長增長或減小的數(shù)字。常用來為表設置自增的主鍵。

1 create sequence seq_name
2 increment by n --自增的步長,(省略該選項則)默認為1,負數(shù)表示遞減
3 start with n --序列的初始值,默認為1
4 max value n | nomaxvalue --指定最大值或沒有最大值(無限增長)
5 min value n  | nominvalue --指定最小值或沒有最小值(無限減小)
6 cycle | nocycle --規(guī)定設置的序列到達最大或最小時是否從開頭循環(huán)
7 cache n | nocache --規(guī)定是否在內存中緩存序列值,以改善性能

  通常情況下,我們只需要指定初始值,最大值和循環(huán)三項,即可創(chuàng)建一個序列。

1 create sequence my_seq
2 start with 1
3 nomaxvalue
4 nocycle;

  序列也是 Oracle 數(shù)據(jù)庫對象之一,序列有兩個常用的屬性:nextval、currval。

1 select my_seq.nextval from dual;--獲取下一個序列值
2 select my_seq.currval from dual;--查看當前序列值
3 --在插入數(shù)據(jù)是使用序列
4 insert into table_name
5 values
6 (my_seq.nextval,...)
7 --使用循環(huán)批量插入時非常方便

  我們可以為每個表創(chuàng)建單獨的序列,從而為每個表提供沒有間隙(無刪除數(shù)據(jù)或回滾等操作干擾)的自增字段作為主鍵。

  修改和刪除序列:

1 alter sequence seq_name
2 ...
3 --為了保證主鍵的變化有相同的規(guī)律可循,一般不建議修改已創(chuàng)建的序列
4 drop sequence seq_name

 

三  Oracle 內置函數(shù)

 

  1,字符串函數(shù)

 1 --把二進制轉換成字符
 2 select CHR(0101) from dual;
 3 --連接字符串
 4 select concat(111,'aaa') from dual;
 5 select 111 || 'aaa' from dual;
 6 --首字母大寫
 7 select INITCAP('char') from dual;
 8 --全大/小寫轉換
 9 select lower('ABC'),upper('abc') from dual;
10 --左/右填充
11 select lpad('aa',5,'*'),rpad('aa',5,'*') from dual;
12 --刪除字符串左/右指定字符(第二個參數(shù)中包含的字符都會被刪除)
13 select ltrim('aaa123aaa','1a'),rtrim('aa123aa','a') from dual;
14 --刪除左右空格
15 select trim('  aaa  ') from dual;
16 --從左邊開始刪除指定字符(單個),可選參數(shù)還包括:trailing(從右邊開始),both(兩邊一起)
17 select trim(leading 'a' from 'aa123aa') from dual;
18 --從指定位置開始截取指定長度的字符串
19 select substr('abcdefg',2,3) from dual;
20 --字符替換(第二個參數(shù)中包含的字符都會被替換)
21 select translate('11aa22aa11', 'a2', 'bb') from dual;
22 --替換 NULL 值
23 select nvl(NULL,'aha') from dual;

  

  2,數(shù)學函數(shù)

 1 --絕對值
 2 select abs(-123) from dual;
 3 --向上取整
 4 select ceil(1.2),ceil(-1.2) from dual;
 5 --向下取整
 6 select floor(1.8),floor(-1.8) from dual;
 7 --返回自然常數(shù) e 的 n 次方
 8 select exp(5) from dual;
 9 --返回以第一個參數(shù)為底的第二個參數(shù)的對數(shù)
10 select log(3,10) from dual;
11 --求模,如果第二個參數(shù)為0,則返回第一個參數(shù)
12 select mod(10,3) from dual;
13 --返回第一個參數(shù)的第二個參數(shù)次方
14 select power(2,3) from dual;
15 --保留指定小數(shù)位,最后一位小數(shù)四舍五入得來
16 select round(1.2345,3) from dual;
17 --保留指定小數(shù)位,其余直接截斷
18 select trunc(1.2345,3) from dual;
19 
20 --格式化數(shù)字(格式位數(shù)應該與數(shù)字位數(shù)相同)
21 
22 --用0格式化時,如果數(shù)字位數(shù)不夠,結果會用0補齊位數(shù)
23 select to_char(123456789000,'000,000,000,000,000') from dual;
24 --用9格式化時,如果數(shù)字位數(shù)不夠,結果會用空格補齊位數(shù)
25 select to_char(123456789000,'999,999,999,999,999') from dual;
26 --使用fm格式化小數(shù)
27 select to_char(123456.258,'fm999,999,999.99') from dual;
28 --使用 $(美元) 或 L(當?shù)兀?添加貨幣符號
29 select to_char(123.456,'L999.999') from dual;
30 /* 注意貨幣符號和小數(shù)不能一起使用 */

 

  3,時間和日期函數(shù)

 1 --返回操作系統(tǒng)日期
 2 select sysdate from dual;
 3 --返回日期部分
 4 select current_date from dual;
 5 --返回日期+時間
 6 select current_timestamp from dual;
 7 --返回操作系統(tǒng)日期—+時間(包含時區(qū)信息)
 8 select systimestamp from dual;
 9 --按格式化日期為字符串
10 select to_char(sysdate,'YYYY-MM-DD HH:MM:SS') from dual;
11 --把字符串表示的日期轉換成日期類型的值返回(前后格式需保持一致)
12 select to_date('2020-05-28 17:02:00','YYYY-MM-DD HH24:MI:SS') from dual;
13 --把字符串表示的日期轉換成日期 + 時間類型的值返回(前后格式需保持一致)
14 select to_timestamp('2020-05-28 17:02:00','YYYY-MM-DD HH24:MI:SS') from dual;
15 --返回指定日期后幾個月的日期
16 select add_months(sysdate,1) from dual;
17 --返回兩個日期間間隔月數(shù)(注意正負)
18 select months_between(sysdate,to_date('2020-07-01','YYYY-MM-DD')) from dual;
19 --把日期按指定精度截斷,可選參數(shù)有yyyy(精確到年,返回當年的第一天的日期),mm(精確到月,返回當月第一天的日期),rr(精確到日,返回當天的日期)
20 select trunc(sysdate,'mm') from dual;
21 
22 /* ----------------------日期可選格式--------------------- */
23 TO_CHAR(sysdate, 'DD-MON-YYYY HH24:MI:SS')
24 TO_CHAR(sysdate, 'DD-MON-YYYY HH12:MI:SS PM')
25 TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS.FF')
26 TO_CHAR(sysdate, 'DY, DD-MON-YYYY')
27 TO_CHAR(sysdate,'Month DDth, YYYY') 
28 TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS TZH:TZM')
29 TO_CHAR(sysdate, 'MM/DD/YYYY HH24:MI:SS')
30 TO_CHAR(sysdate, 'MM/DD/YY HH24:MI:SS')
31 TO_CHAR(sysdate, 'MM/DD/RRRR HH12:MI:SS PM')
32 TO_CHAR(sysdate, 'MM/DD/RR HH12:MI:SS PM')

 

  4,聚合函數(shù)

 1 --計算行數(shù)(不計算空值)
 2 select count(*) from emp;--根據(jù)所有列計算
 3 select count(comm) from emp;--根據(jù)某一列計算(注意該列是否有空值)
 4 select count(distinct deptno) from emp;--計算deptno中不同值的個數(shù)
 5 --計算列的最大/小值
 6 select max(sal),min(sal) from emp;
 7 --返回中間值
 8 select median(sal) from emp;
 9 --返回標準差
10 select stddev(sal) from emp;
11 --求和
12 select sum(sal) from emp;
13 --計算方差
14 select variance(sal) from emp;
15 --偽列 rownum,每條數(shù)據(jù)的序號
16 select rownum,empno,ename,sal from emp;

 

四  變量和類型

 

  1,PL/SQL 基礎

  如果想通過 PL/SQL 程序輸出內容,需要先執(zhí)行以下命令,以打開輸出功能,否則即使 PL/SQL 程序正常執(zhí)行,也不會有任何信息輸出。

1 set serveroutput on--可以不需要語句結束標記';',這是開發(fā)工具的命令
2 dbms_output.enable;--這是 Pl/SQL 提供的

  PL/SQL 程序由不同的 block(程序塊)組成,塊是 PL/SQL 程序的基本組成單位,塊又可以分為匿名塊和命名塊。

  一個完整的 PL/SQL 程序一般包含 3 部分:declare(聲明),execution code(執(zhí)行代碼,即業(yè)務邏輯代碼),exception(異常處理),聲明和異常處理不是必須的。

1 declare
2 --... 包括變量、游標等
3 begin
4 --... 業(yè)務代碼
5 exception
6 --... 異常處理
7 end;

  讓我們來看一個最簡單的 PL/SQL 程序:

1 --注意,PL/SQL業(yè)務代碼必須運行在 begin...end 中
2 begin
3 dbms_output.put_line('hello world');
4 end;
5 --沒有聲明和異常部分

  塊與塊之間可以相互嵌套,PL/SQL 中程序塊可以限制變量的作用域(變量的作用域問題稍后的章節(jié)將會詳細講解),另外,使用<<name>>為塊命名可以讓整個程序可讀性更好:

1 <<outer>>--oracle 11g 不允許給最外層塊命名
2 begin
3 dbms_output.put_line('outer block');
4   <<inner>>
5   begin
6   dbms_output.put_line('inner block');
7   end;
8 end;

  

  2,變量

  PL/SQL 中的變量在 declare 區(qū)域聲明,不需要額外的標識符,只需要提供變量名和值類型即可。

1 declare
2   v_name emp.ename%type;--通過動態(tài)獲取表中列的數(shù)據(jù)類型,來確定變量的數(shù)據(jù)類型
3   v_job  varchar(50);--直接指定具體的數(shù)據(jù)類型
4 begin
5   v_name:='&name';--通過:=為變量賦值
6 end;

  &name,這種形式是 SQL Developer 工具提供的一種變量形式:替換變量,在執(zhí)行程序時,你可以手動指定變量的值,提升程序的交互性,測試程序時非常有用。需要注意的是,它并不是 PL/SQL 提供的功能,當使用 & 標識變量時,每次執(zhí)行該程序都需要提供值,如果使用 && 標識,則只需要在第一次執(zhí)行時提供,后續(xù)執(zhí)行都默認為第一次提供的值。

  給變量賦值除了通過 := 的方式,還可以使用 select...into 的方式,直接從查詢中獲取值并賦給變量。

1 declare
2     v_job emp.job%type;
3 begin
4     select job into v_job from emp where ename=v_name;--通過select...into 為變量賦值
5     dbms_output.put_line(v_job);--輸出變量值
6 end;

  

  3,記錄類型

  當有多個邏輯相關的變量需要聲明時,我們可以使用記錄類型來封裝他們,封裝好這個東西就是記錄類型(record)。

 1 declare
 2   type emp_record is record(--這里相當于定義了一種新的數(shù)據(jù)類型,類型名稱是emp_record,和varcahr,int等類型一樣
 3   v_name emp.ename%type,
 4   v_job emp.job%type,
 5   v_sal emp.sal%type
 6   );
 7   --記錄類型類似其他編程語言中的類
 8   v_emp_record emp_record;--聲明一個emp_record類型的變量,相當于創(chuàng)建一個類的實例
 9 begin
10   select ename,job,sal into v_emp_record from emp where ename='ALLEN';--注意查詢的順序必須和記錄類型中定義的順序一致
11   dbms_output.put_line(v_emp_record.v_name||' '||v_emp_record.v_job||' '||v_emp_record.v_sal);
12   --通過實例訪問相關屬性
13 end;

  %rowtype:

1 declare
2   v_emp_record emp%rowtype;--聲明一個包含指定表中所有列的rowtype變量,使用上和記錄類型完全一致,但它本質上并不是記錄類型
3 begin
4   select * into v_emp_record from emp where ename='ALLEN';--把所有的列都查詢出來賦值給該變量
5   dbms_output.put_line(v_emp_record.ename||' '||v_emp_record.sal);
6   --該變量中的屬性和表的列名完全一致,可以根據(jù)需要,只使用部分數(shù)據(jù)
7 end;

  

  4,集合

  集合類似其他編程語言中的數(shù)組,也可以通過下標來訪問數(shù)據(jù)。

  如果把它和記錄類型、變量相比教,你會發(fā)現(xiàn),標量標量是用來處理單行單列數(shù)據(jù)的,記錄類型適合處理單行多列的數(shù)據(jù),而集合則是用來處理單列多行數(shù)據(jù)的。

  Oracle 提供了三種類型的集合:索引表(又稱關聯(lián)數(shù)組)、嵌套表、可變長度數(shù)組。

  索引表可以通過數(shù)字或字符串來作為下標存儲數(shù)據(jù),下標可以不連續(xù),索引表的容量即是數(shù)字的最大值,但它只能存儲在內存中。

1 declare
2   type idx_table is table of varchar(20) index by pls_integer;--創(chuàng)建索引表類型
3   -- index by 后可選的參數(shù)有pls_integer、binary_integer、varcahr(size)和使用%type 指定的varchar2類型
4   v_idx_table idx_table;--聲明索引表類型的變量
5 begin
6   v_idx_table(1):='hello';--插入值
7   v_idx_table(2):='world';
8   dbms_output.put_line(v_idx_table(1)||' '||v_idx_table(2));
9 end;

  嵌套表只能使用數(shù)字作為下標,數(shù)字必須是有序的,嵌套表的容量沒有限制,可以保存到數(shù)據(jù)庫中。

 1 declare 
 2   type nest_table is table of varchar(20);--創(chuàng)建嵌套表類型
 3   v_nest_table nest_table:=nest_table('x');--聲明嵌套表類型的變量并初始化
 4   --未初始化的嵌套表類型實際上是一個null,如果試圖為其賦值會報錯。初始化就是調用一個和創(chuàng)建的嵌套表類型同名的函數(shù),
 5   --函數(shù)的參數(shù)值類型需要和嵌套表類型定義的存儲值類型(of 后的類型)相同,并且參數(shù)的個數(shù)默認就是這個嵌套表類型變量的初始容量
 6 begin
 7   v_nest_table.extend(5);--擴充嵌套表類型變量的容量
 8   --如果要增加嵌套表的容量,需要調用extend方法(該方法將在稍后詳細說明)
 9   v_nest_table(1):='hello';--插入值
10   v_nest_table(2):='world';
11   dbms_output.put_line(v_nest_table(1)||' '||v_nest_table(2));
12   dbms_output.put_line(nvl(v_nest_table(3),'it is null'));--沒被使用的位置為null
13 end;

  可變長度數(shù)組和嵌套表類似,都只能使用有序的數(shù)字作為下標,可變數(shù)組在定義時必須指定容量,但在運行時可以手動的擴充其容量,所以,可變數(shù)組的真實容量也可以是無限的,可變數(shù)組也可以存儲到數(shù)據(jù)庫中。

 1 declare
 2   type varr is varray(5) of int;--創(chuàng)建可變數(shù)組類型
 3   v_varr varr:=varr();--聲明可變數(shù)組類型的變量并初始化
 4   --和嵌套表一樣的原因,必須初始化
 5 begin
 6   for i in 1..5 loop--循環(huán)插入值
 7     v_varr.extend();
 8     v_varr(i):=i;
 9     end loop; dbms_output.put_line(v_varr(1)||','||v_varr(2)||','||v_varr(3)||','||v_varr(4)||','||v_varr(5));
10 end;

  嵌套表和可變數(shù)組能存入數(shù)據(jù)庫是指:他們可以和普通數(shù)據(jù)類型一樣,用來定義表的列。

 1 --第一步,創(chuàng)建一個保存在數(shù)據(jù)庫中的嵌套表類型
 2 create or replace type nest is table of varchar(20);
 3 --第二步,創(chuàng)建一個帶有嵌套表類型列的數(shù)據(jù)表
 4 create table x(
 5   x_id int, 
 6   x_nest nest
 7 )nested table x_nest store as y;--使用nest table 指定這是一個包含嵌套表類型值的數(shù)據(jù)表,并通過 store as 創(chuàng)建一個關聯(lián)表來專門存儲嵌套表
 8 --插入一條數(shù)據(jù)(包含初始化的嵌套表類型值)
 9 insert into x values(1,nest('x','y','z'));
10 --第三步,在PL/SQL中讀取嵌套表類型的值(多行操作使用游標)。數(shù)據(jù)表并沒有直接存儲嵌套表,所以不能直接使用select查詢,而應該在PL/SQL程序塊中查詢
11 declare
12   v_nest nest;
13 begin
14   select x_nest into v_nest from x;
15   for i in 1..3 loop
16     dbms_output.put_line(v_nest(i));
17   end loop;
18 end;

  把可變長度數(shù)組存放到數(shù)據(jù)庫就不需要使用 nested table 和 store as 指定相關信息,而且可以直接使用 select 查詢存儲了可變長度數(shù)組的數(shù)據(jù)表。所以,通常的建議是,當只是臨時使用集合,那么索引表是最好的選擇,如果需要把集合存入數(shù)據(jù)庫,可變數(shù)組更操作起來更簡單。

  

  5,集合常用方法

  集合的方法通過“.”點的形式調用:集合.方法。

1 集合.exists(n)--判斷是否存在某個集合的值
2 集合.count--統(tǒng)計集合中值的個數(shù)
3 集合.limit--查詢集合容量(長度)
4 集合.first/集合.last--集合中第一個/最后一個值的索引
5 集合.prior(n)/集合.nest(n)--指定索引位置前一個/下一個值的索引(一般用在索引表中,因為其下標可能不連續(xù))
6 集合.extend/集合.extend(n)--為集合增加1個/n個容量(一般用在嵌套表和可變數(shù)組中)
7 集合.trim/集合.trim(n)--從集合末尾刪除1個/n個元素(一般用在嵌套表和可變數(shù)組中)
8 集合.delete/集合.delete(n)--從集合中刪除所有元素/第n個元素(一般用在索引表和嵌套表中)

   

  6,變量的作用域

 1 declare
 2  v1 int default 1;--外層塊變量v1
 3 begin
 4  dbms_output.put_line(v1);
 5  --dbms_output.put_line(v2);error 必須聲明v2
 6  declare
 7   v2 int default 2;---內層塊變量
 8   v1 int default 3;
 9  begin
10   dbms_output.put_line(v1);--返回3
11  end;
12 end;

  變量只在聲明的塊中起作用,內層塊可以訪問外層塊的變量,但外層塊無法訪問內層塊的變量,如果內外塊聲明的相同的變量,那么 PL/SQL 采用就近原則。

 

五  流程控制

  

  1,case

  case 語句有兩種語法,簡單 case 語法只做等值匹配,搜索 case 語法可以做區(qū)間匹配。

  先來看簡單 case 語法:

 1 declare
 2   v_sal int;
 3 begin
 4   select sal into v_sal from emp where empno=&empno;
 5   case v_sal
 6     when 800 then dbms_output.put_line('太少了吧');
 7     when 1600 then dbms_output.put_line('這還差不多');
 8     when 3000 then dbms_output.put_line('這樣更好');
 9     when 5000 then dbms_output.put_line('這樣最好');
10     else dbms_output.put_line('隨緣吧');
11     end case;
12 end;

  搜索 case 語法:

 1 begin
 2   select sal into v_sal from emp where empno=&empno;
 3   case 
 4     when v_sal<=1000 then dbms_output.put_line('太少了吧');
 5     when v_sal<=1600 then dbms_output.put_line('這還差不多');
 6     when v_sal<=3000 then dbms_output.put_line('這樣更好');
 7     when v_sal<=5000 then dbms_output.put_line('這樣最好');
 8     else dbms_output.put_line('隨緣吧');
 9     end case;
10 end;

  請仔細觀察兩種語法的區(qū)別。

  

  2,if...elsif...else

 1 declare
 2   v_sal int;
 3 begin
 4   select sal into v_sal from emp where empno=&empno;
 5   if v_sal>=5000
 6     then dbms_output.put_line('還有頭發(fā)嗎');
 7   elsif v_sal>=3000
 8     then dbms_output.put_line('還有一半嗎');
 9   else
10     dbms_output.put_line('好好珍惜頭發(fā)啊,少年');
11   end if;
12 end;

  請注意,PL/SQL 中的多分支結構 elsif 關鍵字與其他語言相比,少了一個字母 e,且 els 和 if 之間沒有空格。

  

  3,循環(huán)

  PL/SQL 提供了 3 種循環(huán):loop、while、for(集合部分已經(jīng)見過了)。

  在正式介紹循環(huán)之前,首先要介紹 PL/SQL 中的循環(huán)控制語句:exit,無條件結束整個循環(huán)(類似其他語言中的 break)。continue,結束本次循環(huán),繼續(xù)下一次循環(huán)。接下里讓我們通過例子來詳細說明每個循環(huán)的使用方法。

  loop 循環(huán):

 1 declare
 2   i int default 1;--定義,初始化循環(huán)控制變量
 3 begin
 4   loop
 5     if i=5 then
 6       i:=i+1;
 7       continue;--當n等于5時,直接結束本次循環(huán),不輸出
 8     end if;
 9     dbms_output.put_line(i);
10     i:=i+1;--修改循環(huán)控制變量 
11     exit when i>10;--根據(jù)循環(huán)控制比變量,判斷是否退出循環(huán)
12   end loop;--結束循環(huán)
13 end;

  while 循環(huán):

1 declare
2   i int default 1;--定義,初始化循環(huán)控制變量
3 begin
4   while i<=10 loop--根據(jù)循環(huán)控制變量,判斷是否進入循環(huán)體
5     dbms_output.put_line(i);--循環(huán)體
6     i:=i+1;--修改循環(huán)控制變量
7   end loop;--結束循環(huán)
8 end;

  for 循環(huán):

1 begin
2   --在for循環(huán)中,初始化循環(huán)控制變量,只需指明變量名即可,類型系統(tǒng)默認為數(shù)字,min..max指明控制變量的變化范圍,從min開始,到max結束
3   for i in reverse 1..10 loop--i可以被循環(huán)體引用,但不能被賦值
4   dbms_output.put_line(i);--循環(huán)體
5   --注意,因為初始化循環(huán)變量時已經(jīng)指定了變化范圍,這相當于限定了循環(huán)條件,當變量從min變化到max時將自動結束循環(huán)
6   end loop;  --結束循環(huán)
7   --最后說明,reverse是可選的參數(shù),表示循環(huán)變量從max開始,到min結束
8 end;

  

  4,雜項

  這里要介紹兩個東西,null 語句(不是null 值)和 goto 語句。null 語句表示什么也不做,goto 可以無條件跳轉到程序指定位置。

1 begin
2   if ... then
3     ...
4   else
5     null;--什么也不做,但使整個語句塊更豐滿,可讀性更高
6   end if;
7 end;
 1 declare
 2   i int:=0;
 3 begin
 4   <<outer>>--定義一個標簽
 5   i:=i+1;
 6   dbms_output.put_line(i);
 7   if i<10 then
 8     goto outer;--通過goto實現(xiàn)類似循環(huán)的結構
 9   else
10     null;--通過使用null讓語句塊更易讀
11   end if;
12 end;

  使用 goto 語句會破壞程序常規(guī)的執(zhí)行流程,它是有別于順序、分支、循壞的另一種執(zhí)行流程,如無特別需求,建議不要使用。

 

六  異常處理

  

  1,異常簡介

  無論何時何地何人,在編程的領域,總是無法避開異常。為了保證程序的健壯性,多數(shù)語言都提供了異常處理機制,PL/SQL 也不例外。

  在 PL/SQL 中,異常大致可分為兩大類:

    編譯時錯誤:程序在編寫過程中的錯誤,例如語法錯誤,訪問不存在的對象等,這類錯誤在編譯時 PL/SQL 引擎就會發(fā)現(xiàn),并通知用戶。

    執(zhí)行時錯誤:這類錯誤會順利通過程序的編譯環(huán)節(jié),只能等到執(zhí)行時才能被發(fā)現(xiàn),比如除數(shù)是 0 。這類錯誤也是最要命的。

  

  2,異常處理語法

  我們知道,PL/SQL 程序分為三個部分:聲明區(qū),執(zhí)行區(qū),異常處理區(qū)。基本的異常處理也包含此三個步驟:

    A:在定義區(qū),定義異常。

    B:在執(zhí)行區(qū),觸發(fā)異常。

    C:只要執(zhí)行區(qū)觸發(fā)了異常,那么執(zhí)行區(qū)后續(xù)的業(yè)務代碼都會立即停止執(zhí)行,執(zhí)行流程跳轉至異常處理區(qū)。

 1 declare
 2     異常變量名 exception;
 3 begin
 4     ...
 5     raise 異常變量名;
 6     ...
 7     exception
 8       when 異常變量名
 9         then ...
10 end;

  如果有多個異常,可以定義多個變量,并在合適的時候觸發(fā)他們,并在異常處理區(qū)通過多個 when...then 來捕獲他們,并執(zhí)行特定操作。

  

  3,預定義異常

  大多數(shù)編譯時的異常,Oracle 都在內部隱式的定義好了,并且不需要在執(zhí)行區(qū)手動的觸發(fā),這類異常的處理最為簡單:

declare
    v_tmp varchar(10);
begin
    v_tmp:='超過10字節(jié)的長度了';
    exception
        when value_error
        then
            dbms_output.put_line('出現(xiàn)value_error錯誤!' || '錯誤編號:'|| sqlcode || '錯誤名稱' || sqlerrm);
end;

  PL/SQL 中出現(xiàn)的錯誤,都一個錯誤號,一個錯誤編碼(sqlcode),一個錯誤名稱(sqlerrm)。在錯誤處理區(qū)通過在 when 后面指定錯誤名稱,既可捕獲到指定錯誤了。常見的預定義錯誤如下:

錯誤號 異常編碼 異常名稱 描述
ora-01012 -1017 not_logged_on 在沒有連接數(shù)據(jù)庫時訪問數(shù)據(jù)
ora-01403 100 no_date_found select...into沒有返回值
ora-01422 -1422 too_many_rows select...into結果集超過一行
ora-01476 -1476 zero_divide 除數(shù)為0
ora-01722 -1722 invalid_number 字符串和數(shù)字相加時,字符串轉換失敗
ora-06502 -6502 value-error 賦值時,變量長度不足
ora-06530 -6530 access_into_null 向null值對象賦值
ora-06592 -06592 case_not_found case語句中沒有任何匹配的值并且沒有else選項

  更多預定義異常請查詢 Oracle 11g 《Oracle 在線文檔》

  

  4,自定義錯誤

 1 declare
 2   e_nocomm exception;--定義一個異常名稱
 3   v_comm number(10,2);
 4 begin
 5   select comm into v_comm from emp where empno=&empno;
 6   if v_comm is null
 7     then raise e_nocomm;--觸發(fā)自定義異常
 8   end if;
 9   exception
10     when e_nocomm--捕獲自定義異常
11       then dbms_output.put_lne('該員工沒有提成');
12     when others--捕獲未定義的錯誤
13       then dbms_output.put_line('未知錯誤 !');
14 end;

  同一個塊中不能同時聲明一個異常多次,但不同的塊中可以定義相同的異常,在各自的塊中使用不會相互影響。

 

七  編程對象

  

  1,事務

  在 SQL Server 中,每一條 DML 語句都是一個隱式的事務,除非顯示的開始一個事務,否則,這些語句執(zhí)行完就立即向數(shù)據(jù)庫提交了這些更改。而在 Oracle 中,每一條 SQL 語句開始都會自動開啟一個事務,除非顯示的使用 commit 提交,或退出某個開發(fā)工具而斷開連接,才會提交到數(shù)據(jù)庫,否則這些操作都只會保存在內存中。

 1 --在Oracle SQL Developer中
 2 begin
 3   insert into dept values(88,'開發(fā)部','cd');
 4   savepoint a;--設置保存點a
 5   insert into dept values(88,'設計部','cd');
 6   exception
 7     when dup_val_on_index then
 8     dbms_output.put_line('插入出錯');
 9     rollback to a;--回滾到a
10 end;
11 --這里我們人為的制造了一個違反唯一約束的插入操作,在錯誤區(qū)捕獲該錯誤,然后回滾到保存點a
12 select * from dept;--只能查詢到開發(fā)部被插入
1 /* 在 SQL*Plus 中 */
2 SQL>select * from dept;
3 /* 連開發(fā)部都沒有被插入 */ 
1 -- 在 Oracle SQL Developer中
2 commit;
3 --現(xiàn)在插入已經(jīng)被提交到數(shù)據(jù)庫,在SQL*Plus 中也可以查詢到了

  在多個事務并發(fā)執(zhí)行時,大概率會發(fā)生:一個事務讀取到另一個事務還未提交的數(shù)據(jù)(臟讀);一個事務中不同時間點執(zhí)行的同一個查詢,由于其他事務對涉及的數(shù)據(jù)進行了修改或刪除(不可重復讀)或插入(幻讀),而導致出現(xiàn)不一樣的結果。

  為了解決這樣的問題,Oracle 允許對事務設立隔離級別:

1 begin
2   commit;
3   set transaction read only;--只讀的事務
4   --settransaction read write;--可讀寫的事務
5   --set transaction isolation level [serializable | read commited];
6   --serializable:整個事務只能讀到當前事務開始前就以提交的數(shù)據(jù)
7   --read commited:當前事務中的查詢,只能讀到該查詢前以提交的數(shù)據(jù)(不是整個事務,而是該查詢語句。這也是 Oracle 默認的隔離級別)
8 end;

  由于一個事務中有且只能存在一條 set transaction 語句,且必須是事務的第一條語句,所以通常先使用 commit 結束前一個事務(理論上rollback也可以),以保證該語句是事務的第一條語句。

  

  2,子程序

  Oracle 中子程序事實上就是 SQL Server 中對存儲過程和用戶自定義函數(shù)的總稱。過程和函數(shù)本質上是一個命名塊,可以被存儲在數(shù)據(jù)庫中,并在合適的時候調用,這樣可以解決代碼重用的問題,并且由于它是已編譯好的代碼,所以執(zhí)行起來也更快。

  過程和函數(shù)相比,過程不會返回值,常用來做數(shù)據(jù)的增刪改。而函數(shù)必須有返回值,通常用來向應用程序返回值。其他方面,過程和函數(shù)幾無區(qū)別。

  存儲過程:

1 --無參過程
2 create or replace procedure p2 as
3 begin
4   dbms_output.put_line('hello world');
5 end p2;
6 --or replace:如果存在則替換存儲過程,建議使用
7 --p1:過程名
8 --as:不能省略,也可以用is代替
9 --end p2:創(chuàng)建完成時也要跟上過程名
 1 --帶參數(shù)的過程
 2 create or replace procedure p2(p_deptno in int)--使用括號添加過程需要的形參
 3 as
 4   v_empcount number;--定義過程中需要使用的變量,只需指定數(shù)據(jù)類型,不能添加類型所占字節(jié)長度
 5 begin
 6   select count(ename) into v_empcount from emp where deptno=p_deptno;
 7   if v_empcount>0 then
 8     dbms_output.put_line('有人');
 9   else
10     dbms_output.put_line('沒人');
11   end if;
12 end p2;--不要忘了過程名
1 --調用存儲過程
2 begin
3   p2(20);--通過()傳遞實參
4 end;
5 --call p2(20);

  函數(shù):

 1 --創(chuàng)建函數(shù)
 2 create or replace function f1
 3 return number--需要指定返回值類型,不需要長度
 4 as
 5 begin
 6   return 1;--需要使用return指定返回值
 7 end f1;
 8 --調用函數(shù)
 9 declare 
10   v_f1 number(10);
11 begin
12   v_f1:=f1();--調用函數(shù),并把返回值賦值給變量
13   dbms_output.put_line(v_f1);
14 end;

  在上面帶參數(shù)存儲過程中,指定形參時使用關鍵字 in,該關鍵字表示參數(shù)的模式是輸入型,可選的還有 out 輸出型,in out 輸入輸出型。如果不提供,默認是輸入型參數(shù)。

  in 模式的參數(shù)被用作輸入?yún)?shù),在過程內部只能被訪問,不能被賦值。

  out  模式的參數(shù)被當做輸出參數(shù)使用,在過程內部可以被賦值,不能訪問。使用 out 類型參數(shù)時,必須在過程外部定義一個變量,用于接收過程在內部需要輸出的值,然后在調用子程序時把該變量當做形參傳入。待過程執(zhí)行完畢,直接訪問外部定義的這個變量即可得到過程希望輸出的值了。

  in out 模式的參數(shù)既可以被當做輸入?yún)?shù),也可以被當做輸出參數(shù)。使用方式和 out 型參數(shù)一致,但可以給這個變量一個初始化值,一并傳入過程內部。out 型參數(shù)即使傳入了初始值,也會被過程忽略。

  過程的參數(shù)模式和 MySQL 完全一致,例子可以參考我的《MySQL 編程》。函數(shù)本身就需要使用 return 返回值,所以不使用 in 或 out 指定參數(shù)模式,這樣毫無意義。

  

  3,觸發(fā)器

  Oracle 中的觸發(fā)器本質上也是一個命名的語句塊,定義的方式和 PL/SQL 語句塊差不多,但它和過程或函數(shù)不同,它只能被隱式的調用。并且不能接受任何參數(shù)。

  定義觸發(fā)器的語法:

1 create or replace trigger trigger_name--觸發(fā)器名稱
2 [before | after | instead of]--在事件之前還是之后執(zhí)行觸發(fā)器中的代碼
3 trigger_event--觸發(fā)事件
4 [referenceing_caluse]--通過新的名稱引用當前正在更新的數(shù)據(jù)
5 [when trigger_condition]--指定觸發(fā)條件
6 [for each row]--指定行級觸發(fā)器(每一條記錄都觸發(fā)一次)
7 trigger_body--觸發(fā)體(程序塊)

  一個簡單例子:

 1 create test(--創(chuàng)建測試表
 2     id int primary key,
 3     name varchar(20)
 4 )
 5 create or replace trigger t_test--創(chuàng)建觸發(fā)器
 6 after insert or update or delete--觸發(fā)操作(也可以是其中一種)
 7 on test--在表test上
 8 for each row--行級觸發(fā)器
 9 begin
10     if inserting then--在插入數(shù)據(jù)時
11         dbms_output.put_line('插入了數(shù)據(jù),name:'||:new.name);
12     end if;
13     if updating then--在更新數(shù)據(jù)時
14         dbms_output.put_line('更新了數(shù)據(jù),oldname:'||:old.name||',newname:'||:new.name);
15     end if;
16     if deleting then--在刪除數(shù)據(jù)時
17         dbms_output.put_line('刪除了數(shù)據(jù),name:'||:old.name);
18     end if;
19 end;

  謂詞:new 表示引用新的數(shù)據(jù)(更新后或插入的數(shù)據(jù)),:old 引用舊的數(shù)據(jù)(被刪除的或更新前的數(shù)據(jù))。可以在創(chuàng)建觸發(fā)器時通過 referencing(操作類型之后,for each row 之前) 指定新的謂詞。

1 ...
2 referencing old as test_old new as test_new
3 ...
4 --下面通過:test_old 引用修改前的數(shù)據(jù),:test_new引用修改后的數(shù)據(jù)

  測試代碼:

1 insert into test values(1,'r');
2 update test set name='e' where id=1;
3 delete from test where id=1;
4 --注意觀察輸出結果

  

  4,游標

  Oracle 中的游標用來處理多行多列的數(shù)據(jù)集合,包含四個步驟:定義,打開,遍歷,關閉。游標的語法如下:

1 cursor cursor_name [形參]--形參可以用來在where子句中限定游標記錄
2 [return type]--可選的指定游標返回的值類型
3 is query--通過is指定查詢(在這里使用形參)
4 [for update[of column_list]]--允許在游標中修改表中的數(shù)據(jù),并在游標打開期間鎖定選中的記錄

  下面是一個通過游標遍歷輸出 dept 部門信息的例子:

 1 declare
 2     deptrow dept%rowtype;--定義一個存儲記錄的變量
 3     cursor dept_cur is--通過cursor定義游標,is指定需要遍歷的結果集(一個查詢語句)
 4     select * from dept;
 5 begin
 6     open dept_cur;--打開游標
 7     loop--通過循環(huán)遍歷游標中的記錄
 8         fetch dept_cur into deptrow;--通過fetch提取游標中記錄(每次一條)賦值給變量
 9         dbms_output.put_line(deptrow.deptno||':'||deptrow.dname);
10         exit when dept_cur%notfound;--通過%notfound判斷游標中是否還有記錄
11     end loop;
12     close dept_cur;--關閉游標
13 end;

  游標除了 %notfound 還有以下常用的的屬性:

1 cursor%isopen;--檢測游標是否已打開,打開返回ture,否則返回false
2 cursor%found;--檢測是否提取到值,提取到返回true,否者返回false
3 cursor%notfound;--與%found相反
4 cursor%rowcount;--統(tǒng)計到目前為止已提取的記錄數(shù)

  PL/SQL 中的三種循環(huán)都可以用來循環(huán)遍歷游標中的記錄,while 和 loop 相似,這里不再舉例,for 循環(huán)專門對遍歷游標做了強化,工作中使用最多,也最方便:

1 delcare
2     cursor dept_cur is
3     select * from dept;
4 begin
5     for dept_row in dept_cur loop
6         dbms_output.put_line(deptrow.deptno||':'||deptrow.dname);
7     end loop;
8 end;

  dept_row 不需要顯式的聲明為記錄類型,PL/SQL 引擎自動隱式的聲明為 %rowtype。for 循環(huán)開始,自動打開游標,并自動提取記錄,然后賦值給dept_row,不用顯式的使用 fetch 提取記錄,循環(huán)完畢自動關閉游標并退出循環(huán)。

  

  5,包

  Oracle 中包(package)是一個工程化和面向對象的概念,它就像一個容器或命名空間,把邏輯相關的變量、類型、子程序或異常等組合起來一起存放,形成一個有序的組織單元或模塊,當我們編寫大型的復雜的應用程序時,我們就可以通過包來方便的歸類和管理各個功能模塊。

  完整的包由包規(guī)范和包體組成,但 Oracle 分開編譯的存儲包規(guī)范和包體,這又使得我們可以脫離包體使用包規(guī)范(反向不行)。包規(guī)范中主要是一些定義信息(也可以看成是 PL/SQL 提供的 API),比如記錄類型、變量、游標、異常和子程序的聲明。包體則負責實現(xiàn)包規(guī)范中定義的子程序。

  包規(guī)范簡單應用:

 1 create or replace package pkg1--創(chuàng)建包規(guī)范
 2 as
 3   i int := 1;--標量變量
 4   dept_record dept%rowtype;--rowtype類型
 5   type dept_tab is table of varchar(20) index by pls_integer;--集合類型
 6 end pkg1;
 7 
 8 declare
 9   mydept pkg1.dept_tab;--創(chuàng)建一個包中集合類型的變量(通過"包.內容"的方式訪問包中的內容)
10 begin
11   select * into pkg1.dept_record from dept where deptno=10;--給包中定義的rowtype類型變量賦值
12   dbms_output.put_line(pkg1.dept_record.dname);--訪問包中的rowtype類型變量
13   dbms_output.put_line('-------------------------------------------');--分割線
14   for deptrow in (select * from dept) loop--使用游標給包中的集合賦值
15     mydept(pkg1.i) := deptrow.dname;
16     pkg1.i := pkg1.i+1;--修改包中的標量變量
17   end loop;
18   for j in 1..mydept.count loop--使用循環(huán)訪問集合
19     dbms_output.put_line(mydept(j));
20   end loop;
21   pkg1.i := 1;--初始化包中的標量變量(防止下一次游標讀取不到數(shù)據(jù))
22 end;

   在這個例子中,我們只創(chuàng)建了包規(guī)范,沒有包體,并且在包中定義了標量變量,rowtype類型(記錄類型同理),集合這些基本的數(shù)據(jù)類型,然后在 PL/SQL 程序塊中使用了他們。

  包規(guī)范中只有聲明,沒有具體的實現(xiàn),事實上,包規(guī)范中的聲明的內容是公共的,對于一個方案來說,相當于一個全局的對象,在包內任何地方都能訪問他們。包規(guī)范和包體分別進行獨立的編譯和存儲,所以沒有包體,上訴例子任然能正常運行。

  另一個例子:

 1 create or replace package pkg2--創(chuàng)建包規(guī)范
 2 as
 3   cursor dept_cur return dept%rowtype;--定義游標類型
 4   procedure dept_ins(p_deptno int,p_dname varchar);--定義存儲過程
 5   function f2 return varchar;--定義函數(shù)
 6 end pkg2;
 7 
 8 create or replace package body pkg2--創(chuàng)建包體
 9 as
10   cursor dept_cur return dept%rowtype--創(chuàng)建游標
11   is
12     select * from dept;
13   procedure dept_ins(p_deptno in int,p_dname in varchar)--創(chuàng)建存儲過程
14   as
15   begin
16     insert into dept(deptno,dname) values(p_deptno,p_dname);
17     dbms_output.put_line('新增了部門:'|| p_deptno||','||p_dname);
18   end dept_ins;
19   function f2 return varchar--創(chuàng)建函數(shù)
20   is
21   begin
22     return '這是個函數(shù)';
23   end f2;
24 end pkg2;
25 
26 
27 begin
28   for deptrow in pkg2.dept_cur loop--讀取游標
29     dbms_output.put_line(deptrow.dname);
30   end loop;
31   pkg2.dept_ins(99,'TI');--執(zhí)行存儲過程
32   dbms_output.put_line(pkg2.f2());--執(zhí)行函數(shù)
33 end;

  上面的例子在包體中定義了游標,存儲過程和函數(shù),并且在包規(guī)范中也聲明了他們,這時候,存儲過程和函數(shù)、游標都是公開的了,如果在包體中創(chuàng)建的內容并未在包規(guī)范中定義,那么我們說,這些內容是包私有的,不能在其他地方調用,而只能在包體內部使用。

  合理的使用包,有助于我們進行模塊化的程序開發(fā);把邏輯相關的東西放在一個包中進行開發(fā)和管理,可以使我們的程序更加規(guī)范化;把一些重要的東西定義成包的私有內容,可以大大加強數(shù)據(jù)的安全性;另外,由于在使用包時, PL/SQL 會把整個包都加載到內存中,所以還可以提高程序運行效率。

    本站是提供個人知識管理的網(wǎng)絡存儲空間,所有內容均由用戶發(fā)布,不代表本站觀點。請注意甄別內容中的聯(lián)系方式、誘導購買等信息,謹防詐騙。如發(fā)現(xiàn)有害或侵權內容,請點擊一鍵舉報。
    轉藏 分享 獻花(0

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多

    丰满人妻熟妇乱又乱精品古代| 欧美在线观看视频免费不卡| 日本人妻熟女一区二区三区| 欧洲一区二区三区蜜桃| 国产亚州欧美一区二区| 自拍偷女厕所拍偷区亚洲综合| 午夜福利黄片免费观看| 少妇被粗大进猛进出处故事| 国产肥妇一区二区熟女精品| 国产又粗又深又猛又爽又黄| 国产一级二级三级观看| 亚洲欧美精品伊人久久| 久久午夜福利精品日韩| 日韩精品毛片视频免费看| 亚洲专区中文字幕在线| 老外那个很粗大做起来很爽| 偷拍洗澡一区二区三区| 欧美日韩少妇精品专区性色| 超碰在线免费公开中国黄片| 国产91麻豆精品成人区| 亚洲国产av在线观看一区| 中文字幕佐山爱一区二区免费| 国产亚洲系列91精品| 精品香蕉一区二区在线| 国产精品蜜桃久久一区二区| 欧美日韩高清不卡在线播放| 欧美一区日韩一区日韩一区| 俄罗斯胖女人性生活视频| 中文字幕一区二区熟女| 极品少妇一区二区三区精品视频| 人妻精品一区二区三区视频免精| 国产精品亚洲欧美一区麻豆| 国产成人精品一区二区在线看| 久久热中文字幕在线视频| 韩国日本欧美国产三级 | 欧美激情一区=区三区| 91人妻丝袜一区二区三区| 午夜精品一区二区三区国产| 亚洲综合一区二区三区在线| 精品国产成人av一区二区三区| 九九热在线视频观看最新|