Question

我有一个带有一个参数的Oracle函数。我需要从PowerBuilder中调用它。这可能吗？如果是这样，怎么样？谢谢！

我的功能：

CREATE OR REPLACE FUNCTION OPEN.F_VALIDATION (f_date DATE)
   RETURN NUMBER
IS
v_an number;
v_debug_line varchar2(20);
BEGIN
/*some relevant code - delete, selects, updates, inserts*/

DBMS_OUTPUT.put_line ('OK');
   COMMIT;
   RETURN v_an;
EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.put_line ('v_debug_line: ' || v_debug_line);
      DBMS_OUTPUT.put_line (
         'ERROR: ' || SQLERRM);
      ROLLBACK;

      DBMS_OUTPUT.put_line ('ERROR');
      RETURN v_an;
END F_VALIDATION ;

Answer 1

我不知道如何从PowerBuilder调用Oracle函数 - Google知道，例如在PowerBuilder: Calling Oracle Stored Procedures and Functions上，说

......一个好的方法是首先将它声明为外部函数和然后根据该声明调用它。

我不想复制/粘贴这些内容，因为它很可能是错的（正如我所说，我不会使用该软件产品）。

但是，我对你发布的代码有一些异议。如果它偏离主题，我道歉。

＆＃34;一些相关的代码＆＃34; - 这就像一样;你在那个函数中执行什么DML（以及为什么）？

SQL> create or replace function f_test 2 return number 3 is 4 begin 5 insert into dept (deptno, dname) values (99, 'test'); 6 return 1; 7 end; 8 / Function created. SQL> select f_test from dual; select f_test from dual * ERROR at line 1: ORA-14551: cannot perform a DML operation inside a query ORA-06512: at "SCOTT.F_TEST", line 5

如果你想在一个函数中执行DML，你会错过PRAGMA AUTONOMOUS_TRANSACTION并提交DML（尽管如此，COMMIT已经存在，那么也许那里的pragma ass很好），但这很可能不是个好主意。

SQL> create or replace function f_test 2 return number 3 is 4 pragma autonomous_transaction; 5 begin 6 insert into dept (deptno, dname) values (99, 'test'); 7 commit; 8 return 1; 9 end; 10 / Function created. SQL> select f_test from dual; F_TEST ---------- 1 SQL>

AskTom说这些东西是 evil ，所以 - 考虑使用带有OUT参数的过程。

另外，您是否意识到这样的EXCEPTION处理程序对最终用户没用？他们无法看到DBMS_OUTPUT.PUT_LINE结果。另一方面，看到＆＃34; v_debug_line＆＃34;建议您将其用于调试目的 - 在这种情况下，我对此没有异议。

但实际上，尽量不要在函数中使用DML。

再一次，抱歉，如果它是无关紧要的＆amp;你坚持要保持原样。

Answer 2

在此示例中，Oracle函数在与应用程序连接相同的模式中声明。

CREATE OR REPLACE FUNCTION F_VALIDATION(f_date DATE) RETURN NUMBER IS
  v_an number;
begin

  /* If f_date is today then 1 else 0 */
  select decode(to_date(sysdate), f_date, 1, 0) into v_an from dual;
  RETURN v_an;

EXCEPTION
  WHEN OTHERS THEN
    /* This will never happen */
    v_an := -1;
    RETURN v_an;
END F_VALIDATION;

将存储过程声明为用户对象的外部函数：

在用户对象画家的脚本视图中，从第一个列表中选择[声明]，从第二个列表中选择本地外部函数。
将光标放在Declare Local External Functions视图中。从弹出菜单或“编辑”菜单中，选择“选择性粘贴”＆gt;“SQL＆gt;远程存储过程”。
PowerBuilder从数据库加载存储过程并显示“远程存储过程”对话框。
选择要声明为用户对象的函数的一个或多个存储过程的名称，然后单击“确定”。
PowerBuilder从数据库中检索存储过程声明，并将每个声明粘贴到视图中。
例如，以下是选择F_VALIDATION时在一行显示的声明：

function double F_VALIDATION（datetime F_DATE）RPCFUNC ALIAS FOR＆＃34; F_VALIDATION＆＃34;

假设：

您的SQLCA已连接到编译F_VALIDATION的相同架构。
PowerBuilder代码存在于您声明为F_VALIDATION的对象中。

以下是如何调用该函数的示例。

double ld_result
ad_date = datetime( today(), now() )

ld_result = F_VALIDATION( ad_date )

if sqlca.sqlcode = -1 then
    //Some error handling
    //messagebox("Unexpected error", "Error calling F_VALIDATION. database error message=" + sqlca.sqlerrtext )
    ld_result = -1
end if

Answer 3

在您的应用程序已经连接到数据库的情况下，在PowerBuilder中调用Oracle函数的另一种方法：

long l_rc
date d_date = today()

SELECT open.f_validation( :d_date )
INTO :l_rc
FROM dual;

if sqlca.sqlcode <> 0 then
    messagebox( "Exception", "Unable to validate:~r~n" + sqlca.sqlerrtext )
end if

从PowerBuilder

3 个答案: