一、SQL PLUS
1 引言
SQL命令
以下17個(gè)是作為語(yǔ)句開(kāi)頭的關(guān)鍵字：
alter drop revoke
audit grant rollback*
commit* insert select
comment lock update
create noaudit validate
delete rename
這些命令必須以“;”結尾
帶*命令句尾不必加分號，并且不存入SQL緩存區。
SQL中沒(méi)有的SQL*PLUS命令
這些命令不存入SQL緩存區
@ define pause
# del quit
$ describe remark
/ disconnect run
accept document save
append edit set
break exit show
btitle get spool
change help sqlplus
clear host start
column input timing
compute list ttitle
connect newpage undefine
copy
---------
2 數據庫查詢(xún)
數據字典
TAB 用戶(hù)創(chuàng )建的所有基表、視圖和同義詞清單
DTAB 構成數據字典的所有表
COL 用戶(hù)創(chuàng )建的基表的所有列定義的清單
CATALOG 用戶(hù)可存取的所有基表清單
select * from tab;
describe命令 描述基表的結構信息
describe dept
select *
from emp;
select empno,ename,job
from emp;
select * from dept
order by deptno desc;
邏輯運算符
= !=或<> > >= < <=
in
between value1 and value2
like
%
_
in null
not
no in,is not null
謂詞in和not in
有哪些職員和分析員
select ename,job
from emp
where job in (‘clerk‘,‘a(chǎn)nalyst‘);
select ename,job
from emp
where job not in (‘clerk‘,‘a(chǎn)nalyst‘);
謂詞between和not between
哪些雇員的工資在2000和3000之間
select ename,job,sal from emp
where sal between 2000 and 3000;
select ename,job,sal from emp
where sal not between 2000 and 3000;
謂詞like,not like
select ename,deptno from emp
where ename like ‘S%‘;
(以字母S開(kāi)頭)
select ename,deptno from emp
where ename like ‘%K‘;
(以K結尾)
select ename,deptno from emp
where ename like ‘W___‘;
(以W開(kāi)頭，后面僅有三個(gè)字母)
select ename,job from emp
where job not like ‘sales%‘;
(哪些雇員的工種名不以sales開(kāi)頭)
謂詞is null,is not null
沒(méi)有獎金的雇員（即commision為null）
select ename,job from emp
where comm is null;
select ename,job from emp
where comm is not null;
多條件查詢(xún)
select ename,job
from emp
where deptno=20
and job!=‘clerk‘;
表達式
+ - * /
算術(shù)表達式
選擇獎金高于其工資的5%的雇員
select ename,sal,comm,comm/sal from emp
where comm>.05*sal
order by comm/sal desc;
日期型數據的運算
add two days to 6-Mar-87
6-Mar-87 + 2 = 8-Mar-87
add two hours to 6-Mar-87
6-Mar-87 + 2/24 = 6-Mar-87 and 2hrs
add 15 seconds to 6-Mar-87
6-Mar-87 + 15/(24*60*60) = 6-Mar-87 and 15 secs
列名的別名
select ename employee from emp
where deptno=10;
（別名：employee）
select ename,sal,comm,comm/sal "C/S RATIO" from emp
where comm>.05*sal
order by comm/sal desc;
SQL命令的編輯
list or l 顯示緩沖區的內容
list 4 顯示當前SQL命令的第4行，并把第4行作為當前行，在該行號后面有個(gè)*。
change or c 用新的內容替換原來(lái)在一行中第一次出現內容
SQL>c/(...)/(‘a(chǎn)nalyst‘)/
input or i 增加一行或多行
append or a 在一行后追加內容
del 刪除當前行 刪除SQL緩沖區中的當前行
run 顯示并運行SQL緩沖區中的命令
/ 運行SQL緩沖區中的命令
edit 把SQL緩沖區中的命令寫(xiě)到操作系統下的文本文件，
并調用操作系統提供的編輯器執行修改。
-------------
3 數據操縱
數據的插入
insert into dept
values (10,‘a(chǎn)ccounting‘,‘new york‘);
insert into dept (dname,deptno)
values (‘a(chǎn)ccounting‘,10);
從其它表中選擇插入數據
insert into emp (empno,ename,deptno)
select id,name,department
from old_emp
where department in(10,20,30,40);
使用參數
insert into dept
values(&deptno,&dname,&loc);
執行時(shí)，SQL/PLUS對每個(gè)參數將有提示用戶(hù)輸入
參數對應日期型或字符型數據時(shí)，可在參數上加引號，輸入時(shí)就可不用引號
insert into dept
values(&deptno,‘&dname‘,‘&loc‘);
插入空值（NULL）
insert into dept
values(50,‘education‘,null);
插入日期型數據
日期型數據缺省格式：DD-MON-YY
insert into emp
(empno,ename,hiredate)
values(7963,‘stone‘,‘07-APR-87‘);
系統時(shí)間：SYSDATE
insert into emp
(empno,ename,hiredate)
values(7600,‘kohn‘,SYSDATE);
數據更新
update emp
set job=‘manager‘
where ename=‘martin‘;
update emp
set job=‘market rep‘
where ename=‘salesman‘;
update emp
set deptno=40,job=‘market rep‘
where job=‘salesman‘;
數據刪除
delete emp
where empno=765;
更新的提交
commit
自動(dòng)提交方式
set autocommit on
如果狀態(tài)設為開(kāi)，則使用inesrt,update,delete會(huì )立即提交。
更新取消
rollback
兩次連續成功的commit之間的操作，稱(chēng)為一個(gè)事務(wù)
---------------
4 創(chuàng )建基表、視圖
創(chuàng )建基表
create table dept
(deptno number(2),
dname char(14),
loc char(13));
數據字典會(huì )自動(dòng)更新。
一個(gè)基表最多254列。
表名列名命名規則：
限制
第一個(gè)字符必須是字母，后面可任意（包括 $ # _ 但不能是逗號）。
名字不得超過(guò)30個(gè)字符。
唯一
某一用戶(hù)的基表名必須唯一，不能是ORACLE的保留字，同一基表的列名互不相同。
使用雙引號
如果表名用雙引號括起來(lái)，則可不滿(mǎn)足上述規則；
只有使用雙引號，才能區別大、小寫(xiě)；
命名時(shí)使用了雙引號，在以后的操作也必須使用雙引號。
數據類(lèi)型：
char(n) （不得超過(guò)240字符）
number(n,d)
date
long （最多65536字符）
raw （二進(jìn)制原始數據）
空值處理
有時(shí)要求列值不能為空
create table dept
(deptno number(2) not null,
dname char(14),
loc char(13));
在基表中增加一列
alter table dept
add (headcnt number(3));
修改已有列屬性
alter table dept
modify dname char(20);
注：只有當某列所有值都為空時(shí)，才能減小其列值寬度。
只有當某列所有值都為空時(shí)，才能改變其列值類(lèi)型。
只有當某列所有值都為不空時(shí)，才能定義該列為not null。
例：
alter table dept modify (loc char(12));
alter table dept modify loc char(12);
alter table dept modify (dname char(13),loc char(12));
創(chuàng )建視圖
create view managers as
select ename,job,sal
from emp
where job=‘manager‘;
為視圖列名取別名
create view mydept
(person,title,salary)
as select ename,job,sal
from emp
where deptno=10;
with check option選項
使用with check option，保證當對視圖插入或更新數據時(shí)，
該數據必須滿(mǎn)足視圖定義中select命令所指定的條件。
create view dept20 as
select ename,job,sal,deptno
from emp
where deptno=20
with check option;
在做下述操作時(shí)，會(huì )發(fā)生錯誤
update dept20
set deptno=30
where ename=‘ward‘;
基表、視圖的拷貝
create table emp2
as select * from emp;
基表、視圖的刪除
drop table 表名
drop view 視圖名
------------
5 SQL*PLUS報表功能
SQL*PLUS的一些基本格式命令
column deptno heading department
column ename heading name
column sal heading salary
column sal format $99,999.00
ttitle sample report for|hitech corp
btitle strictly confidential
break on deptno
compute sum of sal on deptno
run
表頭和表尾
ttitle sample report for|hitech corp
btitle right strictly confidential
“|”表示換行，結尾不必加分號
選項有三種：left right center
使用TTITLE，系統將自動(dòng)地在每頁(yè)的頂部顯示日期和頁(yè)號。
TTITLET和BTITLE命令有效，直至重新設置表頭或表尾，或退出SQL*PLUS。
下面命令使標題語(yǔ)句失效
TTITLE OFF
BTITLE OFF
列名
column命令定義用于顯示列名
若名字為一個(gè)單詞，不必加引號
column ename heading employee
column ename heading ‘employee|name‘
（|為換行）
取消欄定義
column ename clear
列的格式
column ename format A15
column sal format $9,999.99
column comm like sal
like子句，使得某一列的格式參照另一列格式，它拷貝列名及其格式
控制記錄顯示分組順序
break on deptno
（不顯示重復值）
select deptno,ename
from emp
order by deptno;
（ORDER BY子句用于控制BREAK）
顯示為
10 clark
niller
20 smith
scott
30 allen
blake
每次只有一個(gè)BREAK命令起作用，但一次可以在多個(gè)列上使用BREAK命令
break on 列名1 on 列名2
記錄分組
break on deptno skip 2
select deptno,ename
from emp
order by deptno;
每個(gè)deptno之間空兩行
clear break（取消BREAK命令）
break on page（每次從一新頁(yè)開(kāi)始）
break on report（每次從一新報表開(kāi)始）
break on page on report（聯(lián)合使用）
分組計算
break on deptno skip 2
compute sum of sal on deptno
計算每個(gè)部門(mén)的工資總和
skip子句使部門(mén)之間的信息分隔開(kāi)
其他計算命令
compute avg of sal on deptno（平均值）
count 非空值的總數
MAX 最大值
MIN 最小值
STD 標準偏差
VAR 協(xié)方差
NUMBER 行數
使compute命令失效
一旦定義了COMPUTE，則一直有效，直到
關(guān)閉COMPUTE（clear compute）
SQL/PLUS環(huán)境命令
show 選項
（顯示當前參數設置情況）
show all（顯示全部參數）
設置參數
set 選項 值或開(kāi)關(guān)
set autocommit on
SET命令包括
set autocommit {off|on|immediate}
（自動(dòng)提交，OFF缺?。?nbsp;
set echo {off|on}
（命令文件執行，是否在終端上顯示命令本身，OFF缺?。?nbsp;
set feedback {off|on}
（ON：查詢(xún)結束時(shí)，給出結果，記錄數的信息，缺??；
OFF：無(wú)查詢(xún)結果，記錄數的信息）
set heading {off|on}
（ON：列的頭標在報表上顯示，缺??；OFF：不在報表上顯示）
set linesize {n}
一行顯示的最大字符數，缺省為80
set pagesize {n}
每頁(yè)的行數，缺省是14
set pause {off|on|text}
（ON：當報表超過(guò)一頁(yè)時(shí)，每顯示一屏就暫停顯示，等待用戶(hù)打回車(chē)鍵，再接著(zhù)顯示；
OFF：頁(yè)與頁(yè)不停頓，缺??；text：頁(yè)與頁(yè)停頓，并向用戶(hù)提示信息）
SET BUFFER buffer
設置當頭的命令緩沖區，通常情況下，SQL命令緩沖區已為當前緩沖區。
由于SQL命令緩沖區只能存放一條SQL命令，
所以可用其它緩沖區來(lái)存放SQL命令和SQL*PLUS命令。
經(jīng)常用到的設置可放在login.sql文件中。
SET NULL
set null ‘no data‘
select ename,comm
from emp
where deptno=30;
把部門(mén)30中無(wú)傭金雇員的傭金顯示為“NO DATA”。
set null是SQL*PLUS命令，用它來(lái)標識空值（NULL），可以設置為任意字符串。
存盤(pán)命令SAVE
save 文件名
input
1 select empno,ename,job
2 from emp
3 where job=‘a(chǎn)nalyst‘
save research
目錄中會(huì )增加一個(gè)research.sql文件。
編輯命令EDIT
edit
EDIT編輯當前緩沖區中的內容。
編輯一個(gè)文件
edit research
調入命令GET
get research
把磁盤(pán)上的文件內容調入緩沖區，并顯示在屏幕上，文件名尾不必加.sql。
START命令
運行指定的文件
start research
輸出命令SPOOL
spool tryfile
不僅可以使查詢(xún)結果在屏幕上顯示，還可以使結果存入文件
停止向文件輸出
spool off
把查詢(xún)結果在打印機上輸出，先把它們存入一個(gè)文件中，
然后不必使用SPOOL OFF，而用：
spool out
SPOOL OUT關(guān)閉該文件并在系統缺省的打印機上輸出
制作報表舉例
edit tryfile
set echo off
set autocommit on
set pagesize 25
insert into emp (empno,ename,hiredate)
values(9999,‘geiger‘,sysdate);
insert into emp (empno,ename,deptno)
values(3333,‘samson‘,20);
spool new_emp
select * from emp
where deptno=20
or deptno is null
/
spool off
set autocommit off
用start命令執行這個(gè)文件
--------
6 函數
字符型函數
initcap(ename);將ename中每個(gè)詞的第一個(gè)字母改為大寫(xiě)。
如：jack smith--Jack Smith
length(ename);計算字符串的長(cháng)度。
substr(job,1,4);
其它
lower
upper
least 取出字符串列表中按字母排序排在最前面的一個(gè)串
greatest 取出字符串列表中按字母排序排在最后的一個(gè)串
日期函數
add_month(hiredate,5) 在雇傭時(shí)間上加5個(gè)月
month_between(sysdate,hiredate) 計算雇傭時(shí)間與系統時(shí)間之間相差的月數
next_day(hiredate,‘FRIDAY‘) 計算受雇日期之后的第一個(gè)星期五的日期
例
select ename,sal,next_day(sysdate,‘FRIDAY‘) as_of
from emp
where deptno=20;
（as_of是別名）
如果不用to_char函數，日期在ORACLE中的缺省格式是‘DD_MON_YY‘
to_char(date,date picture)
select ename,to_char(hiredate,‘Dy Mon dd,yyyy‘) hired
from emp
where deptno=10;
to_date(字符串,格式)
insert into emp(empno,ename,hiredate)
values(7999,‘a(chǎn)sms‘,to_date(‘070387083000‘,‘MMDDYYHHMISS‘));
日期型數據的格式
dd 12
dy fri
day friday
ddspth twelfth
mm 03
mon mar
month march
yy 87
yyyy 1987
例
Mar 12,1987 ‘Mon dd,yyyy‘
MAR 12,1987 ‘MON dd,yyyy‘
Thursday MARCH 12 ‘Day MONTH dd‘
Mar 12 11:00am ‘Mon dd hh:miam‘
Thu,the twelfth ‘Dy,"the"ddspth‘
算術(shù)函數
least(v1,v2)
select ename,empno,mgr,least(empno,mgr) lownum
from emp
where empno0
trunc(sal,0)
取sal的近似值（截斷）
空值函數
nvl(v1,v2)
v1為列名，如果v1不是空值，nvl返回其列值。
v1為空值，返回v2的值。 聚組函數
select sum(comm)
from emp;
（返回一個(gè)匯總信息）
不能把sum用在select語(yǔ)句里除非用group by
字符型、日期型、數字型的聚組函數
min max count可用于任何數據類(lèi)型
select min(ename)
from emp;
select min(hiredate)
from emp;
select min(sal)
from emp;
有多少人有工作？
select count(job)
from emp;
有多少種不同的工種？
select count(distinct job)
from emp;
count distinct 計算某一字段中不同的值的個(gè)數
其它聚組函數（只用于數字型數據）
avg 計算平均工資
select avg(sal)
from emp;
stddev 計算工資的平均差
select stddev(sal)
from emp;
sum 計算總工資
select sum(sal)
from emp;
group by子句
select deptno,sum(sal),avg(sal)
from emp
group by deptno;
按多個(gè)條件分組
每個(gè)部門(mén)的雇員數
select deptno,count(*)
from emp
group by deptno;
每個(gè)部門(mén)的每個(gè)工種的雇員數
select deptno,job,count(*)
from emp
group by deptno,job;
滿(mǎn)足條件的分組
（where是針對select的，having是針對group by的）
哪些部門(mén)的工資總和超過(guò)了9000
select deptno,sum(sal)
from emp
group by deptno
having sum(sal)>9000;
select小結
除去職員，哪些部門(mén)的工資總和超過(guò)了8000
select deptno,sum(sal)
from emp
where job!=‘clerk‘
group by deptno
having sum(sal)>8000
order by sum(sal);
---------
7 高級查詢(xún)
等值聯(lián)接
select empno,ename,job,emp.deptno,dname
from emp,dept
where emp.deptno=dept.deptno;
外聯(lián)接
select ename,dept.deptno,loc
from emp,dept
where emp.deptno(+)=dept.deptno;
如果在dept.deptno中有的數值，在emp.deptno中沒(méi)有（如deptno=40），
則作外聯(lián)接時(shí)，結果中會(huì )產(chǎn)生一個(gè)空值
自聯(lián)接：同一基表的不同行要做聯(lián)接，可使用自聯(lián)接
指出每個(gè)雇員的經(jīng)理名字
select worker.ename,manager.ename manager
from emp worker,emp manager
where worker.mgr=manager.empno;
非等值聯(lián)接
哪些雇員的工資屬于第三級別
select ename,sal
from emp,salgrade
where grade=3
and sal between losal and hisal;
（基表salgrade：grade losal hisal）
集合運算
行的連接
集合運算把2個(gè)或多個(gè)查詢(xún)結果合并為一個(gè)
union-set union
Rows of first query plus of second query, less duplicate rows
intersect-set intersection
Rows both queries have in common
minus-set difference
rows unique to the first query
介紹幾個(gè)視圖
account view
ename sal job
sales view
ename sal job
research view
ename sal job
union運算
返回一個(gè)查詢(xún)結果中有但又不重要的行，它將基表或視圖中的記錄合并在一起
所有部門(mén)中有哪些雇員工資超過(guò)2000
對應列的數據類(lèi)型必須相同
select ename,sal
from account
where sal>2000
union
select ename,sal
from research
where sal>2000
union
select ename,sal
from sales
where sal>2000;
intersect運算
返回查詢(xún)結果中相同的部分
各個(gè)部門(mén)中有哪些相同的工種
select job
from account
intersect
select job
from research
intersect
select job
from sales;
minus運算
返回在第一個(gè)查詢(xún)結果中與第二個(gè)查詢(xún)結果不相同的那部分行記錄。
有哪些工種在財會(huì )部中有，而在銷(xiāo)售部中沒(méi)有？
select job from account
minus
select job from sales;
子查詢(xún)
slect ename,deptno
from emp
where deptno=
(select deptno
from emp
where ename=‘smith‘);
多級子查詢(xún)
select ename,job,sal
from emp
where job=
(select job
from emp
where ename=‘clark‘)
or sal>
(select sal
from emp
where ename=‘clark‘);
多個(gè)基表與子查詢(xún)
select ename,job,sal
from emp,dept
where loc=‘new york‘
and emp.deptno=dept.deptno
and sal>
(select sal
from emp
where ename=‘scott‘);
子查詢(xún)中使用聚組函數
select ename,hiredate
from emp
where hiredate=
(select min(hiredate)
from emp);
------------
8 授權
系統權限
DBA 所有權限
RESOURCE 注冊，創(chuàng )建新的基表
CONNECT，注冊，查詢(xún)
只有DBA才有權創(chuàng )建新的用戶(hù)
grant connect to scott
identified by tiger;
DBA或用戶(hù)自己可以改變用戶(hù)口令
grant connect to scott
identified by leopard;
基表權限1
有兩種方法獲得對基表操作的權限
創(chuàng )建自己的基表
獲得基表創(chuàng )建用戶(hù)的許可
grant select,insert
on emp
to scott;
這些權限有
select insert update delete alter index
把所有權限授于他人
grant all on emp to scott;
同義詞
select *
from scott.emp
創(chuàng )建同義詞
為用戶(hù)allen的EMP基表創(chuàng )建同義詞employee
create synonym employee
for allen.emp
基表權限2
你可以使其他用戶(hù)有這樣的權力，即其他用戶(hù)可以把你的基表權限授予他人
grant all
on emp
to scott
with grant option;
收回權限
系統權限 只有被DBA收回
基表權限 隨時(shí)都可以收回
revoke insert
on emp
from scott;
---------
9 索引
建立索引
create index emp_ename
on emp(ename);
刪除索引
drop index emp_ename;
關(guān)于索引
只對較大的基表建立索引（至少50條記錄）
建立索引之前插入數據
對一個(gè)基表可建立任意多個(gè)索引
一般是在作為主鍵的列上建立索引
建立索引之后，不影響SQL命令的執行
建立索引之后，ORACLE自動(dòng)維護和使用索引
保證數據唯一性
提高執行速度的同時(shí)，索引還可以保證每個(gè)記錄中的每個(gè)列值是不重復的。
create unique index emp_empno
on emp(empno);
--------
練習和答案
有沒(méi)有工資比獎金多的雇員？如果有，按工資的降序排列。
如果有兩個(gè)以上的雇員工資相同，按他們的名字排序。
select ename employee,sal salary,comm commision
from emp
where sal>comm
order by sal desc,ename;
列出有關(guān)雇員姓名、獎金占收百分比的信息。
要求顯示時(shí)列名意義明確，按雇員姓名排序，不包括獎金未知的雇員。
select ename employee,(comm/(comm+sal))*100 incentive
from emp
where comm is not null
order by ename;
在chicago（部門(mén)30）工作的所有雇員的工資上漲10%。
update emp
set sal=1.1*sal
where deptno=30;
update emp
set sal=1.1*sal
where deptno=(select deptno
from dept
where loc=‘chicago‘);
為hitech公司新建一個(gè)部門(mén)，編號為50，其它信息均不可知。
insert into dept(dname,deptno)
values(‘faclities‘,50);
創(chuàng )建視圖，三個(gè)列名，其中不包括職員信息
create view employee("employee name",
"employee number",
"employee job")
as select ename,empno,job
from emp
where job!=‘clerk‘;
制作工資報表，包括雇員姓名、受雇時(shí)間（按星期計算），工資和部門(mén)編號，
一頁(yè)顯示一個(gè)部門(mén)的信息，每頁(yè)尾，顯示該頁(yè)的工資之和以及受雇時(shí)間之和，
報表結尾處，顯示所有雇員的工資總和以及受雇時(shí)間總和，
工資按美元計算，受雇時(shí)間按星期計算，每頁(yè)的上方應有標題。
ttitle ‘service‘
break on deptno on page on report
compute sum of sal on deptno
compute sum of sal on report
compute sum of service_length on deptno
compute sum of service_length on report
column sal format $99,999.00
column service_length format 9999
select deptno,ename employee,(sysdate-hiredate)/7 service_length,sal
from emp
order by deptno;
制作報表，包括雇員姓名、總收入和受傭日期，
且：姓名的第一個(gè)字母必須大寫(xiě)，雇傭日期格式為MM/DD/YYYY，
總收入包括沒(méi)有獎金的雇員的總收入，姓名按字母順序排列。
col "hire date"format A12
col "employee" format A10
col "compensation" format $99,999.00
select initcap(ename) "employee",
(sal+nvl(comm,0)) "compensation",
to_char(hiredate,‘MM/DD/YYYY‘) "hire date"
from emp
order by ename;
列出有超過(guò)7個(gè)周邊國家的國家名字和面積。
select nation,area
from nation
where code in
(select nation_code
from border
group by nation_code
having count(*)>7);
列出所有面積大于等于日本的島國的國名和人口。
select nation,population
from nation,border
where code=nation_code(+)
and nation_code is null
and area>=
(select area
from nation
where upper(nation)=‘JAPAN‘);
列出所有邊界在其它國家中的國名，并且顯示其邊界國家名字。
break on nation
select nation1.nation,
nation2.nation borderin_country
from nation nation1,border,nation nation2
where nation1.code=border.nation_code
and border.border_code=nation2.code
order by nation1.nation;
-----------
-----------
PL/SQL
2 PL/SQL的塊結構和數據類(lèi)型
塊結構的特點(diǎn)
嵌套
begin
......
begin
......
exception
......
end;
exception
......
end;
標識符：
不能超過(guò)30個(gè)字符
第一個(gè)字符必須為字母
其余字符可以是字母，數字，$，_，或#
不區分大小寫(xiě)形式
如果用雙引號括起來(lái)，則字符順序可以任意排列，并區分大小寫(xiě)形式
無(wú)SQL保留字
數據類(lèi)型
數字型：
整數，實(shí)數，以及指數
字符串：
用單引號括起來(lái)
若在字符串表示單引號，則使用兩個(gè)單引號
字符串長(cháng)度為零（兩個(gè)單引號之間沒(méi)有字符），則表示NULL
字符：
長(cháng)度為1的字符串
數據定義
語(yǔ)法
標識符[常數] 數據類(lèi)型[NOT NULL][:=PL/SQL表達式];
‘:=‘表示給變量賦值
數據類(lèi)型包括
數字型 number(7,2)
字符型 char(120)
日期型 date
布爾型 boolean（取值為true,false或null，不存貯在數據庫中）
日期型
anniversary date:=‘05-JUL-95‘;
project_completion date;
布爾型
over_budget boolean not null:=false;
available boolean;
（初始值為NULL）
%type類(lèi)型匹配
books_printed number(6);
books_sold book_printed%type;
manager_name emp.ename%type;
變量賦值
變量名:=PL/SQL表達式
numvar:=5;
boolvar:=true;
datevar:=‘11-JUN-87‘;
字符型、數字型表達式中的空值
null+<數字>=null（空值加數字仍是空值）
null><數字>=null（空值與數字進(jìn)行比較，結果仍是空值）
null||‘字符串‘=‘字符串‘（null即‘‘）
（空值與字符串進(jìn)行連接運算，結果為原字符串）
變量作用范圍
標識符在宣言它的塊中有效
標識符如果不在子塊中重新定義，則在PL/SQL塊的所有子塊中同樣有效
重新定義后的標識符，作用范圍僅在本子塊中有效
例
declare
e_mess char(80);
begin
/*子塊1*/
declare
v1 number(4);
begin
select empno into v1 from emp
where job=‘president‘;
exception
when too_many_rows then
insert into job_errors
values(‘more than one president‘);
end;
/*子塊2*/
declare
v1 number(4);
begin
select empno into v1 from emp
where job=‘manager‘;
exception
when too_many_rows then
insert into job_errors
values(‘more than one manager‘);
end;
exception
when others then
e_mess:=substr(sqlerrm,1,80);
insert into general errors values(e_mess);
end;
---------
3 SQL和PL/SQL
插入
declare
my_sal number(7,2):=3040.55;
my_ename char(25):=‘wanda‘;
my_hiredate date:=‘08-SEP-88‘;
begin
insert into emp
(empno,enmae,job,hiredate,sal,deptno)
values(2741,my_ename,‘cab driver‘,my_hiredate,my_sal,20);
end;
刪除
declare
bad_child_type char(20):=‘naughty‘;
begin
delete from santas_gift_list where
kid_rating=bad_child_type;
end;
事務(wù)處理
commit[WORK];
rollback[WORK];
（關(guān)鍵字WORK可選，但對命令執行無(wú)任何影響）
savepoint 標記名;（保存當前點(diǎn)）
在事務(wù)中標記當前點(diǎn)
rollback [WORK] to [SAVEPOINT] 標記名;（回退到當前保存點(diǎn)）
取消savepoint命令之后的所有對數據庫的修改
關(guān)鍵字WORK和SAVEPOINT為可選項，對命令執行無(wú)任何影響
函數
PL/SQL塊中可以使用SQL命令的所有函數
insert into phonebook(lastname) value(upper(my_lastname));
select avg(sal) into avg_sal from emp;
對于非SQL命令，可使用大多數個(gè)體函數
不能使用聚組函數和參數個(gè)數不定的函數，如
x:=sqrt(y);
lastname:=upper(lastname);
age_diff:=months_between(birthday1,birthday2)/12;
賦值時(shí)的數據類(lèi)型轉換
4種賦值形式:
變量名:=表達式
insert into 基表名 values(表達式1,表達式2,...);
update 基表名 set 列名=表達式;
select 列名 into 變量名 from ...;
數據類(lèi)型間能進(jìn)行轉換的有:
char轉成number
number轉成char
char轉成date
date轉成char
例
char_var:=nm_var;
數字型轉換成字符型
date_var:=‘25-DEC-88‘;
字符型轉換成日期型
insert into 表名(num_col) values(‘604badnumber‘);
錯誤，無(wú)法成功地轉換數據類(lèi)型
---------
4 條件控制
例
declare
num_jobs number(4);
begin
select count(*) into num_jobs from auditions
where actorid=&&actor_id and called_back=‘yes‘;
if num_jobs>100 then
update actor set actor_rating=‘word class‘
where actorid=&&actor_id;
elsif num_job=75 then
update actor set actor_rating=‘daytime soaps‘
where actorid=&&actor_id;
else
update actor set actor_rating=‘waiter‘
where actorid=&&actor_id;
end if;
end if;
commit;
end;
--------
5 循環(huán)
語(yǔ)法
loop
......
end loop;
exit;（退出循環(huán)）
exit [when];（退出循環(huán)，當滿(mǎn)足WHEN時(shí)）
例1
declare
ctr number(3):=0;
begin
loop
insert into table1 values(‘tastes great‘);
insert into table2 values(‘less filling‘);
ctr:=ctr+1;
exit when ctr=100;
end loop;
end;
（注：如果ctr取為NULL，循環(huán)無(wú)法結束）
例2
FOR語(yǔ)法
for 變量<范圍> loop
......
end loop;
declare
my_index char(20):=‘fettucini alfredo‘;
bowl char(20);
begin
for my_index in reverse 21..30 loop
insert into temp(coll) values(my_index);
/*循環(huán)次數從30到21*/
end loop;
bowl:=my_index;
end;
跟在in reverse后面的數字必須是從小到大的順序，必須是整數，不能是變量或表達式
----------
6 游標
顯式游標
打開(kāi)游標
open <游標名>
例
open color_cur;
游標屬性
%notfound
%found
%rowcount
%isopen
例
fetch my_cur into my_var;
while my_cur %found loop
(處理數據)
fetch my_cur into my_var;
exit when my_cur %rowcount=10;
end loop;
%notfound屬性
取值情況如下：
fetch操作沒(méi)有返回記錄，則取值為true
fetch操作返回一條記錄，則取值為false
對游標無(wú)fetch操作時(shí)，取值為null
<游標名> %notfound
例
if color_cur %notfound then...
注：如果沒(méi)有fetch操作，則<游標名> %notfound將導致出錯，
因為%notfound的初始值為NULL。
關(guān)閉游標
close <游標名>
例
close color_cur;
游標的FOR循環(huán)
語(yǔ)法
for <記錄名> in <游標名> loop
<一組命令>
end loop;
其中：
索引是建立在每條記錄的值之上的
記錄名不必聲明
每個(gè)值對應的是記錄名，列名
初始化游標指打開(kāi)游標
活動(dòng)集合中的記錄自動(dòng)完成FETCH操作
退出循環(huán)，關(guān)閉游標
隱式游標
隱式游標是指SQL命令中用到的，沒(méi)有明確定義的游標
insert,update,delete,select語(yǔ)句中不必明確定義游標
調用格式為SQL%
存貯有關(guān)最新一條SQL命令的處理信息
隱式游標的屬性
隱式游標有四個(gè)屬性
SQL%NOTFOUND
SQL%FOUND
SQL%ROWCOUNT：隱式游標包括的記錄數
例：
delete from baseball_team where batting_avg<100;
if sql%rowcount>5 thn
insert into temp
values(‘your team needs help‘);
end if;
SQL%ISOPEN：取值總為FALSE。SQL命令執行完畢，PL/SQL立即關(guān)閉隱式游標。
---------
7 標號
GOTO語(yǔ)句
用法：
goto you_are_here;
其中you_are_here是要跳轉的語(yǔ)句標號
標號必須在同一組命令，或是同一塊中使用
正確的使用
<>（標號）
x:=x+1
if a>b then
b:=b+c;
goto dinner;
end if;
錯誤的使用
goto jail;
if a>b then
b:=b+c;
<>（標號）
x:=x+1;
end if;
標號：解決意義模糊
標號可用于定義列值的變量
<>
declare
deptno number:=20;
begin
update emp set sal=sal*1.1
where deptno=sample.deptno;
commit;
end sample;
如果不用標號和標號限制符，這條命令將修改每條記錄。
----------
8 異常處理
預定義的異常情況
任何ORACLE錯誤都將自動(dòng)產(chǎn)生一個(gè)異常信息
一些異常情況已命名，如：
no_data_found 當SELECT語(yǔ)句無(wú)返回記錄時(shí)產(chǎn)生
too_many_rows 沒(méi)有定義游標，而SELECT語(yǔ)句返回多條記錄時(shí)產(chǎn)生
whenever notfound 無(wú)對應的記錄
用戶(hù)定義的異常情況
由用戶(hù)自己獲取
在DECLARE部分定義：
declare
x number;
something_isnt_right exception;
用戶(hù)定義的異常情況遵循一般的作用范圍規則
條件滿(mǎn)足時(shí)，獲取異常情況：raise something_isnt_right
注意：同樣可以獲取預定義的異常情況
exception_init語(yǔ)句
允許為ORACLE錯誤命名
調用格式：
pragma exception_init(<表達式>,);
例
declare
deadlock_detected exception;
pragma exception_init(deadlock_detected,-60);
raise語(yǔ)句
單獨使用RAISE命令，可再一次獲取當前的異常情況（就象異常情況被重復處理了一樣）。
在異常處理中，此語(yǔ)句只能單獨使用。
異常處理標識符
一組用于處理異常情況的語(yǔ)句：
exception
when <表達式> or [表達式...] then
<一組語(yǔ)句>
...
when others then--最后一個(gè)處理
<一組語(yǔ)句>
end;既結束PL/SQL塊部分，也結束異常處理部分
--------
練習與答案
1:
接收contract_no和item_no值，在inventory表中查找，如果產(chǎn)品：
已發(fā)貨，在arrival_date中賦值為今天后的7天
已訂貨，在arrival_date中賦值為今天后的一個(gè)月
既無(wú)訂貨又無(wú)發(fā)貨，則在arrival_date中賦值為今天后的兩個(gè)月，
并在order表中增加一條新的訂單記錄。
product_status的列值為‘shipped‘和‘ordered‘
inventory:
product_id number(6)
product_description char(30)
product_status char(20)
std_shipping_qty number(3)
contract_item:
contract_no number(12)
item_no number(6)
arrival_date date
order:
order_id number(6)
product_id number(6)
qty number(3)
答案：
declare
i_product_id inventory.product_id%type;
i_product_description inventory.product_description%type;
i_product_status inventory.product_status%type;
i_std_shipping_qty inventory.std_shipping_qty%type;
begin
select product_id,product_description,product_status,std_shipping_qty
into i_product_id,i_product_description,
i_product_status,i_std_shipping_qty
from inventory
where product_id=(
select product_id
from contract_item
where contract_no=&&contractno and item_no=&&itemno);
if i_product_status=‘shipped‘ then
update contract_item
set arrival_date=sysdate+7
where item_no=&&itemno and contract_no=&&contractno;
elsif i_product_status=‘ordered‘ then
update contract_item
set arrival_date=add_months(sysdate,1)
where item_no=&&itemno and contract_no=&&contractno;
else
update contract_item
set arrival_date=add_months(sysdate,2)
where item_no=&&itemno and contract_no=&&contractno;
insert into orders
values(100,i_product_id,i_std_shipping_qty);
end if;
end if;
commit;
end;
2:
1.找出指定部門(mén)中的所有雇員
2.用帶‘&‘的變量提示用戶(hù)輸入部門(mén)編號
3.把雇員姓名及工資存入prnttable表中，基結構為：
create table prnttable
(seq number(7),line char(80));
4.異常情況為，部門(mén)中獎金不為空值的雇員信息才能存入prnttable表中。
答案：
declare
cursor emp_cur is
select ename,sal,comm
from emp where deptno=&dno;
emp_rec emp_cur%rowtype;
null_commission exception;
begin
open emp_cur;
fetch emp_cur into emp_rec;
while (emp_cur%found) loop
if emp_rec.comm is null then
begin
close emp_cur;
raise null_commission;
end;
end if;
fetch emp_cur into emp_rec;
end loop;
close emp_sur;
exception
when null_commission then
open emp_cur;
fetch emp_cur into emp_rec;
while (emp_cur%found) loop
if emp_rec.comm is not null then
insert into temp values(emp_rec.sal,emp_rec.ename);
end if;
fetch emp_cur into emp_rec;
end loop;
close emp_cur;
commit;
end; |
