--創(chuàng)建過程名稱
--create procedure 存儲(chǔ)過程名字 is begin
--create or replace procedure 如果有就替換掉
----------------------------------------------
案例1：
--創(chuàng)建一個(gè)表
create table mytest(name varchar2(30),passwd varchar2(30));
--創(chuàng)建過程
create procedure sq_pro1 is
begin
--執(zhí)行部分
insert into mytest values('zgx','888666');
end；
-- / 斜線回車
----------------------------------------------
如何查看錯(cuò)誤信息：
show error 回車
--調(diào)用存儲(chǔ)過程
1.exec 過程名(參數(shù)1，2....);
2.call 過程名(參數(shù)1，2....);
---------------------------------------------------
set serveroutput on;打開輸出選項(xiàng)
set serveroutput off;關(guān)閉輸出選項(xiàng)
dbms_ 是包名的意思！
案例2：
dbms_output.put_line('helloWorld');
-----------------
declare
v_ename varchar2(5);--定義字符串變量
begin
--into v_ename意思:把查詢出來數(shù)據(jù) 賦值給 v_ename;&no是執(zhí)行的時(shí)候會(huì)彈出輸入框
select ename into v_ename from emp where empno=&no;
--||代表 連接符號(hào)；
dbms_output.put_line('用戶名是：'||v_ename);
end;
-----------
案例3：
declare
v_ename varchar2(5);--定義字符串變量
v_sal number(7,2);--定義字符串變量
begin
--如果是多個(gè)字段，用逗號(hào)隔開，順序必須一樣！！
select ename,sal into v_ename,v_sal from emp where empno=&no;
--||代表 連接符號(hào)；
dbms_output.put_line('用戶名是：'||v_ename||'工資：'||v_sal);
end;
---------------------
--異常的捕獲
exception
when no_data_found then --如果出現(xiàn)no_data_found異常就執(zhí)行下一句
dbms_output.put_line('輸入有誤！');
end;
------------
過程：
案例4：
創(chuàng)建帶輸入?yún)?shù)的過程；
create procedure sp_pro3(spNma varchar2,newSal number) is
begin
update emp set sal=newSal where ename=spName;
end;
------------
函數(shù)：
函數(shù)用于返回特定的數(shù)據(jù)，當(dāng)建立函數(shù)時(shí)，在函數(shù)頭部要求有return語(yǔ)句；
案例5：
--輸入雇員姓名，返回該雇員的年薪
--返回一個(gè)number類型；返回值名字是yearSal，類型是number(7,2);
create function sp_fun1(spName varchar2) return number is yearSal number(7,2);
begin
--執(zhí)行部分
select sal*12+nvl(comm,0)*12 into yearSal from emp where enamee=spName;
return yearSal;
end;
調(diào)用函數(shù)中
--隨便定義一個(gè)值
var abc number;
--掉用函數(shù)把結(jié)果賦值給 abc
call sp_fun1()'SCOTT' into:abc;
-------------
包
創(chuàng)建包：
--創(chuàng)建了一個(gè)包 sp_package
--聲明該包里有一個(gè)過程update_sal
--生命該包里有一個(gè)函數(shù)annual_income
create package sp_package is
procedure update_sal(name,varchar2,newsal number);
function annual_income(name varchar2, return number;
end;
給包sp_package 實(shí)現(xiàn)包體--把定義包中的 過程和函數(shù)實(shí)現(xiàn)；
create package body sp_package is
procedure update_sal(name,varchar2,newsal number) is
begin
update emp set sal=newsal where ename=name;
end;
function annual_income(name varchar2)
return number isannual_salary number;
begin
select sal*12+nvl(comm,0) into annual_salary from emp where ename=name;
return annual_salary;
end;
end;
--------------
調(diào)用包中的過程或函數(shù)
exec sp_package.update_sal('SCOTT','120');
---------------------
觸發(fā)器
觸發(fā)器是指隱含的執(zhí)行的存儲(chǔ)過程。當(dāng)定義觸發(fā)器時(shí)，必須要指定觸發(fā)的時(shí)間和觸發(fā)的操作，常用觸發(fā)包括insert，pudate，delete語(yǔ)句，而觸發(fā)操作實(shí)際就是一個(gè)pl/sql塊。可以使用create trigger來建立觸發(fā)器。
觸發(fā)器是非常有用的，可維護(hù)數(shù)據(jù)庫(kù)的安全和一致性。
---------
定義并使用變量
包括：
1.標(biāo)量類型（scalar）
2.符合類型（）
---------
標(biāo)量（scalar）-常用類型
語(yǔ)法：
identifier [constant] datatype [not null] [:=| default expr]
identifier:名稱
constant：指定常量。需要指定它的初始值，且其值是不能改變的
datatype：數(shù)據(jù)類型
not null： 指定變量值不能為null
：= 給變量或是常量指定初始值
default 用于指定初始值
expr：指定初始值的pl/sql表達(dá)式，文本值、其他變量、函數(shù)等
------------
標(biāo)量定義的案例
1.定義一個(gè)變長(zhǎng)字符串
v_ename varchar2(10)
2.定義一個(gè)小數(shù) 范圍 -9999.99~9999.99
v_sal number(6,2)
3.定義一個(gè)小數(shù)并給一個(gè)初始值為5.4 :=pl/sql的賦值號(hào)
v_sal2 number(6,2):=5.4
4.定義一個(gè)日期類型的數(shù)據(jù)
v_hiredate date;
5.定義一個(gè)布爾變量，不能為空，初始值為false
v_valid boolean not null default false;
---------------
如何使用標(biāo)量
定義好變量后，就可以使用這些變量。這里需要說明的是pl/sql塊為變量賦值不同于其他的編程語(yǔ)言，需要在等號(hào)前面加冒號(hào)(:=)
下面以輸入員工號(hào)，顯示雇員名稱、工資、個(gè)人所得稅(稅率為0.03為例)。說明變量的使用，看看如何編寫：
declare
c_tax_rate number(3.2):=0.03; --定義賦值
--用戶名
v_ename varchar2(5);
v_sal number(7,2);
v_tax_sal number()7,2;
begin
--執(zhí)行
select ename,sal into v_ename,v_sal from emp where empno=$no;
--計(jì)算所得稅
v_tax_sal:=v_sal*c_tax_rate;
--輸出
dbms_output.put_line('姓名是:'||v_ename||'工資：'||v_sal||'所得稅：'||v_tax_sal);
end;
-----
標(biāo)量（scalar）--使用%type類型
對(duì)于上面的pl/sql塊有一個(gè)問題：
就是如果員工的姓名超過了5字符的話，就會(huì)有錯(cuò)誤，為了降低pl/sql程序的維護(hù)工作量，可以使用%type屬性定義變量，這樣他會(huì)按照數(shù)據(jù)庫(kù)列來確定你定義的變量的類型和長(zhǎng)度。
看看怎么使用。
語(yǔ)法： 標(biāo)識(shí)符名 表名.列名%type;
declare
v_ename emp.ename%type; --定義變量v_ename 和emp表中列名ename大小類型保持一致；
---
復(fù)合變量（composite）
用于存放多個(gè)值的變量。
包括：
1.pl/sql記錄
2.pl/sql表
---------------
復(fù)合類型-pl/sql記錄
類似與高級(jí)語(yǔ)言的結(jié)構(gòu)體，需要注意的是，當(dāng)引用pl/sql記錄成員時(shí)，必須要加記錄變量作為前綴（記錄變量.記錄成員）
如下：
declare
--定義一個(gè)pl/sql記錄類型是：emp_record_type，類型包括三個(gè)數(shù)據(jù)name，salary，title；該類型中可以存放三個(gè)類型的數(shù)據(jù)；
type emp_record_type is record(name emp.ename%type,salary emp.sal%type,title emp.job%type);
--定義了一個(gè)sp_record變量，類型是emp_record_type
sp_record emp_record_type;
begin
select ename,sal,job into sp_record from emp where empno=7788;
dbms_output.put_line('員工名：'||sp_record.name); --顯示定義emp_record_type類型中 name的值；
end;
end;
----------------
復(fù)合類型--pl/sql表
相當(dāng)于高級(jí)語(yǔ)言中的數(shù)組。但是需要注意的是在高級(jí)語(yǔ)言中數(shù)組的下標(biāo)不能為負(fù)數(shù)，而pl/sql是可以為負(fù)數(shù)的，并且表元素的下標(biāo)沒有限制。實(shí)例如下：
declare
--定義了一個(gè)pl/sql表類型sp_table_type，該類型是用于存放emp.ename%type類型的數(shù)組
--index by binary_integer標(biāo)識(shí)下標(biāo)是整數(shù)
type sp_table_type is table of emp.ename%type index by binary_integer;
--定義了一個(gè)sp_table變量，變量類型是sp_table_type
sp_table sp_table_type;
begin
--把查詢出來的ename放到 table（0）下標(biāo)為0的數(shù)據(jù)
select ename into sp_table(0) from emp where empno=7788;
dbms_output.put_lin('員工名：'||sp_table(0)); --要和存放下標(biāo)一樣
end;
說明：
sp_table_type 是pl/sql表類型
emp.ename%type 指定了表的元素的類型和長(zhǎng)度
sp_table 為pl/sql表變量
sp_table(0) 表示下標(biāo)為0的
---------------
參照變量
參照變量是指用于存放數(shù)值指針的變量。通過使用參照變量，可以使用得應(yīng)用程序共享相同對(duì)象，從而降低占用的空間。在編寫pl/sql程序時(shí)，可以使用游標(biāo)變量和對(duì)象類型變量?jī)煞N參照變量類型
游標(biāo)變量用的最多
-----------
參照變量---游標(biāo)變量
使用游標(biāo)時(shí)，當(dāng)定義游標(biāo)時(shí)不需要指定相應(yīng)的select語(yǔ)句，但是當(dāng)使用游標(biāo)時(shí)需要指定select語(yǔ)句，這樣一個(gè)游標(biāo)就與一個(gè)select語(yǔ)句結(jié)合了。
如下
1.請(qǐng)使用pl/sql編寫一個(gè)塊，可以輸入部門號(hào)，并顯示該部門所有員工姓名和他的工資。
declare
--定義游標(biāo)類型
type sp_emp_cursor is ref cursor；
--定義一個(gè)游標(biāo)變量
test_cursor sp_emp_cursor；
--定義變量
v_ename emp。ename%type；
v_sal emp。sal%type；
begin
--執(zhí)行
--打開一個(gè)游標(biāo)test_cursor和一個(gè)select結(jié)合
open test_cursor for select ename,sal from emp where deptno=&no;
--循環(huán)取出
loop
--fetch就是取出。取出test_cursor中的數(shù)據(jù)放到 v_ename,v_sal里面去；
fetch test_cursor into v_ename,v_sal；
--判斷是否test_cursor為空
exit when test_cursor%notfound；
dbms_output.put_line('名字：'||v_ename||'工資：'||v_sal);
end loop；
end；
2.在1。基礎(chǔ)上，如果某個(gè)員工的工資低于200元，就增加100元。
declare
--定義游標(biāo)類型
type sp_emp_cursor is ref cursor；
--定義一個(gè)游標(biāo)變量
test_cursor sp_emp_cursor；
--定義變量
v_ename emp。ename%type；
v_sal emp。sal%type；
begin
--執(zhí)行
--打開一個(gè)游標(biāo)test_cursor和一個(gè)select結(jié)合
open test_cursor for select ename,sal from emp where deptno=&no;
--循環(huán)取出
loop
--fetch就是取出。取出test_cursor中的數(shù)據(jù)放到 v_ename,v_sal里面去；
fetch test_cursor into v_ename,v_sal；
if v_sal<200 then
update emp set sal=sal+100 where ename=v_ename;
end if;
--判斷是否test_cursor為空
exit when test_cursor%notfound；
dbms_output.put_line('名字：'||v_ename||'工資：'||v_sal);
end loop；
end；
----------
條件分支語(yǔ)句
if--then，
if--then--else，
if--then--elsif--else
----
循環(huán)語(yǔ)句
loop --end loop；至少會(huì)執(zhí)行一次。
create or replace procedure sp_pro6() is
--定義賦值
v_num number:=1;
begin
loop
insert into users1 values(v_num,spName);
--判斷是否要退出循環(huán)
exit when v_num=10;
--自增
v_num:=v_num+1;
end loop;
end;
-------------
循環(huán)語(yǔ)句-while先判斷后執(zhí)行
create or replace procedure sp_pro6() is
--定義賦值
v_num number:=11;
begin
while v_num<=20 loop
insert into users1 values(v_num,spName);
v_num:=v_num+1;
end loop;
end;
------------------
循環(huán)語(yǔ)句--for循環(huán)（不建議）
begin
for i in reverse 1。。10 loop
insert into users1 values（i，'aaa'）；
end loop;
end；
-------
循環(huán)語(yǔ)句--goto,null循環(huán)（不建議）
declare
i int:=1;
begin
loop
dbms_output.put_line('輸出i='||i);
if i=10 then
goto end_loop;
end if;
i:=i+1;
end loop;
<<end_loop>> --到i到10后直接跳到該標(biāo)記
dbms_output.put_line('循環(huán)結(jié)束');
end;
---------------------------
無返回值的存儲(chǔ)過程（有輸入?yún)?shù)）
create table book(
bookId number;
bookName varchar2(100);
publishHouse varchar2(50);
);
--編寫過程
--in表示這是一個(gè)輸入?yún)?shù)，不寫默認(rèn)是in
--out 表示一個(gè)輸出參數(shù)
create or replace procedure sp_pro7(spBookId in number，spbookName in varchar2,sppublishHouse in varchar2) is
begin
insert into book values(spBookId,spbookName,sppublishHouse);
end;
---------------
有返回值的存儲(chǔ)過程（有輸入和輸出參數(shù)）
create or replace procedure sp_pro8(ename in number，spName out varchar2) is
begin
--spName自動(dòng)返回 因?yàn)樗莖ut
select ename into spName from emp where empno=spno;
end;
----------------
有返回值是集合數(shù)組的存儲(chǔ)過程（有輸入和輸出參數(shù)）
1.建立一個(gè)包
--創(chuàng)建包 里面定義一個(gè)游標(biāo)類型；
create or replace package testpackage as
type test_cursor is ref cursor;
end testpackage；
2.建立存儲(chǔ)過程。
create or replace procedure sp_pro8(spNo in number，p_cursor out testpackage.test_cursor) is
begin
--spName自動(dòng)返回 因?yàn)樗莖ut
open p_cursor for select * from emp where deptno=spNo;
end;
－－－－－－－－－－－－
oracle的分頁(yè) rn是別名
select t1.*，rownum rn from(select * from emp) t1;//多加一個(gè)列記錄個(gè)數(shù)
select t1.*，rownum rn from(select * from emp) t1 where rownum<10;
select * from (select t1.*，rownum rn from(select * from emp) t1 where rownum<10) where rn>=6;
編寫oracle的分頁(yè)
--建立一個(gè)包
create or replace package testpackage as
type test_cursor is ref cursor;
end testpackage；
--建立存儲(chǔ)過程
create or replace procedure fenye
(tableName in varchar2,
pageSize in number, --一頁(yè)顯示幾條記錄
pageNow in number, --顯示哪一頁(yè)
myrows out number, --總記錄數(shù)
myPageCount out number,--總頁(yè)數(shù)
p_cursor out testpackage.test_cursor --返回的記錄集
) is
--定義部分
--定義sql語(yǔ)句 字符串
v_sql varchar2(1000);
--定義兩個(gè)整數(shù)
v_begin number:=(pageNow-1)*pageSize+1;
v_end number:=pageNow*pageSize;
begin
--執(zhí)行部分
v_sql:='select * from (select t1.*，rownum rn from(select * from '||tableName||') t1 where rownum<10'||?||') where rn>='||?||';';
--把游標(biāo)和sql語(yǔ)句關(guān)聯(lián)起來
open p_cursor for v_sql;
--計(jì)算myrows
v_sql:='select count(*) from '||tableName||'';
--執(zhí)行sql，并把返回值，賦值給myrows;
execute immediate v_sql int myrows;
--計(jì)算myPagecount
if mod(myrows,pageSize)=0 then --mod()取余數(shù)
myPageCount:=myrows/pageSize;
else
myPageCount:=myrows/pagesize+1;
end if;
--關(guān)閉游標(biāo)
--close p_cursor;
end;
------------------------
例外的分類
1.預(yù)定義例外用于處理常見的oracle錯(cuò)誤
2.非預(yù)定義例外用于處理預(yù)定義例外不能處理的例外 6.53
3.自定義例外用于處理與oracle錯(cuò)誤無關(guān)的其他情況
------------------------------------------------
-----------------------------------------------
-------ＪＡＶＡ中-調(diào)用無返回值的存儲(chǔ)過程-----------------
try{
Class.forName();
Connection ct=DriverManager.getConnerction();
//調(diào)用無返回值存儲(chǔ)過程
CallableStatement cs=ct.prepareCall("{call 存儲(chǔ)過程名稱(?,?,?)}") // ?代表存儲(chǔ)過程參數(shù)
cs.setIn(1,10);
cs.setString(2,'java調(diào)用存儲(chǔ)過程');
cs.setString(3,'人民出版社');
//執(zhí)行
cs.execute();
}catch(Exception e)
{
e.printStackTrace();
}finally{
cs.close();
ct.close();
}
------------------------------------------------
-----------------------------------------------
------ＪＡＶＡ中--調(diào)用有回值的存儲(chǔ)過程-----------------
try{
Class.forName();
Connection ct=DriverManager.getConnerction();
//調(diào)用有返回值存儲(chǔ)過程
CallableStatement cs=ct.prepareCall("{call 存儲(chǔ)過程名稱(?,?)}") // ?代表存儲(chǔ)過程參數(shù) 第一是輸入，第二是輸出
//第一個(gè)?輸入?yún)?shù)
cs.setIn(1,10);
//給第二個(gè)？輸出值賦值
cs.registerOutParameter(2,oracle.jdbc.OracleTypes.VARCHAR); //
//執(zhí)行
cs.execute();
//取出返回值,
String name=cs。getString(2);
System.out。println("名稱是："+name);
}catch(Exception e)
{
e.printStackTrace();
}finally{
cs.close();
ct.close();
}
------------------------------------------------
-----------------------------------------------
-------ＪＡＶＡ中-調(diào)用有回值是多個(gè) 數(shù)組2011-12-5的存儲(chǔ)過程-----------------
try{
Class.forName();
Connection ct=DriverManager.getConnerction();
//調(diào)用有返回值存儲(chǔ)過程
CallableStatement cs=ct.prepareCall("{call 存儲(chǔ)過程名稱(?,?)}") // ?代表存儲(chǔ)過程參數(shù) 第一是輸入，第二是輸出
//第一個(gè)?輸入?yún)?shù)
cs.setIn(1,10);
//給第二個(gè)？輸出值賦值
cs.registerOutParameter(2,oracle.jdbc.OracleTypes.cursor); //類型是cursor游標(biāo)
//執(zhí)行
cs.execute();
//取出返回值（結(jié)果集）
ReaultSet rs=(ResultSet)cs.getObject(2); //2是第二？
while(rs.next())
{
int =rs。getInt(1);
String name=rs。getString(2);
System.out。println("名稱是："+name);
}
}catch(Exception e)
{
e.printStackTrace();
}finally{
cs.close();
ct.close();
}
------------------------------------------------
-----------------------------------------------
------ＪＡＶＡ中--調(diào)用有回值的存儲(chǔ)過程-----------------
try{
Class.forName();
Connection ct=DriverManager.getConnerction();
//調(diào)用有返回值存儲(chǔ)過程
CallableStatement cs=ct.prepareCall("{call 存儲(chǔ)過程名稱(?,?)}") // ?代表存儲(chǔ)過程參數(shù) 第一是輸入，第二是輸出
//第一個(gè)?輸入?yún)?shù)
cs.setIn(1,10);
//給第二個(gè)？輸出值賦值
cs.registerOutParameter(2,oracle.jdbc.OracleTypes.VARCHAR); //
//執(zhí)行
cs.execute();
//取出返回值,
String name=cs。getString(2);
System.out。println("名稱是："+name);
}catch(Exception e)
{
e.printStackTrace();
}finally{
cs.close();
ct.close();
}
------------------------------------------------
-----------------------------------------------
-------ＪＡＶＡ中-測(cè)試分頁(yè)調(diào)用存儲(chǔ)過程-----------------
try{
Class.forName();
Connection ct=DriverManager.getConnerction();
//調(diào)用有返回值存儲(chǔ)過程
CallableStatement cs=ct.prepareCall("{call 分頁(yè)存儲(chǔ)過程名稱(?,?,?,?,?,?)}") // ?代表存儲(chǔ)過程參數(shù) 第一是輸入，第二是輸出
//?輸入?yún)?shù)
cs.setString(1,'表名'); //表名
cs.setInt(2,5); //一頁(yè)顯示幾條記錄
cs.setInt(3,1); //顯示第幾頁(yè)
//?輸出參數(shù)
//注冊(cè)總記錄數(shù)
cs.registerOutParameter(4,oracle.jdbc.OracleTypes.INTEGER);
//注冊(cè)總頁(yè)數(shù)
cs.registerOutParameter(4,oracle.jdbc.OracleTypes.INTEGER);
//注冊(cè)返回的結(jié)果集
cs.registerOutParameter(4,oracle.jdbc.OracleTypes.CURSOR); //類型是cursor游標(biāo)
//執(zhí)行
cs.execute();
//取出總記錄數(shù)
int rowNum=cs.getInt(4);//4表示參數(shù)中第四個(gè)？
//總頁(yè)數(shù)
int pageCount=cs.getInt(5);
//返回的記錄結(jié)果
ReaultSet rs=(ResultSet)cs.getObject(6);
while(rs.next())
{
int =rs。getInt(1);
String name=rs。getString(2);
System.out。println("名稱是："+name);
}
}catch(Exception e)
{
e.printStackTrace();
}finally{
cs.close();
ct.close();
}
A . 嵌套表
1. 聲明數(shù)組類型
create or replace type tab_array is table of varchar2(38);暫時(shí)不要在包中聲明該類型
2. 創(chuàng)建存儲(chǔ)過程
-- 該例子存儲(chǔ)過程是在包中創(chuàng)建的,包名 arraydemo
procedure testArray(resNumber in tab_array,procResult out tab_array) is
begin
procResult := new tab_array();
for i in 1..resNumber.Count loop
procResult.EXTEND;
procResult(i) := resNumber(i) || 'lucifer' || i;
end loop;
end;
3. Java調(diào)用代碼
//必須使用Oracle的連接和Statement,使用了連接池的必須通過一些方法獲取原始的連接
OracleConnection conn = null;
OracleCallableStatement stmt = null;
String[] param = { "1001", "1002", "1006" };
stmt =(轉(zhuǎn)換類型) conn.prepareCall("{call arraydemo.testArray(?,?)}");
// 類型名必須大寫
ArrayDescriptor descriptor = ArrayDescriptor.createDescriptor("TAB_ARRAY", conn);
stmt.setARRAY(1, new ARRAY(descriptor,conn,param));
stmt.registerOutParameter(2, OracleTypes.ARRAY, "TAB_ARRAY");
stmt.execute();
ARRAY array = stmt.getARRAY(2);
Datum[] data = array.getOracleArray();
for (int i = 0; i < data.length; i++) {
System.out.println(i + " : " + new String(data.shareBytes()));
}
4 . 注意的問題及尚未解決的問題
拋出:Non supported character set: oracle-character-set-852 異常---解決:添加 nls_charset12.jar 到classpath,該包在oracle/ora92/jdbc/lib目錄下
待解決問題:
a) 如何調(diào)用在包聲明的自定義類型
b) 比較不同聲明類型的優(yōu)缺點(diǎn),及使用場(chǎng)合
嵌套表其它應(yīng)用:http://zhouwf0726.itpub.net/post/9689/212253
B . 索引表
C . 內(nèi)置數(shù)組
D . 游標(biāo)方式