PB调用存储过程,需要返回多个值

feiyond 2008-12-20 07:53:26
我使用ODBC连接,数据库是Sql server2005,在存储过程中我计算了两个值,然后在Pb中我定义了两个变量,调用存储过程时传递这两个变量到存储过程中,例如:
Declare p_compute_profit Procedure &
For compute_profit(:yongjin_begintime,:yongjin_endtime ) //调用计算余额的存储过程
Using sqlca;
Execute p_compute_profit;
FETCH p_compute_profit into :yongjin_begintime,:yongjin_endtime;

其中:yongjin_begintime,:yongjin_endtime 是开始时间和结束时间,我希望通过调用存储过程把计算的值传给这两个变量,在存储过程中我已经把计算的值赋给了这两个变量,比如存储过程中的形参是@begintime,@endtime, 我通过计算赋给了这两个变量,我确定是有值的,但是用PB调用完后,yongjin_begintime,yongjin_endtime这两个变量仍然是初始化值,并不是经过存储过程算到的值.请问是什么原因? 我试着加上Output, compute_profit(:yongjin_begintime output,:yongjin_endtime output ) ,会提示警告,报无效的造型字符,运行后也得不到值.请问我该怎么做呢?

...全文
568 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhaokai0411 2011-03-18
  • 打赏
  • 举报
回复
学习啦 好好好
ding_ling 2010-10-21
  • 打赏
  • 举报
回复
学习一下。
feiyond 2008-12-24
  • 打赏
  • 举报
回复
问题已经解决,谢谢liubocy帮我解决了难题.
hcw_peter 2008-12-22
  • 打赏
  • 举报
回复
7樓的總結真好,非常完整!
經常看到你的精彩解說!
gaoko 2008-12-22
  • 打赏
  • 举报
回复
强人啊
YewPu 2008-12-22
  • 打赏
  • 举报
回复
好久没用过存储过程啦。
dawugui 2008-12-22
  • 打赏
  • 举报
回复
存储过程简介 

一、存储过程介绍
  存储过程是由流控制和SQL语句书写的过程,这个过程经编译和优化后存储在数据库服务器中,使用时只要调用即可。在ORACLE中,若干个有联系的过程可以组合在一起构成程序包。
  使用存储过程有以下的优点:
  * 存储过程的能力大大增强了SQL语言的功能和灵活性。存储过程可以用流控制语句编写,有很强的灵活性,可以完成复杂的判断和较复杂的运算。
  * 可保证数据的安全性和完整性。
  # 通过存储过程可以使没有权限的用户在控制之下间接地存取数据库,从而保证数据的安全。
  # 通过存储过程可以使相关的动作在一起发生,从而可以维护数据库的完整性。
  * 再运行存储过程前,数据库已对其进行了语法和句法分析,并给出了优化执行方案。这种已经编译好的过程可极大地改善SQL语句的性能。
  由于执行SQL语句的大部分工作已经完成,所以存储过程能以极快的速度执行。
  * 可以降低网络的通信量。
  * 使体现企业规则的运算程序放入数据库服务器中,以便:
  # 集中控制。
  # 当企业规则发生变化时在服务器中改变存储过程即可,无须修改任何应用程序。企业规则的特点是要经常变化,如果把体现企业规则的运算程序放入应用程序中,则当企业规则发生变化时,就需要修改应用程序工作量非常之大(修改、发行和安装应用程序)。如果把体现企业规则的运算放入存储过程中,则当企业规则发生变化时,只要修改存储过程就可以了,应用程序无须任何变化。
  不同数据库存储过程的写法不一,在后面的讲座中将分别介绍ORACLE和SYBASE存储过程的用法。

  二、ORACLE 的存储过程
  ORACLE 创建存储过程的语法为:
  create [or replace] procedure 过程名
  参数1 [in|out|in out] 数据类型
  [,参数2 [in|out|in out] 数据类型]...
  {is|as} pl/sql 语句
  下面举例说明ORACLE数据库存储过程的写法和用法。
  可以建立一个存储过程,每当用户修改数据库的重要数据时,即把用户的用户名、日期和操作类型记录下来:
  create procedure update_log is
  begin
   insert into update_log_tab(use_name,update_date,operation)
   values(user,sysdate,'update'
  end;
  可以在恰当的位置调用这个存储过程来记录用户对表的修改。例如下面在表sal_comm上建立一个修改触发器,每当用户修改此表后,用户的名称、修改时间和操作即被记录在了表update_log_tab中:
  create trigger audit_update
  after update on sal_comm
  for each row
  begin
   update_log
  end

  三、Sybase的存储过程
  尽管Sybase存储过程的功能和写法与ORACLE类似,但他们之间还是有一定的差别。下面讲述SYBASE的存储过程。
  SYBASE可以用CREATE PROCedure命令生成存储过程:
  CREATE PROCedure 存储过程名 [;number]
  [[(] @parameter_name datatype [=default] [OUTput]
  [, @parameter_name datatype [=default] [OUTput]]...[)]]
  [WITH RECOMPILE]
  AS SQL_statements
  下面是一个查询作者编码、名称和生日的存储过程:
  create proc p_auths @author_code varchar(10)
  as
  select author_code, name, birthdate
  from auths
  where author_code=@author_code
  下面执行过程p_auths:
  p_auths @author_code=A00001
  在CREATE PROC语句中,可以为参数赋缺省值,该值可以是任何常量。当用户不提供参数值时,该值便作为参数值提供给过程。

谈谈PB中存储过程(Stored Proedure)的使用
  1、定义:
  存储过程(Stored Produre)是为了完成特定的功能而汇集成一组的SQL语句集,并为该组SQL语句命名,经编译后存储在SQL Server的数据库中。用户可以根据需要决定是否在每次执行时让SQL Server进行重新编译。用户可以指定存储过程的名字和给出参数来执行它。
  语法:
  创建存储过程:
  CREATE PROC procedure_name(@parameter_name datatype [OUTPUT][,@parameter_name datatype[OUTPUT]…])
  AS
  SQL_statements
  [RETURN]
  执行存储过程:
  EXEC procedure_name [@parameter_name = value[,@parameter_name = ] @variable output ……]

  2、存储过程的优点:
  使用存储过程可以提高:
  安全性
  一致性
  数据完整性
  响应速度
  应用开发效率

  3、应用举例:
  用存储过程进行对输入仓位的查询:
  表inventory的字段为: site,supplier,style,kind,color,size,qty…
  Create Proc proc_qty_inventory(@lnsite char(3))
  As
  select supplier,style,kind,color,size,qty…
  from inventory
  where site = @lnsite
  return

dawugui 2008-12-22
  • 打赏
  • 举报
回复
声明存储过程 

  CREATE PROCEDURE sp_results_demo @InParmInt Int,@OutParmInt OUTPUT

  AS

  BEGIN

  SELECT 1,2,3,4

  SELECT uid,id

  FROM sysobjects

  WHERE type='U'

  SELECT @OutParmInt=69

  Return 16

  END

  用于返回每个返回值时用PowerScrip如下:

  Long lReturn,lPram1,lPram2,lResult1,lResult2,lResult3,lResult4,lResult5,lResult6

  DECLARE results_demo PROCEDURE FOR

  @returnValue=sp_results_demo

  @InParmInt = :lPram1,

  @OutParmInt = :lPram2 OUTPUT using sqlca;

  execute results_demo;

  Do While SQLCA.SQLCode=0

   Fetch results_demo INTO :lResult1,:lResult2,:lResult3,:lResult4 ;

  Loop

  Fetch results_demo INTO :lResult5,:lResult6 ;

  Do While sqlca.sqlcode=0

   Fetch results_demo Into :lResult5,:lResult6;

  Loop

  Fetch results_demo Into :lReturn,:lPram2;

  Close results_demo ;

orcd 2008-12-22
  • 打赏
  • 举报
回复
输出需要定义成output类型
sjq521521 2008-12-22
  • 打赏
  • 举报
回复
SQLserver没搞过,只会ORACLE的。
fuxiaoyang13 2008-12-22
  • 打赏
  • 举报
回复
进步源于学习!!
liubocy 2008-12-21
  • 打赏
  • 举报
回复
专用连接1楼的没问题,odbc用下面的方法:

调用SQL Server存储过程问题
(通过ODBC连接sqlserver数据库调用存储过程并获得return或output的值)
假如需要调用下面的存储过程:
================================================
Create proc p_aaa(@a int output, @b int output)
as
set @a = @a + 2
set @b = @b + 3
return 1000
GO
================================================
1、新建一个standard class(new --> pbobject),并在select standard class type 中选择transaction,
这时会打开一个声明函数的窗口

2、在上面的窗口上选择底部的 Declare instance variables 页,
在变量类型的下拉框中选择 Local External Functions

3、在空白处右键选择paste special -> sql -> remote stored procedure,回出现选择存储过程的窗口,
选择即可生成函数。如选择p_aaa的时候生成如下函数声明

function long p_aaa(ref long a,ref long b) RPCFUNC ALIAS FOR "dbo.p_aaa"

4、保存你的对象为:uo_tran

5、双击打开应用(application),选择additional properties -> variable types,
修改SQLCA中的transaction为uo_tran即可

6、然后你在程序中就可以象使用函数一样调用您的存储过程,如:

long ll_a, ll_b, ll_ret

ll_a = 1
ll_b = 4

ll_ret = sqlca.p_aaa(ll_a, ll_b)

messagebox( string(ll_ret), string(ll_a) + ',' + string(ll_b) )
gjz_1209 2008-12-21
  • 打赏
  • 举报
回复
跟踪一下,可能存储过程就没执行成功。
liubocy 2008-12-20
  • 打赏
  • 举报
回复
@yongjin_begintime ,@yongjin_endtime 为存储过程中的参数名称。

Declare p_compute_profit Procedure For compute_profit
@yongjin_begintime = :yongjin_begintime output,
@yongjin_endtime = :yongjin_endtime output;
Execute p_compute_profit;
FETCH p_compute_profit into :yongjin_begintime,:yongjin_endtime;

609

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder DataWindow
社区管理员
  • DataWindow社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧