如何通过 SELECT 声明和初始化包变量

Question

谁能帮我理解为什么我可以在包中声明一个硬编码的日期值，但不能从查询中分配值？我已经看到了许多显示硬编码值声明的示例（包括参考书），但我无法找到通过查询将值分配给变量的示例。

这是允许的：

create or replace package body PACKAGE_NAME AS
    tDate DATE := '2012-05-30';
    -- ...procedures follow

这是允许的：

create or replace package body PACKAGE_NAME AS
    tDate DATE := sysdate;

这是不允许的：

create or replace package body PACKAGE_NAME AS
    tDate DATE := select MAX(date_) from Table_Name;

我尝试了多种方法，但它不起作用 - 我可以在程序本身中根据需要使用它。但我想知道为什么我不能以这种方式为tDate 赋值？具体错误是：

在期待 .... 时遇到符号“SELECT”

补充说我可以通过存储过程中的查询获取分配的变量值，但相同的过程似乎不适用于包体。

PROCEDURE Proc_Name IS
tDate Date;
BEGIN
SELECT MAX(date_) into tDate from Table_Name;

Answer 1

直接选择变量时需要使用INTO。

select MAX(date_) 
INTO tDate
from Table_Name;

Answer 2

你需要在你的包体中创建一个包初始化块。这是一个相对神秘的 PL/SQL 包知识，但它存在并且可以使用。这是一个例子：

CREATE OR REPLACE PACKAGE TEST_PKG IS
  tDate  DATE;
END TEST_PKG;

在这里，我们创建了一个仅包含一个 DATE 变量的包规范。现在我们将创建一个简单的主体，使用 SELECT 语句初始化该变量：

CREATE OR REPLACE PACKAGE BODY TEST_PKG IS
  -- package-private variables go first (if any)
(...) 
  -- then the public functions/procedures
(...)
  -- then a final BEGIN-END block which is the package initialization block
BEGIN
  SELECT SYSDATE
    INTO tDATE
    FROM DUAL;
EXCEPTION  -- you can have exception handlers in your initialization block
  WHEN OTHERS THEN
    NULL;  -- pointless here, but this is just an example
    RAISE;
END TEST_PKG;

现在如果你执行以下操作：

begin
  -- Test statements here
  DBMS_OUTPUT.PUT_LINE('TEST_PKG.tDate = ' || TEST_PKG.tDate);
end;

它应该打印当前日期。

分享和享受。