在包体内调用私有函数

Question

根据 Oracle 文档，可以通过在正文中而不是在规范中声明项目来使项目在包中成为私有。

我在这个包中有一个过程，它需要调用一个不应在这个包之外访问的函数。 Oracle SQL Developer 返回PLS-00313 'ADD_STUDENT' not declared in this scope

声明：

PACKAGE SCHOOL AS
    PROCEDURE ADD_PEOPLE(...);
END SCHOOL;

主体：

PACKAGE BODY SCHOOL AS
    PROCEDURE ADD_PEOPLE(...)
        ...
        ADD_STUDENT();
    END ADD_PEOPLE;

    FUNCTION ADD_STUDENT(...)
        ...
    END ADD_STUDENT;
END SCHOOL;

我找不到调用内部函数/过程以及是否需要包声明的示例 ex:SCHOOL.ADD_STUDENT()

Answer 1

您遇到的问题（假设您以正确的方式调用正确命名的过程/函数）是您试图调用对尚未声明的函数的调用。有两种方法可以解决这个问题，假设你想保持函数私有：

1. 在调用它的任何过程/函数之前声明 ADD_STUDENT 函数。
2. 在函数被调用之前使用forward declaration声明函数。

因此，对于选项 1，您的示例代码如下所示：

PACKAGE BODY SCHOOL AS
    FUNCTION ADD_STUDENT(...)
        ...
    END ADD_STUDENT;

    PROCEDURE ADD_PEOPLE(...)
        ...
        some_var := ADD_STUDENT();
    END ADD_PEOPLE;
END SCHOOL;
/

对于选项 2，您的代码如下所示：

PACKAGE BODY SCHOOL AS
    -- forward declared function
    FUNCTION ADD_STUDENT(...);

    PROCEDURE ADD_PEOPLE(...)
        ...
        some_var := ADD_STUDENT();
    END ADD_PEOPLE;

    FUNCTION ADD_STUDENT(...)
        ...
    END ADD_STUDENT;
END SCHOOL;
/

就个人而言，我更喜欢选项 1，因为这意味着包体中的东西更少，但如果您有两个相互引用的模块，则选项 2 可能是必要的。

Answer 2

你需要在body中引用它之前定义私有函数。

只需定义函数，然后定义过程。

不需要包声明 - 只需使用正文中的名称调用它，因为该名称已经在范围内。

Answer 3

在包规范中，您将函数定义为 ADD_STUDENT 当你调用 ADD_STUDENTS();

请删除“S”并重新编译。