原則一:注意WHERE子句中的連接順序:
ORACLE采用自下而上的順序解析WHERE子句,根據這個原理,表之間的連接必須寫在其他WHERE條件之前, 那些可以過濾掉最大數量記錄的條件必須寫在WHERE子句的末尾.
尤其是“主鍵ID=?”這樣的條件。
原則二: SELECT子句中避免使用 ‘ * ‘:
ORACLE在解析的過程中, 會將'*' 依次轉換成所有的列名, 這個工作是通過查詢數據字典完成的, 這意味著將耗費更多的時間 。
簡單地講,語句執行的時間越短越好(尤其對于系統的終端用戶來說)。而對于查詢語句,由于全表掃描讀取的數據多,尤其是對于大型表不僅查詢速度慢,而且對磁盤IO造成大的壓力,通常都要避免,而避免的方式通常是使用索引Index。
使用索引的優勢與代價。
優勢:
1)索引是表的一個概念部
分,用來提高檢索數據的效率,ORACLE使用了一個復雜的自平衡B-tree結構. 通常,通過索引查詢數據比全表掃描要快.
當ORACLE找出執行查詢和Update語句的最佳路徑時, ORACLE優化器將使用索引. 同樣在聯結多個表時使用索引也可以提高效率.
2) 另一個使用索引的好處是,它提供了主鍵(primary key)的唯一性驗證.。那些LONG或LONG RAW數據類型, 你可以索引幾乎所有的列. 通常, 在大型表中使用索引特別有效. 當然,你也會發現, 在掃描小表時,使用索引同樣能提高效率.
代價:
雖然使用索引能得到查詢效率的提高,但是我們也必須注意到它的代價. 索引需要空間來存儲,也需要定期維護, 每當有記錄在表中增減或索引列被修改時,
索引本身也會被修改. 這意味著每條記錄的INSERT , DELETE , UPDATE將為此多付出4 , 5 次的磁盤I/O .
因為索引需要額外的存儲空間和處理,那些不必要的索引反而會 使查詢反應時間變慢.。而且表越大,影響越嚴重。
使用索引需要注意的地方:
1、避免在索引列上使用NOT ,
我們要避免在索引列上使用NOT, NOT會產生在和在索引列上使用函數相同的影響. 當ORACLE”遇到”NOT,他就會停止使用索引轉而執行全表掃描.
2、避免在索引列上使用計算.
WHERE子句中,如果索引列是函數的一部分.優化器將不使用索引而使用全表掃描. 舉例:
第一章、
開發成功的Oracle應用程序
? You should do it in a single SQL
statement if at all possible.
? If you cannot do it in a single
SQL Statement, then do it in PL/SQL.
? If you cannot do it in PL/SQL, try
a Java Stored Procedure.
? If you cannot do it in Java, do it in a
C external procedure.
? If you cannot do it in a C external
routine, you might want to seriously think about why it is you need to do it...
SQL中一些注意
1、不要在MTS下運行長事務
2、使用綁定變量
理解并行控制
1、鎖
? Oracle locks
data at the row level on modification only. There is no lock escalation to a
block
or table
level, ever.
? Oracle never
locks data just to read it. There are no locks placed on rows of data by simple
reads.
? A writer of
data does not block a reader of data. Let me repeat – reads are not
blocked by
writes. This is fundamentally different from almost every other
database, where reads are
blocked by
writes.
? A writer of
data is blocked only when another writer of data has already locked the row it
was
going after. A
reader of data never blocks a writer of data.
所以實際應用時候,注意改變鎖的級別!!!
2、多版本
主要針對寫操作時候,對讀操作不阻塞
具體來說: (R-read W-write)
R/R 不上鎖,但是如果兩個線程先讀再修改,則需要加SS鎖(for update)
R/W W/R 多版本控制,不阻塞讀
W/W 使用SX鎖,阻塞任何DML操作
DML鎖分類表 Select
for update、Lock for update、Lock row share Insert、
Update、Delete、Lock row share Alter
table、Drop able、Drop index、Truncate table 、Lock exclusive
表1 Oracle的TM鎖類型
鎖模式
鎖描述
解釋
SQL操作
0
none
1
NULL
空
Select
2
SS(Row-S)
行級共享鎖,其他對象只能查詢這些數據行
3
SX(Row-X)
行級排它鎖,在提交前不允許做DML操作
4
S(Share)
共享鎖
Create index、Lock share
5
SSX(S/Row-X)
共享行級排它鎖
Lock share row exclusive
6
X(Exclusive)
排它鎖
數據庫是一個多用戶使用的共享資源。當多個用戶并發地存取數據時,在數據庫中就會產生多個事務同時存取同一數據的情況。若對并發
操作不加控制就可能會讀取和存儲不正確的數據,破壞數據庫的一致性。
加鎖是實現數據庫并發控制的一個非常重要的技術。當事務在對某個數據對象進行操作前,先向系統發出請求,對其加鎖。加鎖后事務就對該數據對象有了一定的控
制,在該事務釋放鎖之前,其他的事務不能對此數據對象進行更新操作。
在數據庫中有兩種基本的鎖類型:排它鎖(Exclusive Locks,即X鎖)和共享鎖(Share
Locks,即S鎖)。當數據對象被加上排它鎖時,其他的事務不能對它讀取和修改。加了共享鎖的數據對象可以被其他事務讀取,但不能修改。數據庫利用這兩
種基本的鎖類型來對數據庫的事務進行并發控制。
Oracle數據庫的鎖類型
根據保護的對象不同,Oracle數據庫鎖可以分為以下幾大類:DML鎖(data
locks,數據鎖),用于保護數據的完整性;DDL鎖(dictionary
locks,字典鎖),用于保護數據庫對象的結構,如表、索引等的結構定義;內部鎖和閂(internal locks and latches),保護
數據庫的內部結構。
DML鎖的目的在于保證并發情況下的數據完整性,。在Oracle數據庫中,DML鎖主要包括TM鎖和
TX鎖,其中TM鎖稱為表級鎖,TX鎖稱為事務鎖或行級鎖。
當Oracle 執行DML語句時,系統自動在所要操作的表上申請TM類型的鎖。當TM鎖獲得后,
系統再自動申請TX類型的鎖,并將實際鎖定的數據行的鎖標志位進行置位。這樣在事務加鎖前檢查TX鎖相容性時就不用再逐行檢查鎖標志,而只需檢查TM
鎖模式的相容性即可,大大提高了系統的效率。TM鎖包括了SS、SX、S、X
等多種模式,在數據庫中用0-6來表示。不同的SQL操作產生不同類型的TM鎖。
在數據行上只有X鎖(排他鎖)。在 Oracle數據庫中,當一個事務首次發起一個DML語句時就獲得一個TX鎖,該鎖保持到
事務被提交或回滾。當兩個或多個會話在表的同一條記錄上執行
DML語句時,第一個會話在該條記錄上加鎖,其他的會話處于等待狀態。當第一個會話提交后,TX鎖被釋放,其他會話才可以加鎖。
當Oracle數據庫發生TX鎖等待時,如果不及時處理常常會引起Oracle數據庫掛起,或導致
死鎖的發生,產生ORA-60的錯誤。這些現象都會對實際應用產生極大的危害,如長時間未響應,大量事務失敗等。
悲觀封鎖和樂觀封鎖
一、悲觀封鎖
鎖在用戶修改之前就發揮作用:
Select ..for update(nowait)
Select * from tab1 for update
用戶發出這條命令之后,oracle將會對返回集中的數據建立行級封鎖,以防止其他用戶的修改。
如果此時其他用戶對上面返回結果集的數據進行dml或ddl操作都會返回一個錯誤信息或發生阻塞。
1:對返回結果集進行update或delete操作會發生阻塞。
2:對該表進行ddl操作將會報:Ora-00054:resource busy and acquire with nowait
specified.
原因分析
此時Oracle已經對返回的結果集上加了排它的行級鎖,所有其他對這些數據進行的修改或刪除操作都必須等待這個鎖的釋放,產
生的外在現象就是其他的操作將發生阻塞,這個這個操作commit或rollback.
同樣這個查詢的事務將會對該表加表級鎖,不允許對該表的任何ddl操作,否則將會報出ora-00054錯誤::resource busy and
acquire with nowait specified.
二、樂觀封鎖
樂觀的認為數據在select出來到update進取并提交的這段時間數據不會被更改。這里面有一種潛在的危險就是由于被選出的結果集并沒有被鎖定,是存
在一種可能被其他用戶更改的可能。因此Oracle仍然建議是用悲觀封鎖,因為這樣會更安全。
阻塞
定義:
當一個會話保持另一個會話正在請求的資源上的鎖定時,就會發生阻塞。被阻塞的會話將一直掛起,直到持有鎖的會話放棄鎖定的資源為止。4個常見的dml語句
會產生阻塞
INSERT
UPDATE
DELETE
SELECT…FOR UPDATE
INSERT
Insert發生阻塞的唯一情況就是用戶擁有一個建有主鍵約束的表。當2個的會話同時試圖向表中插入相同的數據時,其中的一個會話將被阻塞,直到另外一個
會話提交或會滾。一個會話提交時,另一個會話將收到主鍵重復的錯誤。回滾時,被阻塞的會話將繼續執行。
UPDATE 和DELETE當執行Update和delete操作的數據行已經被另外的會話鎖定時,將會發生阻塞,直到另一個會話提交或會滾。
Select …for update
當一個用戶發出select..for
update的錯作準備對返回的結果集進行修改時,如果結果集已經被另一個會話鎖定,就是發生阻塞。需要等另一個會話結束之后才可繼續執行。可以通過發出
select… for update
nowait的語句來避免發生阻塞,如果資源已經被另一個會話鎖定,則會返回以下錯誤:Ora-00054:resource busy and
acquire with nowait specified.
死鎖-deadlock
定義:當兩個用戶希望持有對方的資源時就會發生死鎖.
即兩個用戶互相等待對方釋放資源時,oracle認定為產生了死鎖,在這種情況下,將以犧牲一個用戶作為代價,另一個用戶繼續
執行,犧牲的用戶的事務將回滾.
例子:
1:用戶1對A表進行Update,沒有提交。
2:用戶2對B表進行Update,沒有提交。
此時雙反不存在資源共享的問題。
3:如果用戶2此時對A表作update,則會發生阻塞,需要等到用戶一的事物結束。
4:如果此時用戶1又對B表作update,則產生死鎖。此時Oracle會選擇其中一個用戶進行會滾,使另一個用戶繼續執行
操作。
起因:
Oracle的死鎖問題實際上很少見,如果發生,基本上都是不正確的程序設計造成的,經過調整后,基本上都會避免死鎖的發生。
DML鎖分類表
表1 Oracle的TM鎖類型 | |||
鎖模式 | 鎖描述 | 解釋 | SQL操作 |
0 | none | |
|
1 | NULL | 空 | Select |
2 | SS(Row-S) | 行級共享鎖,其他對象只能查詢這些數據行 |
Select for update、Lock for update、Lock row share |
3 | SX(Row-X) | 行級排它鎖,在提交前不允許做DML操作 |
Insert、 Update、Delete、Lock row share |
4 | S(Share) | 共享鎖 | Create index、Lock share |
5 | SSX(S/Row-X) | 共享行級排它鎖 | Lock share row exclusive |
6 | X(Exclusive) | 排它鎖 |
Alter table、Drop able、Drop index、Truncate table 、Lock exclusive |
設立封鎖機制主要是為了對并發操作進行控制,對干擾進行封鎖,保證數據的一致性和準確性。Oracle數據庫封鎖方式有三種:共享封鎖,獨占封鎖,共享更
新封鎖
封鎖類型
Oracle RDBMS的封鎖類型可分為如下三類:
1、內部級封鎖
內部級封鎖是用于保護ORACLE內部結構,由
2、DDL級封鎖(字典/語法分析封鎖)
DDL級封鎖也是由ORACLE RDBMS來控制,它用于保護數據字典和數據定義改變時的一致性和完整性。它是系統在對SQL定義語句作語法分析時自動
地加鎖,無需用戶干予。字典/語法分析封鎖共分三類:
(1)、字典操作鎖:用于對字典操作時,鎖住數據字典,此封鎖是獨占的,從而保護任何一個時刻僅能對一個字典操作。
(2)、字典定義鎖:用于防止在進行字典操作時又進行語法分析,這樣可以避免在查詢字典的同時改動某個表的結構。
(3)、表定義鎖:用于 一個SQL語句正當訪問某個表時,防止字典中與該表有關的項目被修改。
3、DML級封鎖
DML級封鎖用于控制并發事務中的數據操縱,保證數據的一致性和完整性,其封鎖對象可以是表或行。
對用戶的數據操縱,Oracle可以自動為操縱的數據進行封鎖,但如果有操縱授權,則為滿足并發操縱的需要另外實施封鎖。DML封鎖可由一個用戶進程以顯
式的方式加鎖,也可通過某些 SQL語句隱含方式實現。
DML鎖有如下三種封鎖方式:
(1)、共享封鎖方式(SHARE)
(2)、獨占封鎖方式(EXCLUSIVE)
(3)、共享更新封鎖(SHARE UPDATE)
其中SHARE,EXCLUSIVE用于表封鎖,SHARE UPDATE用于行封鎖。
1、共享方式的表封鎖
共享方式的表封鎖是對表中的所有數據進行封鎖,該鎖用于保護查詢數據的一致性,防止其它用戶對已封鎖的表進行更更新。其它用戶只能對該表再施加共享方式的
鎖,而不能再對該表施加獨占方式的封鎖,共享更新鎖可以再施加,但不允許持有共享更新封鎖的進程做更新。共享該表的所有用戶只能查詢表中的數據,但不能更
新。共享方式的表封鎖只能由用戶用SQL語句來設置,基語句格式如下:
[quote:04b72348bd]LOCK TABLE <表名>[,<表名>]...
IN SHARE MODE [NOWAIT]
[/quote:04b72348bd]
執行該語句,對一個或多個表施加共享方式的表封鎖。當指定了選擇項NOWAIT,若該封鎖暫時不能施加成功,則返回并由用戶決定是進行等待,還是先去執行
別的語句。
持有共享鎖的事務,在出現如下之一的條件時,便
A、執行COMMIT或ROLLBACK語句。
B、退出數據庫(LOG OFF)。
C、程序停止運行。
共享方式表封鎖常用于一致性查詢過程,即在查詢數據期間表中的數據不發生改變。
2、獨占方式表封鎖
獨占方式表封鎖是用于封鎖表中的所有數據,擁有該獨占方式表封鎖的用戶,即可以查詢該表,又可以更新該表,其它的用戶不能再對該表施加任何封鎖(包括共
享、獨占或共享更新封鎖)。其它用戶雖然不能更新該表,但可以查詢該表。
獨占方式的表封鎖可通過如下的SQL語句來顯示地獲得:
LOCK TABLE <表名>[,<表名>]....
IN EXCLUSIVE MODE [NOWAIT]
獨占方式的表封鎖也可以在用戶執行DML語句INSERT、UPDATE、DELETE時隱含獲得。
擁有獨占方式表封鎖的事務,在出現如下條件之一時,便釋放該封鎖:
(1)、執行COMMIT或ROLLBACK語句。
(2)、退出數據庫(LOG OFF)
(3)、程序停止運行。
獨占方式封鎖通常用于更新數據,當某個更新事務涉及多個表時,可減少發生死鎖。
DML鎖有如下三種封鎖方式:
(1)、共享封鎖方式(SHARE)
(2)、獨占封鎖方式(EXCLUSIVE)
(3)、共享更新封鎖(SHARE UPDATE)
其中SHARE,EXCLUSIVE用于表封鎖,SHARE UPDATE用于行封鎖。
1、共享方式的表封鎖
共享方式的表封鎖是對表中的所有數據進行封鎖,該鎖用于保護查詢數據的一致性,防止其它用戶對已封鎖的表進行更更新。其它用戶只能對該表再施加共享方式的
鎖,而不能再對該表施加獨占方式的封鎖,共享更新鎖可以再施加,但不允許持有共享更新封鎖的進程做更新。共享該表的所有用戶只能查詢表中的數據,但不能更
新。共享方式的表封鎖只能由用戶用SQL語句來設置,基語句格式如下:
[quote:04b72348bd]LOCK TABLE <表名>[,<表名>]...
IN SHARE MODE [NOWAIT]
[/quote:04b72348bd]
執行該語句,對一個或多個表施加共享方式的表封鎖。當指定了選擇項NOWAIT,若該封鎖暫時不能施加成功,則返回并由用戶決定是進行等待,還是先去執行
別的語句。
持有共享鎖的事務,在出現如下之一的條件時,便釋放其共享鎖:
A、執行COMMIT或ROLLBACK語句。
B、退出數據庫(LOG OFF)。
C、程序停止運行。
共享方式表封鎖常用于一致性查詢過程,即在查詢數據期間表中的數據不發生改變。
2、獨占方式表封鎖
獨占方式表封鎖是用于封鎖表中的所有數據,擁有該獨占方式表封鎖的用戶,即可以查詢該表,又可以更新該表,其它的用戶不能再對該表施加任何封鎖(包括共
享、獨占或共享更新封鎖)。其它用戶雖然不能更新該表,但可以查詢該表。
獨占方式的表封鎖可通過如下的SQL語句來顯示地獲得:
LOCK TABLE <表名>[,<表名>]....
IN EXCLUSIVE MODE [NOWAIT]
獨占方式的表封鎖也可以在用戶執行DML語句INSERT、UPDATE、DELETE時隱含獲得。
擁有獨占方式表封鎖的事務,在出現如下條件之一時,便釋放該封鎖: <BR>(1)、執行 COMMIT或ROLLBACK語句。
(2)、退出數據庫(LOG OFF)
(3)、程序停止運行。
獨占方式封鎖通常用于更新數據,當某個更新事務涉及多個表時,可減少發生死鎖。
3、共享更新封鎖方式
共享更新封鎖是對一個表的一行或多行進行封鎖,因而也稱作行級封鎖。表級封鎖雖然保證了數據的一致性,但卻減弱了操作數據的并行性。行級封鎖確保在用戶取
得被更新的行到該行進行更新這段時間內不被其它用戶所修改。因而行級鎖即可保證數據的一致性又能提高數據操作的迸發性。
可通過如下的兩種方式來獲得行級封鎖:
(1)、執行如下的SQL封鎖語句,以顯示的方式獲得:
LOCK TABLE <表名>[,<表名>]....
IN SHARE UPDATE MODE [NOWAIT]
(2)、用如下的SELECT ...FOR UPDATE語句獲得:
SELECT <列名>[,<列名>]...
FROM <表名>
WHERE <條件>
FOR UPDATE OF <列名>[,<列名>].....[NOWAIT]
一旦用戶對某個行施加了行級封鎖,則該用戶可以查詢也可以更新被封鎖的數據行,其它用戶只能查詢但不能更新被封鎖的數據行.如果其它用戶想更新該表中的數
據行,則也必須對該表施加行級鎖.即使多個用戶對一個表均使用了共享更新,但也不允許兩個事務同時對一個表進行更新,真正對表進行更新時,是以獨占方式封
鎖表,一直到提交或復原該事務為止。行鎖永遠是獨占方式鎖。
當出現如下之一的條件,便釋放共享更新鎖:
(1)、執行提交(COMMIT)語句;
(2)、退出數據庫(LOG OFF)
(3)、程序停止運行。
執行ROLLBACK操作不能釋放行鎖。
從上面講述可見,ORACLE RDBMS的加鎖機制,解決了并發事務的相容與互斥問題。相容保證事務的并發性,互斥確保數據的一致性。不同用戶鎖的相容
與互斥關系由下圖給出。
其中最后一行最后一列為其它用戶提供在不同行上設置SHARE
UPDATE鎖。但當用戶1在某行上進行更新操作時,用戶2只有等待用戶1提交事務后,才能更新自己所封鎖的行。
中最后一行最后一列為其它用戶提供在不同行上設置SHARE
UPDATE鎖。但當用戶1在某行上進行更新操作時,用戶2只有等待用戶1提交事務后,才能更新自己所封鎖的行。
死鎖
封鎖雖然能夠有效的解決并發操作,但是任何資源的獨占都會有死鎖的危險。例如:有兩個事務T1,T2,T1對數據A施加獨占封鎖,T2對數據B施加了獨占
封鎖。再假設T1要對數據B加鎖,由于B已被T2獨占封鎖,因此T1置于等待狀態,等待B被釋放;現在若T2也要對A進行封鎖,由于A已被T1獨占封鎖,
因此T2也被置于等待狀態。這樣就形成了兩個事務相互等待的狀態,而且永遠不能結束,此種情況稱為死鎖。
在Oracle系統中能自動發現死鎖,并選擇代價最小的,即完成
從系統性能上考慮,應該盡可能減少資源競爭,增大吞吐量,因此用戶在給并發操作加鎖時,應注意以下幾點:
1、對于UPDATE和DELETE操作,應只封鎖要做改動的行,在完成修改后立即提交。
2、當多個事務正利用共享更新的方式進行更新,則不要使用共享封鎖,而應采用共享更新封鎖,這樣其它用戶就能使用行級鎖,以增加并行性。
3、盡可能將對一個表的操作的并發事務施加共享更新鎖,從而可提高并行性。
4、在
user和schema的區別:
說穿了其實user是控制權限的,而schema是個容器,非所有者要訪問這個容器下的對象就需要在
對象前面寫上schema(owner)的名字,如果不想寫而又沒有創建synonym,此時可以通過
alter session set current_schema=schema_name
來改變當前session的schema從而在訪問對象時省去schema(owner);
最終能否訪問對象還是要看是否有訪問這個對象的權限而和schema無關。
--下面的話是puber OoNiceDream 發上來的一段非常經典形象的比喻。
user即oracle中的用戶,和所有系統的中用戶概念類似,用戶所持有的是系統的權限及資源;
而schema所涵蓋的是各種對象,它包含了表、函數、包等等對象的“所在地”,并不包括對他們的權限控制。
好比一個房子,里面放滿了家具,對這些家具有支配權的是房子的主人(user),而不是房子(schema)。
你可以也是一個房子的主人(user),擁有自己的房子(schema)。可以通過alter session的方式進入別人的房子。
這個時候,你可以看到別人房子里的家具(desc)。
如果你沒有特別指定的話,你所做的操作都是針對你當前所在房子中的東西。
至于你是否有權限使用(select)、搬動(update)或者拿走(delete)這些家具就看這個房子的主人有沒有給你這樣的權限了,
或者你是真個大廈(DB)的老大(DBA)。alter session set schema可以用來代替synonyms。
如果你想調用其他schema的對象(有權限的前提下),又沒建synonym,有不想把其他schema名字放如代碼中,
就可以先alter session set schema=<其他schema名字>。
一.準備修改。首先必須用sys連接。
1.修改sys密碼.用其他dba權限的賬戶登陸后輸入:alter user sys identified by 新密碼;
2.連接剛剛修改的sys(要在登陸狀態下),CONNECT SYS/密碼 as sysdba;
二.開始修改:
SQL> shutdown immediate;
SQL> startup mount;
SQL> alter system enable restricted session;
SQL> alter system set job_queue_processes=0;
SQL> alter database open;
SQL> alter database character set internal_use UTF-8;
SQL> shutdown immediate;
SQL> startup
注意:如果沒有大對象,在使用過程中進行語言轉換沒有什么影響,具體過程如下(切記設定的字符集必須是ORACLE支持,不然不能start)
1.使用sys登錄Oracle,利用dbms_xdb修改端口設置
? SQL> -- Change the HTTP/WEBDAV port from 8080 to 8081
? SQL> call dbms_xdb.cfg_update(updateXML(
??? 2??????? dbms_xdb.cfg_get()
??? 3????? , '/xdbconfig/sysconfig/protocolconfig/httpconfig/http-port/text()'
??? 4????? , 8081))
??? 5? /
? Call completed.
? SQL> -- Change the FTP port from 2100 to 2111
? SQL> call dbms_xdb.cfg_update(updateXML(
??? 2???????? dbms_xdb.cfg_get()
??? 3?????? , '/xdbconfig/sysconfig/protocolconfig/ftpconfig/ftp-port/text()'
??? 4?????? , 2111))
??? 5? /
? Call completed.
? SQL> COMMIT;
? Commit complete.
? SQL> EXEC dbms_xdb.cfg_refresh;
? PL/SQL procedure successfully completed.
2.使用OEM console,選擇數據庫,XML Database,Configuration。更改XDB的有關設置。
3.去掉數據庫的初始化參數:? dispatchers='(PROTOCOL=TCP) (SERVICE=XDB)',將會禁止XDB的http和ftp服務
2.
insert into table_tmp
(select * from table1)
3.
update table_tmp
set (name,password) = (select name,password from table1)
4.
select tab_name from tables
where (tab_name,db_ver) =
(
select tab_name,db_ver from tab_columns
where version = 604
)
?REF CURSOR分兩種:Strong REF CURSOR 和 Weak REF CURSOR。
? Strong REF CURSOR:指定retrun type,CURSOR變量的類型必須和return type一致。
->>>DECLARE
???TYPE strongcurtyp IS REF CURSOR RETURN emp%ROWTYPE;
???emp_cv strongcurtyp;
?Weak REF CURSOR:不指定return type,能和任何類型的CURSOR變量匹配。
->>>DECLARE
???TYPE weakcurtyp IS REF CURSOR;
???weak_cv weakcurtyp;
???any_cv SYS_REFCURSOR; --使用SYS_REFCURSOR可以使變量any_cv跟任何weak REF CURSOR類型匹配。
?
(1)使用Strong REF CURSOR例子
CREATE OR REPLACE PACKAGE emp_data AS
?TYPE empcurtyp IS REF CURSOR RETURN emp%rowtype; --定義TYPE as Strong REF CURSOR
?PROCEDURE open_emp_cv(emp_cv IN OUT empcurtyp, choice INT); --根據不同的choice選擇不同的CURSOR
?PROCEDURE retrieve_data(choice INT); --通過調用procedure open_emp_cv,返回指定的結果集。
END emp_data;
CREATE OR REPLACE PACKAGE BODY emp_data AS
?------------procedure open_emp_cv-----------------------?
?PROCEDURE open_emp_cv(emp_cv IN OUT empcurtyp, choice INT) IS --emp_cv作為傳入/傳出的CURSOR PARAMETER
?BEGIN
??IF choice = 1 THEN
???OPEN emp_cv FOR
???SELECT * FROM emp WHERE empno < 7800;
??ELSIF choice = 2 THEN
???OPEN emp_cv FOR
???SELECT * FROM emp WHERE SAL < 1000;
??ELSIF choice = 3 THEN
???OPEN emp_cv FOR
???SELECT * FROM emp WHERE ename like 'J%';
??END IF;
?END;
?
?
?-----------procedure retrieve_data-----------------------?
?PROCEDURE retrieve_data(choice INT) IS
??return_cv empcurtyp; --定義傳入open_emp_cv的CURSOR變量
??return_row emp%ROWTYPE;
??invalid_choice EXCEPTION;
?BEGIN
??open_emp_cv(return_cv, choice); --調用 procedure OPEN_EMP_CV
?
??IF choice = 1 THEN
???DBMS_OUTPUT.PUT_LINE('EMPLOYEES with empno less than 7800');
??ELSIF choice = 2 THEN
???DBMS_OUTPUT.PUT_LINE('EMPLOYEES with salary less than 1000');
??ELSIF choice = 3 THEN
???DBMS_OUTPUT.PUT_LINE('EMPLOYEES with name starts with ''J''');
??ELSE
???RAISE invalid_choice;
??END IF;
?
??LOOP
??FETCH return_cv INTO return_row;
??EXIT WHEN return_cv%NOTFOUND;
??
???DBMS_OUTPUT.PUT_LINE(return_row.empno || '--' || return_row.ename || '--' || return_row.sal);
??END LOOP;
?
?EXCEPTION
??WHEN invalid_choice THEN
???DBMS_OUTPUT.PUT_LINE('The CHOICE should be in one of (1,2,3)!');
??WHEN OTHERS THEN
???DBMS_OUTPUT.PUT_LINE('Errors in procedure RETRIEVE_DATA!');
?END;
END emp_data;
================================
執行:
SQL> EXEC emp_data.retrieve_data(1);
EMPLOYEES with empno less than 7800
7369--SMITH--800
7499--ALLEN--1600
7521--WARD--1250
7566--JONES--2975
7654--MARTIN--1250
7698--BLAKE--2850
7782--CLARK--2450
7788--SCOTT--3000
PL/SQL procedure successfully completed
SQL> EXEC emp_data.retrieve_data(2);
EMPLOYEES with salary less than 1000
7369--SMITH--800
7900--JAMES--950
PL/SQL procedure successfully completed
SQL> EXEC emp_data.retrieve_data(3);
EMPLOYEES with name starts with 'J'
7566--JONES--2975
7900--JAMES--950
PL/SQL procedure successfully completed
SQL> EXEC emp_data.retrieve_data(34);
The CHOICE should be in one of (1,2,3)!
PL/SQL procedure successfully completed
(2)使用Weak REF CURSOR例子
-----------procedure open_cv----------------------------
create or replace procedure open_cv(choice IN INT, return_cv OUT SYS_REFCURSOR) is
--參數return_cv為weak REF CURSOR,利用SYS_CURSOR來定義
begin
?if choice = 1 then
??open return_cv for 'select * from emp';
?elsif choice = 2 then
??open return_cv for 'select * from dept';
?end if;
end open_cv;
-----------procedure retrieve_data----------------------------
create or replace procedure retrieve_data(choice IN INT) is
?emp_rec emp%rowtype;
?dept_rec dept%rowtype;
?return_cv SYS_REFCURSOR;
?invalid_choice exception;
begin
?if choice=1 then
??dbms_output.put_line('employee information');
??open_cv(1,return_cv); --調用procedure open_cv;
??loop
??fetch return_cv into emp_rec;
??exit when return_cv%notfound;
???dbms_output.put_line(emp_rec.empno||'-'||emp_rec.ename||'-'||emp_rec.sal);
??end loop;
?elsif choice=2 then
??dbms_output.put_line('department information');
??open_cv(2,return_cv);
??loop
??fetch return_cv into dept_rec;
??exit when return_cv%notfound;
???dbms_output.put_line(dept_rec.deptno||'-'||dept_rec.dname||'-'||dept_rec.loc);
??end loop;
?else
??raise invalid_choice;
?end if;
exception
?when invalid_choice then
??dbms_output.put_line('The CHOICE should be one of 1 and 2!');
?when others then
??dbms_output.put_line('Errors in procedure retrieve_data');
end retrieve_data;
-----------------------------------------------------------------
執行:
SQL> exec retrieve_data(1);
employee information
7369-SMITH-800
7499-ALLEN-1600
7521-WARD-1250
7566-JONES-2975
7654-MARTIN-1250
7698-BLAKE-2850
......
PL/SQL procedure successfully completed
SQL> exec retrieve_data(2);
department information
10-ACCOUNTING-NEW YORK
20-RESEARCH-DALLAS
30-SALES-CHICAGO
40-OPERATIONS-BOSTON
PL/SQL procedure successfully completed
?
(3)用REF CURSOR實現BULK功能
1. To speed up INSERT, UPDATE, and DELETE statements, enclose the SQL statement within a PL/SQL FORALL statement instead of a loop construct.
2. To speed up SELECT statements, include the BULK COLLECT INTO clause in the SELECT statement instead of using INTO.
?
SQL> create table tab2 as select empno ID, ename NAME, sal SALARY from emp where 1=2;
Table created
create or replace procedure REF_BULK is
?type empcurtyp is ref cursor;
?type idlist is table of emp.empno%type;
?type namelist is table of emp.ename%type;
?type sallist is table of emp.sal%type;
?
?emp_cv empcurtyp;
?ids idlist;
?names namelist;
?sals sallist;
?
?row_cnt number;
begin
?open emp_cv for
??select empno, ename, sal from emp;
??fetch emp_cv BULK COLLECT INTO ids, names, sals; --BULK COLLECT INTO instead of INTO
?close emp_cv;
?for i in ids.first .. ids.last loop
??dbms_output.put_line('id=' || ids(i) || ' name=' || names(i) || ' salary=' || sals(i));
?end loop;
?forall i in ids.first .. ids.last --FORALL instead of FOR ...LOOP
??insert into tab2 values (ids(i), names(i), sals(i));
?commit;
?select count(*) into row_cnt from tab2;
??dbms_output.put_line('-----------------------------------');
??dbms_output.put_line('The row number of tab2 is ' || row_cnt);
?end REF_BULK;
------------------------------------------------------------
執行:
SQL> exec ref_bulk;
id=7369 name=SMITH salary=800
id=7499 name=ALLEN salary=1600
id=7521 name=WARD salary=1250
id=7566 name=JONES salary=2975
id=7654 name=MARTIN salary=1250
id=7698 name=BLAKE salary=2850
id=7782 name=CLARK salary=2450
id=7788 name=SCOTT salary=3000
id=7839 name=KING salary=5000
id=7844 name=TURNER salary=1500
id=7876 name=ADAMS salary=1100
id=7900 name=JAMES salary=950
id=7902 name=FORD salary=3000
id=7934 name=MILLER salary=1300
-----------------------------------
The row number of tab2 is 14
PL/SQL procedure successfully completed
?
i、minus
這個方法因為用到了minus操作符,所以速度會受影響
select rownum,c1.* from (select t.* from carrier t where .... order by...) c1 where rownum <= 8
minus
select rownum,c2.* from (select t.* from carrier t where .... order by...) c2 where rownum <= 8
ii、select嵌套(3層)。
SELECT *
FROM (SELECT rownum rownumber, c.*
FROM (
select t.* from carrier t where .... order by .. .
) c
) cc
WHERE cc.rownumber > 8
and cc.rownumber <= 10