Lotus Notes调用DB2存储过程

下面为您介绍的调用DB2存储过程方法实现的是Lotus Notes调用DB2存储过程,如果您对DB2存储过程方面感兴趣的话,不妨一看。

成都创新互联专注于镇远网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供镇远营销型网站建设,镇远网站制作、镇远网页设计、镇远网站官网定制、重庆小程序开发公司服务,打造镇远网络公司原创品牌,更为您提供镇远网站排名全网营销落地服务。

编写DB2存储过程和Lotus Notes调用DB2存储过程篇

使用DB2存储过程的应用程序必须写成两个独立的过程。主程序包含在客户应用程序中,在客户机上执行。主调程序可以用任何被支持的宿主语言编写。存储过程在数据库服务器上执行,必须用一种支持数据库服务器的编程语言编写。

我们可以用Java编写代理或用DECS、NotesPump实时Notes作业去调用存储过程,如COBOL、REXX或Java。

Lotus Notes调用DB2存储过程

我们用ExecProcedure方法去调用命名为testProce存储过程。首先要在运行存储过程的数据库中为存储过程编目,这使用CREATE PROCEDURE SQL语句。可以给存储过程传送多达30个参数(这是LotusScript的限制)。这些参数用于输入还是输出,或者是既用于输入、又用于输出,取决于为存储过程编目时对参数的定义。

客户程序例如LoadEmployee代理在客户机上运行,执行以下动作:

1.为可选数据结构和主机变量声明、分配和初始化存储空间:
[code:1:3f6f8a2cde]Dim SalaryMedian As Long
Dim WorkDept As String
其中:
SalaryMedian   主机变量 
WorkDept   主机变量 [/code:1:3f6f8a2cde]

2.连接到数据库:
[code:1:3f6f8a2cde]retcode%=Con.ConnectTo("DEMO","db2admin","db2admin")
其中:
DEMO 创建的访问DB2的ODBC名称
db2admin OS/400 user profile
db2admin Login password[/code:1:3f6f8a2cde]

3.通过ExecProcedure调用存储过程:
[code:1:3f6f8a2cde]rc=res.ExecProcedure("testProce",SalaryMedian,workdept)
其中:
testProcedure   存储过程的注册名
SalaryMedian一个输出变量,接收存储过程传递的值
WorkDept存储过程的一个输出参数[/code:1:3f6f8a2cde]

4.从存储过程接收数据:
[code:1:3f6f8a2cde]doc.SalaryMedian = SalaryMedian[/code:1:3f6f8a2cde]

5.断开同数据库的连接,隐式执行提交:
[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连接服务器的配置

带您了解DB2锁的类型

DB2锁机制深度分析

DB2添加验证约束的实现

文章名称:Lotus Notes调用DB2存储过程
当前路径:http://www.mswzjz.com/qtweb/news20/190820.html

网站建设、网络推广公司-创新互联,是专注品牌与效果的网站制作,网络营销seo公司;服务项目有等

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联