新聞中心
以下的文章主要介紹的是Oracle通過(guò)存儲(chǔ)過(guò)程中返回相關(guān)數(shù)據(jù)集的實(shí)際操作方案,我們首先要了解的是如何正確的使用存儲(chǔ)過(guò)程來(lái)返回?cái)?shù)據(jù)集,我們大家都知道Oracle數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程返回?cái)?shù)據(jù)集是Oracle通過(guò)ref cursor類型數(shù)據(jù)的參數(shù)返回的。

而返回?cái)?shù)據(jù)的參數(shù)應(yīng)該是out或in out類型的,由于在定義存儲(chǔ)過(guò)程時(shí)無(wú)法直接指定參數(shù)的數(shù)據(jù)類型為:ref cursor,而是首先Oracle通過(guò)以下方法將ref cursor進(jìn)行了重定義:
- create or replace package FuxjPackage is
- type FuxjResultSet is ref cursor;
還可以定義其他內(nèi)容
- end FuxjPackage;
再定義存儲(chǔ)過(guò)程:
- create or replace procedure UpdatefuxjExample (sDM in char,sMC in char, pRecCur in out FuxjPackage.FuxjResultSet)
- as
- begin
- update fuxjExample set mc=sMC where dm=sDM;
- if SQL%ROWCOUNT=0 then
- rollback;
- open pRecCur for
- select '0' res from dual;
- else
- commit;
- open pRecCur for
- select '1' res from dual;
- end if;
- end;
和
- create or replace procedure InsertfuxjExample
(sDM in char,sMC in char, pRecCur in out FuxjPackage.FuxjResultSet)- as
- begin
- insert into FuxjExample (dm,mc) values (sDM,sMC);
- commit;
- open pRecCur for
- select * from FuxjExample;
- end;
在Delphi中調(diào)用返回?cái)?shù)據(jù)集的存儲(chǔ)過(guò)程
可以通過(guò)TstoredProc或TQuery控件來(lái)調(diào)用執(zhí)行返回?cái)?shù)據(jù)集的存儲(chǔ),數(shù)據(jù)集Oracle通過(guò)TstoredProc或TQuery控件的參數(shù)返回,注意參數(shù)的DataType類型為ftCursor,而參數(shù)的ParamType類型為ptInputOutput。
使用TstoredProc執(zhí)行UpdatefuxjExample的相關(guān)設(shè)置為:
- object StoredProc1: TStoredProc
- DatabaseName = 'UseProc'
- StoredProcName = 'UPDATEFUXJEXAMPLE'
- ParamData = <
- item
- DataType = ftString
- Name = 'sDM'
- ParamType = ptInput
- end
- item
- DataType = ftString
- Name = 'sMC'
- ParamType = ptInput
- end
- item
- DataType = ftCursor
- Name = 'pRecCur'
- ParamType = ptInputOutput
- Value = Null
- end>
- end
上述的相關(guān)內(nèi)容就是對(duì)Oracle通過(guò)存儲(chǔ)過(guò)程中返回?cái)?shù)據(jù)集的描述,希望會(huì)給你帶來(lái)一些幫助在此方面。
標(biāo)題名稱:Oracle通過(guò)其實(shí)際存儲(chǔ)過(guò)程中返回相關(guān)數(shù)據(jù)集
網(wǎng)頁(yè)地址:http://fisionsoft.com.cn/article/coosped.html


咨詢
建站咨詢
