adooracle存儲過程

『壹』 如何查看oracle的存儲過程

使用tode或者Navicat 或者navigtor等連接oracle的工具

找到procere的選項即可查看所有的存儲過程，點擊某個名字可以看到其中的定義

『貳』 oracle 存儲過程

create or replace procere sp_add_emp2( --創建名為sp_add_emp2存儲過程
v_empno emp.empno%type, --------- 傳入存儲過程中的參數
v_ename emp.ename%type,
v_deptno dept.deptno%type,
v_dname dept.dname%type,

num out number ----------存儲過程執行完畢後返回的值
)as
num1 number; ------自定義變數
num2 number;
begin
--查詢dept表中的數據總共有多少行，賦值給num1，
--條件是欄位deptno等於v_deptno(傳進來的參數)
select count(*) into num1 from dept where deptno=v_deptno;
if(num1=0) then --如果沒數據
--則給dept表的deptno 和dname列插入一條數據，值為v_deptno,v_dname
insert into dept(deptno,dname) values(v_deptno,v_dname);
end if; --If語句結束語
---同上。
select count(*) into num2 from emp where empno=v_empno;
if(num2=0)then
insert into emp(empno,ename,deptno) values(v_empno,v_ename,v_deptno);
else --如果查詢到有數據則提示錯誤信息，員工ID重復，不插入數據
raise_application_error(-202021,'員工id 重復！！！');
end if;

num:=num1; --定義的輸出參數等於num1。
commit; --結束存儲過程。

『叄』 如何調用一個Oracle存儲過程返回一個或多個REF游標，使用ADO從C

代碼如下:
CREATE OR REPLACE PROCEDURE P_TESTB
AS

VARCURSOR SYS_REFCURSOR;
R USERS%ROWTYPE;
BEGIN

P_TESTA(VARCURSOR);
LOOP
FETCH VARCURSOR INTO R;
EXIT WHEN
VARCURSOR%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(R.NAME);
END LOOP;
END
P_TESTB;

『肆』 ADO.Net(C#)中怎麼執行Oracle的存儲過程

sqlConnection conn=new SqlConnection ();
SqlCommand cmd = conn.CreateCommand();
cmd.CommandType = CommandType.StoredProcere; //命令類型是存儲過程
cmd.CommandText = "存儲過程的名字";

『伍』 oracle 資料庫 怎麼執行存儲過程

一。 概述Oracle存儲過程開發的要點是：
1; 使用Notepad文本編輯器，用Oracle PL/SQL編程語言寫一個存儲過程;
2; 在Oracle資料庫中創建一個存儲過程;
3; 在Oracle資料庫中使用SQL*Plus工具運行存儲過程;
4; 在Oracle資料庫中修改存儲過程;
5; 通過編譯錯誤調試存儲過程;
6; 刪除存儲過程;二。環境配置
包括以下內容：
1; 一個文本編輯器Notepad;
2; Oracle SQL*Plus工具，提交Oracle SQL和PL/SQL 語句到Oracle database。
3; Oracle 10g express資料庫，它是免費使用的版本;
需要的技巧：
4; SQL基礎知識，包括插入、修改、刪除等
5; 使用Oracle's SQL*Plus工具的基本技巧;
6; 使用Oracle's PL/SQL 編程語言的基本技巧;三。寫一個存儲過程
在Notepad, 寫下：
CREATE OR REPLACE PROCEDURE skeletonISBEGINNULL;END;把文件存為skeleton.sql.
讓我們一行行遍歷這個存儲過程：
1 CREATE OR REPLACE PROCEDURE skeleton2 IS3 BEGIN
4 NULL;5 END;行1:CREATE OR REPLACE PROCEDURE 是一個SQL語句通知Oracle資料庫去創建一個叫做skeleton存儲過程， 如果存在就覆蓋它;行2:IS關鍵詞表明後面將跟隨一個PL/SQL體。
行3:BEGIN關鍵詞表明PL/SQL 體的開始。
四。創建一個存儲過程
SQL語句CREATE OR REPLACE PROCEDURE在Oracle資料庫中創建、編譯和保存一個存儲過程。
從Window打開SQL*Plus並且從SQL*Plus 登錄到你的資料庫;打開skeleton.sql文件。
在SQL命令提示符下輸入以下命令：
SQL@skeletonSQL/SQL*Plus裝載skeleton.sql文件的內容到 SQL*Plus緩沖區並且執行SQL*Plus語句;SQL*Plus 會通知你存儲過程已經被成功地創建。

『陸』 ADO下怎麼通過調用存儲過程獲取結果集

******************************
暈,有上面這么麻煩嗎?
1\打開企業管理器
2\展開左邊的樹結構,直到看到database
3\右擊database,在彈出菜單中找一個項,最後是(K)的,後面還有個三角形的.
4\滑鼠指向這一項,又出現一個菜單,其中有一個項,最後是(A)的,點擊它,就打開附加資料庫的窗口了.
5\在這個窗口內附加資料庫,就OK了

『柒』 oracle 存儲過程

create [or replace] procere procere_name (varible {IN|OUT|IN OUT} type) {IS|AS}

[varible { in | out | in out }] type;
[varible { in | out | in out }] type;
......

[cursor curor_name IS select subclause]

begin

body

end [procere_name];

for example:

create or replace procere sp_login_error_count(user_name_var varchar2) IS
--創建名為sp_login_error_count的存儲過程，並定義傳參
--informix的語法（drop procere sp_login_error_count；create procere sp_login_error_count(user_name_var varchar(50))）

error_count_var integer;
--變數定義
--informix語法（define error_count_var integer;）

begin
--程序開始
--informix語法不用begin，直接開始

select error_count into error_count_var from users where user_name=user_name_var;
--select語句，找到的值放到變數中
--informix語法一樣

error_count_var :=error_count_var+1;
--變數加1，這是pl/sql的變數賦值運算。
--informix語法（let error_count_var=error_count_var+1;）

update users set error_count= error_count_var where user_name =user_name_var ;
--更新統計數
--informix語法一樣

commit;
--提交
--informix不需要提交

end sp_login_error_count;
--結束存儲過程
--informix語法（end procere;）

ORACLE存儲過程執行為execute procere_name或exec procere_name
INFORMIX存儲過程執行為execute procere procere_name

pl/sql程序由三個塊組成：聲明部分、執行部分、異常處理部分
declare
/* 聲明部分: 在此聲明PL/SQL用到的變數,類型及游標 */
begin
/* 執行部分: 過程及SQL語句 , 即程序的主要部分 */
Exception
/* 執行異常部分: 錯誤處理 */
End;

其中 執行部分是必須的。

『捌』 VB程序如何用ADO向Oracle存儲過程傳遞數組參數

何苦如此呢，要達到最高效率，當然不能再去解析字元串了，建一張臨時表tab,把你要傳遞的參數插入tab中,存儲過程中直接關聯下tab不就獲取到你要的數據了么

『玖』 Oracle 的存儲過程怎麼寫。

oracle 存儲過程的基本語法

1.基本結構
CREATE OR REPLACE PROCEDURE 存儲過程名字
(
參數1 IN NUMBER,
參數2 IN NUMBER
) IS
變數1 INTEGER :=0;
變數2 DATE;
BEGIN

END 存儲過程名字

2.SELECT INTO STATEMENT
將select查詢的結果存入到變數中，可以同時將多個列存儲多個變數中，必須有一條
記錄，否則拋出異常(如果沒有記錄拋出NO_DATA_FOUND)
例子：
BEGIN
SELECT col1,col2 into 變數1,變數2 FROM typestruct where xxx;
EXCEPTION
WHEN NO_DATA_FOUND THEN
xxxx;
END;
...

3.IF 判斷
IF V_TEST=1 THEN
BEGIN
do something
END;
END IF;

4.while 循環
WHILE V_TEST=1 LOOP
BEGIN
XXXX
END;
END LOOP;

5.變數賦值
V_TEST := 123;

6.用for in 使用cursor
...
IS
CURSOR cur IS SELECT * FROM xxx;
BEGIN
FOR cur_result in cur LOOP
BEGIN
V_SUM :=cur_result.列名1+cur_result.列名2
END;
END LOOP;
END;

7.帶參數的cursor
CURSOR C_USER(C_ID NUMBER) IS SELECT NAME FROM USER WHERE TYPEID=C_ID;
OPEN C_USER(變數值);
LOOP
FETCH C_USER INTO V_NAME;
EXIT FETCH C_USER%NOTFOUND;
do something
END LOOP;
CLOSE C_USER;

8.用pl/sql developer debug
連接資料庫後建立一個Test WINDOW
在窗口輸入調用SP的代碼,F9開始debug,CTRL+N單步調試

『拾』 Oracle如何創建存儲過程和如何調用存儲過程

【delphi+oracle報表解決方案(一)】delphi中調用oracle的存儲過程(分帶返回遊標，不返回值兩種)
關鍵字: delphi ,oracle存儲過程，游標,返回數據集,報表註：delphi 6+ oracle 8.1.6一.創建包與包體1.附：建表aaclass為下面作測試用create table aaclass(CID VARCHAR2(50), CNAME VARCHAR2(50), pnumber NUMBER(10,0) );INSERT INTO aaclass values('c1', 'cn1', 10 ) ;
INSERT INTO aaclass values('c2', 'cn2', 40 ) ;
INSERT INTO aaclass values('c1', 'cn3', 30 ) ;
commit;2.建包:CREATE OR REPLACE PACKAGE PKG_JCCTEST1
AS type rc_class is ref cursor;
--求p1,p2的和與差，返回的多個值通過游標返回
procere GetSubAndSum2(p1 number,p2 number ,
ResultCursor out rc_class);

--查詢滿足條件的數據集，返回數據集通過游標返回
procere GetClass2(a in number,ResultCursor out rc_class ) ; --往表中插一條記錄，不返回結果集時，本人用AdoQuery調用(adodataset好象要求必須返回結果集)
procere InsertClass( p_cid varchar2 ,p_cname varchar2 ,
p_pnumber number) ;
end PKG_JCCTEST1; 3.建包體CREATE OR REPLACE PACKAGE BODY PKG_JCCTEST1
ASprocere GetSubAndSum2(p1 number,p2 number ,
ResultCursor out rc_class)
IS
BEGIN
open ResultCursor for
select p1-p2 as "sum", p1+p2 as "sub" from al;
END ;
procere GetClass2(a in number,ResultCursor out rc_class )
is
begin open ResultCursor for
select aaclass.* from aaclass where pnumber >a;end ;procere InsertClass( p_cid varchar2 ,p_cname varchar2 ,
p_pnumber number)
is
begin
insert into aaclass values(p_cid,p_cname,p_pnumber) ;
-- commit;
end ; 二.在delphi中利用AdoDataSet調用上述第一個存儲過程
1.利用AdoConnection1連接資料庫(驅動為 oracle Provider for OLE DB)，
**並在連接字元串中加入這一節: PLSQLRSet=1; 如下所示：
Provider=OraOLEDB.Oracle.1;Password=KXD;Persist Security Info=True;User ID=KXD;Data Source=TEST3;PLSQLRSet=12.在窗體上加AdoDataSet1 指明連接為上述AdoConnection1,下面可以放一個按鈕，單擊按鈕就能調用第一步中創建的包過程，並返回數據集。代碼如下所示：
procere TForm1.Button1Click(Sender: TObject);
var
AResult , BResult : integer;
begin
ADODataSet1.Close ;
ADODataSet1.CommandType := cmdText ;
ADODataSet1.Parameters.Clear ; //***利用call方法調用oracle過程時，參數必須由?來傳， 即使你要傳的參數為常理
//輸出遊標的參數不需要指定!!!!!!，本來此函數帶三個參數，我們這里只需要傳兩個參數.
ADODataSet1.CommandText := '{call PKG_JCCTEST1.GetSubAndSum2(?,?)}' ; //***C 順序有關，createparam必須放在commandtext賦值語句之後. // 創建第一個參數，對應call中的第一個?,ftinteger為類型,10為長度，45為傳入的實參值
ADODataSet1.Parameters.CreateParameter('p1',ftinteger,pdinput,10,45);
//創建第二個參數，根據createparameter的順序 自動與call中的第二個參數對應
ADODataSet1.Parameters.CreateParameter('p2',ftinteger,pdinput,10,4); //下面調用ADODataSet1 的open方法，返回數據集(對應包過程的游標)
ADODataSet1.Open ; //根據存儲過程，數據集只有一條記錄，所以不需要用while do 來遍歷數據集，直接取數據了 //此處的欄位名根據包過程中的返回遊標 對應的欄位名來取
//定義的存儲過程返回遊標如： open ResultCursor for
// select p1-p2 as "sum", p1+p2 as "sub" from al;
//把對應的欄位值取出來即可
AResult := ADODataSet1.Fields.FieldByName('sub').Value ;
BResult := ADODataSet1.Fields.FieldByName('sum').Value ; //顯示結果
showmessage(inttostr(AResult)) ;
showmessage(inttostr(BResult)) ;end;
三.在delphi中利用AdoDataSet調用上述第二個存儲過程
還是利用上述的AdoDataSet1來調用第二個存儲過程，無需任何改動,加第二個按鈕，單擊時代碼如下：procere TForm1.Button2Click(Sender: TObject);
begin
ADODataSet1.Close ;
ADODataSet1.CommandType := cmdText ;
ADODataSet1.Parameters.Clear ; //***利用call方法調用oracle過程時，參數必須由?來傳， 即使你要傳的參數為常理
//輸出遊標的參數不需要指定!!!!!!，本來此函數帶兩個參數，我們這里只需要傳一個參數.
ADODataSet1.CommandText := '{call PKG_JCCTEST1.GetClass2(?)}' ; //***C 順序有關，createparam必須放在commandtext賦值語句之後. // 創建第一個參數，對應call中的第一個?,ftinteger為類型,10為長度，20為傳入的實參值
ADODataSet1.Parameters.CreateParameter('p1',ftinteger,pdinput,10,20);
//下面調用ADODataSet1 的open方法，返回數據集(對應包過程的游標)
ADODataSet1.Open ; while not ADODataSet1.Eof do
begin
showmessage('CID : '+string(ADODataSet1.FieldByName('CID').Value) +
'--CNAME :' + string(ADODataSet1.FieldByName('CNAME').Value) +
'--PNUMBER :' + string(ADODataSet1.FieldByName('PNUMBER').Value)
) ;
ADODataSet1.Next ;
end ;
end; 四 利用adoquery調用第三個過程，不返回數據集的procere TForm1.Button3Click(Sender: TObject);
begin
AdoQuery1.Close ;
AdoQuery1.Parameters.Clear ; AdoQuery1.SQL.Clear ; AdoQuery1.SQL.Add('{call PKG_JCCTEST1.GetSubAndSum2(?,?)}') ;
AdoQuery1.Parameters.CreateParameter('P1',ftstring,pdinput, 50,'c11') ;
AdoQuery1.Parameters.CreateParameter('P2',ftstring,pdinput, 50,'cn11') ;
AdoQuery1.Parameters.CreateParameter('P3',ftinteger,pdinput, 50,25) ; AdoQuery1.ExecSQL ;
end;
五 利用adoquery調用第一個過程，返回數據集的.
procere TForm1.Button4Click(Sender: TObject);
begin
AdoQuery1.Close ;
AdoQuery1.Parameters.Clear ; AdoQuery1.SQL.Clear ; AdoQuery1.SQL.Add('{call PKG_JCCTEST1.GetSubAndSum2(?,?)}') ;
AdoQuery1.Parameters.CreateParameter('P1',ftinteger,pdinput, 50,25) ;
AdoQuery1.Parameters.CreateParameter('P2',ftinteger,pdinput, 50,22) ; AdoQuery1.Open ; Showmessage(string( AdoQuery1.FieldByName('sub').Value)+'-'+
string( AdoQuery1.FieldByName('sum').Value));
end;六.關於三層體系的此類問題兩層的解決了，三層類似.
中間層用tadodataset 或tadoquery (+tdatasetprovider),中間層的adoconnection的連接字元串加上plsqlRset=1;
客戶端用clientdataset ,大同小異，舉例如下: begin
//調用相應的過程
ClientDataSet1.Close ;
ClientDataSet1.Params.Clear ; ClientDataSet1.CommandText := '{call PackageName.ProcereName(?,?)}' ;
ClientDataSet1.Params.CreateParam(ftInteger , 'ParamName1', ptInput) ;
ClientDataSet1.Open ;

end ;
本文來自CSDN博客，轉載請標明出處： http://blog.csdn.net/yzsind/archive/2005/01/20/261176.aspx