如何使用 PL/SQL (Oracle 10g) 从另一个 PL/SQL 文件的包函数内的 PL/SQL 文件调用函数

编程问答 2022-05-17

问题描述

我有两个 sql 文件。一个是 "function.sql"，另一个是 "donor.sql"。 "donor.sql" 有一个包 "AddDonor" 和 "add_donor"函数。这是代码：

create or replace package AddDonor as 
    function add_donor(id in Donation.id%TYPE,d_id in Donor.d_id%TYPE,p_id in Participant.p_id%TYPE,name in Donor.name%TYPE,age in Donor.age%TYPE,gender in Donor.gender%TYPE,bg in Donor.bg%TYPE,branch in Donor.branch%TYPE,contactno in Donor.contactno%TYPE,status in Donation.status%TYPE,c_id in Campaign.c_id%TYPE)
    return number;
end AddDonor;
/
create or replace package body AddDonor as 

    function add_donor(id in Donation.id%TYPE,c_id in Campaign.c_id%TYPE)
    return number
    is
    flag number:=0;
    BEGIN
        
        flag := add_donor1(d_id,name,age,gender,bg,branch,contactno);
        return flag;
    END add_donor;
    
End AddDonor;
/

"function.sql" 有 "adddonor1" 函数。这个函数不是任何包的一部分。"adddonor1" 是一个支架"function.sql" 文件中的单独函数。这是代码：

create or replace function add_donor1(id in Donation.id%TYPE,c_id in Campaign.c_id%TYPE)
    return number
    is
 
BEGIN
    insert into Donor values(d_id,contactno);
    insert into Donation values(id,d_id,status);
    insert into Participant values(p_id,c_id,bg);
    insert into Donor@server_link values(d_id,contactno);
    insert into Donation@server_link values(id,status);
    insert into Participant@server_link values(p_id,bg);
    return 1;
END add_donor1;
/
commit;

我想从包内的“function.sql”调用 “add_donor1” “AddDonor”和包函数“add_donor”来自“donor.sql”文件

我已经试过了：

flag := add_donor1(d_id,contactno);

但它显示：

8/3 PL/sql：忽略 sql 语句
8/10 PL/sql: ORA-00904:"FUNCTIONS"."ADD_DOnor1": 无效标识符

如何使用 PL/sql (Oracle 10g) 从另一个 pl/sql 文件的包函数内的 pl/sql 文件调用函数 如何解决这个问题？

解决方法

我已经试过了。它不起作用。请检查我的代码。通过 .sql 文件，我的意思是说我已经在 .sql 文件中编写了代码。然后我使用命令行来执行文件。

您需要按照依赖顺序运行这两个脚本。不依赖于其他任何东西的程序必须首先运行。您有一个依赖于独立函数的包，因此您需要先运行函数脚本。

  1. @function.sql
  2. @donor.sql

您的包存在问题：对 add_donor1() 的调用具有错误数量的参数。您需要传递签名中声明的所有参数。修复后，您的代码将编译并运行。

这是一个hdf5

顺便说一句，使用函数通过发出 DML 来更改数据库状态被广泛认为是不好的做法。它应该是一个过程（一个不返回任何内容的程序单元）。您的函数返回一个虚拟值而不是任何有意义的值这一事实强调了这一点。 ——

,

你说了一些“奇怪”的话。文件 (.sql) 使我感到困惑。这是一个 Oracle 数据库，您不能从存储在磁盘上的文件中操作其对象，而是从数据库本身内部操作。

因此：连接到数据库（使用您使用的任何工具；是 SQL*Plus、SQL Developer、TOAD、... - 无关紧要）

  • 首先通过运行 add_donor1 语句创建一个函数 (create function)
  • 然后通过运行 create package 和 create package body 创建一个包
    • 包的函数add_donor调用独立函数add_donor1；因为它已经存在，包应该编译

因为我没有你的表格（而且不想打那么多字），我评论了多余代码，只是为了向你展示它有效如果做得好。

function.sql

create or replace function add_donor1
  /*
  (id in Donation.id%TYPE,d_id in Donor.d_id%TYPE,p_id in Participant.p_id%TYPE,name in Donor.name%TYPE,age in Donor.age%TYPE,gender in Donor.gender%TYPE,bg in Donor.bg%TYPE,branch in Donor.branch%TYPE,contactno in Donor.contactno%TYPE,status in Donation.status%TYPE,c_id in Campaign.c_id%TYPE)
  */  
    return number
    is
BEGIN
   /*
    insert into Donor values(d_id,name,age,gender,bg,branch,contactno);
    insert into Donation values(id,d_id,status);
    insert into Participant values(p_id,c_id,bg);
    insert into Donor@server_link values(d_id,contactno);
    insert into Donation@server_link values(id,status);
    insert into Participant@server_link values(p_id,bg);
   */   
    return 1;
END add_donor1;
/

donor.sql

create or replace package AddDonor as 
    function add_donor
      --(id in Donation.id%TYPE,c_id in Campaign.c_id%TYPE)
    return number;
end AddDonor;
/
create or replace package body AddDonor as 

    function add_donor
      --(id in Donation.id%TYPE,c_id in Campaign.c_id%TYPE)
    return number
    is
    flag number:=0;
    BEGIN
        
        flag := add_donor1; --(d_id,contactno);
        return flag;
    END add_donor;
    
End AddDonor;
/

执行：

SQL> @function

Function created.

SQL> @donor

Package created.


Package body created.

SQL>

看到了吗？没有错误。

oracleoracleoracle10gplsqlplsqlplsql-package