各位大哥，如何在delphi中调用Oracle数据库的一个定义函数（存储过程）f_return_pacs_report函数，很急，谢谢(100分)

  • 主题发起人 主题发起人 lovenj2008
  • 开始时间 开始时间
L

lovenj2008

Unregistered / Unconfirmed
GUEST, unregistred user!
f_return_pacs_report
(as_apply_no in char,
as_result_status in char ,
as_report_man in char,
adt_report_date in date,
as_examine_man in char,
adt_examine_date in date,
as_pacs_no in char,
as_device_code in char)
return integer/*0:表示成功 <0失败*/;
请各位大哥指点下。
 
我有试过网上的一些方法，就是不能更新数据，更新报错。
 
请各位大虾帮帮忙，很急。谢谢
 
难道与mssql的调用不一样吗？
 
好象不一样，我也不太了解。请各位大哥指点指点一下，很急。谢谢
 
请说明白到底是函数还是存储过程？
这两个东西的用法可是不一样的哟
 
是个函数吧，f_return_pacs_report，是自定义的。
f_return_pacs_report(as_apply_no in char, as_result_status in char ,as_report_man in char,adt_report_date in date,as_examine_man in char, adt_examine_date in date,as_pacs_no in char, as_device_code in char)
return integer/*0:表示成功 <0失败*/;
 
如果是函数应该用select语句，如：
select * from f_return_pacs_report(....)
 
不是这样的吧，他要返回值的啊
 
as_apply_no in char 我是说了他的类型，他要一个返回值，每一个as_result_status ...这个是O数据库中的字段名。
 
是一个自定义函数，应该写的是存储过程应该。跟人家做接口的
 
使用TStoreProc就可以啊
 
如果是函数是用select调用没错了
Examples
Creating a Function: Examples
The following statement creates the function get_bal on the sample table oe.orders (the PL/SQL is in italics):

CREATE FUNCTION get_bal(acc_no IN NUMBER)
RETURN NUMBER
IS acc_bal NUMBER(11,2);
BEGIN
SELECT order_total
INTO acc_bal
FROM orders
WHERE customer_id = acc_no;
RETURN(acc_bal);
END;
/


The get_bal function returns the balance of a specified account.

When you call the function, you must specify the argument acc_no, the number of the account whose balance is sought. The datatype of acc_no is NUMBER.

The function returns the account balance. The RETURN clause of the CREATE FUNCTION statement specifies the datatype of the return value to be NUMBER.

The function uses a SELECT statement to select the balance column from the row identified by the argument acc_no in the orders table. The function uses a RETURN statement to return this value to the environment in which the function is called.

The function created in the preceding example can be used in a SQL statement. For example:

SELECT get_bal(165) FROM DUAL;

GET_BAL(165)
------------
2519
 
我一直在试。
 
他还要返回一个值，return integer/*0:表示成功 <0失败*/;
 
这没问题呀，你看看那些例子。

用了select后，在delphi中无非是返回一个数据集呀，你就判断那个字段的值是否为零呀，如果是不就等于失败呀
 
还是不行，大哥帮帮忙啊。火上加油啊
 
还有人知道啊
 
请大哥们，帮帮忙。问题没解决啊
 
还有人能帮我解决啊
 
您必须登录或注册才可回复。

Similar threads

S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
32位程序调用16位DLL
回复
0
查看
903
import
I
I
截获API函数
回复
0
查看
943
import
I
I
网络函数大公开
回复
0
查看
847
import
I
后退
顶部