建站
咨詢
售后
建站咨詢
新聞中心
下面為您介紹的調(diào)用DB2存儲(chǔ)過(guò)程方法實(shí)現(xiàn)的是Lotus Notes調(diào)用DB2存儲(chǔ)過(guò)程，如果您對(duì)DB2存儲(chǔ)過(guò)程方面感興趣的話，不妨一看。
成都創(chuàng)新互聯(lián)專注于鎮(zhèn)遠(yuǎn)網(wǎng)站建設(shè)服務(wù)及定制，我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗(yàn)。 熱誠(chéng)為您提供鎮(zhèn)遠(yuǎn)營(yíng)銷型網(wǎng)站建設(shè)，鎮(zhèn)遠(yuǎn)網(wǎng)站制作、鎮(zhèn)遠(yuǎn)網(wǎng)頁(yè)設(shè)計(jì)、鎮(zhèn)遠(yuǎn)網(wǎng)站官網(wǎng)定制、重慶小程序開(kāi)發(fā)公司服務(wù)，打造鎮(zhèn)遠(yuǎn)網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供鎮(zhèn)遠(yuǎn)網(wǎng)站排名全網(wǎng)營(yíng)銷落地服務(wù)。
編寫(xiě)DB2存儲(chǔ)過(guò)程和Lotus Notes調(diào)用DB2存儲(chǔ)過(guò)程篇
使用DB2存儲(chǔ)過(guò)程的應(yīng)用程序必須寫(xiě)成兩個(gè)獨(dú)立的過(guò)程。主程序包含在客戶應(yīng)用程序中，在客戶機(jī)上執(zhí)行。主調(diào)程序可以用任何被支持的宿主語(yǔ)言編寫(xiě)。存儲(chǔ)過(guò)程在數(shù)據(jù)庫(kù)服務(wù)器上執(zhí)行，必須用一種支持?jǐn)?shù)據(jù)庫(kù)服務(wù)器的編程語(yǔ)言編寫(xiě)。
我們可以用Java編寫(xiě)代理或用DECS、NotesPump實(shí)時(shí)Notes作業(yè)去調(diào)用存儲(chǔ)過(guò)程，如COBOL、REXX或Java。
Lotus Notes調(diào)用DB2存儲(chǔ)過(guò)程
我們用ExecProcedure方法去調(diào)用命名為testProce存儲(chǔ)過(guò)程。首先要在運(yùn)行存儲(chǔ)過(guò)程的數(shù)據(jù)庫(kù)中為存儲(chǔ)過(guò)程編目，這使用CREATE PROCEDURE SQL語(yǔ)句。可以給存儲(chǔ)過(guò)程傳送多達(dá)30個(gè)參數(shù)（這是LotusScript的限制）。這些參數(shù)用于輸入還是輸出，或者是既用于輸入、又用于輸出，取決于為存儲(chǔ)過(guò)程編目時(shí)對(duì)參數(shù)的定義。
客戶程序例如LoadEmployee代理在客戶機(jī)上運(yùn)行，執(zhí)行以下動(dòng)作：
1.為可選數(shù)據(jù)結(jié)構(gòu)和主機(jī)變量聲明、分配和初始化存儲(chǔ)空間：
[code:1:3f6f8a2cde]Dim SalaryMedian As Long
Dim WorkDept As String
其中：
SalaryMedian 主機(jī)變量
WorkDept 主機(jī)變量 [/code:1:3f6f8a2cde]
2.連接到數(shù)據(jù)庫(kù)：
[code:1:3f6f8a2cde]retcode%=Con.ConnectTo("DEMO","db2admin","db2admin")
其中：
DEMO 創(chuàng)建的訪問(wèn)DB2的ODBC名稱
db2admin OS/400 user profile
db2admin Login password[/code:1:3f6f8a2cde]
3.通過(guò)ExecProcedure調(diào)用存儲(chǔ)過(guò)程：
[code:1:3f6f8a2cde]rc=res.ExecProcedure("testProce",SalaryMedian,workdept)
其中：
testProcedure 存儲(chǔ)過(guò)程的注冊(cè)名
SalaryMedian一個(gè)輸出變量，接收存儲(chǔ)過(guò)程傳遞的值
WorkDept存儲(chǔ)過(guò)程的一個(gè)輸出參數(shù)[/code:1:3f6f8a2cde]
4.從存儲(chǔ)過(guò)程接收數(shù)據(jù)：
[code:1:3f6f8a2cde]doc.SalaryMedian = SalaryMedian[/code:1:3f6f8a2cde]
5.斷開(kāi)同數(shù)據(jù)庫(kù)的連接，隱式執(zhí)行提交：
[code:1:3f6f8a2cde]If Not Res Is Nothing Then Res.Close(DB_CLOSE)
If Not Con Is Nothing Then Con.Disconnect[/code:1:3f6f8a2cde]
【編輯推薦】
帶您了解DB2異常處理器類型
DB2連接服務(wù)器的配置
帶您了解DB2鎖的類型
DB2鎖機(jī)制深度分析
DB2添加驗(yàn)證約束的實(shí)現(xiàn)
網(wǎng)站欄目：Lotus Notes調(diào)用DB2存儲(chǔ)過(guò)程
分享地址：http://www.dlmjj.cn/article/dpdipdh.html
