PB中调用存储过程宣贯.pdfVIP

PB中调用存储过程 2010-03-09 14:33 PB中调用存储过程 PB技术 2009-11-13 10:35:55 阅读 78 评论 0 字号： 大中 小 ⑴ DECLARE ProcedureName PROCEDURE FOR StoredProcedureName @Param1=Value1, @Param2=Value2,... {USING TransactionObject} ; 注意：ProcedureName为 PB中的变量，StoredProcedureName 为数据库中的存储 过程名， Param 为数据库存储过程参数名， Value 为 PB中的变量。 ⑵ EXECUTE ProcedureName ; ⑶ FETCH Procedure INTO HostVariableList ; ⑷ CLOSE ProcedureName ; 例子： DATETIME ldt_cdt DECLARE getdate PROCEDURE FOR p_get_date; EXECUTE getdate; FETCH getdate INTO :ldt_cdt; CLOSE getdate; RETURN ldt_cdt //THE END 如果存储过程有返回值，则需要使用动态 SQL语句，利用 SQLSA，SQLDA : 之类的全局变量。你可以用关键字“ Dynamic SQL”来查找帮助。 通过测试发现，在 PB 中调用存储过程跟数据库的连接方式有关系，在此测试了 通过直连和 ODBC两种方式的调用方法： String ls_tablename="TestTable" String ls_columnname="TestColumn" Long ll_newid // 直连方式 DECLARE sp_test PROCEDURE FOR dbo.up_getnewid @TableName = :ls_tablename,@TableColumn = :ls_columnname; ////ODBC //DECLARE sp_test PROCEDURE FOR dbo.up_getnewid(:ls_tablename,:ls_columnname); //PB 调用带返回值的存储过程： //// 声明储存过程： CREATE PROCEDURE proc_pslx ( @NAME varchar(2) ,@count integer output) AS select @count = Count(*) from wo_info where whs_name=@NAME ; GO //// 在 PB中调用： Integer li_rtn DECLARE lpro_test PROCEDURE FOR proc_pslx @name='C1', @count = :li_rtn OUTPUT; EXECUTE lpro_test; Fetch lpro_test INTO :li_rtn; messagebox("",string(li_rtn))